yaz_is_abspath: drive letter test NOT using isalpha

[yaz-moved-to-github.git] / src / tpath.c

diff --git a/src/tpath.c b/src/tpath.c
index 2cd900d..b802c98 100644 (file)
--- a/src/tpath.c
+++ b/src/tpath.c
@@ -1,8 +1,6 @@
-/*
- * Copyright (C) 1995-2006, Index Data ApS
+/* This file is part of the YAZ toolkit.
+ * Copyright (C) 1995-2011 Index Data
  * See the file LICENSE for details.
- *
- * $Id: tpath.c,v 1.12 2006-10-11 08:43:22 adam Exp $
  */
 /**
  * \file tpath.c
@@ -16,23 +14,30 @@
 
 #include <stdio.h>
 #include <string.h>
-#include <ctype.h>
 #include <yaz/tpath.h>
 #include <yaz/log.h>
+#if HAVE_SYS_TYPES_H
 #include <sys/types.h>
+#endif
+#if HAVE_SYS_STAT_H
+#include <sys/stat.h>
+#endif
+#if WIN32
 #include <sys/stat.h>
+#endif
+
 #if HAVE_UNISTD_H
 #include <unistd.h>
 #endif
 
 FILE *yaz_path_fopen(const char *path, const char *name, const char *mode)
 {
-    return yaz_fopen (path, name, mode, 0);
+    return yaz_fopen(path, name, mode, 0);
 }
 
 int yaz_fclose (FILE *f)
 {
-    return fclose (f);
+    return fclose(f);
 }
 
 
@@ -45,10 +50,10 @@ size_t yaz_filepath_comp(const char **path_p, const char **comp)
     /* somewhat dirty since we have to consider Windows
      * drive letters..
      */
-    if (path[0] && strchr ("/\\.", path[0]))
-        path_sep = strchr (path+1, ':');
+    if (path[0] && strchr("/\\.", path[0]))
+        path_sep = strchr(path+1, ':');
     else if (path[0] && path[1])
-        path_sep = strchr (path+2, ':');
+        path_sep = strchr(path+2, ':');
     else
         path_sep = 0;
     
@@ -69,7 +74,9 @@ size_t yaz_filepath_comp(const char **path_p, const char **comp)
 char *yaz_filepath_resolve(const char *fname, const char *path,
                            const char *base, char *fullpath)
 {
-    for(;;)
+    if (path && *path == '\0')
+        path = 0;
+    for (;;)
     {
         struct stat stat_buf;
         size_t slen = 0;
@@ -84,19 +91,19 @@ char *yaz_filepath_resolve(const char *fname, const char *path,
             if (!len)
                 break;
 
-            if (!strchr ("/\\", *comp) && base)
+            if (!strchr("/\\", *comp) && base)
             {
                 /* yes: make base the first part */
-                strcpy (fullpath, base);
+                strcpy(fullpath, base);
                 slen = strlen(fullpath);
                 fullpath[slen++] = '/';
             }
-            memcpy (fullpath+slen, comp, len);
+            memcpy(fullpath+slen, comp, len);
             slen += len;
-            if (slen > 0 && !strchr("/\\", fullpath[slen-1]))
+            if(slen > 0 && !strchr("/\\", fullpath[slen-1]))
                 fullpath[slen++] = '/';
         }
-        strcpy (fullpath+slen, fname);
+        strcpy(fullpath+slen, fname);
         if (stat(fullpath, &stat_buf) == 0)
             return fullpath;
         if (!path)
@@ -115,14 +122,15 @@ FILE *yaz_fopen(const char *path, const char *fname, const char *mode,
     return fopen(fullpath, mode);
 }
 
-int yaz_is_abspath (const char *p)
+int yaz_is_abspath(const char *p)
 {
     if (*p == '/')
         return 1;
 #ifdef WIN32
     if (*p == '\\')
         return 1;
-    if (*p && p[1] == ':' && isalpha(*p))
+    if (*p && p[1] == ':' && 
+        ((*p >= 'A' && *p <= 'Z') || (*p >= 'a' && *p <= 'z')))
         return 1;
 #endif
     return 0;
@@ -130,6 +138,7 @@ int yaz_is_abspath (const char *p)
 /*
  * Local variables:
  * c-basic-offset: 4
+ * c-file-style: "Stroustrup"
  * indent-tabs-mode: nil
  * End:
  * vim: shiftwidth=4 tabstop=8 expandtab