src/plugin/cuiWrapper/cuiWrapper.cpp

   1 /*******************************************************************************\r
   2   TPI - flexible but useless plug-in framework.\r
   3   Copyright (C) 2002-2009 Silky\r
   4 \r
   5   This library is free software; you can redistribute it and/or modify it under\r
   6   the terms of the GNU Lesser General Public License as published by the Free\r
   7   Software Foundation; either version 2.1 of the License, or (at your option)\r
   8   any later version.\r
   9 \r
  10   This library is distributed in the hope that it will be useful, but WITHOUT\r
  11   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or \r
  12   FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License\r
  13   for more details.\r
  14 \r
  15   You should have received a copy of the GNU Lesser General Public License along\r
  16   with this library; if not, write to the Free Software Foundation, Inc.,\r
  17   51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA\r
  18 \r
  19   $Id$\r
  20 *******************************************************************************/\r
  21 \r
  22 //******************************************************************************\r
  23 //    Includes\r
  24 //******************************************************************************\r
  25 \r
  26 #include "../../common/header/plugin.h"\r
  27 #include "../../common/header/plugin-extra.h"\r
  28 #include "../../common/library/library.h"\r
  29 #include "../../common/library/xmldoc.h"\r
  30 #include <wx/tokenzr.h>\r
  31 #include "cuiWrapper.h"\r
  32 #define min(a, b) ((a) < (b) ? (a) : (b))\r
  33 \r
  34 //******************************************************************************\r
  35 //    Global varients\r
  36 //******************************************************************************\r
  37 \r
  38 struct g_LibInfo\r
  39 {\r
  40         wxString szExeFile;\r
  41         wxString szExeFileAlt;\r
  42         wxString szListCommand;\r
  43         wxULongLong_t nLibIndex;\r
  44         wxXmlNode node;\r
  45 }       g_LibInfo;\r
  46 \r
  47 TPI_PROC g_prProc;\r
  48 \r
  49 //******************************************************************************\r
  50 //    Inside Functions\r
  51 //******************************************************************************\r
  52 \r
  53 int myExecute(const wxString & szCommandLine, wxString * szOutput, const wxString & szCwd, bool fWine)\r
  54 {\r
  55 #ifdef __LINUX__\r
  56         wxString sz = ::wxGetCwd();\r
  57         ::wxSetWorkingDirectory(szCwd);\r
  58         FILE * fp = popen(fWine ? (wxT("wine ") + szCommandLine).ToUTF8() : szCommandLine.ToUTF8(), "r");\r
  59         ::wxSetWorkingDirectory(sz);\r
  60         if (fp == NULL)\r
  61         {\r
  62                 wxLogError(L"Error :\n\nCommandLine:\n%s", szCommandLine.c_str());\r
  63                 return TPI_ERROR_U_USE_LIBRARY;\r
  64         }\r
  65 \r
  66         if (szOutput != NULL)\r
  67         {\r
  68                 char sz[32769];\r
  69                 while (! feof(fp))\r
  70                 {\r
  71                         memset(sz, 0, sizeof(sz));\r
  72                         fread(sz, sizeof(char), sizeof(sz) - 1, fp);\r
  73                         * szOutput += UTF82String(sz);\r
  74                 }\r
  75 //              ::wxMessageBox(* szOutput);\r
  76         }\r
  77 \r
  78         // 127を返した場合はコマンドが存在しない。\r
  79         int nErrorCode = pclose(fp);\r
  80         return (WIFEXITED(nErrorCode) && WEXITSTATUS(nErrorCode) != 127) ? TPI_ERROR_SUCCESS : TPI_ERROR_U_USE_LIBRARY;\r
  81 #else\r
  82         SECURITY_ATTRIBUTES sa;\r
  83         memset(& sa, 0, sizeof(SECURITY_ATTRIBUTES));\r
  84         sa.bInheritHandle = TRUE;\r
  85         sa.nLength = sizeof(SECURITY_ATTRIBUTES);\r
  86         HANDLE hRead, hWrite;\r
  87         if (! ::CreatePipe(& hRead, & hWrite, & sa, 4096))\r
  88         {\r
  89                 return TPI_ERROR_U_USE_LIBRARY;\r
  90         }\r
  91         STARTUPINFO si;\r
  92         memset(& si, 0, sizeof(STARTUPINFO));\r
  93         si.cb = sizeof(STARTUPINFO);\r
  94         si.dwFlags = STARTF_USESTDHANDLES;\r
  95         si.hStdOutput = hWrite;\r
  96         si.hStdError = hWrite;\r
  97         PROCESS_INFORMATION pi;\r
  98         if (! ::CreateProcess(NULL, szCommandLine.wchar_str(), NULL, NULL, TRUE, CREATE_NO_WINDOW, NULL, szCwd.IsEmpty() ? NULL : szCwd.wchar_str(), & si, & pi))\r
  99         {\r
 100                 return TPI_ERROR_U_USE_LIBRARY;\r
 101         }\r
 102         ::CloseHandle(pi.hThread);\r
 103 \r
 104         if (szOutput != NULL)\r
 105         {\r
 106                 bool bSignal;\r
 107                 do\r
 108                 {\r
 109                         DWORD dwSize = 0;\r
 110                         bSignal = ::WaitForSingleObject(pi.hProcess, 100) == WAIT_OBJECT_0;\r
 111                         ::PeekNamedPipe(hRead, NULL, 0, NULL, & dwSize, NULL);\r
 112                         while (dwSize > 0)\r
 113                         {\r
 114                                 char sz[4097];\r
 115                                 memset(sz, 0, sizeof(sz));\r
 116                                 ::ReadFile(hRead, & sz, sizeof(sz) - 1, & dwSize, NULL);\r
 117                                 * szOutput += wxString(sz);\r
 118                                 // UTF-8以外の文字コードだと、UTF82Stringを使うと書庫が開けなくなる。データの切り出しにも影響。\r
 119 //                              * szOutput += UTF82String(sz);\r
 120 //                              ::MessageBoxA(NULL, sz, NULL, 0);\r
 121                                 ::PeekNamedPipe(hRead, NULL, 0, NULL, & dwSize, NULL);\r
 122                         }\r
 123                 }\r
 124                 while (! bSignal);\r
 125         }\r
 126 \r
 127         ::CloseHandle(pi.hProcess);\r
 128         ::CloseHandle(hRead);\r
 129         ::CloseHandle(hWrite);\r
 130         return TPI_ERROR_SUCCESS;\r
 131 #endif\r
 132 }\r
 133 \r
 134 PosInfo MakePosInfo(const wxString & szPrefix)\r
 135 {\r
 136         PosInfo pi;\r
 137         pi.nStart = myGetAttributeInt(& g_LibInfo.node, wxT("list-") + szPrefix + wxT("-s"));\r
 138         pi.nCount = myGetAttributeInt(& g_LibInfo.node, wxT("list-") + szPrefix + wxT("-c"));\r
 139         pi.nLine  = myGetAttributeInt(& g_LibInfo.node, wxT("list-") + szPrefix + wxT("-l"));\r
 140         return pi;\r
 141 }\r
 142 \r
 143 wxULongLong_t GetSize(const PosInfo & pi, wxULongLong_t nCurrent, const wxArrayString & as)\r
 144 {\r
 145         if (pi.nStart == 0 && pi.nCount == 0)\r
 146         {\r
 147                 return 0;\r
 148         }\r
 149 \r
 150         wxULongLong_t nTemp = 0, nPos = nCurrent + pi.nLine;\r
 151         wxString sz = pi.nCount == 0 ? as[nPos].Mid(pi.nStart) : as[nPos].Mid(pi.nStart, pi.nCount);\r
 152         sz.ToULongLong(& nTemp);\r
 153         return nTemp;\r
 154 }\r
 155 \r
 156 //******************************************************************************\r
 157 //    Functions\r
 158 //******************************************************************************\r
 159 \r
 160 #ifdef __cplusplus\r
 161 extern "C"\r
 162 {\r
 163 #endif\r
 164 \r
 165 int __stdcall GetPluginInformation\r
 166 (\r
 167         unsigned int _uInfoId,\r
 168         wxULongLong_t,\r
 169         void * _pPtr\r
 170 )\r
 171 {\r
 172         if (_pPtr == NULL)\r
 173         {\r
 174                 return TPI_ERROR_D_PARAMETER;\r
 175         }\r
 176         switch (_uInfoId)\r
 177         {\r
 178         case TPI_INFO_VERSION_MAJOR:\r
 179         case TPI_INFO_VERSION_MINOR:\r
 180                 * (int *) _pPtr = 0;\r
 181                 break;\r
 182         case TPI_INFO_VERSION_API:\r
 183                 * (int *) _pPtr = 2;\r
 184                 break;\r
 185         case TPI_INFO_HANDLE_ON_COMMAND:\r
 186                 * (int *) _pPtr = 0;\r
 187                 break;\r
 188         default:\r
 189                 return TPI_ERROR_D_UNSUPPORTED;\r
 190         }\r
 191         return TPI_ERROR_SUCCESS;\r
 192 }\r
 193 \r
 194 int __stdcall GetFormatInformation(TPI_FORMATINFO * _fiInfo, bool _bFirst)\r
 195 {\r
 196         static wxULongLong_t s_nFileId;\r
 197         static wxXmlDocument xmlDoc(myMakeXMLName(wxT("cuiWrapper")));\r
 198         static wxXmlNode * xmlLibrary;\r
 199         if (_bFirst)\r
 200         {\r
 201                 // xml解析開始。\r
 202                 s_nFileId = 0;\r
 203                 xmlLibrary = myGetFirstLib(& xmlDoc);\r
 204         }\r
 205         else\r
 206         {\r
 207                 xmlLibrary = myGetNextLib(xmlLibrary);\r
 208         }\r
 209         if (xmlLibrary == NULL)\r
 210         {\r
 211                 // データの終端に達した場合。\r
 212                 return TPI_ERROR_S_ENDOFDATA;\r
 213         }\r
 214 \r
 215         MakeFormatInfo(xmlLibrary, wxT("cuiWrapper"), _fiInfo, s_nFileId++);\r
 216         wxString szExeFile = xmlLibrary->GetAttribute(wxT("name"), wxEmptyString);\r
 217         if (myExecute(szExeFile, NULL, wxEmptyString, szExeFile.MakeLower().EndsWith(wxT(".exe"))) != TPI_ERROR_SUCCESS)\r
 218         {\r
 219                 _fiInfo->eSupportedCommand = 0;\r
 220         }\r
 221         return TPI_ERROR_SUCCESS;\r
 222 }\r
 223 \r
 224 int __stdcall LoadPlugin\r
 225 (\r
 226         const wxString & _szArcName,\r
 227         TPI_PROC _prProc,\r
 228         wxULongLong_t _nTypeId\r
 229 )\r
 230 {\r
 231         // xml解析開始。\r
 232         wxXmlDocument xmlDoc(myMakeXMLName(wxT("cuiWrapper")));\r
 233         wxXmlNode * xmlLibrary;\r
 234 \r
 235         // コールバック関数を設定。\r
 236         if (_prProc != NULL)\r
 237         {\r
 238                 g_prProc = * _prProc;\r
 239         }\r
 240 \r
 241         // 対象が存在するならば対応するライブラリを調査、\r
 242         // 対象が存在しないならば指示されたライブラリをロード。\r
 243         if (! ::wxFileExists(_szArcName))\r
 244         {\r
 245                 xmlLibrary = myGetFirstLib(& xmlDoc, _nTypeId);\r
 246                 if (xmlLibrary == NULL)\r
 247                 {\r
 248                         // xml文法エラー。\r
 249                         return TPI_ERROR_UNDEFINED;\r
 250                 }\r
 251                 g_LibInfo.szExeFile = xmlLibrary->GetAttribute(wxT("name"), wxEmptyString);\r
 252                 g_LibInfo.szExeFileAlt = xmlLibrary->GetAttribute(wxT("name-alt"), wxEmptyString);\r
 253                 g_LibInfo.node = * xmlLibrary;\r
 254                 g_LibInfo.nLibIndex = _nTypeId;\r
 255                 return TPI_ERROR_SUCCESS;\r
 256         }\r
 257 \r
 258         // 無限ループに陥らないよう上限を設定。\r
 259         xmlLibrary = myGetFirstLib(& xmlDoc);\r
 260         for (g_LibInfo.nLibIndex = 0; g_LibInfo.nLibIndex < 300 && xmlLibrary != NULL; g_LibInfo.nLibIndex++)\r
 261         {\r
 262                 // 書庫に対応しているかチェック。\r
 263                 wxFileName fnArchive(_szArcName);\r
 264                 wxArrayString asExt = ::wxStringTokenize(xmlLibrary->GetAttribute(wxT("suffix"), wxEmptyString), wxT(";"));\r
 265                 if (xmlLibrary->HasAttribute(wxT("list")))\r
 266                 {\r
 267                         for (size_t i = 0; i < asExt.GetCount(); i++)\r
 268                         {\r
 269                                 // .tar.XXXなど二重判定への対応。\r
 270 //                              if (asExt[i].IsSameAs(fnArchive.GetExt(), false))\r
 271                                 if (fnArchive.GetFullName().MakeLower().EndsWith(wxT('.') + asExt[i].MakeLower()))\r
 272                                 {\r
 273                                         // ライブラリをロード。\r
 274                                         g_LibInfo.szExeFile = xmlLibrary->GetAttribute(wxT("name"), wxEmptyString);\r
 275                                         g_LibInfo.szExeFileAlt = xmlLibrary->GetAttribute(wxT("name-alt"), wxEmptyString);\r
 276                                         g_LibInfo.node = * xmlLibrary;\r
 277                                         g_LibInfo.nLibIndex = _nTypeId;\r
 278                                         return TPI_ERROR_SUCCESS;\r
 279                                 }\r
 280                         }\r
 281                 }\r
 282                 xmlLibrary = myGetNextLib(xmlLibrary);\r
 283         }\r
 284         return TPI_ERROR_U_LOAD_LIBRARY;\r
 285 }\r
 286 \r
 287 int __stdcall FreePlugin\r
 288 (\r
 289         void * // _pReserved\r
 290 )\r
 291 {\r
 292         return TPI_ERROR_SUCCESS;\r
 293 }\r
 294 \r
 295 int __stdcall OpenArchive\r
 296 (\r
 297         const wxString & _szArcName,\r
 298         void * * _hArchive,\r
 299         wxULongLong_t * _nFileCount\r
 300 )\r
 301 {\r
 302         wxString szOutput;\r
 303         TPI_SWITCHES swInfo;\r
 304         swInfo.szArcName = _szArcName;\r
 305         if (myExecute(g_LibInfo.szExeFile + wxT(" ") + MakeCommandLineSend(g_LibInfo.node.GetAttribute(wxT("list"), wxEmptyString), & swInfo), & szOutput, wxEmptyString, g_LibInfo.szExeFile.MakeLower().EndsWith(wxT(".exe"))) != TPI_ERROR_SUCCESS)\r
 306         {\r
 307                 return TPI_ERROR_U_USE_LIBRARY;\r
 308         }\r
 309         wxArrayString * as = new wxArrayString(::wxStringTokenize(szOutput, wxT("\r\n")));\r
 310         * _hArchive = (void *) as;\r
 311         as->Shrink();\r
 312         if (_nFileCount != NULL)\r
 313         {\r
 314                 * _nFileCount = as->GetCount();\r
 315         }\r
 316 \r
 317         wxString szStartLine = g_LibInfo.node.GetAttribute(wxT("list-line-s"), wxEmptyString);\r
 318         if ((! szStartLine.IsEmpty() && as->Index(szStartLine) == wxNOT_FOUND) || as->IsEmpty())\r
 319         {\r
 320                 // 書庫が読み込めなかった？\r
 321                 delete as;\r
 322                 return TPI_ERROR_ARC_UNSUPPORTED;\r
 323         }\r
 324 \r
 325         return TPI_ERROR_SUCCESS;\r
 326 }\r
 327 \r
 328 int __stdcall CloseArchive\r
 329 (\r
 330         void * _hArchive\r
 331 )\r
 332 {\r
 333         wxArrayString * as = (wxArrayString *) _hArchive;\r
 334         as->Clear();\r
 335         delete as;\r
 336         return TPI_ERROR_SUCCESS;\r
 337 }\r
 338 \r
 339 int __stdcall GetFileInformation\r
 340 (\r
 341         void * _hArchive,\r
 342         TPI_FILEINFO * _fiInfo,\r
 343         bool _bFirst\r
 344 )\r
 345 {\r
 346         static size_t s_nCurrentLine;\r
 347         static wxULongLong_t s_nFileId;\r
 348         if (_hArchive == NULL)\r
 349         {\r
 350                 return TPI_ERROR_UNDEFINED;\r
 351         }\r
 352         wxArrayString asOutput = * (wxArrayString *) _hArchive;\r
 353 \r
 354         // XMLからの読み込みは初回に行う。\r
 355         static wxString szEndLine, szDateFormat;\r
 356         static wxULongLong_t nProcessPerLine;\r
 357         static PosInfo piFName, piPSize, piUSize, piDate;\r
 358         if (_bFirst)\r
 359         {\r
 360                 s_nFileId = 0;\r
 361                 wxString szStartLine = g_LibInfo.node.GetAttribute(wxT("list-line-s"), wxEmptyString);\r
 362                 if (! szStartLine.IsEmpty())\r
 363                 {\r
 364                         // 開始行の次の行にセット。エラーはOpenArchiveでチェック済み。\r
 365                         s_nCurrentLine = asOutput.Index(szStartLine) + 1;\r
 366                 }\r
 367 \r
 368                 // 初期設定。\r
 369                 nProcessPerLine = myGetAttributeInt(& g_LibInfo.node, wxT("list-line-c"), 1);\r
 370                 szEndLine = g_LibInfo.node.GetAttribute(wxT("list-line-e"), szStartLine);\r
 371                 szDateFormat = g_LibInfo.node.GetAttribute(wxT("list-date-f"), wxDefaultDateTimeFormat);\r
 372                 piFName = MakePosInfo(wxT("fname"));\r
 373                 piPSize = MakePosInfo(wxT("psize"));\r
 374                 piUSize = MakePosInfo(wxT("usize"));\r
 375                 piDate  = MakePosInfo(wxT("date"));\r
 376         }\r
 377 \r
 378         if (s_nCurrentLine >= asOutput.GetCount())\r
 379         {\r
 380                 // 空行で終わるとき以外はエラーとする。\r
 381                 return szEndLine.IsEmpty() ? TPI_ERROR_S_ENDOFDATA : TPI_ERROR_ARC_UNSUPPORTED;\r
 382         }\r
 383 \r
 384         // 最終行かどうか確認。\r
 385         if (asOutput[s_nCurrentLine] == szEndLine)\r
 386         {\r
 387                 return TPI_ERROR_S_ENDOFDATA;\r
 388         }\r
 389 \r
 390         // ファイル名を取得。\r
 391         _fiInfo->szStoredName = piFName.nCount == 0 ? asOutput[s_nCurrentLine + piFName.nLine].Mid(piFName.nStart) : asOutput[s_nCurrentLine + piFName.nLine].Mid(piFName.nStart, piFName.nCount);\r
 392         _fiInfo->szStoredName.Trim();\r
 393         _fiInfo->fnFileName = wxFileName(_fiInfo->szStoredName, wxPATH_DOS);\r
 394 \r
 395         // サイズ取得。\r
 396         _fiInfo->nPackedSize   = GetSize(piPSize, s_nCurrentLine, asOutput);\r
 397         _fiInfo->nUnpackedSize = GetSize(piUSize, s_nCurrentLine, asOutput);\r
 398 \r
 399         // 更新時刻取得。\r
 400         if (piDate.nStart != 0 || piDate.nCount != 0)\r
 401         {\r
 402                 _fiInfo->tmModify.ParseFormat(piDate.nCount == 0 ? asOutput[s_nCurrentLine + piDate.nLine].Mid(piDate.nStart) : asOutput[s_nCurrentLine + piDate.nLine].Mid(piDate.nStart, piDate.nCount), szDateFormat);\r
 403         }\r
 404 \r
 405         // 最後に次の行へ進めておく。\r
 406         _fiInfo->nFileId = s_nFileId++;\r
 407         s_nCurrentLine += nProcessPerLine;\r
 408 \r
 409         return TPI_ERROR_SUCCESS;\r
 410 }\r
 411 \r
 412 int __stdcall GetArchiveInformation\r
 413 (\r
 414         void *,\r
 415         TPI_ARCHIVEINFO * _aiInfo\r
 416 )\r
 417 {\r
 418         // 形式に関する情報を取得。\r
 419         MakeFormatInfo(& g_LibInfo.node, wxT("cuiWrapper"), & _aiInfo->fiInfo, 0);\r
 420         return TPI_ERROR_SUCCESS;\r
 421 }\r
 422 \r
 423 int __stdcall Command\r
 424 (\r
 425         wxULongLong_t _eCommand,\r
 426         TPI_SWITCHES * _swInfo,\r
 427         void *,// _hArchive,\r
 428         const wxArrayString & _szFiles\r
 429 )\r
 430 {\r
 431         // xmlからコマンドラインを取得。\r
 432         wxString szPath, szCommandLine;\r
 433 \r
 434         // APIアドレス取得。\r
 435         if (! g_LibInfo.node.GetAttribute(\r
 436                         _eCommand == TPI_COMMAND_CREATE  ? wxT("create") :\r
 437                         _eCommand == TPI_COMMAND_ADD     ? wxT("add") :\r
 438                         _eCommand == TPI_COMMAND_EXTRACT ? wxT("extract") : \r
 439                         _eCommand == TPI_COMMAND_DELETE  ? wxT("delete") : \r
 440                         _eCommand == TPI_COMMAND_UPDATE  ? wxT("update") : \r
 441                         _eCommand == TPI_COMMAND_TEST    ? wxT("test") : \r
 442                         _eCommand == TPI_COMMAND_REPAIR  ? wxT("repair") : \r
 443                         _eCommand == TPI_COMMAND_MOVE    ? wxT("move") : \r
 444                         _eCommand == TPI_COMMAND_SFX     ? wxT("sfx") : \r
 445                         _eCommand == TPI_COMMAND_UNSFX   ? wxT("unsfx") : wxEmptyString, & szCommandLine))\r
 446         {\r
 447                 g_LibInfo.node.GetAttribute(\r
 448                         _eCommand == TPI_COMMAND_CREATE  ? wxT("create-alt") :\r
 449                         _eCommand == TPI_COMMAND_ADD     ? wxT("add-alt") :\r
 450                         _eCommand == TPI_COMMAND_EXTRACT ? wxT("extract-alt") : \r
 451                         _eCommand == TPI_COMMAND_DELETE  ? wxT("delete-alt") : \r
 452                         _eCommand == TPI_COMMAND_UPDATE  ? wxT("update-alt") : \r
 453                         _eCommand == TPI_COMMAND_TEST    ? wxT("test-alt") : \r
 454                         _eCommand == TPI_COMMAND_REPAIR  ? wxT("repair-alt") : \r
 455                         _eCommand == TPI_COMMAND_MOVE    ? wxT("move-alt") : \r
 456                         _eCommand == TPI_COMMAND_SFX     ? wxT("sfx-alt") : \r
 457                         _eCommand == TPI_COMMAND_UNSFX   ? wxT("unsfx-alt") : wxEmptyString, & szCommandLine);\r
 458         }\r
 459 \r
 460         if (szCommandLine.IsEmpty())\r
 461         {\r
 462                 return TPI_ERROR_U_USE_LIBRARY;\r
 463         }\r
 464 \r
 465         // コマンドライン・レスポンスファイル作成。\r
 466         wxString\r
 467                 szResponceFileName = MakeResponceFile(_szFiles, myGetAttributeBool(& g_LibInfo.node, wxT("quote-resp"), true)),\r
 468                 szCommandLineSend  = MakeCommandLineSend(szCommandLine, _swInfo, _szFiles, szResponceFileName);\r
 469 \r
 470         // コマンドライン実行。\r
 471         wxString szOutput;\r
 472         int nErrorCode = myExecute(g_LibInfo.szExeFile + wxT(" ") + szCommandLineSend, & szOutput, _swInfo->fnDestinationDirectory.GetFullPath(), g_LibInfo.szExeFile.MakeLower().EndsWith(wxT(".exe")));\r
 473 \r
 474         // レスポンスファイル削除。\r
 475         ::wxRemoveFile(szResponceFileName);\r
 476 \r
 477         if (nErrorCode != TPI_ERROR_SUCCESS)\r
 478         {\r
 479                 wxLogError(L"Error :\n%x\n\nCommandLine:\n%s\n\nOutput:\n%s", nErrorCode, szCommandLineSend.c_str(), szOutput.c_str());\r
 480         }\r
 481         return nErrorCode;\r
 482 }\r
 483 \r
 484 #ifdef __cplusplus\r
 485 }\r
 486 #endif\r