Program memory leaks

[nedit-bw.git] / relativeFileNormalization.diff

From: Tony Balinski <ajbj@free.fr>
Subject: Allow NormalizePathname() and ParseFilename() to use windows path

Various operations require the extension of an incomplete file specification
to a full, absolute path. Before this patch, this completion uses the
current directory of the NEdit process as the base for relative file lookup.
However, this works against NEdit's file dialogs and shell processing which
start off in the directory of the current document, which may well not be
the same as the process' directory. Using "File > Open Selected" may not, in
this situation, find the file you would expect.

This patch alters NormalizePathname() and ParseFilename(), the utility
functions that perform the expansion so that the base for relative file
specifications can be passed, then changes all relevant calls to supply the
current window's file path value. It includes the nmReadWriteRelToWin.diff
adjustments to macro file functions read_file(), write_file() and
append_file() for this same behaviour, and adds a new one, full_file_name(),
which provides the macro writer with a way of obtaining the relative file
name from a relative file path.

---

 source/file.c      |    8 +--
 source/macro.c     |  117 +++++++++++++++++++++++++++++++++++++++++++++++++++--
 source/menu.c      |    6 +-
 source/nc.c        |    4 -
 source/nedit.c     |    4 -
 source/selection.c |   10 ++--
 source/server.c    |    2 
 source/tags.c      |   22 ++++-----
 util/fileUtils.c   |   26 ++++++++---
 util/fileUtils.h   |    5 +-
 util/getfiles.c    |    2 
 11 files changed, 164 insertions(+), 42 deletions(-)

diff --quilt old/source/file.c new/source/file.c
--- old/source/file.c
+++ new/source/file.c
@@ -1089,20 +1089,20 @@ int SaveWindowAs(WindowInfo *window, con
     } else
     {
         strcpy(fullname, newName);
     }
 
-    if (1 == NormalizePathname(fullname))
+    if (1 == NormalizePathname(fullname, window->path))
     {
         return False;
     }
     
     /* Add newlines if requested */
     if (addWrap)
        addWrapNewlines(window);
     
-    if (ParseFilename(fullname, filename, pathname) != 0) {
+    if (ParseFilename(fullname, filename, pathname, window->path) != 0) {
        return FALSE;
     }
 
     /* If the requested file is this file, just save it and return */
     if (!strcmp(window->filename, filename) &&
@@ -1183,11 +1183,11 @@ static int doSave(WindowInfo *window)
     /* call the "pre_save_hook", if the macro returns a string, interpret this
        as the new filename */
     success = MacroApplyHook(window, "pre_save_hook", 0, NULL, &hookResult);
     if (success && hookResult.tag == STRING_TAG) {
         if (ParseFilename(hookResult.val.str.rep,
-                window->filename, window->path)) {
+                window->filename, window->path, window->path)) {
             return FALSE;
         }
     }
 
     /* Get the full name of the file */
@@ -1303,11 +1303,11 @@ static int doSave(WindowInfo *window)
     /* free the text buffer copy returned from XmTextGetString */
     XtFree(fileString);
     
 #ifdef VMS
     /* reflect the fact that NEdit is now editing a new version of the file */
-    ParseFilename(fullname, window->filename, window->path);
+    ParseFilename(fullname, window->filename, window->path, NULL);
 #endif /*VMS*/
 
     /* success, file was written */
     SetWindowModified(window, FALSE);
     
diff --quilt old/source/macro.c new/source/macro.c
--- old/source/macro.c
+++ new/source/macro.c
@@ -192,10 +192,12 @@ static int validNumberMS(WindowInfo *win
        DataValue *result, char **errMsg);
 static int replaceInStringMS(WindowInfo *window, DataValue *argList, int nArgs,
        DataValue *result, char **errMsg);
 static int replaceSubstringMS(WindowInfo *window, DataValue *argList, int nArgs,
        DataValue *result, char **errMsg);
+static int fullFileNameMS(WindowInfo *window, DataValue *argList, int nArgs,
+        DataValue *result, char **errMsg);
 static int readFileMS(WindowInfo *window, DataValue *argList, int nArgs,
        DataValue *result, char **errMsg);
 static int writeFileMS(WindowInfo *window, DataValue *argList, int nArgs,
        DataValue *result, char **errMsg);
 static int appendFileMS(WindowInfo *window, DataValue *argList, int nArgs,
@@ -537,10 +539,11 @@ static const BuiltInSubrName MacroSubrs[
     { "to_column", toColumnMS },
     { "set_window_title", setWindowTitleMS },
     { "timer_add", timerAddMS },
     { "timer_remove", timerRemoveMS },
     { "escape_literal", escapeLiteralMS },
+    { "full_file_name", fullFileNameMS },
     { NULL, NULL } /* sentinel */
 };
 
 static const BuiltInSubrName SpecialVars[] = {
     { "$cursor", cursorMV },
@@ -1969,11 +1972,11 @@ static int focusWindowMS(WindowInfo *win
        }
         /* didn't work? try normalizing the string passed in */
         if (w == NULL) {
             strncpy(normalizedString, string, MAXPATHLEN);
             normalizedString[MAXPATHLEN-1] = '\0';
-            if (1 == NormalizePathname(normalizedString)) {
+            if (1 == NormalizePathname(normalizedString, window->path)) {
                 /*  Something is broken with the input pathname. */
                 *errMsg = "Pathname too long in focus_window()";
                 return False;
             }
             for (w=WindowList; w != NULL; w = w->next) {
@@ -2405,10 +2408,112 @@ static int clipboardToStringMS(WindowInf
     result->val.str.len = retLength;
 
     return True;
 }
 
+/*
+** Resolve the partial file path in name with respect to path.
+** (We don't use NormalizePathname() since this modifies its path in place.)
+*/
+static char *convFilePathToAbsolute(const char *path, char *name)
+{
+    static char *nameText = NULL, *ptr;
+    static size_t nameTextLen = 0;
+    size_t namelen, pathlen, len;
+    Bool isRelative = False;
+    size_t needSlash = 0;
+
+    if (!path || !path[0] || strcmp(path, ".") == 0)
+        path = GetCurrentDir();
+
+#ifdef VMS
+    /* If path name is relative, make it refer to current window's directory;
+       absolute paths start with a logical name ([\w$]+) followed by a colon,
+       or with a non-relative path in brackets (not starting with . or -)
+     */
+    isRelative = ((strchr(name, ':') == NULL) && (strlen(name) > 1) &&
+                  !((name[0] == '[') && (name[1] != '-') &&
+                   (name[1] != '.')));
+#else
+    /* UNIX-like:
+       Any path starting without a "/" is considered relative; if the first
+       character is "~", we really need the user's home directory */
+    if (name[0] == '~' && name[1] == '/') {
+        path = GetHomeDir();
+        for (++name; *name == '/'; ++name)
+            continue;   /* skip slash(es) following initial tilde */
+        isRelative = True;
+    }
+    else
+        isRelative = (name[0] != '/');
+#endif
+
+    if (!isRelative)
+        return name;
+
+    namelen = strlen(name);
+    pathlen = strlen(path);
+
+#ifndef VMS
+    needSlash = (path && pathlen && path[pathlen - 1] != '/') ? 1 : 0;
+#endif
+
+    /* make sure the buffer's big enough */
+    len = namelen + pathlen + needSlash;
+
+    if (nameTextLen < len) {
+        ptr = realloc(nameText, len + 1);
+        if (!ptr)
+            return NULL;
+        nameText = ptr;
+        nameTextLen = len;
+    }
+
+    /* copy in pieces */
+    strcpy(nameText, path);
+    if (needSlash)
+        nameText[pathlen] = '/';
+    strcpy(nameText + pathlen + needSlash, name);
+
+    CompressPathname(nameText);
+
+    return nameText;
+}
+
+/*
+** Built-in macro subroutine for expanding a possibly partial file specification
+** to a full one, using the current window's directory as a base for relative
+** path specifications. It does not check for file/path validity.
+*/
+static int fullFileNameMS(WindowInfo *window, DataValue *argList, int nArgs,
+        DataValue *result, char **errMsg)
+{
+    char stringStorage[TYPE_INT_STR_SIZE(int)], *name;
+    size_t len;
+
+    /* Validate arguments and convert to int */
+    if (nArgs != 1)
+        return wrongNArgsErr(errMsg);
+    if (!readStringArg(argList[0], &name, stringStorage, errMsg))
+        return False;
+
+    name = convFilePathToAbsolute(window->path, name);
+    len = strlen(name);
+
+    if (name) {
+        result->tag = STRING_TAG;
+        AllocNString(&result->val.str, len + 1);
+        strcpy(result->val.str.rep, name);
+    }
+    else {
+        result->tag = STRING_TAG;
+        result->val.str.rep = PERM_ALLOC_STR("");
+        result->val.str.len = 0;
+    }
+
+    return True;
+}
 
 /*
 ** Built-in macro subroutine for reading the contents of a text file into
 ** a string.  On success, returns 1 in $readStatus, and the contents of the
 ** file as a string in the subroutine return value.  On failure, returns
@@ -2425,11 +2530,13 @@ static int readFileMS(WindowInfo *window
     /* Validate arguments and convert to int */
     if (nArgs != 1)
        return wrongNArgsErr(errMsg);
     if (!readStringArg(argList[0], &name, stringStorage, errMsg))
        return False;
-    
+
+    name = convFilePathToAbsolute(window->path, name);
+
     /* Read the whole file into an allocated string */
     if ((fp = fopen(name, "r")) == NULL)
        goto errorNoClose;
     if (fstat(fileno(fp), &statbuf) != 0)
        goto error;
@@ -2504,11 +2611,13 @@ static int writeOrAppendFile(int append,
        return wrongNArgsErr(errMsg);
     if (!readStringArg(argList[0], &string, stringStorage[1], errMsg))
        return False;
     if (!readStringArg(argList[1], &name, stringStorage[0], errMsg))
        return False;
-    
+
+    name = convFilePathToAbsolute(window->path, name);
+
     /* open the file */
     if ((fp = fopen(name, append ? "a" : "w")) == NULL) {
        result->tag = INT_TAG;
        result->val.n = False;
        return True;
@@ -5183,11 +5292,11 @@ static int neditHomeMV(WindowInfo *windo
         DataValue *result, char **errMsg)
 {
     const char *neditRCName = GetRCFileName(NEDIT_RC);
     char neditHome[MAXPATHLEN];
 
-    if (0 != ParseFilename(neditRCName, NULL, neditHome)) {
+    if (0 != ParseFilename(neditRCName, NULL, neditHome, NULL)) {
         M_FAILURE("Unable to parse path of nedit.rc in %s");
     }
 
     result->tag = STRING_TAG;
     AllocNStringCpy(&result->val.str, neditHome);
diff --quilt old/source/menu.c new/source/menu.c
--- old/source/menu.c
+++ new/source/menu.c
@@ -2974,11 +2974,11 @@ static void openAP(Widget w, XEvent *eve
         fileNameToOpen = resultDV.val.str.rep;
     } else {
         fileNameToOpen = args[0];
     }
 
-    if (0 != ParseFilename(fileNameToOpen, filename, pathname)
+    if (0 != ParseFilename(fileNameToOpen, filename, pathname, window->path)
             || strlen(filename) + strlen(pathname) > MAXPATHLEN - 1) {
         fprintf(stderr, "nedit: invalid file name for open action: %s\n",
                 fileNameToOpen);
         return;
     }
@@ -5025,11 +5025,11 @@ static void updatePrevOpenMenu(WindowInf
         if (index >= NPrevOpen) {
             /* unmanaging before destroying stops parent from displaying */
             XtUnmanageChild(items[n]);
             XtDestroyWidget(items[n]);          
         } else {
-            ParseFilename(prevOpenSorted[index], filename, pathname);
+            ParseFilename(prevOpenSorted[index], filename, pathname, NULL);
             fileIsOpen = !!FindWindowWithFile(filename, pathname);
             XtVaSetValues(items[n],
                 XmNlabelString, st1=XmStringCreateSimple(prevOpenSorted[index]),
                 XmNset, fileIsOpen,
                 NULL);
@@ -5041,11 +5041,11 @@ static void updatePrevOpenMenu(WindowInf
         }
     }
     
     /* Add new items for the remaining file names to the menu */
     for (; index<NPrevOpen; index++) {
-        ParseFilename(prevOpenSorted[index], filename, pathname);
+        ParseFilename(prevOpenSorted[index], filename, pathname, NULL);
         fileIsOpen = !!FindWindowWithFile(filename, pathname);
         btn = XtVaCreateManagedWidget("win", xmToggleButtonWidgetClass,
                 window->prevOpenMenuPane, 
                 XmNlabelString, st1=XmStringCreateSimple(prevOpenSorted[index]),
                 XmNmarginHeight, 0,
diff --quilt old/source/nc.c new/source/nc.c
--- old/source/nc.c
+++ new/source/nc.c
@@ -712,11 +712,11 @@ static void parseCommandLine(int argc, c
                newCommandString = XtMalloc(oldLength+length+1);
                strncpy(newCommandString, commandString, oldLength);
                XtFree(commandString);
                commandString = newCommandString;
                outPtr = newCommandString + oldLength;
-               if (ParseFilename(nameList[j], name, path) != 0) {
+                if (ParseFilename(nameList[j], name, path, NULL) != 0) {
                   /* An Error, most likely too long paths/strings given */
                   commandLine->serverRequest = NULL;
                   return;
                }
                strcat(path, name);
@@ -748,11 +748,11 @@ static void parseCommandLine(int argc, c
                fileCount++;
            }
            if (nameList != NULL)
                free(nameList);
 #else
-           if (ParseFilename(argv[i], name, path) != 0) {
+            if (ParseFilename(argv[i], name, path, NULL) != 0) {
               /* An Error, most likely too long paths/strings given */
               commandLine->serverRequest = NULL;
               return;
            }
            strcat(path, name);
diff --quilt old/source/nedit.c new/source/nedit.c
--- old/source/nedit.c
+++ new/source/nedit.c
@@ -658,11 +658,11 @@ int main(int argc, char **argv)
            /* Use VMS's LIB$FILESCAN for filename in argv[i] to process */
            /* wildcards and to obtain a full VMS file specification     */
            numFiles = VMSFileScan(argv[i], &nameList, NULL, INCLUDE_FNF);
            /* for each expanded file name do: */
            for (j = 0; j < numFiles; ++j) {
-               if (ParseFilename(nameList[j], filename, pathname) == 0) {
+                if (ParseFilename(nameList[j], filename, pathname, NULL) == 0) {
                    /* determine if file is to be openned in new tab, by
                       factoring the options -group, -tabbed & -untabbed */
                    if (group == 2) {
                        isTabbed = 0;  /* start a new window for new group */
                        group = 1;     /* next file will be within group */
@@ -713,11 +713,11 @@ int main(int argc, char **argv)
                free(nameList[j]);
            }
            if (nameList != NULL)
                free(nameList);
 #else
-           if (ParseFilename(argv[i], filename, pathname) == 0 ) {
+            if (ParseFilename(argv[i], filename, pathname, NULL) == 0 ) {
                /* determine if file is to be openned in new tab, by
                   factoring the options -group, -tabbed & -untabbed */
                if (group == 2) {
                    isTabbed = 0;  /* start a new window for new group */
                    group = 1;     /* next file will be within group */
diff --quilt old/source/selection.c new/source/selection.c
--- old/source/selection.c
+++ new/source/selection.c
@@ -326,21 +326,21 @@ static void fileCB(Widget widget, Window
        names, in these cases, either don't expand names, or try to use the
        Motif internal parsing routine _XmOSGetDirEntries, which is not
        guranteed to be available, but in practice is there and does work. */
 #if defined(DONT_HAVE_GLOB) || defined(VMS)
     /* Open the file */
-    if (ParseFilename(nameText, filename, pathname) != 0) {
+    if (ParseFilename(nameText, filename, pathname, window->path) != 0) {
         XBell(TheDisplay, 0);
        return;
     }  
     EditExistingFile(window, filename, 
             pathname, 0, NULL, False, NULL, GetPrefOpenInTab(), False);
 #elif defined(USE_MOTIF_GLOB)
     { char **nameList = NULL;
       int i, nFiles = 0, maxFiles = 30;
 
-      if (ParseFilename(nameText, filename, pathname) != 0) {
+      if (ParseFilename(nameText, filename, pathname, window->path) != 0) {
            XBell(TheDisplay, 0);
           return;
       }
       _XmOSGetDirEntries(pathname, filename, XmFILE_ANY_TYPE, False, True,
              &nameList, &nFiles, &maxFiles);
@@ -360,11 +360,12 @@ static void fileCB(Widget widget, Window
                 fileNameToOpen = resultDV.val.str.rep;
             } else {
                 fileNameToOpen = nameList[i];
             }
 
-            if (ParseFilename(fileNameToOpen, filename, pathname) != 0) {
+            if (ParseFilename(fileNameToOpen, filename, pathname,
+                    window->path) != 0) {
                 XBell(TheDisplay, 0);
             } else {
                 EditExistingFile(GetPrefOpenInTab() ? window : NULL, filename,
                         pathname, 0, NULL, False, NULL, GetPrefOpenInTab(),
                         False);
@@ -397,11 +398,12 @@ static void fileCB(Widget widget, Window
                 fileNameToOpen = resultDV.val.str.rep;
             } else {
                 fileNameToOpen = globbuf.gl_pathv[i];
             }
 
-            if (ParseFilename(fileNameToOpen, filename, pathname) != 0) {
+            if (ParseFilename(fileNameToOpen, filename, pathname,
+                    window->path) != 0) {
                 XBell(TheDisplay, 0);
             } else {
                 EditExistingFile(GetPrefOpenInTab() ? window : NULL, filename,
                         pathname, 0, NULL, False, NULL, GetPrefOpenInTab(),
                         False);
diff --quilt old/source/server.c new/source/server.c
--- old/source/server.c
+++ new/source/server.c
@@ -454,11 +454,11 @@ static void processServerCommandString(c
        
        /* Process the filename by looking for the files in an
           existing window, or opening if they don't exist */
        editFlags = (readFlag ? PREF_READ_ONLY : 0) | CREATE |
                (createFlag ? SUPPRESS_CREATE_WARN : 0);
-       if (ParseFilename(fullname, filename, pathname) != 0) {
+        if (ParseFilename(fullname, filename, pathname, NULL) != 0) {
           fprintf(stderr, "NEdit: invalid file name\n");
            deleteFileClosedProperty2(filename, pathname);
           break;
        }
 
diff --quilt old/source/tags.c new/source/tags.c
--- old/source/tags.c
+++ new/source/tags.c
@@ -252,22 +252,22 @@ static int addTag(const char *name, cons
     if (*file == '/')
         strcpy(newfile,file);
     else
         sprintf(newfile,"%s%s", path, file);
     
-    NormalizePathname(newfile);
+    NormalizePathname(newfile, NULL);
         
     for (t = table[addr]; t; t = t->next) {
         if (strcmp(name,t->name)) continue;
         if (lang != t->language) continue;
         if (strcmp(search,t->searchString)) continue;
         if (posInf != t->posInf) continue;
         if (*t->file == '/' && strcmp(newfile,t->file)) continue;
         if (*t->file != '/') {
             char tmpfile[MAXPATHLEN];
             sprintf(tmpfile, "%s%s", t->path, t->file);
-            NormalizePathname(tmpfile);
+            NormalizePathname(tmpfile, NULL);
             if (strcmp(newfile, tmpfile)) continue;
         }
         return 0;
     }
         
@@ -363,11 +363,11 @@ int AddRelTagsFile(const char *tagSpec, 
         } else {
             strcpy(pathName, GetCurrentDir());
          }   
         strcat(pathName, "/");
         strcat(pathName, filename);
-        NormalizePathname(pathName);
+        NormalizePathname(pathName, NULL);
 
         for (t = FileList; t && strcmp(t->filename, pathName); t = t->next);
         if (t) {
             added=1;
             continue;
@@ -431,11 +431,11 @@ int AddTagsFile(const char *tagSpec, int
             strcat(pathName,"/");
             strcat(pathName,filename);
         } else {
             strcpy(pathName,filename);
         }
-        NormalizePathname(pathName);
+        NormalizePathname(pathName, NULL);
 
         for (t = FileList; t && strcmp(t->filename,pathName); t = t->next);
         if (t) {
             /* This file is already in the list.  It's easiest to just
                 refcount all tag/tip files even though we only actually care
@@ -502,11 +502,11 @@ int DeleteTagsFile(const char *tagSpec, 
             strcat(pathName,"/");
             strcat(pathName,filename);
         } else {
             strcpy(pathName,filename);
         }
-        NormalizePathname(pathName);
+        NormalizePathname(pathName, NULL);
 
         for (last=NULL,t = FileList; t; last = t,t = t->next) {
             if (strcmp(t->filename, pathName))
                 continue;
             /* Don't unload tips files with nonzero refcounts unless forced */
@@ -732,11 +732,11 @@ static int loadTagsFile(const char *tags
     /* Open the file */
     if ((fp = fopen(resolvedTagsFile, "r")) == NULL) {
        return 0;
     }
 
-    ParseFilename(resolvedTagsFile, NULL, tagPath);
+    ParseFilename(resolvedTagsFile, NULL, tagPath, NULL);
 
     /* Read the file and store its contents */
     while (fgets(line, MAXLINE, fp)) {
 
         /* This might take a while if you have a huge tags file (like I do)..
@@ -1145,11 +1145,11 @@ static int findAllMatches(WindowInfo *wi
             strcpy(tagFiles[nMatches], fileToSearch);
         else 
             sprintf(tagFiles[nMatches],"%s%s",tagPath,fileToSearch);
         strcpy(tagSearch[nMatches],searchString);
         tagPosInf[nMatches]=startPos;
-        ParseFilename(tagFiles[nMatches], filename, pathname);
+        ParseFilename(tagFiles[nMatches], filename, pathname, NULL);
         /* Is this match in the current file?  If so, use it! */
         if (GetPrefSmartTags() && !strcmp(window->filename,filename)
                                && !strcmp(window->path,pathname)   ) {
             if (nMatches) {
                 strcpy(tagFiles[0],tagFiles[nMatches]);
@@ -1202,11 +1202,11 @@ static int findAllMatches(WindowInfo *wi
             XBell(TheDisplay, 0);
             return -1;
         }
 
         for (i=0; i<nMatches; i++) {
-            ParseFilename(tagFiles[i], filename, pathname);
+            ParseFilename(tagFiles[i], filename, pathname, NULL);
             if ((i<nMatches-1 && !strcmp(tagFiles[i],tagFiles[i+1])) ||
                     (i>0 && !strcmp(tagFiles[i],tagFiles[i-1]))) {
                 if(*(tagSearch[i]) && (tagPosInf[i] != -1)) { /* etags */
                     sprintf(temp,"%2d. %s%s %8i %s", i+1, pathname, 
                             filename, tagPosInf[i], tagSearch[i]);
@@ -1324,11 +1324,11 @@ static void showMatchingCalltip( Widget 
     FILE *fp;
     struct stat statbuf;
     char *message;
     
     /* 1. Open the target file */
-    NormalizePathname(tagFiles[i]);
+    NormalizePathname(tagFiles[i], NULL);
     fp = fopen(tagFiles[i], "r");
     if (fp == NULL) {
         DialogF(DF_ERR, parent, 1, "Error opening File", "Error opening %s",
                 "OK", tagFiles[i]);
         return;
@@ -1443,11 +1443,11 @@ static void editTaggedLocation( Widget p
     int startPos, endPos, lineNum, rows;
     char filename[MAXPATHLEN], pathname[MAXPATHLEN];
     WindowInfo *windowToSearch;
     WindowInfo *parentWindow = WidgetToWindow(parent);
     
-    ParseFilename(tagFiles[i],filename,pathname);
+    ParseFilename(tagFiles[i], filename, pathname, NULL);
     /* open the file containing the definition */
     EditExistingFile(parentWindow, filename, pathname, 0, NULL, False, 
            NULL, GetPrefOpenInTab(), False);
     windowToSearch = FindWindowWithFile(filename, pathname);
     if (windowToSearch == NULL) {
@@ -1990,11 +1990,11 @@ static int loadTipsFile(const char *tips
     if(!ResolvePath(tipsFile, resolvedTipsFile))
         return 0;
 #endif
 
     /* Get the path to the tips file */
-    ParseFilename(resolvedTipsFile, NULL, tipPath);
+    ParseFilename(resolvedTipsFile, NULL, tipPath, NULL);
 
     /* Open the file */
     if ((fp = fopen(resolvedTipsFile, "r")) == NULL)
        return 0;
 
diff --quilt old/util/fileUtils.c new/util/fileUtils.c
--- old/util/fileUtils.c
+++ new/util/fileUtils.c
@@ -86,12 +86,12 @@ static void copyThruSlash(char **toStrin
 ** Return non-zero value if it fails, zero else.
 ** For now we assume that filename and pathname are at
 ** least MAXPATHLEN chars long.
 ** To skip setting filename or pathname pass NULL for that argument.
 */
-int
-ParseFilename(const char *fullname, char *filename, char *pathname)
+int ParseFilename(const char *fullname, char *filename, char *pathname,
+        const char *relpath)
 {
     int fullLen = strlen(fullname);
     int i, pathLen, fileLen;
            
 #ifdef VMS
@@ -136,11 +136,11 @@ ParseFilename(const char *fullname, char
        filename[fileLen] = 0;
     }
 
 #ifndef VMS /* UNIX specific... Modify at a later date for VMS */
     if(pathname) {
-       if (NormalizePathname(pathname)) {
+        if (NormalizePathname(pathname, relpath)) {
            return 1; /* pathname too long */
        }
        pathLen = strlen(pathname);
     }
 #endif
@@ -269,11 +269,11 @@ ResolvePath(const char * pathIn, char * 
             }
            strcpy(pathEnd+1, resolveBuf);
        } else {
            strcpy(pathBuf, resolveBuf);
        }
-       NormalizePathname(pathBuf);
+        NormalizePathname(pathBuf, NULL);
        pathIn=pathBuf;
     }
 
     return FALSE;
 #endif /* NO_READLINK */
@@ -285,27 +285,29 @@ ResolvePath(const char * pathIn, char * 
 ** Capable to handle arbitrary path length (>MAXPATHLEN)!
 **
 **  FIXME: Documentation
 **  FIXME: Change return value to False and True.
 */
-int NormalizePathname(char *pathname)
+int NormalizePathname(char *pathname, const char *relpath)
 {
-    /* if this is a relative pathname, prepend current directory */
+    /* if this is a relative pathname, prepend relpath */
+    /* if relpath is a relative path, prepend the current directory */
 #ifdef __EMX__
     /* OS/2, ...: welcome to the world of drive letters ... */
     if (!_fnisabs(pathname)) {
 #else
     if (pathname[0] != '/') {
 #endif
         char *oldPathname;
         size_t len;
+        int useRelpath = (relpath && *relpath);
 
         /* make a copy of pathname to work from */
        oldPathname=(char *)malloc(strlen(pathname)+1);
        strcpy(oldPathname, pathname);
        /* get the working directory and prepend to the path */
-       strcpy(pathname, GetCurrentDir());
+        strcpy(pathname, useRelpath ? relpath : GetCurrentDir());
 
        /* check for trailing slash, or pathname being root dir "/":
           don't add a second '/' character as this may break things
           on non-un*x systems */
         len = strlen(pathname); /* GetCurrentDir() returns non-NULL value */
@@ -318,10 +320,18 @@ int NormalizePathname(char *pathname)
         {
             strcat(pathname, "/");
         }
        strcat(pathname, oldPathname);
        free(oldPathname);
+        if (useRelpath)
+        {
+            /* make sure our relative path wasn't relative to start with */
+            if (CompressPathname(pathname) == 0)
+                return NormalizePathname(pathname, NULL);
+            else
+                return 1; /* some non-zero value */
+        }
     }
 
     /* compress out .. and . */
     return CompressPathname(pathname);
 }
@@ -470,11 +480,11 @@ copyThruSlash(char **toString, char **fr
 */
 
 /*
 ** Return 0 if everything's fine, 1 else.
 */
-int NormalizePathname(char *pathname)
+int NormalizePathname(char *pathname, const char *relpath)
 {
     return 0;
 }
 
 /*
diff --quilt old/util/fileUtils.h new/util/fileUtils.h
--- old/util/fileUtils.h
+++ new/util/fileUtils.h
@@ -28,15 +28,16 @@
 #ifndef NEDIT_FILEUTILS_H_INCLUDED
 #define NEDIT_FILEUTILS_H_INCLUDED
 
 enum fileFormats {UNIX_FILE_FORMAT, DOS_FILE_FORMAT, MAC_FILE_FORMAT};
 
-int ParseFilename(const char *fullname, char *filename, char *pathname);
+int ParseFilename(const char *fullname, char *filename, char *pathname,
+        const char *relpath);
 int ExpandTilde(char *pathname);
 const char* GetTrailingPathComponents(const char* path,
                                       int noOfComponents);
-int NormalizePathname(char *pathname);
+int NormalizePathname(char *pathname, const char *relpath);
 int CompressPathname(char *pathname);
 int ResolvePath(const char * pathIn, char * pathResolved); 
 
 int FormatOfFile(const char *fileString);
 void ConvertFromDosFileString(char *inString, int *length, 
diff --quilt old/util/getfiles.c new/util/getfiles.c
--- old/util/getfiles.c
+++ new/util/getfiles.c
@@ -1022,11 +1022,11 @@ static void listCharEH(Widget w, XtPoint
     /* compare them with the accumulated user keystrokes & decide the
        appropriate line in the list widget to select */
     selectPos = 0;
     for (i=0; i<nItems; i++) {
        XmStringGetLtoR(items[i], XmSTRING_DEFAULT_CHARSET, &itemString);
-       if (ParseFilename(itemString, name, path) != 0) {
+        if (ParseFilename(itemString, name, path, NULL) != 0) {
           XtFree(itemString);
           return;
        }
        XtFree(itemString);
        cmp = strncmp(name, keystrokes, nKeystrokes);