Changeset 535 for trunk/src

Timestamp:

Aug 5, 2003, 9:46:37 PM (22 years ago)

Author:

bird

Message:

trying to update definition file...

Location:

trunk/src/emx/src/emxomf

Files:

• emxomfld.c (modified) (10 diffs, 1 prop)
• weakld.c (modified) (15 diffs, 1 prop)
• weakld.h (modified) (1 diff, 1 prop)

trunk/src/emx/src/emxomf/emxomfld.c

@@ -113 +113 @@
 static FILE *response_file = NULL;
 
+
+
+
 /* Weak alias object file. */
 static char weakobj_fname[_MAX_PATH];
+
+
+
 
 /* Non-zero if debugging information is to be omitted.  Set by the -s
@@ -327 +333 @@
 
       max_len = (response_file == NULL ? 110 : 52);
-      if (line_len + len + 1 > max_len)
+      if (   line_len + len + 1 > max_len 
+          || (force_response_file && !response_file))
         {
 
@@ -385 +392 @@
               command_line[line_len++] = '@';
               strcpy (command_line+line_len, response_fname);
+
+
+
             }
           else if (line_len != 0)
@@ -645 +655 @@
     if (    !strnicmp(pOpt->name, "/I", 2)
         ||  !strnicmp(pOpt->name, "-I", 2))
-        fFlags |= WLDC_VERBOSE;
+        fFlags 
     else
     if (    !strnicmp(pOpt->name, "/NOIN", 5)
@@ -704 +714 @@
       /* generate weak aliases. */
       if (!rc)
-        rc = wldGenerateWeakobj (pwld, weakobj_fname);
+        rc = wldGenerateWeak_fname);
       if (!rc && weakobj_fname[0])
         add_name_list (&add_obj_fnames, weakobj_fname);
+
+
 
       /* cleanup the linker */
@@ -740 +752 @@
   line_len = 0;
   response_flag = rsp;
+
 }
 
@@ -827 +840 @@
       if (!(argi % 32))
         argv = xrealloc(argv, sizeof(argv[0]) * (argi + 32 + 1));
-      argv[argi++] = xstrdup(psz);
+      argv[argi++] = ;
 
       /* next */
@@ -839 +852 @@
     fprintf(stderr, "*** Return from %s is %d\n", pszwhat, rc);
 
+
   return rc;
 }
@@ -862 +876 @@
       remove (weakobj_fname);
       weakobj_fname[0] = '\0';
+
+
+
+
+
     }
 }
@@ -1259 +1278 @@
 
   /* Put the object file names onto the command line. */
-
+  
+  force_response_file = TRUE;           /* link386 workaround. */
   put_args (obj_fnames, TRUE);
   put_arg (",", FALSE, FALSE);

trunk/src/emx/src/emxomf/weakld.c

@@ -82 +82 @@
 #include <string.h>
 #include <sys/types.h>
+
+
+
 #include <sys/omflib.h>
 #include <sys/moddef.h>
@@ -564 +567 @@
     {
         pLib->phFile = fopen(pLib->pszLibName, "rb");
-        if (pLib->phFile)
+        if (pLib->phFile)
             libErr(pLib, "Failed to open library.");
     }
@@ -576 +579 @@
 static void         libClose(PWLDLIB pLib)
 {
-    if (!pLib->phFile)
+    if (pLib->phFile)
     {
         fclose(pLib->phFile);
@@ -2342 +2345 @@
     {
         void *pv = pObj;   
+
         pObj = pObj->pNext;
         free(pv);
@@ -2348 +2352 @@
     {
         void *pv = pObj;   
+
         pObj = pObj->pNext;
         free(pv);
@@ -2356 +2361 @@
     {
         void *pv = pLib;   
+
         pLib = pLib->pNext;
         free(pv);
@@ -2411 +2417 @@
         pWld->ppObjsAdd = &pMod->pNext;
         rc = pass1ReadOMFMod(pWld, pMod, 0);
+
     }
     else if (OmfRec.chType == LIBHDR)
@@ -2435 +2442 @@
                 }
                 rc = pass1ReadOMFMod(pWld, pMod, 0);
+
                 if (rc)
                     break;
@@ -2447 +2455 @@
             fread(&OmfRec, sizeof(OmfRec), 1, phFile);
         }
+
     }
     else
     {
+
         fprintf(stderr, "weakld: invalid object file '%s'.\n", pszName);
         rc = -1;
@@ -2826 +2836 @@
 
 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
 /**
  * Generates a object file containing alias for resolving the weak
@@ -2834 +2948 @@
  * @returns 0 on success.
  * @returns some unexplainable randomly picked number on failure.
- * @param   pWld    Linker instance to destroy.
- * @param   pszName Where to put the name of the generated object file.
- *                  This is an empty string if no weak symbols were found!
- */
-int     wldGenerateWeakobj(PWLD pWld, char *pszName)
+ * @param   pWld        Linker instance.
+ * @param   pszObjName  Where to put the name of the generated object file.
+ *                      This is an empty string if no weak symbols were found!
+ * @param   pszDefName  Where to put the name of the modified definition file.
+ *                      This is an empty string if changes was required!
+ */
+int     wldGenerateWeakAliases(PWLD pWld, char *pszObjName, char *pszDefName)
 {
     char *      psz;
@@ -2844 +2960 @@
     int         rc;
 
-    /* generate the file */
-    *pszName = '\0';
-    psz = _tempnam(NULL, "weako");
-    if (psz)
-    {
-        strcpy(pszName, psz);
-        free(psz);
-    }
-    else
-        tmpnam(pszName);
-    strcat(pszName, "wk.obj");
-    WLDINFO(pWld, ("Generating weakobj object file '%s'.", pszName));
-
-
-    /* open the file */
-    phFile = fopen(pszName, "wr");
+    /* zero returns */
+    *pszObjName = '\0';
+    if (pszDefName)
+        *pszDefName = '\0';
+
+    /* generate the object  file */
+    rc = wldTempFile(pWld, pszObjName, "wk", ".obj");
+    if (rc)
+        return wldErr(pWld, "Failed to generate temporary object file for weak aliases.");
+    WLDINFO(pWld, ("Generating object file '%s' for weak aliases.", pszObjName));
+
+    /* open it */
+    phFile = fopen(pszObjName, "wr");
     if (phFile)
     {
@@ -2893 +3006 @@
                 WLDINFO(pWld, ("No weak alias needed, deleting file."));
             fclose(phFile);
-            remove(pszName);
-            *pszName = '\0';
+            remove(pszName);
+            *pszName = '\0';
         }
         else
@@ -2906 +3019 @@
            else
            {
-               wldErr(pWld, "Failed to write to '%s'.", pszName);
+               wldErr(pWld, "Failed to write to '%s'.", pszName);
                rc = -1;
                fclose(phFile);
-               remove(pszName);
-               *pszName = '\0';
+               remove(pszName);
+               *pszName = '\0';
            }
         }
@@ -2916 +3029 @@
     else
     {
-        wldErr(pWld, "Failed to open '%s' for writing.", pszName);
-        *pszName = '\0';
+        wldErr(pWld, "Failed to open '%s' for writing.", pszObjName);
+        *pszObjName = '\0';
+    }
+
+    /* do the definition file */
+    if (!rc && pWld->pDef && pszDefName)
+    {
+        rc = wldTempFile(pWld, pszDefName, "wk", ".def");
+        if (!rc)
+        {
+            WLDINFO(pWld, ("Generating definition file '%s' for weak exports.", pszDefName));
+
+            /* open it */
+            phFile = fopen(pszDefName, "w");
+            if (phFile)
+            {
+                FILE *phOrgDef = fopen(pWld->pDef->pszModName, "r");
+                if (phOrgDef)
+                {
+                    char *pachOrgDef = fsize
+                    struct _md *pMD;
+
+                    /* open original def file */
+                    pMD = _md_open(pWld->pDef->pszModName);
+                    if (pMD)
+                    {
+                        /* parse it */
+                        _md_next_token(pMD);
+                        rc = _md_parse(pMD, wldDefCallbackGenerateWeakAliases, phFile);
+                        _md_close(pMD);
+                    }
+                    else
+                        rc = wldErr(pWld, "_md_open on '%s'.\n", pszDefName);
+                    fclose(phOrgFile);
+                }
+                else
+                    rc = wldErr(pWld, "Failed to open '%s' for reading.\n", pszDefName);
+                fclose(phFile);
+            }
+            else
+                rc = wldErr(pWld, "Failed to open '%s' for writing.\n", pszDefName);
+        }
+        else
+            rc = wldErr(pWld, "Failed to generate temporary definition file for weak aliases.");
+    }
+
+    /* cleanup */
+    if (rc && pszDefName && *pszDefName)
+    {
+        remove(pszDefName);
+        *pszDefName = '\0';
+    }
+    if (rc && pszObjName && *pszObjName)
+    {
+        remove(pszObjName);
+        *pszObjName = '\0';
     }
 

trunk/src/emx/src/emxomf/weakld.h

@@ -56 +56 @@
 int     wldAddLibrary(PWLD pWld, FILE *phFile, const char *pszName);
 int     wldPass1(PWLD pWld);
-int     wldGenerateWeakobj(PWLD pwld, char *pszName);
+int     wldGenerateWeakName);
 int     wldDestroy(PWLD pWld);
 /** @} */