OSDN Git Service

書庫形式名を取得するためのバッファが小さく、取得しきれていない場合があったバグを修正。
[tpi/lychee.git] / src / plugin / spiLibrary / spiLibrary.cpp
index 7c79903..af0c7d5 100644 (file)
@@ -40,47 +40,26 @@ HMODULE g_hLib;
 TPI_PROC g_prProc;\r
 \r
 //******************************************************************************\r
-//    Entry\r
-//******************************************************************************\r
-\r
-BOOL __stdcall DllMain(HMODULE, DWORD fdwReason, void *)\r
-{\r
-       switch (fdwReason)\r
-       {\r
-       case DLL_PROCESS_DETACH:\r
-               ::FreeLibrary(g_hLib);\r
-               break;\r
-       }\r
-       return TRUE;\r
-}\r
-\r
-//******************************************************************************\r
 //    Callback Wrapper\r
 //******************************************************************************\r
 \r
-int __stdcall CallbackProc(int _nNow, int _nMax, long _lData)\r
+int __stdcall CallbackProc(int _nNow, int, long _lData)\r
 {\r
-       // \8d\\91¢\91Ì\82ð\8f\89\8aú\89»\81B\r
-       TPI_PROCESSINFO piInfo;\r
-       piInfo.uMessage = TPI_MESSAGE_STATUS;\r
-       piInfo.uStatus  = _nNow == 0     ? TPI_STATUS_BEGINPROCESS\r
-                                       : _nNow == _nMax ? TPI_STATUS_ENDPROCESS\r
-                                       : _nNow <  0     ? TPI_STATUS_OPENARCHIVE : TPI_STATUS_INPROCESS;\r
-       piInfo.llProcessedSize       = _nNow;\r
-       piInfo.fiInfo.llUnpackedSize = _nMax;\r
-       piInfo.fiInfo.fnFileName = * (wxFileName *) _lData;\r
-\r
-       // \83R\81[\83\8b\83o\83b\83N\8aÖ\90\94\82É\91\97\90M\81B\r
-       return g_prProc != NULL && g_prProc(TPI_NOTIFY_COMMON, & piInfo) == TPI_CALLBACK_CANCEL;\r
+       // 構造体を初期化。\r
+       TPI_PROCESSINFO * piInfo = (TPI_PROCESSINFO *) _lData;\r
+       piInfo->nProcessedSize = _nNow;\r
+\r
+       // コールバック関数に送信。\r
+       return g_prProc != NULL && g_prProc(TPI_NOTIFY_COMMON, piInfo) == TPI_CALLBACK_CANCEL;\r
 }\r
 \r
 //******************************************************************************\r
 //    Inside Functions\r
 //******************************************************************************\r
 \r
-int SpiErrorCodeConvert(int nSpiErrorCode)\r
+int ErrorCodeConvert(int nErrorCode)\r
 {\r
-       switch (nSpiErrorCode)\r
+       switch (nErrorCode)\r
        {\r
        case -1: return TPI_ERROR_U_USE_LIBRARY;\r
        case 0:  return TPI_ERROR_SUCCESS;\r
@@ -106,7 +85,7 @@ extern "C"
 int __stdcall GetPluginInformation\r
 (\r
        unsigned int _uInfoId,\r
-       wxULongLong,\r
+       wxULongLong_t,\r
        void * _pPtr\r
 )\r
 {\r
@@ -137,44 +116,66 @@ int __stdcall GetFormatInformation(TPI_FORMATINFO *, bool)
 int __stdcall LoadPlugin\r
 (\r
        const wxString & _szArcName,\r
-       wxULongLong\r
+       wxULongLong_t\r
 )\r
 {\r
+       // ファイルを開く。\r
+       wxFile hFile;\r
+       if (! hFile.Exists(_szArcName) || ! hFile.Open(_szArcName, wxFile::read))\r
+       {\r
+               return TPI_ERROR_IO_ARC_OPEN;\r
+       }\r
+\r
+       // 最初の2KBを読み込み。\r
+       char buffer[2050];\r
+       ::ZeroMemory(buffer, sizeof(buffer));\r
+       if (hFile.Read(buffer, sizeof(buffer)) == wxInvalidOffset)\r
+       {\r
+               hFile.Close();\r
+               return TPI_ERROR_IO_ARC_READ;\r
+       }\r
+       hFile.Close();\r
+\r
        wxStandardPaths p;\r
        wxString szSPIPath = wxPathOnly(p.GetExecutablePath()) + wxT("/lib/"), szSPIName;\r
        wxDir fs(szSPIPath);\r
-       bool b = fs.GetFirst(& szSPIName, wxT("*.spi"));\r
-       while (b)\r
+       if (fs.GetFirst(& szSPIName, wxT("*.spi")))\r
        {\r
-               // SPI\82ð\83\8d\81[\83h\81B\r
-               wxString szLibName = szSPIPath + szSPIName;\r
-               g_hLib = ::LoadLibraryA(szLibName.ToUTF8());\r
-               if (g_hLib == NULL)\r
+               do\r
                {\r
-                       b = fs.GetNext(& szSPIName);\r
-                       continue;\r
-               }\r
+                       // SPIをロード。\r
+                       g_hLib = ::LoadLibrary((szSPIPath + szSPIName).wchar_str());\r
+                       if (g_hLib == NULL)\r
+                       {\r
+                               continue;\r
+                       }\r
 \r
-               // GetPluginInfo\82ð\8eÀ\8ds\81B\r
-               FARPROC fpProc = ::GetProcAddress(g_hLib, "GetPluginInfo");\r
-               char szPluginType[5]; // \8eí\97Þ4bytes + NULL\r
-               if (fpProc == NULL\r
-                       || ((int (PASCAL *)(int, char *, int)) fpProc)(0, szPluginType, sizeof(szPluginType)) < 0\r
-                       || szPluginType[2] != 'A' || szPluginType[3] != 'M')\r
-               {\r
-                       ::FreeLibrary(g_hLib);\r
-                       b = fs.GetNext(& szSPIName);\r
-                       continue;\r
-               }\r
+                       // GetPluginInfoを実行。\r
+                       FARPROC fpProc = ::GetProcAddress(g_hLib, "GetPluginInfo");\r
+                       char szPluginType[5]; // 種類4bytes + NULL\r
+                       if (fpProc == NULL\r
+                               || ((int (PASCAL *)(int, char *, int)) fpProc)(0, szPluginType, sizeof(szPluginType)) <= 0\r
+                               || szPluginType[2] != 'A' || szPluginType[3] != 'M')\r
+                       {\r
+                               ::FreeLibrary(g_hLib);\r
+                               continue;\r
+                       }\r
 \r
-               // \8f\91\8cÉ\82É\91Î\89\9e\82µ\82Ä\82¢\82é\82©\83`\83F\83b\83N\81B\r
-               if (CheckArchive(_szArcName, NULL) == TPI_ERROR_SUCCESS)\r
-               {\r
-                       // \91Î\89\9e\82µ\82Ä\82¢\82ê\82Î\8f\88\97\9d\82ð\8fI\97¹\81B\r
-                       return TPI_ERROR_SUCCESS;\r
-               }\r
+                       // 書庫に対応しているかチェック。\r
+                       fpProc = ::GetProcAddress(g_hLib, "IsSupported");\r
+                       if (fpProc == NULL)\r
+                       {\r
+                               ::FreeLibrary(g_hLib);\r
+                               continue;\r
+                       }\r
 \r
-               b = fs.GetNext(& szSPIName);\r
+                       if (((BOOL (PASCAL *)(const char *, unsigned long)) fpProc)(_szArcName.ToUTF8(), (unsigned long) buffer))\r
+                       {\r
+                               // 対応していれば処理を終了。\r
+                               return TPI_ERROR_SUCCESS;\r
+                       }\r
+               }\r
+               while (fs.GetNext(& szSPIName));\r
        }\r
        return TPI_ERROR_U_LOAD_LIBRARY;\r
 }\r
@@ -188,63 +189,11 @@ int __stdcall FreePlugin
        return TPI_ERROR_SUCCESS;\r
 }\r
 \r
-int __stdcall CheckArchive\r
-(\r
-       const wxString & _szArcName,\r
-       int * _nFileCount\r
-)\r
-{\r
-       FARPROC fpProc = ::GetProcAddress(g_hLib, "IsSupported");\r
-       if (fpProc == NULL)\r
-       {\r
-               return TPI_ERROR_U_USE_LIBRARY;\r
-       }\r
-\r
-       wxFile hFile(_szArcName, wxFile::read);\r
-       if (! hFile.IsOpened())\r
-       {\r
-               return TPI_ERROR_IO_ARC_OPEN;\r
-       }\r
-\r
-       char buffer[2050];\r
-       ::ZeroMemory(buffer, sizeof(buffer));\r
-       if (hFile.Read(buffer, sizeof(buffer)) == wxInvalidOffset)\r
-       {\r
-               hFile.Close();\r
-               return TPI_ERROR_IO_ARC_READ;\r
-       }\r
-\r
-       if (! ((BOOL (PASCAL *)(const char *, unsigned long)) fpProc)(_szArcName.ToUTF8(), (unsigned long) buffer))\r
-       {\r
-               hFile.Close();\r
-               return TPI_ERROR_D_UNSUPPORTED;\r
-       }\r
-       hFile.Close();\r
-\r
-       fpProc = ::GetProcAddress(g_hLib, "GetArchiveInfo");\r
-       if (fpProc == NULL)\r
-       {\r
-               return TPI_ERROR_U_USE_LIBRARY;\r
-       }\r
-\r
-       HLOCAL hMemory;\r
-       int nReturnCode = SpiErrorCodeConvert(((int (PASCAL *)(const char *, long, unsigned int, HLOCAL *)) fpProc)(_szArcName.ToUTF8(), 0, 0, & hMemory));\r
-       if (nReturnCode == TPI_ERROR_SUCCESS)\r
-       {\r
-               if (_nFileCount != NULL)\r
-               {\r
-                       * _nFileCount = int(::LocalSize(hMemory) / sizeof(fileInfo));\r
-               }\r
-               ::LocalFree(hMemory);\r
-       }\r
-\r
-       return nReturnCode;\r
-}\r
-\r
 int __stdcall OpenArchive\r
 (\r
        const wxString & _szArcName,\r
-       void * * _hArchive\r
+       void * * _hArchive,\r
+       wxULongLong_t * _nFileCount\r
 )\r
 {\r
        FARPROC fpProc = ::GetProcAddress(g_hLib, "GetArchiveInfo");\r
@@ -253,12 +202,15 @@ int __stdcall OpenArchive
                return TPI_ERROR_U_USE_LIBRARY;\r
        }\r
 \r
-       int nReturnCode = SpiErrorCodeConvert(((int (PASCAL *)(const char *, long, unsigned int, HLOCAL *)) fpProc)(_szArcName.ToUTF8(), 0, 0, _hArchive));\r
+       int nReturnCode = ErrorCodeConvert(((int (PASCAL *)(const char *, long, unsigned int, HLOCAL *)) fpProc)(_szArcName.ToUTF8(), 0, 0, _hArchive));\r
        if (nReturnCode != TPI_ERROR_SUCCESS)\r
        {\r
                return nReturnCode;\r
        }\r
-\r
+       if (_nFileCount != NULL)\r
+       {\r
+               * _nFileCount = ::LocalSize(* _hArchive) / sizeof(fileInfo);\r
+       }\r
        return * _hArchive == NULL ? TPI_ERROR_IO_ARC_OPEN : nReturnCode;\r
 }\r
 \r
@@ -277,33 +229,33 @@ int __stdcall GetFileInformation
        bool _bFirst\r
 )\r
 {\r
-       static unsigned int uFileCount, uFilePointer;\r
+       static wxULongLong_t nFileCount, nFilePointer;\r
 \r
        if (_bFirst)\r
        {\r
-               uFilePointer = 0;\r
-               uFileCount = (unsigned int) (::LocalSize(_hArchive) / sizeof(fileInfo));\r
+               nFilePointer = 0;\r
+               nFileCount = ::LocalSize(_hArchive) / sizeof(fileInfo);\r
        }\r
 \r
-       if (uFilePointer > uFileCount)\r
+       if (nFilePointer > nFileCount)\r
        {\r
                return TPI_ERROR_S_ENDOFDATA;\r
        }\r
 \r
-       fileInfo pfiInfo = ((fileInfo *) ::LocalLock(_hArchive))[uFilePointer];\r
+       fileInfo pfiInfo = ((fileInfo *) ::LocalLock(_hArchive))[nFilePointer];\r
        if (pfiInfo.method[0] == 0)\r
        {\r
-               // \92\9a\94J\82È\83v\83\89\83O\83C\83\93\82Ì\82½\82ß\82Ì\90\94\8d\87\82í\82¹ (^^;\r
-               uFileCount = uFilePointer;\r
+               // 丁寧なプラグインのための数合わせ (^^;\r
+               nFileCount = nFilePointer;\r
                return TPI_ERROR_S_ENDOFDATA;\r
        }\r
 \r
        _fiInfo->dwAttribute    = 0;\r
        _fiInfo->dwCRC32        = pfiInfo.crc;\r
-       _fiInfo->llPackedSize   = pfiInfo.compsize;\r
-       _fiInfo->llUnpackedSize = pfiInfo.filesize;\r
+       _fiInfo->nPackedSize    = pfiInfo.compsize;\r
+       _fiInfo->nUnpackedSize  = pfiInfo.filesize;\r
        _fiInfo->wCompressRatio = pfiInfo.compsize >= pfiInfo.filesize ? 1000 : (WORD) (1000 * pfiInfo.compsize / pfiInfo.filesize);\r
-       _fiInfo->llFileID       = uFilePointer++;\r
+       _fiInfo->nFileId        = nFilePointer++;\r
        _fiInfo->tmModified     = pfiInfo.timestamp;\r
        _fiInfo->szStoredName   = MB2String(pfiInfo.path) + MB2String(pfiInfo.filename);\r
        _fiInfo->fnFileName     = wxFileName(_fiInfo->szStoredName);\r
@@ -320,11 +272,11 @@ int __stdcall GetArchiveInformation
        TPI_ARCHIVEINFO * _aiInfo\r
 )\r
 {\r
-       // GetPluginInfo\82ð\8eÀ\8ds\81B\r
+       // GetPluginInfoを実行。\r
        FARPROC fpProc = ::GetProcAddress(g_hLib, "GetPluginInfo");\r
        if (fpProc != NULL)\r
        {\r
-               char szTemp[20];\r
+               char szTemp[257];\r
                if (((int (PASCAL *)(int, char *, int)) fpProc)(2, szTemp, sizeof(szTemp)) > 0)\r
                {\r
                        _aiInfo->fiInfo.szSuffix = MB2String(szTemp);\r
@@ -334,33 +286,33 @@ int __stdcall GetArchiveInformation
                        _aiInfo->fiInfo.szTypeName = MB2String(szTemp);\r
                }\r
        }\r
-       _aiInfo->fiInfo.szTPIName    = wxT("spiLibrary");\r
-       _aiInfo->fiInfo.llSupportedCommand = TPI_COMMAND_EXTRACT;\r
+       _aiInfo->fiInfo.szTPIName = wxT("spiLibrary");\r
+       _aiInfo->fiInfo.eSupportedCommand = TPI_COMMAND_EXTRACT;\r
 \r
        return TPI_ERROR_SUCCESS;\r
 }\r
 \r
 int __stdcall Command\r
 (\r
-       unsigned int _uCommand,\r
+       wxULongLong_t _eCommand,\r
        TPI_SWITCHES * _swInfo,\r
        const wxString & _szArcName,\r
        const wxArrayString & _szFiles\r
 )\r
 {\r
-       if (_uCommand != TPI_COMMAND_EXTRACT)\r
+       if (_eCommand != TPI_COMMAND_EXTRACT)\r
        {\r
                return TPI_ERROR_D_UNSUPPORTED;\r
        }\r
 \r
-       // \93W\8aJ\8f\88\97\9d\82Ì\82Ý\82ð\8ds\82¤\81B\r
+       // 展開処理のみを行う。\r
        FARPROC fpProc = ::GetProcAddress(g_hLib, "GetFile");\r
        if (fpProc == NULL)\r
        {\r
                return TPI_ERROR_U_USE_LIBRARY;\r
        }\r
 \r
-       // \8f\91\8cÉ\83n\83\93\83h\83\8b\82ð\8eæ\93¾\81B\r
+       // 書庫ハンドルを取得。\r
        void * hArchive;\r
        int nErrorCode = OpenArchive(_szArcName, & hArchive);\r
        if (nErrorCode != TPI_ERROR_SUCCESS)\r
@@ -368,54 +320,64 @@ int __stdcall Command
                return nErrorCode;\r
        }\r
 \r
-       // \83R\81[\83\8b\83o\83b\83N\82ð\91\97\90M\81B\95Ö\8bX\8fã-1\82ð\91\97\90M\81B\r
+       // コールバックを送信。\r
        wxFileName _fnArcName(_szArcName);\r
-       if (CallbackProc(-1, 0, (long) & _fnArcName))\r
+       TPI_PROCESSINFO piInfo;\r
+       piInfo.eMessage = TPI_MESSAGE_STATUS;\r
+       piInfo.eStatus  = TPI_STATUS_OPENARCHIVE;\r
+       piInfo.fiInfo.fnFileName = _fnArcName;\r
+       if (CallbackProc(0, 0, (long) & piInfo))\r
        {\r
                return TPI_ERROR_D_SKIPPED;\r
        }\r
 \r
-       // \8f\88\97\9d\8eÀ\8ds\81B\r
-       TPI_FILEINFO fiInfo;\r
-       nErrorCode = GetFileInformation(hArchive, & fiInfo, TRUE);\r
+       // 処理実行。\r
+       piInfo.eStatus = TPI_STATUS_INPROCESS;\r
+       nErrorCode = GetFileInformation(hArchive, & piInfo.fiInfo, true);\r
        if (nErrorCode == TPI_ERROR_SUCCESS)\r
        {\r
                do\r
                {\r
-                       // \83R\81[\83\8b\83o\83b\83N\82ð\91\97\90M\81B\r
-                       if (CallbackProc(0, fiInfo.llUnpackedSize.ToULong(), (long) & fiInfo.fnFileName))\r
+                       // 処理対象かどうか判定。\r
+                       if ((! _szFiles.IsEmpty()) && _szFiles.Index(piInfo.fiInfo.szStoredName) == wxNOT_FOUND)\r
+                       {\r
+                               continue;\r
+                       }\r
+\r
+                       // 処理を行うか確認。\r
+                       piInfo.eMessage = TPI_MESSAGE_ASK;\r
+                       piInfo.eStatus = TPI_PARAM_DEST;\r
+                       piInfo.fnDestination = wxFileName(_swInfo->fnDestinationDirectory.GetPathWithSep() + (_swInfo->fStoreDirectoryPathes ? piInfo.fiInfo.fnFileName.GetFullPath() : piInfo.fiInfo.fnFileName.GetFullName()));\r
+                       if (CallbackProc(0, 0, (long) & piInfo))\r
                        {\r
                                nErrorCode = TPI_ERROR_D_SKIPPED;\r
                                break;\r
                        }\r
-\r
-                       // \8f\88\97\9d\91Î\8fÛ\82©\82Ç\82¤\82©\94»\92è\81B\r
-                       if ((! _szFiles.IsEmpty()) && _szFiles.Index(fiInfo.szStoredName) == wxNOT_FOUND)\r
+                       if (! piInfo.fnDestination.IsOk())\r
                        {\r
                                continue;\r
                        }\r
 \r
-                       // \8fo\97Í\96¼\8dì\90¬\81B\r
-                       wxString szTargetPath = _swInfo->fnDestinationDirectory.GetPathWithSep();\r
-                       if (_swInfo->fStoreDirectoryPathes)\r
+                       // 出力先作成。\r
+                       if (! piInfo.fnDestination.Mkdir(0777, wxPATH_MKDIR_FULL))\r
                        {\r
-                               // \93W\8aJ\90æ\83f\83B\83\8c\83N\83g\83\8a\82ð\8dì\90¬\81B\r
-                               szTargetPath += fiInfo.fnFileName.GetFullPath();\r
-                               wxFileName fnDest(szTargetPath);\r
-                               if (! fnDest.Mkdir(0777, wxPATH_MKDIR_FULL) || ::wxDirExists(fnDest.GetFullPath()))\r
-                               {\r
-                                       nErrorCode = TPI_ERROR_IO_DIR_WRITE;\r
-                                       break;\r
-                               }\r
+                               nErrorCode = TPI_ERROR_IO_DIR_WRITE;\r
+                               break;\r
                        }\r
-                       else\r
+\r
+                       // コールバックを送信。\r
+                       piInfo.eMessage = TPI_MESSAGE_STATUS;\r
+                       piInfo.eStatus = TPI_STATUS_BEGINPROCESS;\r
+                       if (CallbackProc(0, 0, (long) & piInfo))\r
                        {\r
-                               szTargetPath += fiInfo.fnFileName.GetFullName();\r
+                               nErrorCode = TPI_ERROR_D_SKIPPED;\r
+                               break;\r
                        }\r
+                       piInfo.eStatus = TPI_STATUS_INPROCESS;\r
 \r
-                       // \83t\83@\83C\83\8b\8fo\97Í\82É\82Í\91Î\89\9e\82µ\82Ä\82È\82¢\82Ì\82Å\83\81\83\82\83\8a\8fo\97Í\82Å\91ã\8ds\81B\r
+                       // ファイル出力には対応してないのでメモリ出力で代行。\r
                        HLOCAL hMemory = NULL;\r
-                       nErrorCode = SpiErrorCodeConvert(((int (PASCAL *)(const char *, long, char *, unsigned int, FARPROC, long)) fpProc)(_szArcName.ToUTF8(), (long) fiInfo.pCustomInfo, (char *) & hMemory, 0x0100, (FARPROC) CallbackProc, (long) & fiInfo.fnFileName));\r
+                       nErrorCode = ErrorCodeConvert(((int (PASCAL *)(const char *, long, char *, unsigned int, FARPROC, long)) fpProc)(_szArcName.ToUTF8(), (long) piInfo.fiInfo.pCustomInfo, (char *) & hMemory, 0x0100, (FARPROC) CallbackProc, (long) & piInfo));\r
                        if (nErrorCode == TPI_ERROR_SUCCESS && hMemory == NULL)\r
                        {\r
                                nErrorCode = TPI_ERROR_UNDEFINED;\r
@@ -425,16 +387,15 @@ int __stdcall Command
                                break;\r
                        }\r
 \r
-                       // \93W\8aJ\90æ\82É\8fo\97Í\81B\r
+                       // 展開先に出力。\r
                        wxFile hFile;\r
-                       // \8b­\90§\8fã\8f\91\82«\82·\82é\82Ì\82Å\92\8d\88Ó\81B\r
-                       if (! hFile.Create(szTargetPath, true))\r
+                       if (! hFile.Create(piInfo.fnDestination.GetFullPath()))\r
                        {\r
                                nErrorCode = TPI_ERROR_IO_FILE_OPEN;\r
                                break;\r
                        }\r
 \r
-                       bool bErrorOccured = hFile.Write(::LocalLock(hMemory), (size_t) fiInfo.llUnpackedSize.GetValue()) != fiInfo.llUnpackedSize;\r
+                       bool bErrorOccured = hFile.Write(::LocalLock(hMemory), piInfo.fiInfo.nUnpackedSize) != piInfo.fiInfo.nUnpackedSize;\r
                        ::LocalUnlock(hMemory);\r
                        ::LocalFree(hMemory);\r
                        hFile.Close();\r
@@ -445,17 +406,18 @@ int __stdcall Command
                        }\r
                        nErrorCode = TPI_ERROR_SUCCESS;\r
 \r
-                       // \83R\81[\83\8b\83o\83b\83N\82ð\91\97\90M\81B\r
-                       if (CallbackProc(fiInfo.llUnpackedSize.ToULong(), fiInfo.llUnpackedSize.ToULong(), (long) & fiInfo.fnFileName))\r
+                       // コールバックを送信。\r
+                       piInfo.eStatus = TPI_STATUS_ENDPROCESS;\r
+                       if (CallbackProc(0, 0, (long) & piInfo))\r
                        {\r
                                nErrorCode = TPI_ERROR_D_SKIPPED;\r
                                break;\r
                        }\r
                }\r
-               while ((nErrorCode = GetFileInformation(hArchive, & fiInfo, FALSE)) != TPI_ERROR_S_ENDOFDATA);\r
+               while ((nErrorCode = GetFileInformation(hArchive, & piInfo.fiInfo, false)) != TPI_ERROR_S_ENDOFDATA);\r
                if (nErrorCode == TPI_ERROR_S_ENDOFDATA)\r
                {\r
-                       // \8fI\92[\82É\92B\82µ\82½\8fê\8d\87\81B\r
+                       // 終端に達した場合。\r
                        nErrorCode = TPI_ERROR_SUCCESS;\r
                }\r
        }\r
@@ -469,7 +431,7 @@ int __stdcall SetCallbackProc
        TPI_PROC _prArcProc\r
 )\r
 {\r
-       // \83|\83C\83\93\83^\82ð\95Û\91\81B\r
+       // ポインタを保存。\r
        if (_prArcProc == NULL)\r
        {\r
                return TPI_ERROR_D_PARAMETER;\r