xpcom/glue/standalone/nsGlueLinkingOS2.cpp

   1 /* -*- Mode: C++; tab-width: 6; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /* ***** BEGIN LICENSE BLOCK *****
   3  * Version: MPL 1.1/GPL 2.0/LGPL 2.1
   4  *
   5  * The contents of this file are subject to the Mozilla Public License Version
   6  * 1.1 (the "License"); you may not use this file except in compliance with
   7  * the License. You may obtain a copy of the License at
   8  * http://www.mozilla.org/MPL/
   9  *
  10  * Software distributed under the License is distributed on an "AS IS" basis,
  11  * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
  12  * for the specific language governing rights and limitations under the
  13  * License.
  14  *
  15  * The Original Code is Mozilla XPCOM.
  16  *
  17  * The Initial Developer of the Original Code is
  18  * Benjamin Smedberg <benjamin@smedbergs.us>
  19  *
  20  * Portions created by the Initial Developer are Copyright (C) 2005
  21  * the Initial Developer. All Rights Reserved.
  22  *
  23  * Contributor(s):
  24  *
  25  * Alternatively, the contents of this file may be used under the terms of
  26  * either the GNU General Public License Version 2 or later (the "GPL"), or
  27  * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
  28  * in which case the provisions of the GPL or the LGPL are applicable instead
  29  * of those above. If you wish to allow use of your version of this file only
  30  * under the terms of either the GPL or the LGPL, and not to allow others to
  31  * use your version of this file under the terms of the MPL, indicate your
  32  * decision by deleting the provisions above and replace them with the notice
  33  * and other provisions required by the GPL or the LGPL. If you do not delete
  34  * the provisions above, a recipient may use your version of this file under
  35  * the terms of any one of the MPL, the GPL or the LGPL.
  36  *
  37  * ***** END LICENSE BLOCK ***** */
  38
  39 #include "nsGlueLinking.h"
  40 #include "nsXPCOMGlue.h"
  41
  42 #define INCL_DOS
  43 #define INCL_DOSERRORS
  44 #include <os2.h>
  45 #include <stdlib.h>
  46 #include <stdio.h>
  47
  48 struct DependentLib
  49 {
  50     HMODULE     libHandle;
  51     DependentLib *next;
  52 };
  53
  54 static DependentLib *sTop;
  55 HMODULE sXULLibrary = NULLHANDLE;
  56
  57 static void
  58 AppendDependentLib(HMODULE libHandle)
  59 {
  60     DependentLib *d = new DependentLib;
  61     if (!d)
  62         return;
  63
  64     d->next = sTop;
  65     d->libHandle = libHandle;
  66
  67     sTop = d;
  68 }
  69
  70 static void
  71 ReadDependentCB(const char *aDependentLib)
  72 {
  73     CHAR pszError[_MAX_PATH];
  74     ULONG ulrc = NO_ERROR;
  75     HMODULE h;
  76
  77     ulrc = DosLoadModule(pszError, _MAX_PATH, aDependentLib, &h);
  78
  79     if (ulrc != NO_ERROR)
  80         return;
  81
  82     AppendDependentLib(h);
  83 }
  84
  85 // like strpbrk but finds the *last* char, not the first
  86 static char*
  87 ns_strrpbrk(char *string, const char *strCharSet)
  88 {
  89     char *found = NULL;
  90     for (; *string; ++string) {
  91         for (const char *search = strCharSet; *search; ++search) {
  92             if (*search == *string) {
  93                 found = string;
  94                 // Since we're looking for the last char, we save "found"
  95                 // until we're at the end of the string.
  96             }
  97         }
  98     }
  99
 100     return found;
 101 }
 102
 103 GetFrozenFunctionsFunc
 104 XPCOMGlueLoad(const char *xpcomFile)
 105 {
 106     CHAR pszError[_MAX_PATH];
 107     ULONG ulrc = NO_ERROR;
 108     HMODULE h;
 109
 110     if (xpcomFile[0] == '.' && xpcomFile[1] == '\0') {
 111         xpcomFile = XPCOM_DLL;
 112     }
 113     else {
 114         char xpcomDir[MAXPATHLEN];
 115
 116         _fullpath(xpcomDir, xpcomFile, sizeof(xpcomDir));
 117         char *lastSlash = ns_strrpbrk(xpcomDir, "/\\");
 118         if (lastSlash) {
 119             *lastSlash = '\0';
 120
 121             XPCOMGlueLoadDependentLibs(xpcomDir, ReadDependentCB);
 122
 123             snprintf(lastSlash, MAXPATHLEN - strlen(xpcomDir), "\\" XUL_DLL);
 124
 125             DosLoadModule(pszError, _MAX_PATH, xpcomDir, &sXULLibrary);
 126         }
 127     }
 128
 129     ulrc = DosLoadModule(pszError, _MAX_PATH, xpcomFile, &h);
 130
 131     if (ulrc != NO_ERROR)
 132         return nsnull;
 133
 134     AppendDependentLib(h);
 135
 136     GetFrozenFunctionsFunc sym;
 137
 138     ulrc = DosQueryProcAddr(h, 0, "_NS_GetFrozenFunctions", (PFN*)&sym);
 139
 140     if (ulrc != NO_ERROR)
 141         XPCOMGlueUnload();
 142
 143     return sym;
 144 }
 145
 146 void
 147 XPCOMGlueUnload()
 148 {
 149     while (sTop) {
 150         DosFreeModule(sTop->libHandle);
 151
 152         DependentLib *temp = sTop;
 153         sTop = sTop->next;
 154
 155         delete temp;
 156     }
 157
 158     if (sXULLibrary) {
 159         DosFreeModule(sXULLibrary);
 160         sXULLibrary = nsnull;
 161     }
 162 }
 163
 164 nsresult
 165 XPCOMGlueLoadXULFunctions(const nsDynamicFunctionLoad *symbols)
 166 {
 167     ULONG ulrc = NO_ERROR;
 168
 169     if (!sXULLibrary)
 170         return NS_ERROR_NOT_INITIALIZED;
 171
 172     nsresult rv = NS_OK;
 173     while (symbols->functionName) {
 174         char buffer[512];
 175         snprintf(buffer, sizeof(buffer), "_%s", symbols->functionName);
 176         ulrc = DosQueryProcAddr(sXULLibrary, 0, buffer, (PFN*)symbols->function);
 177
 178         if (ulrc != NO_ERROR)
 179             rv = NS_ERROR_LOSS_OF_SIGNIFICANT_DATA;
 180
 181         ++symbols;
 182     }
 183
 184     return rv;
 185 }