123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064 |
- /* -*- mode: c; tab-width: 4; c-basic-offset: 3; c-file-style: "linux" -*- */
- //
- // Copyright (c) 2008, Wei Mingzhi <whistler_wmz@users.sf.net>.
- // All rights reserved.
- //
- // Portions based on PALx Project by palxex.
- // Copyright (c) 2006-2008, Pal Lockheart <palxex@gmail.com>.
- //
- // This file is part of SDLPAL.
- //
- // SDLPAL is free software: you can redistribute it and/or modify
- // it under the terms of the GNU General Public License as published by
- // the Free Software Foundation, either version 3 of the License, or
- // (at your option) any later version.
- //
- // This program is distributed in the hope that it will be useful,
- // but WITHOUT ANY WARRANTY; without even the implied warranty of
- // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- // GNU General Public License for more details.
- //
- // You should have received a copy of the GNU General Public License
- // along with this program. If not, see <http://www.gnu.org/licenses/>.
- //
- // Modified by Lou Yihua <louyihua@21cn.com> with Unicode support, 2015
- //
- #include "main.h"
- #include <errno.h>
- #define FONT_COLOR_DEFAULT 0x4F
- #define FONT_COLOR_YELLOW 0x2D
- #define FONT_COLOR_RED 0x1A
- #define FONT_COLOR_CYAN 0x8D
- #define FONT_COLOR_CYAN_ALT 0x8C
- BOOL g_fUpdatedInBattle = FALSE;
- #define MESSAGE_MAX_BUFFER_SIZE 512
- #define INCLUDE_CODEPAGE_H
- #include "codepage.h"
- #ifndef PAL_CLASSIC
- # define ATB_WORD_COUNT 6
- static LPWSTR gc_rgszAdditionalWords[CP_MAX][ATB_WORD_COUNT] = {
- { L"\x6230\x9B25\x901F\x5EA6", L"\x4E00", L"\x4E8C", L"\x4E09", L"\x56DB", L"\x4E94" },
- { L"\x6218\x6597\x901F\x5EA6", L"\x4E00", L"\x4E8C", L"\x4E09", L"\x56DB", L"\x4E94" },
- //{ L"\x6226\x95D8\x901F\x5EA6", L"\x4E00", L"\x4E8C", L"\x4E09", L"\x56DB", L"\x4E94" },
- };
- static LPWSTR gc_rgszDefaultAdditionalWords[ATB_WORD_COUNT] = { NULL, L"\xFF11", L"\xFF12", L"\xFF13", L"\xFF14", L"\xFF15" };
- #endif
- #define SDLPAL_EXTRA_WORD_COUNT 1
- static LPWSTR gc_rgszSDLPalWords[CP_MAX][SDLPAL_EXTRA_WORD_COUNT] = {
- { L"\x8FD4\x56DE\x8A2D\x5B9A" },
- { L"\x8FD4\x56DE\x8BBE\x7F6E" },
- };
- LPWSTR g_rcCredits[12];
- typedef struct tagTEXTLIB
- {
- LPWSTR *lpWordBuf;
- LPWSTR *lpMsgBuf;
- int **lpIndexBuf;
- int nWords;
- int nMsgs;
- int nIndices;
- int nCurrentDialogLine;
- BYTE bCurrentFontColor;
- PAL_POS posIcon;
- PAL_POS posDialogTitle;
- PAL_POS posDialogText;
- BYTE bDialogPosition;
- BYTE bIcon;
- int iDelayTime;
- BOOL fUserSkip;
- BOOL fPlayingRNG;
- BYTE bufDialogIcons[282];
- } TEXTLIB, *LPTEXTLIB;
- static TEXTLIB g_TextLib;
- PAL_FORCE_INLINE int
- PAL_ParseLine(
- char *line,
- char **value,
- int *length,
- int deltrail
- )
- {
- //
- // Remove the leading spaces
- //
- while (*line && iswspace(*line)) line++;
- //
- // Skip comments starting with '#'
- //
- if (*line && *line != '#')
- {
- //
- // Split the index and value
- //
- LPSTR val = strchr(line, '=');
- if (val)
- {
- //
- // Remove the trailing spaces
- //
- LPSTR end = line + strlen(line);
- int index;
- if (end > line && end[-1] == '\n') *(--end) = 0;
- if (deltrail) while (end > line && iswspace(end[-1])) *(--end) = 0;
- //
- // Parse the index and pass out value
- //
- if (sscanf(line, "%d", &index) == 1)
- {
- *value = val + 1;
- *length = end - *value;
- return index;
- }
- }
- }
- return 0;
- }
- PAL_FORCE_INLINE char *
- PAL_ReadOneLine(
- char *temp,
- int limit,
- FILE *fp
- )
- {
- if (fgets(temp, limit, fp))
- {
- int n = strlen(temp);
- if (n == limit - 1 && temp[n - 1] != '\n' && !feof(fp))
- {
- // Line too long, try to read it as a whole
- int nn = 2;
- char *tmp = strdup(temp);
- while (!feof(fp))
- {
- if (!(tmp = (char *)realloc(tmp, nn * limit)))
- {
- TerminateOnError("PAL_ReadOneLine(): failed to allocate memory for long line!");
- }
- if (fgets(tmp + n, limit + 1, fp))
- {
- n += strlen(tmp + n);
- if (n < limit - 1 || temp[n - 1] == '\n')
- break;
- else
- nn++;
- }
- }
- if (tmp[n - 1] == '\n') tmp[n - 1] = 0;
- return tmp;
- }
- else
- {
- while (n > 0 && (temp[n - 1] == '\n' || temp[n - 1] == '\r')) temp[--n] = 0;
- return temp;
- }
- }
- else
- return NULL;
- }
- static int
- PAL_ReadMessageFile(
- FILE *fp
- )
- {
- char temp[MESSAGE_MAX_BUFFER_SIZE];
- struct _msg_entry
- {
- struct _msg_entry *next;
- wchar_t *value;
- } *cur_val = NULL;
- struct _msg_list_entry
- {
- struct _msg_list_entry *next;
- struct _msg_entry *value;
- int index;
- int count;
- } *head = NULL, *item = NULL;
- struct _word_list_entry
- {
- struct _word_list_entry *next;
- wchar_t *value;
- int index;
- } whead = { NULL, NULL }, *witem = NULL;
- enum _message_state
- {
- ST_OUTSIDE,
- ST_DIALOG,
- ST_WORD,
- ST_CREDIT,
- ST_LAYOUT
- } state = ST_OUTSIDE;
- int idx_cnt = 0, msg_cnt = 0, word_cnt = 0, sid, eid = -1;
- while (!feof(fp))
- {
- char *buffer;
- if (buffer = PAL_ReadOneLine(temp, MESSAGE_MAX_BUFFER_SIZE, fp))
- {
- switch(state)
- {
- case ST_OUTSIDE:
- //
- // Skip comments starting with '#'
- //
- if (*buffer && *buffer != '#')
- {
- if (strncmp(buffer, "[BEGIN MESSAGE]", 15) == 0 &&
- sscanf(buffer + 15, "%d", &sid) == 1 && sid > eid)
- {
- state = ST_DIALOG;
- //
- // First save values (converted wide string) into a linked list
- //
- if (head)
- {
- item->next = (struct _msg_list_entry *)UTIL_malloc(sizeof(struct _msg_list_entry));
- item = item->next;
- }
- else
- {
- head = (struct _msg_list_entry *)UTIL_malloc(sizeof(struct _msg_list_entry));
- item = head;
- }
- item->value = NULL; item->index = sid;
- item->count = 0; item->next = NULL; cur_val = NULL;
- if (idx_cnt < item->index) idx_cnt = item->index;
- }
- else if (strncmp(buffer, "[BEGIN WORDS]", 13) == 0 && !witem)
- {
- state = ST_WORD;
- //
- // First save values (converted wide string) into a linked list
- //
- witem = &whead;
- }
- else if (strncmp(buffer, "[BEGIN CREDITS]", 15) == 0 && !witem)
- {
- state = ST_CREDIT;
- }
- else if (strncmp(buffer, "[BEGIN LAYOUT]", 14) == 0 && !witem)
- {
- state = ST_LAYOUT;
- gConfig.fUseCustomScreenLayout = TRUE;
- }
- else
- {
- // Just ignore invalid lines
- #ifdef ENABLE_LOG
- UTIL_WriteLog(LOG_ERR, "PAL_ReadMessageFile(): encounter invalid line '%s'!\n", line);
- #endif
- }
- }
- break;
- case ST_DIALOG:
- //
- // Check if to end one dialog
- //
- if (strncmp(buffer, "[END MESSAGE]", 13) == 0 &&
- sscanf(buffer + 13, "%d", &eid) == 1 && eid >= sid)
- {
- // End dialog
- state = ST_OUTSIDE;
- }
- else
- {
- if (cur_val)
- {
- cur_val->next = (struct _msg_entry *)UTIL_malloc(sizeof(struct _msg_entry));
- cur_val = cur_val->next;
- }
- else
- cur_val = (struct _msg_entry *)UTIL_malloc(sizeof(struct _msg_entry));
- if (strncmp(buffer, "[CLEAR MESSAGE]", 15) == 0)
- {
- cur_val->value = NULL;
- }
- else
- {
- int len = PAL_MultiByteToWideCharCP(CP_UTF_8, buffer, -1, NULL, 0);
- cur_val->value = (wchar_t *)UTIL_malloc(len * sizeof(wchar_t));
- PAL_MultiByteToWideCharCP(CP_UTF_8, buffer, -1, cur_val->value, len);
- msg_cnt++;
- }
- if (!item->value) item->value = cur_val;
- cur_val->next = NULL; item->count++;
- }
- break;
- case ST_WORD:
- //
- // Check if to end word list
- //
- if (strncmp(buffer, "[END WORDS]", 11) == 0)
- {
- // End word list
- state = ST_OUTSIDE;
- }
- else
- {
- char *v;
- int l, i = PAL_ParseLine(buffer, &v, &l, FALSE);
- if (i > 0)
- {
- int len = PAL_MultiByteToWideCharCP(CP_UTF_8, v, -1, NULL, 0);
- struct _word_list_entry *val = (struct _word_list_entry *)UTIL_malloc(sizeof(struct _word_list_entry));
- val->value = (wchar_t *)UTIL_malloc(len * sizeof(wchar_t));
- PAL_MultiByteToWideCharCP(CP_UTF_8, v, -1, val->value, len);
- val->index = i; val->next = NULL;
- witem->next = val; witem = witem->next;
- if (word_cnt < i) word_cnt = i;
- }
- }
- break;
- case ST_CREDIT:
- //
- // Check if to end credit list
- //
- if (strncmp(buffer, "[END CREDITS]", 13) == 0)
- {
- // End credit list
- state = ST_OUTSIDE;
- }
- else
- {
- char *v;
- int l, i = PAL_ParseLine(buffer, &v, &l, FALSE);
- if ((i == 1 || (i >= 6 && i <= 11)) && !g_rcCredits[i])
- {
- int limit = (i == 1) ? 24 * 8 : 40 * 8, w = 0, j = 0, len;
- if (i == 6 || i == 7)
- {
- if (PAL_PLATFORM && PAL_CREDIT && PAL_PORTYEAR)
- {
- const char *templates[] = { "${platform}", "${author}", "${year}" };
- const char *values[] = { PAL_PLATFORM, PAL_CREDIT, PAL_PORTYEAR };
- const int matchlen[] = { 11, 9, 7 };
- const int valuelen[] = { sizeof(PAL_PLATFORM) - 1, sizeof(PAL_CREDIT) - 1, sizeof(PAL_PORTYEAR) - 1 };
- char *tmp = (char *)alloca(valuelen[0] + valuelen[1] + valuelen[2] + l + 1);
- char *dst = tmp, *src = v;
- while (*src)
- {
- if (*src == '$')
- {
- int k;
- for (k = 0; k < 3 && strncmp(src, templates[k], matchlen[k]); k++);
- if (k < 3)
- {
- strcpy(dst, values[k]);
- dst += valuelen[k];
- src += matchlen[k];
- continue;
- }
- }
- *dst++ = *src++;
- }
- *dst = 0;
- len = PAL_MultiByteToWideCharCP(CP_UTF_8, tmp, -1, NULL, 0);
- g_rcCredits[i] = (wchar_t *)UTIL_malloc(len * sizeof(wchar_t));
- PAL_MultiByteToWideCharCP(CP_UTF_8, tmp, -1, g_rcCredits[i], len);
- }
- }
- else
- {
- len = PAL_MultiByteToWideCharCP(CP_UTF_8, v, -1, NULL, 0);
- g_rcCredits[i] = (wchar_t *)UTIL_malloc(len * sizeof(wchar_t));
- PAL_MultiByteToWideCharCP(CP_UTF_8, v, -1, g_rcCredits[i], len);
- }
- if (g_rcCredits[i])
- {
- // Limit the length of texts
- while (w < limit && j < len - 1) w += PAL_CharWidth(g_rcCredits[i][j++]);
- if (w >= limit) g_rcCredits[i][w > limit ? j - 1 : j] = 0;
- }
- }
- }
- break;
- case ST_LAYOUT:
- if (strncmp(buffer, "[END LAYOUT]", 12) == 0)
- {
- // End layout
- state = ST_OUTSIDE;
- }
- else
- {
- char *v;
- int x, y, f, n, l, i = PAL_ParseLine(buffer, &v, &l, FALSE);
- if (i >= 1 && i <= (sizeof(SCREENLAYOUT) / sizeof(PAL_POS)))
- {
- if ((n = sscanf(v, "%d,%d,%d", &x, &y, &f)) >= 2 && x < 320 && y < 200)
- {
- gConfig.ScreenLayoutArray[i - 1] = PAL_XY(x, y);
- if (n == 3) gConfig.ScreenLayoutFlag[i - 1] = f;
- }
- }
- }
- break;
- default:
- TerminateOnError("PAL_ReadMessageFile(): Reached an unknown state. Something really wrong may have happened!");
- break;
- }
- if (buffer != temp) free(buffer);
- }
- }
- if (msg_cnt > 0)
- {
- //
- // Move values from linked list to array
- //
- int idx_msg = 1;
- g_TextLib.nIndices = (idx_cnt += 1);
- g_TextLib.nMsgs = (msg_cnt += 1);
- g_TextLib.lpIndexBuf = (int **)UTIL_calloc(idx_cnt, sizeof(int *));
- g_TextLib.lpMsgBuf = (LPWSTR *)UTIL_calloc(msg_cnt, sizeof(LPWSTR));
- for (item = head; item; )
- {
- struct _msg_list_entry *temp = item->next;
- struct _msg_entry *msg = item->value;
- int index = 0;
- g_TextLib.lpIndexBuf[item->index] = (int *)UTIL_calloc(item->count + 1, sizeof(int));
- while (msg)
- {
- struct _msg_entry *tmp = msg->next;
- if (msg->value)
- {
- g_TextLib.lpIndexBuf[item->index][index++] = idx_msg;
- g_TextLib.lpMsgBuf[idx_msg++] = msg->value;
- }
- else
- g_TextLib.lpIndexBuf[item->index][index++] = 0;
- free(msg); msg = tmp;
- }
- g_TextLib.lpIndexBuf[item->index][item->count] = -1;
- free(item); item = temp;
- }
- }
- if (word_cnt > 0)
- {
- //
- // Move values from linked list to array
- //
- #ifndef PAL_CLASSIC
- int i;
- #endif
- if (word_cnt < MINIMAL_WORD_COUNT - 1) word_cnt = MINIMAL_WORD_COUNT - 1;
- g_TextLib.nWords = (word_cnt += 1);
- g_TextLib.lpWordBuf = (LPWSTR *)UTIL_calloc(word_cnt, sizeof(LPWSTR));
- for (witem = whead.next; witem; )
- {
- struct _word_list_entry *temp = witem->next;
- g_TextLib.lpWordBuf[witem->index] = witem->value;
- free(witem); witem = temp;
- }
- #ifndef PAL_CLASSIC
- for (i = 1; i < ATB_WORD_COUNT; i++)
- if (!g_TextLib.lpWordBuf[i + SYSMENU_LABEL_BATTLEMODE])
- g_TextLib.lpWordBuf[i + SYSMENU_LABEL_BATTLEMODE] = gc_rgszDefaultAdditionalWords[i];
- #endif
- }
- fclose(fp);
- return (msg_cnt > 0 && word_cnt > 0) ? 1 : 0;
- }
- INT
- PAL_InitText(
- VOID
- )
- /*++
- Purpose:
- Initialize the in-game texts.
- Parameters:
- None.
- Return value:
- 0 = success.
- -1 = memory allocation error.
- --*/
- {
- if (gConfig.pszMsgFile)
- {
- //
- // Open the message, index and word data files.
- //
- FILE *fp = UTIL_OpenRequiredFileForMode(gConfig.pszMsgFile, "r");
- //
- // Read the contents of the message, index and word data files.
- //
- if (!PAL_ReadMessageFile(fp))
- {
- return -1;
- }
- else
- {
- DWORD dwWordLength = 0;
- int i;
- for (i = 1; i < g_TextLib.nWords; i++)
- {
- if (g_TextLib.lpWordBuf[i])
- {
- LPWSTR ptr = g_TextLib.lpWordBuf[i];
- DWORD n = 0;
- while (*ptr) n += PAL_CharWidth(*ptr++) >> 3;
- if (dwWordLength < n) dwWordLength = n;
- }
- }
- gConfig.dwWordLength = dwWordLength;
- for (i = 0; i < 12; i++)
- {
- if (!g_rcCredits[i])
- g_rcCredits[i] = L"";
- }
- }
- }
- else
- {
- FILE *fpMsg, *fpWord;
- DWORD *offsets;
- LPWSTR tmp;
- LPBYTE temp;
- int wpos, wlen, i;
- //
- // Open the message and word data files.
- //
- fpMsg = UTIL_OpenRequiredFile("m.msg");
- fpWord = UTIL_OpenRequiredFile("word.dat");
- //
- // See how many words we have
- //
- fseek(fpWord, 0, SEEK_END);
- i = ftell(fpWord);
- //
- // Each word has 10 bytes
- //
- g_TextLib.nWords = (i + (gConfig.dwWordLength - 1)) / gConfig.dwWordLength;
- if (g_TextLib.nWords < MINIMAL_WORD_COUNT) g_TextLib.nWords = MINIMAL_WORD_COUNT;
- //
- // Read the words
- //
- temp = (LPBYTE)malloc(gConfig.dwWordLength * g_TextLib.nWords);
- if (temp == NULL)
- {
- fclose(fpWord);
- fclose(fpMsg);
- return -1;
- }
- fseek(fpWord, 0, SEEK_SET);
- fread(temp, i, 1, fpWord);
- memset(temp + i, 0, gConfig.dwWordLength * g_TextLib.nWords - i);
- //
- // Close the words file
- //
- fclose(fpWord);
- // Split the words and do code page conversion
- for (i = 0, wlen = 0; i < g_TextLib.nWords; i++)
- {
- int base = i * gConfig.dwWordLength;
- int pos = base + gConfig.dwWordLength - 1;
- while (pos >= base && temp[pos] == ' ') temp[pos--] = 0;
- wlen += PAL_MultiByteToWideChar((LPCSTR)temp + base, gConfig.dwWordLength, NULL, 0) + 1;
- }
- g_TextLib.lpWordBuf = (LPWSTR*)malloc(g_TextLib.nWords * sizeof(LPWSTR));
- if (g_TextLib.lpWordBuf == NULL)
- {
- free(temp);
- fclose(fpWord);
- fclose(fpMsg);
- return -1;
- }
- tmp = (LPWSTR)malloc(wlen * sizeof(WCHAR));
- if (tmp == NULL)
- {
- free(g_TextLib.lpWordBuf);
- free(temp);
- fclose(fpWord);
- fclose(fpMsg);
- return -1;
- }
- for (i = 0, wpos = 0; i < g_TextLib.nWords; i++)
- {
- int l;
- g_TextLib.lpWordBuf[i] = tmp + wpos;
- l = PAL_MultiByteToWideChar((LPCSTR)temp + i * gConfig.dwWordLength, gConfig.dwWordLength, g_TextLib.lpWordBuf[i], wlen - wpos);
- if (l > 0 && g_TextLib.lpWordBuf[i][l - 1] == '1')
- g_TextLib.lpWordBuf[i][l - 1] = 0;
- g_TextLib.lpWordBuf[i][l] = 0;
- wpos += l + 1;
- }
- free(temp);
- //
- // Read the message offsets. The message offsets are in SSS.MKF #3
- //
- i = PAL_MKFGetChunkSize(3, gpGlobals->f.fpSSS) / sizeof(DWORD);
- g_TextLib.nMsgs = i - 1;
- offsets = (LPDWORD)malloc(i * sizeof(DWORD));
- if (offsets == NULL)
- {
- free(g_TextLib.lpWordBuf);
- fclose(fpMsg);
- return -1;
- }
- PAL_MKFReadChunk((LPBYTE)(offsets), i * sizeof(DWORD), 3, gpGlobals->f.fpSSS);
- //
- // Read the messages.
- //
- fseek(fpMsg, 0, SEEK_END);
- i = ftell(fpMsg);
- temp = (LPBYTE)malloc(i);
- if (temp == NULL)
- {
- free(offsets);
- free(g_TextLib.lpWordBuf[0]);
- free(g_TextLib.lpWordBuf);
- fclose(fpMsg);
- return -1;
- }
- fseek(fpMsg, 0, SEEK_SET);
- fread(temp, 1, i, fpMsg);
- fclose(fpMsg);
- // Split messages and do code page conversion here
- for (i = 0, wlen = 0; i < g_TextLib.nMsgs; i++)
- {
- wlen += PAL_MultiByteToWideChar((LPCSTR)temp + SDL_SwapLE32(offsets[i]), SDL_SwapLE32(offsets[i + 1]) - SDL_SwapLE32(offsets[i]), NULL, 0) + 1;
- }
- g_TextLib.lpMsgBuf = (LPWSTR*)malloc(g_TextLib.nMsgs * sizeof(LPWSTR));
- if (g_TextLib.lpMsgBuf == NULL)
- {
- free(g_TextLib.lpWordBuf);
- free(offsets);
- return -1;
- }
- tmp = (LPWSTR)malloc(wlen * sizeof(WCHAR));
- if (tmp == NULL)
- {
- free(g_TextLib.lpMsgBuf);
- free(g_TextLib.lpWordBuf);
- free(offsets);
- return -1;
- }
- for (i = 0, wpos = 0; i < g_TextLib.nMsgs; i++)
- {
- int l;
- g_TextLib.lpMsgBuf[i] = tmp + wpos;
- l = PAL_MultiByteToWideChar((LPCSTR)temp + SDL_SwapLE32(offsets[i]), SDL_SwapLE32(offsets[i + 1]) - SDL_SwapLE32(offsets[i]), g_TextLib.lpMsgBuf[i], wlen - wpos);
- g_TextLib.lpMsgBuf[i][l] = 0;
- wpos += l + 1;
- }
- free(temp);
- free(offsets);
- g_TextLib.lpIndexBuf = NULL;
- memcpy(g_TextLib.lpWordBuf + SYSMENU_LABEL_LAUNCHSETTING, gc_rgszSDLPalWords[gConfig.uCodePage], SDLPAL_EXTRA_WORD_COUNT * sizeof(LPCWSTR));
- #ifndef PAL_CLASSIC
- memcpy(g_TextLib.lpWordBuf + SYSMENU_LABEL_BATTLEMODE, gc_rgszAdditionalWords[gConfig.uCodePage], ATB_WORD_COUNT * sizeof(LPCWSTR));
- #endif
- }
- g_TextLib.bCurrentFontColor = FONT_COLOR_DEFAULT;
- g_TextLib.bIcon = 0;
- g_TextLib.posIcon = 0;
- g_TextLib.nCurrentDialogLine = 0;
- g_TextLib.iDelayTime = 3;
- g_TextLib.posDialogTitle = PAL_XY(12, 8);
- g_TextLib.posDialogText = PAL_XY(44, 26);
- g_TextLib.bDialogPosition = kDialogUpper;
- g_TextLib.fUserSkip = FALSE;
- PAL_MKFReadChunk(g_TextLib.bufDialogIcons, 282, 12, gpGlobals->f.fpDATA);
- return 0;
- }
- VOID
- PAL_FreeText(
- VOID
- )
- /*++
- Purpose:
- Free the memory used by the texts.
- Parameters:
- None.
- Return value:
- None.
- --*/
- {
- int i;
- if (g_TextLib.lpMsgBuf != NULL)
- {
- if (gConfig.pszMsgFile)
- for(i = 0; i < g_TextLib.nMsgs; i++) free(g_TextLib.lpMsgBuf[i]);
- else
- free(g_TextLib.lpMsgBuf[0]);
- free(g_TextLib.lpMsgBuf);
- g_TextLib.lpMsgBuf = NULL;
- }
- if (g_TextLib.lpWordBuf != NULL)
- {
- if (gConfig.pszMsgFile)
- for(i = 0; i < g_TextLib.nWords; i++) free(g_TextLib.lpWordBuf[i]);
- else
- free(g_TextLib.lpWordBuf[0]);
- free(g_TextLib.lpWordBuf);
- g_TextLib.lpWordBuf = NULL;
- }
- if (g_TextLib.lpIndexBuf != NULL)
- {
- if (gConfig.pszMsgFile)
- for(i = 0; i < g_TextLib.nIndices; i++) free(g_TextLib.lpIndexBuf[i]);
- else
- free(g_TextLib.lpIndexBuf[0]);
- free(g_TextLib.lpIndexBuf);
- g_TextLib.lpIndexBuf = NULL;
- }
- }
- LPCWSTR
- PAL_GetWord(
- int iNumWord
- )
- /*++
- Purpose:
- Get the specified word.
- Parameters:
- [IN] wNumWord - the number of the requested word.
- Return value:
- Pointer to the requested word. NULL if not found.
- --*/
- {
- return (iNumWord >= g_TextLib.nWords || !g_TextLib.lpWordBuf[iNumWord]) ? L"" : g_TextLib.lpWordBuf[iNumWord];
- }
- LPCWSTR
- PAL_GetMsg(
- int iNumMsg
- )
- /*++
- Purpose:
- Get the specified message.
- Parameters:
- [IN] wNumMsg - the number of the requested message.
- Return value:
- Pointer to the requested message. NULL if not found.
- --*/
- {
- return (iNumMsg >= g_TextLib.nMsgs || !g_TextLib.lpMsgBuf[iNumMsg]) ? L"" : g_TextLib.lpMsgBuf[iNumMsg];
- }
- int
- PAL_GetMsgNum(
- int iIndex,
- int iOrder
- )
- /*++
- Purpose:
- Get the number of specified message from index & order.
- Parameters:
- [IN] iMsgIndex - index.
- [IN] iOrder - order inside the index.
- Return value:
- The number of message. Zero means pausing for key, and -1 means end.
- --*/
- {
- return (iIndex >= g_TextLib.nMsgs || !g_TextLib.lpIndexBuf[iIndex]) ? -1 : g_TextLib.lpIndexBuf[iIndex][iOrder];
- }
- VOID
- PAL_DrawText(
- LPCWSTR lpszText,
- PAL_POS pos,
- BYTE bColor,
- BOOL fShadow,
- BOOL fUpdate,
- BOOL fUse8x8Font
- )
- /*++
- Purpose:
- Draw text on the screen.
- Parameters:
- [IN] lpszText - the text to be drawn.
- [IN] pos - Position of the text.
- [IN] bColor - Color of the text.
- [IN] fShadow - TRUE if the text is shadowed or not.
- [IN] fUpdate - TRUE if update the screen area.
- [IN] fUse8x8Font - TRUE if use 8x8 font.
- Return value:
- None.
- --*/
- {
- SDL_Rect rect, urect;
- urect.x = rect.x = PAL_X(pos);
- urect.y = rect.y = PAL_Y(pos);
- urect.h = (fUse8x8Font ? 8 : PAL_FontHeight()) + (fShadow ? 1 : 0);
- urect.w = 0;
- while (*lpszText)
- {
- //
- // Draw the character
- //
- int char_width = fUse8x8Font ? 8 : PAL_CharWidth(*lpszText);
- if (fShadow)
- {
- PAL_DrawCharOnSurface(*lpszText, gpScreen, PAL_XY(rect.x + 1, rect.y + 1), 0, fUse8x8Font);
- PAL_DrawCharOnSurface(*lpszText, gpScreen, PAL_XY(rect.x + 1, rect.y), 0, fUse8x8Font);
- }
- PAL_DrawCharOnSurface(*lpszText++, gpScreen, PAL_XY(rect.x, rect.y), bColor, fUse8x8Font);
- rect.x += char_width; urect.w += char_width;
- }
- //
- // Update the screen area
- //
- if (fUpdate && urect.w > 0)
- {
- if (fShadow) urect.w++;
- if (urect.x + urect.w > 320)
- {
- urect.w = 320 - urect.x;
- }
- VIDEO_UpdateScreen(&urect);
- }
- }
- VOID
- PAL_DialogSetDelayTime(
- INT iDelayTime
- )
- /*++
- Purpose:
- Set the delay time for dialog.
- Parameters:
- [IN] iDelayTime - the delay time to be set.
- Return value:
- None.
- --*/
- {
- g_TextLib.iDelayTime = iDelayTime;
- }
- VOID
- PAL_StartDialog(
- BYTE bDialogLocation,
- BYTE bFontColor,
- INT iNumCharFace,
- BOOL fPlayingRNG
- )
- /*++
- Purpose:
- Start a new dialog.
- Parameters:
- [IN] bDialogLocation - the location of the text on the screen.
- [IN] bFontColor - the font color of the text.
- [IN] iNumCharFace - number of the character face in RGM.MKF.
- [IN] fPlayingRNG - whether we are playing a RNG video or not.
- Return value:
- None.
- --*/
- {
- PAL_LARGE BYTE buf[16384];
- SDL_Rect rect;
- if (gpGlobals->fInBattle && !g_fUpdatedInBattle)
- {
- //
- // Update the screen in battle, or the graphics may seem messed up
- //
- VIDEO_UpdateScreen(NULL);
- g_fUpdatedInBattle = TRUE;
- }
- g_TextLib.bIcon = 0;
- g_TextLib.posIcon = 0;
- g_TextLib.nCurrentDialogLine = 0;
- g_TextLib.posDialogTitle = PAL_XY(12, 8);
- g_TextLib.fUserSkip = FALSE;
- if (bFontColor != 0)
- {
- g_TextLib.bCurrentFontColor = bFontColor;
- }
- if (fPlayingRNG && iNumCharFace)
- {
- VIDEO_BackupScreen();
- g_TextLib.fPlayingRNG = TRUE;
- }
- switch (bDialogLocation)
- {
- case kDialogUpper:
- if (iNumCharFace > 0)
- {
- //
- // Display the character face at the upper part of the screen
- //
- if (PAL_MKFReadChunk(buf, 16384, iNumCharFace, gpGlobals->f.fpRGM) > 0)
- {
- rect.w = PAL_RLEGetWidth((LPCBITMAPRLE)buf);
- rect.h = PAL_RLEGetHeight((LPCBITMAPRLE)buf);
- rect.x = 48 - rect.w / 2;
- rect.y = 55 - rect.h / 2;
- if (rect.x < 0)
- {
- rect.x = 0;
- }
- if (rect.y < 0)
- {
- rect.y = 0;
- }
- PAL_RLEBlitToSurface((LPCBITMAPRLE)buf, gpScreen, PAL_XY(rect.x, rect.y));
- if (rect.x < 0)
- {
- rect.x = 0;
- }
- if (rect.y < 0)
- {
- rect.y = 0;
- }
- VIDEO_UpdateScreen(&rect);
- }
- }
- g_TextLib.posDialogTitle = PAL_XY(iNumCharFace > 0 ? 80 : 12, 8);
- g_TextLib.posDialogText = PAL_XY(iNumCharFace > 0 ? 96 : 44, 26);
- break;
- case kDialogCenter:
- g_TextLib.posDialogText = PAL_XY(80, 40);
- break;
- case kDialogLower:
- if (iNumCharFace > 0)
- {
- //
- // Display the character face at the lower part of the screen
- //
- if (PAL_MKFReadChunk(buf, 16384, iNumCharFace, gpGlobals->f.fpRGM) > 0)
- {
- rect.x = 270 - PAL_RLEGetWidth((LPCBITMAPRLE)buf) / 2;
- rect.y = 144 - PAL_RLEGetHeight((LPCBITMAPRLE)buf) / 2;
- PAL_RLEBlitToSurface((LPCBITMAPRLE)buf, gpScreen, PAL_XY(rect.x, rect.y));
- VIDEO_UpdateScreen(NULL);
- }
- }
- g_TextLib.posDialogTitle = PAL_XY(iNumCharFace > 0 ? 4 : 12, 108);
- g_TextLib.posDialogText = PAL_XY(iNumCharFace > 0 ? 20 : 44, 126);
- break;
- case kDialogCenterWindow:
- g_TextLib.posDialogText = PAL_XY(160, 40);
- break;
- }
- g_TextLib.bDialogPosition = bDialogLocation;
- }
- static VOID
- PAL_DialogWaitForKey(
- VOID
- )
- /*++
- Purpose:
- Wait for player to press a key after showing a dialog.
- Parameters:
- None.
- Return value:
- None.
- --*/
- {
- PAL_LARGE SDL_Color palette[256];
- SDL_Color *pCurrentPalette, t;
- int i;
- //
- // get the current palette
- //
- pCurrentPalette = PAL_GetPalette(gpGlobals->wNumPalette, gpGlobals->fNightPalette);
- memcpy(palette, pCurrentPalette, sizeof(palette));
- if (g_TextLib.bDialogPosition != kDialogCenterWindow &&
- g_TextLib.bDialogPosition != kDialogCenter)
- {
- //
- // show the icon
- //
- LPCBITMAPRLE p = PAL_SpriteGetFrame(g_TextLib.bufDialogIcons, g_TextLib.bIcon);
- if (p != NULL)
- {
- SDL_Rect rect;
- rect.x = PAL_X(g_TextLib.posIcon);
- rect.y = PAL_Y(g_TextLib.posIcon);
- rect.w = 16;
- rect.h = 16;
- PAL_RLEBlitToSurface(p, gpScreen, g_TextLib.posIcon);
- VIDEO_UpdateScreen(&rect);
- }
- }
- PAL_ClearKeyState();
- while (TRUE)
- {
- UTIL_Delay(100);
- if (g_TextLib.bDialogPosition != kDialogCenterWindow &&
- g_TextLib.bDialogPosition != kDialogCenter)
- {
- //
- // palette shift
- //
- t = palette[0xF9];
- for (i = 0xF9; i < 0xFE; i++)
- {
- palette[i] = palette[i + 1];
- }
- palette[0xFE] = t;
- VIDEO_SetPalette(palette);
- }
- if (g_InputState.dwKeyPress != 0)
- {
- break;
- }
- }
- if (g_TextLib.bDialogPosition != kDialogCenterWindow &&
- g_TextLib.bDialogPosition != kDialogCenter)
- {
- PAL_SetPalette(gpGlobals->wNumPalette, gpGlobals->fNightPalette);
- }
- PAL_ClearKeyState();
- g_TextLib.fUserSkip = FALSE;
- }
- VOID
- PAL_ShowDialogText(
- LPCWSTR lpszText
- )
- /*++
- Purpose:
- Show one line of the dialog text.
- Parameters:
- [IN] lpszText - the text to be shown.
- Return value:
- None.
- --*/
- {
- SDL_Rect rect;
- int x, y;
- PAL_ClearKeyState();
- g_TextLib.bIcon = 0;
- if (gpGlobals->fInBattle && !g_fUpdatedInBattle)
- {
- //
- // Update the screen in battle, or the graphics may seem messed up
- //
- VIDEO_UpdateScreen(NULL);
- g_fUpdatedInBattle = TRUE;
- }
- if (g_TextLib.nCurrentDialogLine > 3)
- {
- //
- // The rest dialogs should be shown in the next page.
- //
- PAL_DialogWaitForKey();
- g_TextLib.nCurrentDialogLine = 0;
- VIDEO_RestoreScreen();
- VIDEO_UpdateScreen(NULL);
- }
- x = PAL_X(g_TextLib.posDialogText);
- y = PAL_Y(g_TextLib.posDialogText) + g_TextLib.nCurrentDialogLine * 18;
- if (g_TextLib.bDialogPosition == kDialogCenterWindow)
- {
- //
- // The text should be shown in a small window at the center of the screen
- //
- #ifndef PAL_CLASSIC
- if (gpGlobals->fInBattle && g_Battle.BattleResult == kBattleResultOnGoing)
- {
- PAL_BattleUIShowText(lpszText, 1400);
- }
- else
- #endif
- {
- PAL_POS pos;
- LPBOX lpBox;
- int i, w = wcslen(lpszText), len = 0;
- for (i = 0; i < w; i++)
- len += PAL_CharWidth(lpszText[i]) >> 3;
- //
- // Create the window box
- //
- pos = PAL_XY(PAL_X(g_TextLib.posDialogText) - len * 4, PAL_Y(g_TextLib.posDialogText));
- // Follow behavior of original version
- lpBox = PAL_CreateSingleLineBoxWithShadow(pos, (len + 1) / 2, FALSE, 0);
- rect.x = PAL_X(pos);
- rect.y = PAL_Y(pos);
- rect.w = 320 - rect.x * 2 + 32;
- rect.h = 64;
- //
- // Show the text on the screen
- //
- pos = PAL_XY(PAL_X(pos) + 8 + ((len & 1) << 2), PAL_Y(pos) + 10);
- PAL_DrawText(lpszText, pos, 0, FALSE, FALSE, FALSE);
- VIDEO_UpdateScreen(&rect);
- PAL_DialogWaitForKey();
- //
- // Delete the box
- //
- PAL_DeleteBox(lpBox);
- VIDEO_UpdateScreen(&rect);
- PAL_EndDialog();
- }
- }
- else
- {
- int len = wcslen(lpszText);
- if (g_TextLib.nCurrentDialogLine == 0 &&
- g_TextLib.bDialogPosition != kDialogCenter &&
- (lpszText[len - 1] == 0xff1a ||
- lpszText[len - 1] == 0x2236 || // Special case for Pal WIN95 Simplified Chinese version
- lpszText[len - 1] == ':')
- )
- {
- //
- // name of character
- //
- PAL_DrawText(lpszText, g_TextLib.posDialogTitle, FONT_COLOR_CYAN_ALT, TRUE, TRUE, FALSE);
- }
- else
- {
- //
- // normal texts
- //
- WCHAR text[2];
- if (!g_TextLib.fPlayingRNG && g_TextLib.nCurrentDialogLine == 0)
- {
- //
- // Save the screen before we show the first line of dialog
- //
- VIDEO_BackupScreen();
- }
- while (lpszText != NULL && *lpszText != '\0')
- {
- switch (*lpszText)
- {
- case '-':
- //
- // Set the font color to Cyan
- //
- if (g_TextLib.bCurrentFontColor == FONT_COLOR_CYAN)
- {
- g_TextLib.bCurrentFontColor = FONT_COLOR_DEFAULT;
- }
- else
- {
- g_TextLib.bCurrentFontColor = FONT_COLOR_CYAN;
- }
- lpszText++;
- break;
- #if 0
- /* Not used */
- case '\'':
- //
- // Set the font color to Red
- //
- if (g_TextLib.bCurrentFontColor == FONT_COLOR_RED)
- {
- g_TextLib.bCurrentFontColor = FONT_COLOR_DEFAULT;
- }
- else
- {
- g_TextLib.bCurrentFontColor = FONT_COLOR_RED;
- }
- lpszText++;
- break;
- #endif
- case '\"':
- //
- // Set the font color to Yellow
- //
- if (g_TextLib.bCurrentFontColor == FONT_COLOR_YELLOW)
- {
- g_TextLib.bCurrentFontColor = FONT_COLOR_DEFAULT;
- }
- else
- {
- g_TextLib.bCurrentFontColor = FONT_COLOR_YELLOW;
- }
- lpszText++;
- break;
- case '$':
- //
- // Set the delay time of text-displaying
- //
- g_TextLib.iDelayTime = wcstol(lpszText + 1, NULL, 10) * 10 / 7;
- lpszText += 3;
- break;
- case '~':
- //
- // Delay for a period and quit
- //
- UTIL_Delay(wcstol(lpszText + 1, NULL, 10) * 80 / 7);
- g_TextLib.nCurrentDialogLine = 0;
- g_TextLib.fUserSkip = FALSE;
- return; // don't go further
- case ')':
- //
- // Set the waiting icon
- //
- g_TextLib.bIcon = 1;
- lpszText++;
- break;
- case '(':
- //
- // Set the waiting icon
- //
- g_TextLib.bIcon = 2;
- lpszText++;
- break;
- case '\\':
- lpszText++;
- default:
- text[0] = *lpszText++;
- text[1] = 0;
- PAL_DrawText(text, PAL_XY(x, y), g_TextLib.bCurrentFontColor, TRUE, TRUE, FALSE);
- x += PAL_CharWidth(text[0]);
- if (!g_TextLib.fUserSkip)
- {
- PAL_ClearKeyState();
- UTIL_Delay(g_TextLib.iDelayTime * 8);
- if (g_InputState.dwKeyPress & (kKeySearch | kKeyMenu))
- {
- //
- // User pressed a key to skip the dialog
- //
- g_TextLib.fUserSkip = TRUE;
- }
- }
- }
- }
- g_TextLib.posIcon = PAL_XY(x, y);
- g_TextLib.nCurrentDialogLine++;
- }
- }
- }
- VOID
- PAL_ClearDialog(
- BOOL fWaitForKey
- )
- /*++
- Purpose:
- Clear the state of the dialog.
- Parameters:
- [IN] fWaitForKey - whether wait for any key or not.
- Return value:
- None.
- --*/
- {
- if (g_TextLib.nCurrentDialogLine > 0 && fWaitForKey)
- {
- PAL_DialogWaitForKey();
- }
- g_TextLib.nCurrentDialogLine = 0;
- if (g_TextLib.bDialogPosition == kDialogCenter)
- {
- g_TextLib.posDialogTitle = PAL_XY(12, 8);
- g_TextLib.posDialogText = PAL_XY(44, 26);
- g_TextLib.bCurrentFontColor = FONT_COLOR_DEFAULT;
- g_TextLib.bDialogPosition = kDialogUpper;
- }
- }
- VOID
- PAL_EndDialog(
- VOID
- )
- /*++
- Purpose:
- Ends a dialog.
- Parameters:
- None.
- Return value:
- None.
- --*/
- {
- PAL_ClearDialog(TRUE);
- //
- // Set some default parameters, as there are some parts of script
- // which doesn't have a "start dialog" instruction before showing the dialog.
- //
- g_TextLib.posDialogTitle = PAL_XY(12, 8);
- g_TextLib.posDialogText = PAL_XY(44, 26);
- g_TextLib.bCurrentFontColor = FONT_COLOR_DEFAULT;
- g_TextLib.bDialogPosition = kDialogUpper;
- g_TextLib.fUserSkip = FALSE;
- g_TextLib.fPlayingRNG = FALSE;
- }
- BOOL
- PAL_IsInDialog(
- VOID
- )
- /*++
- Purpose:
- Check if there are dialog texts on the screen.
- Parameters:
- None.
- Return value:
- TRUE if there are dialog texts on the screen, FALSE if not.
- --*/
- {
- return (g_TextLib.nCurrentDialogLine != 0);
- }
- BOOL
- PAL_DialogIsPlayingRNG(
- VOID
- )
- /*++
- Purpose:
- Check if the script used the RNG playing parameter when displaying texts.
- Parameters:
- None.
- Return value:
- TRUE if the script used the RNG playing parameter, FALSE if not.
- --*/
- {
- return g_TextLib.fPlayingRNG;
- }
- INT
- PAL_MultiByteToWideCharCP(
- CODEPAGE cp,
- LPCSTR mbs,
- int mbslength,
- LPWSTR wcs,
- int wcslength
- )
- /*++
- Purpose:
- Convert multi-byte string into the corresponding unicode string.
- Parameters:
- [IN] cp - Code page for conversion.
- [IN] mbs - Pointer to the multi-byte string.
- [IN] mbslength - Length of the multi-byte string, or -1 for auto-detect.
- [IN] wcs - Pointer to the wide string buffer.
- [IN] wcslength - Length of the wide string buffer.
- Return value:
- The length of converted wide string. If mbslength is set to -1, the returned
- value includes the terminal null-char; otherwise, the null-char is not included.
- If wcslength is set to 0, wcs can be set to NULL and the return value is the
- required length of the wide string buffer.
- --*/
- {
- int i = 0, state = 0, wlen = 0, null = 0;
- if (mbslength == -1)
- {
- mbslength = strlen(mbs);
- null = 1;
- }
- if (!wcs)
- {
- switch (cp)
- {
- //case CP_SHIFTJIS:
- // for (i = 0; i < mbslength && mbs[i]; i++)
- // {
- // if (state == 0)
- // {
- // if ((BYTE)mbs[i] <= 0x80 || (BYTE)mbs[i] >= 0xfd || ((BYTE)mbs[i] >= 0xa0 && (BYTE)mbs[i] <= 0xdf))
- // wlen++;
- // else
- // state = 1;
- // }
- // else
- // {
- // wlen++;
- // state = 0;
- // }
- // }
- // break;
- case CP_GBK:
- case CP_BIG5:
- for (i = 0; i < mbslength && mbs[i]; i++)
- {
- if (state == 0)
- {
- if ((BYTE)mbs[i] <= 0x80 || (BYTE)mbs[i] == 0xff)
- wlen++;
- else
- state = 1;
- }
- else
- {
- wlen++;
- state = 0;
- }
- }
- break;
- case CP_UTF_8:
- for (i = 0; i < mbslength && mbs[i]; i++)
- {
- if (state == 0)
- {
- if ((BYTE)mbs[i] >= 0x80)
- {
- BYTE s = (BYTE)mbs[i] << 1;
- while (s >= 0x80) { state++; s <<= 1; }
- if (state < 1 || state > 3)
- {
- state = 0;
- wlen++;
- }
- }
- else
- wlen++;
- }
- else
- {
- if ((BYTE)mbs[i] >= 0x80 && (BYTE)mbs[i] < 0xc0)
- {
- if (--state == 0) wlen++;
- }
- else
- {
- state = 0; wlen++;
- }
- }
- }
- break;
- default:
- return -1;
- }
- if (i < mbslength && !mbs[i]) null = 1;
- return wlen + null + (state != 0);
- }
- else
- {
- WCHAR invalid_char;
- switch (cp)
- {
- //case CP_SHIFTJIS:
- // invalid_char = 0x30fb;
- // for (i = 0; i < mbslength && wlen < wcslength && mbs[i]; i++)
- // {
- // if (state == 0)
- // {
- // if ((BYTE)mbs[i] <= 0x80)
- // wcs[wlen++] = mbs[i];
- // else if ((BYTE)mbs[i] >= 0xa0 && (BYTE)mbs[i] <= 0xdf)
- // wcs[wlen++] = cptbl_jis_half[(BYTE)mbs[i] - 0xa0];
- // else if ((BYTE)mbs[i] == 0xfd)
- // wcs[wlen++] = 0xf8f1;
- // else if ((BYTE)mbs[i] == 0xfe)
- // wcs[wlen++] = 0xf8f2;
- // else if ((BYTE)mbs[i] == 0xff)
- // wcs[wlen++] = 0xf8f3;
- // else
- // state = 1;
- // }
- // else
- // {
- // if ((BYTE)mbs[i] < 0x40)
- // wcs[wlen++] = 0x30fb;
- // else if ((BYTE)mbs[i - 1] < 0xa0)
- // wcs[wlen++] = cptbl_jis[(BYTE)mbs[i - 1] - 0x81][(BYTE)mbs[i] - 0x40];
- // else
- // wcs[wlen++] = cptbl_jis[(BYTE)mbs[i - 1] - 0xc1][(BYTE)mbs[i] - 0x40];
- // state = 0;
- // }
- // }
- // break;
- case CP_GBK:
- invalid_char = 0x3f;
- for (i = 0; i < mbslength && wlen < wcslength && mbs[i]; i++)
- {
- if (state == 0)
- {
- if ((BYTE)mbs[i] < 0x80)
- wcs[wlen++] = mbs[i];
- else if ((BYTE)mbs[i] == 0x80)
- wcs[wlen++] = 0x20ac;
- else if ((BYTE)mbs[i] == 0xff)
- wcs[wlen++] = 0xf8f5;
- else
- state = 1;
- }
- else
- {
- if ((BYTE)mbs[i] < 0x40)
- wcs[wlen++] = invalid_char;
- else
- wcs[wlen++] = cptbl_gbk[(BYTE)mbs[i - 1] - 0x81][(BYTE)mbs[i] - 0x40];
- state = 0;
- }
- }
- break;
- case CP_BIG5:
- invalid_char = 0x3f;
- for (i = 0; i < mbslength && wlen < wcslength && mbs[i]; i++)
- {
- if (state == 0)
- {
- if ((BYTE)mbs[i] <= 0x80)
- wcs[wlen++] = mbs[i];
- else if ((BYTE)mbs[i] == 0xff)
- wcs[wlen++] = 0xf8f8;
- else
- state = 1;
- }
- else
- {
- if ((BYTE)mbs[i] < 0x40 || ((BYTE)mbs[i] >= 0x7f && (BYTE)mbs[i] <= 0xa0))
- wcs[wlen++] = invalid_char;
- else if ((BYTE)mbs[i] <= 0x7e)
- wcs[wlen++] = cptbl_big5[(BYTE)mbs[i - 1] - 0x81][(BYTE)mbs[i] - 0x40];
- else
- wcs[wlen++] = cptbl_big5[(BYTE)mbs[i - 1] - 0x81][(BYTE)mbs[i] - 0x60];
- state = 0;
- }
- }
- break;
- case CP_UTF_8:
- invalid_char = 0x3f;
- for (i = 0; i < mbslength && wlen < wcslength && mbs[i]; i++)
- {
- if (state == 0)
- {
- if ((BYTE)mbs[i] >= 0x80)
- {
- BYTE s = (BYTE)mbs[i] << 1;
- while (s >= 0x80) { state++; s <<= 1; }
- if (state < 1 || state > 3)
- {
- state = 0;
- wcs[wlen++] = invalid_char;
- }
- else
- {
- wcs[wlen] = s >> (state + 1);
- }
- }
- else
- wcs[wlen++] = mbs[i];
- }
- else
- {
- if ((BYTE)mbs[i] >= 0x80 && (BYTE)mbs[i] < 0xc0)
- {
- wcs[wlen] <<= 6;
- wcs[wlen] |= (BYTE)mbs[i] & 0x3f;
- if (--state == 0) wlen++;
- }
- else
- {
- state = 0;
- wcs[wlen++] = invalid_char;
- }
- }
- }
- break;
- default:
- return -1;
- }
- if (state != 0 && wlen < wcslength)
- {
- wcs[wlen++] = invalid_char;
- }
- if (null || (i < mbslength && !mbs[i]))
- {
- if (wlen < wcslength)
- wcs[wlen++] = 0;
- else
- wcs[wlen - 1] = 0;
- }
- return wlen;
- }
- }
- INT
- PAL_MultiByteToWideChar(
- LPCSTR mbs,
- int mbslength,
- LPWSTR wcs,
- int wcslength
- )
- /*++
- Purpose:
- Convert multi-byte string into the corresponding unicode string.
- Parameters:
- [IN] mbs - Pointer to the multi-byte string.
- [IN] mbslength - Length of the multi-byte string, or -1 for auto-detect.
- [IN] wcs - Pointer to the wide string buffer.
- [IN] wcslength - Length of the wide string buffer.
- Return value:
- The length of converted wide string. If mbslength is set to -1, the returned
- value includes the terminal null-char; otherwise, the null-char is not included.
- If wcslength is set to 0, wcs can be set to NULL and the return value is the
- required length of the wide string buffer.
- --*/
- {
- return PAL_MultiByteToWideCharCP(gConfig.uCodePage, mbs, mbslength, wcs, wcslength);
- }
- /*++
- Purpose:
- Formatted wide-character output conversion that output Chinese characters correctly.
- This function supported a subset of format strings that are commonly supported by
- various C libraries, which can be formalized as following:
- %[flags] [width] [.precision] [{h | l | ll}] type
- When handling '%c' and '%s', this function follows the Linux's library convention,
- which means '%c' and '%s' always output multi-byte strings, and '%lc' and '%ls'
- always output wide-char strings.
- Parameters:
- [IN] buffer - Storage location for output.
- [IN] count - Size of the output buffer, including the termination null character.
- [IN] format - Format-control string.
- [IN] ... - Optional arguments.
- Return value:
- The length of outputed wide string, not including the termination null character.
- --*/
- INT
- PAL_swprintf(
- LPWSTR buffer,
- size_t count,
- LPCWSTR format,
- ...
- )
- {
- va_list ap;
- const WCHAR * const format_end = format + wcslen(format);
- const WCHAR * const buffer_end = buffer + count - 1;
- WCHAR chr_buf[2] = { 0, 0 };
- LPCWSTR fmt_start = NULL;
- LPWSTR cur_fmt = NULL;
- size_t fmt_len = 0;
- unsigned long precision, width;
- int state, left_aligned, wide, narrow, width_var, precision_var, precision_defined;
- if (buffer == NULL || format == NULL)
- {
- errno = EINVAL;
- return -1;
- }
- if (buffer_end <= buffer)
- return 0;
- va_start(ap, format);
- count = 0; state = 0;
- while (buffer < buffer_end && format < format_end)
- {
- switch (state)
- {
- case 0: // Outside format spec
- if (*format != L'%')
- {
- *buffer++ = *format++;
- count++;
- break;
- }
- else
- {
- fmt_start = format++;
- left_aligned = wide = narrow = 0;
- precision_var = width_var = 0;
- precision_defined = 0;
- state = 1;
- }
- case 1: // [flags]
- switch (*format)
- {
- case L'-':
- left_aligned = 1;
- case L'+':
- case L' ':
- case L'#':
- case L'0':
- format++;
- continue;
- default:
- state = 2;
- width = width_var = 0;
- }
- case 2: // [width]
- switch (*format)
- {
- case '0':
- case '1':
- case '2':
- case '3':
- case '4':
- case '5':
- case '6':
- case '7':
- case '8':
- case '9':
- if (width >= 0)
- width = width * 10 + (*format - L'0');
- format++;
- continue;
- case '*':
- if (width == 0)
- width_var = 1;
- format++;
- continue;
- case '.':
- format++;
- precision = precision_var = 0;
- precision_defined = 1;
- state = 3;
- break;
- default:
- state = 4;
- continue;
- }
- case 3: // [.precision]
- switch (*format)
- {
- case '0':
- case '1':
- case '2':
- case '3':
- case '4':
- case '5':
- case '6':
- case '7':
- case '8':
- case '9':
- if (precision >= 0)
- precision = precision * 10 + (*format - L'0');
- format++;
- continue;
- case '*':
- if (precision == 0)
- precision_var = 1;
- format++;
- continue;
- default:
- state = 4;
- }
- case 4: // [{h | l | ll}]
- switch (*format)
- {
- case 'l': if (narrow == 0) wide++; format++; continue;
- case 'h': if (wide == 0) narrow++; format++; continue;
- default: state = 5;
- }
- case 5: // type
- if (*format == 'c' || *format == 's')
- {
- LPWSTR buf;
- size_t len;
- long i;
- if (width_var)
- {
- long w = va_arg(ap, long);
- left_aligned = (w < 0);
- width = w < 0 ? -w : w;
- }
- if (precision_var)
- precision = va_arg(ap, unsigned long);
- else if (!precision_defined)
- precision = (unsigned long)(-1);
- if (*format == 's')
- {
- if (wide)
- {
- buf = va_arg(ap, LPWSTR);
- len = wcslen(buf);
- }
- else
- {
- buf = (LPWSTR)va_arg(ap, LPSTR);
- len = PAL_MultiByteToWideChar((LPCSTR)buf, -1, NULL, 0) - 1;
- }
- }
- else
- {
- if (wide)
- chr_buf[0] = va_arg(ap, WCHAR);
- else
- chr_buf[0] = va_arg(ap, int);
- buf = chr_buf; len = 1;
- }
- if (precision > len)
- precision = len;
- for (i = 0; !left_aligned && i < (long)(width - precision) && buffer < buffer_end; i++)
- *buffer++ = L' ', count++;
- if (buffer + precision > buffer_end)
- precision = buffer_end - buffer;
- if (*format == 's' && !wide)
- PAL_MultiByteToWideChar((LPCSTR)buf, -1, buffer, precision);
- else
- wcsncpy(buffer, buf, precision);
- buffer += precision; count += precision;
- for (i = 0; left_aligned && i < (long)(width - precision) && buffer < buffer_end; i++)
- *buffer++ = L' ', count++;
- }
- else
- {
- int cur_cnt = 0;
- if (fmt_len < (size_t)(format - fmt_start + 1))
- cur_fmt = realloc(cur_fmt, ((fmt_len = format - fmt_start + 1) + 1) * sizeof(WCHAR));
- wcsncpy(cur_fmt, fmt_start, fmt_len);
- cur_fmt[fmt_len] = L'\0';
- cur_cnt = vswprintf(buffer, buffer_end - buffer, cur_fmt, ap);
- buffer += cur_cnt; count += cur_cnt;
- if (width_var) va_arg(ap, long);
- if (precision_var) va_arg(ap, unsigned long);
- switch (*format)
- {
- case 'd':
- case 'i':
- case 'o':
- case 'u':
- case 'x':
- case 'X':
- if (wide == 1)
- va_arg(ap, long);
- else if (wide >= 2)
- va_arg(ap, long long);
- else
- va_arg(ap, int);
- break;
- case 'e':
- case 'E':
- case 'f':
- case 'g':
- case 'G':
- case 'a':
- case 'A':
- va_arg(ap, double);
- break;
- case 'p':
- case 'n':
- va_arg(ap, void*);
- break;
- }
- }
- state = 0;
- format++;
- break;
- }
- }
- *buffer = L'\0';
- va_end(ap);
- return count;
- }
- WCHAR
- PAL_GetInvalidChar(
- CODEPAGE uCodePage
- )
- {
- switch(uCodePage)
- {
- case CP_BIG5: return 0x3f;
- case CP_GBK: return 0x3f;
- //case CP_SHIFTJIS: return 0x30fb;
- case CP_UTF_8: return 0x3f;
- default: return 0;
- }
- }
|