arch/all-hosted/filesys/emul_handler/filenames.c

   1 /*
   2     Copyright © 1995-2014, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <aros/debug.h>
   7 #include <dos/dos.h>
   8
   9 #include <string.h>
  10
  11 /*********************************************************************************************/
  12
  13 /*
  14  * Create a plain path out of the supplied filename.
  15  * Eg 'path1/path2//path3/' becomes 'path1/path3'.
  16  */
  17 BOOL shrink(char *filename)
  18 {
  19     char *s, *s1, *s2;
  20     unsigned long len;
  21
  22     /* We skip the first slash because it separates volume root prefix and the actual pathname */
  23     s = filename;
  24     if (*s == '/')
  25         s++;
  26
  27     for(;;)
  28     {
  29         /* leading slashes? --> return FALSE. */
  30         if (*s == '/')
  31             return FALSE;
  32
  33         /* remove superflous paths (ie paths that are followed by '//') */
  34         s1 = strstr(s, "//");
  35         if (s1 == NULL)
  36             break;
  37         s2 = s1;
  38         while (s2 > filename)
  39         {
  40             if (s2[-1] == '/')
  41                 break;
  42             s2--;
  43         }
  44
  45         memmove(s2, s1+2, strlen(s1+1));
  46     }
  47
  48     /* strip trailing slash */
  49     len=strlen(filename);
  50     if (len && filename[len-1]=='/')
  51         filename[len-1]=0;
  52
  53    return TRUE;
  54 }
  55
  56 /* Validate file name */
  57 ULONG validate(char *filename)
  58 {
  59     char *s = filename;
  60
  61     while (*s)
  62     {
  63         if (*s == '.') {
  64             do {
  65                 s++;
  66             } while (*s == '.');
  67             if ((*s == '/') || (!*s)) {
  68                 D(bug("[emul] Bad file name, contains dots-only component\n"));
  69                 return ERROR_INVALID_COMPONENT_NAME;
  70             }
  71         }
  72         do {
  73             s++;
  74         } while ((*s != '/') && *s);
  75         while (*s == '/')
  76             s++;
  77     }
  78
  79     return 0;
  80 }
  81
  82 /* Append file name to an existing path */
  83 char *append(char *c, char *filename)
  84 {
  85     char *s;
  86
  87     *c++ = '/';
  88     for (s = filename; *s; s++)
  89         *c++ = *s;
  90     return c;
  91 }
  92
  93 /* Find start position of the file name in path string */
  94 long startpos(char *name, long i)
  95 {
  96     /* look for the first '/' in the filename starting at the end */
  97     while (i != 0 && name[i] != '/')
  98         i--;
  99
 100     return i;
 101 }
 102
 103 /* Copy file name with possible conversion */
 104 void copyname(char *result, char *name, long i)
 105 {
 106     strncpy(result, name, i);
 107 }
 108
 109 /* Go to next part in path string */
 110 char *nextpart(char *sp)
 111 {
 112     char *sp_end;
 113
 114     for(sp_end = sp + 1; sp_end[0] != '\0' && sp_end[0] != '/'; sp_end++);
 115
 116     return sp_end;
 117 }