implemented numeric sort (sort -g)
[oweals/busybox.git] / utility.c
index 97c597ee650949bc5376c9e1fb0d178adbabc469..d01be9c98c87b74f1cd81a2a937f27100e694146 100644 (file)
--- a/utility.c
+++ b/utility.c
 #include <unistd.h>
 #include <ctype.h>
 
-#ifdef BB_MTAB
-const char mtab_file[] = "/etc/mtab";
-#else
 #if defined BB_MOUNT || defined BB_UMOUNT || defined BB_DF
+#  if defined BB_FEATURE_USE_PROCFS
 const char mtab_file[] = "/proc/mounts";
-#endif
+#  else
+#    if defined BB_MTAB
+const char mtab_file[] = "/etc/mtab";
+#    else
+#      error With (BB_MOUNT||BB_UMOUNT||BB_DF) defined, you must define either BB_MTAB or BB_FEATURE_USE_PROCFS
+#    endif
+#  endif
 #endif
 
 
-/* volatile so gcc knows this is the enod of the line */
-volatile void usage(const char *usage)
+extern void usage(const char *usage)
 {
     fprintf(stderr, "BusyBox v%s (%s) multi-call binary -- GPL2\n\n", BB_VER, BB_BT);
     fprintf(stderr, "Usage: %s\n", usage);
@@ -56,6 +59,9 @@ volatile void usage(const char *usage)
 
 #if defined (BB_INIT) || defined (BB_PS)
 
+#if ! defined BB_FEATURE_USE_PROCFS
+#error Sorry, I depend on the /proc filesystem right now.
+#endif
 /* Returns kernel version encoded as major*65536 + minor*256 + patch,
  * so, for example,  to check if the kernel is greater than 2.2.11:
  *     if (get_kernel_revision() <= 2*65536+2*256+11) { <stuff> }
@@ -211,10 +217,12 @@ copyFile( const char *srcName, const char *destName,
     if (setModes == TRUE) {
        //fprintf(stderr, "Setting permissions for %s\n", destName);
        chmod(destName, srcStatBuf.st_mode);
-       if (followLinks == TRUE)
-           chown(destName, srcStatBuf.st_uid, srcStatBuf.st_gid);
-       else
+#if (__GLIBC__ >= 2) && (__GLIBC_MINOR__ >= 1)
+       if (followLinks == FALSE)
            lchown(destName, srcStatBuf.st_uid, srcStatBuf.st_gid);
+       else
+#endif
+           chown(destName, srcStatBuf.st_uid, srcStatBuf.st_gid);
 
        times.actime = srcStatBuf.st_atime;
        times.modtime = srcStatBuf.st_mtime;
@@ -236,7 +244,30 @@ copyFile( const char *srcName, const char *destName,
 
 
 
-#ifdef BB_TAR
+#if defined BB_TAR || defined BB_LS
+
+#define TYPEINDEX(mode) (((mode) >> 12) & 0x0f)
+#define TYPECHAR(mode)  ("0pcCd?bB-?l?s???" [TYPEINDEX(mode)])
+
+/* The special bits. If set, display SMODE0/1 instead of MODE0/1 */
+static const mode_t SBIT[] = {
+    0, 0, S_ISUID,
+    0, 0, S_ISGID,
+    0, 0, S_ISVTX
+};
+
+/* The 9 mode bits to test */
+static const mode_t MBIT[] = {
+    S_IRUSR, S_IWUSR, S_IXUSR,
+    S_IRGRP, S_IWGRP, S_IXGRP,
+    S_IROTH, S_IWOTH, S_IXOTH
+};
+
+#define MODE1  "rwxrwxrwx"
+#define MODE0  "---------"
+#define SMODE1 "..s..s..t"
+#define SMODE0 "..S..S..T"
+
 /*
  * Return the standard ls-like mode string from a file mode.
  * This is static and so is overwritten on each call.
@@ -245,64 +276,25 @@ const char *modeString(int mode)
 {
     static char buf[12];
 
-    strcpy(buf, "----------");
-
-    /*
-     * Fill in the file type.
-     */
-    if (S_ISDIR(mode))
-       buf[0] = 'd';
-    if (S_ISCHR(mode))
-       buf[0] = 'c';
-    if (S_ISBLK(mode))
-       buf[0] = 'b';
-    if (S_ISFIFO(mode))
-       buf[0] = 'p';
-    if (S_ISLNK(mode))
-       buf[0] = 'l';
-    if (S_ISSOCK(mode))
-       buf[0] = 's';
-    /*
-     * Now fill in the normal file permissions.
-     */
-    if (mode & S_IRUSR)
-       buf[1] = 'r';
-    if (mode & S_IWUSR)
-       buf[2] = 'w';
-    if (mode & S_IXUSR)
-       buf[3] = 'x';
-    if (mode & S_IRGRP)
-       buf[4] = 'r';
-    if (mode & S_IWGRP)
-       buf[5] = 'w';
-    if (mode & S_IXGRP)
-       buf[6] = 'x';
-    if (mode & S_IROTH)
-       buf[7] = 'r';
-    if (mode & S_IWOTH)
-       buf[8] = 'w';
-    if (mode & S_IXOTH)
-       buf[9] = 'x';
-
-    /*
-     * Finally fill in magic stuff like suid and sticky text.
-     */
-    if (mode & S_ISUID)
-       buf[3] = ((mode & S_IXUSR) ? 's' : 'S');
-    if (mode & S_ISGID)
-       buf[6] = ((mode & S_IXGRP) ? 's' : 'S');
-    if (mode & S_ISVTX)
-       buf[9] = ((mode & S_IXOTH) ? 't' : 'T');
-
+    int i;
+    buf[0] = TYPECHAR(mode);
+    for (i=0; i<9; i++) {
+       if (mode & SBIT[i])
+           buf[i+1] = (mode & MBIT[i])? 
+               SMODE1[i] : SMODE0[i];
+       else
+           buf[i+1] = (mode & MBIT[i])? 
+               MODE1[i] : MODE0[i];
+    }
     return buf;
 }
+#endif
 
 
+#if defined BB_TAR
 /*
- * Get the time string to be used for a file.
- * This is down to the minute for new files, but only the date for old files.
- * The string is returned from a static buffer, and so is overwritten for
- * each call.
+ * Return the standard ls-like time string from a time_t
+ * This is static and so is overwritten on each call.
  */
 const char *timeString(time_t timeVal)
 {
@@ -325,7 +317,6 @@ const char *timeString(time_t timeVal)
     return buf;
 }
 
-
 /*
  * Write all of the supplied buffer out to a file.
  * This does multiple writes as necessary.
@@ -351,8 +342,10 @@ int fullWrite(int fd, const char *buf, int len)
 
     return total;
 }
+#endif
 
 
+#if defined BB_TAR || defined BB_TAIL
 /*
  * Read all of the supplied buffer from a file.
  * This does multiple reads as necessary.
@@ -385,7 +378,7 @@ int fullRead(int fd, char *buf, int len)
 #endif
 
 
-#if defined (BB_CHOWN) || defined (BB_CP) || defined (BB_FIND) || defined (BB_LS)
+#if defined (BB_CHOWN) || defined (BB_CP) || defined (BB_FIND) || defined (BB_LS) || defined (BB_INSMOD)
 /*
  * Walk down all the directories under the specified 
  * location, and do something (something specified
@@ -415,8 +408,12 @@ recursiveAction(const char *fileName, int recurse, int followLinks, int depthFir
        return (FALSE);
     }
 
-    if ( (followLinks == FALSE) && (S_ISLNK(statbuf.st_mode)) )
-       return (TRUE);
+    if ( (followLinks == FALSE) && (S_ISLNK(statbuf.st_mode)) ) {
+       if (fileAction == NULL)
+           return (TRUE);
+       else
+           return (fileAction(fileName, &statbuf));
+    }
 
     if (recurse == FALSE) {
        if (S_ISDIR(statbuf.st_mode)) {
@@ -494,19 +491,13 @@ extern void createPath (const char *name, int mode)
     char *cpOld;
     char buf[NAME_MAX];
 
-    strcpy (buf, name);
-
+    strcpy( buf, name);
     cp = strchr (buf, '/');
-
     while (cp) {
        cpOld = cp;
        cp = strchr (cp + 1, '/');
-
        *cpOld = '\0';
-
-       if (mkdir (buf, cp ? 0777 : mode) == 0)
-           printf ("Directory \"%s\" created\n", buf);
-
+       mkdir (buf, cp ? 0777 : mode);
        *cpOld = '/';
     }
 }
@@ -658,11 +649,14 @@ my_getid(const char *filename, char *name, uid_t id)
                        continue;
 
                if (name) {
-                   if (0 == strcmp(rname, name))
+                   if (0 == strcmp(rname, name)) {
+                       fclose( file);
                        return( rid);
+                   }
                 }
                if ( id != -1 && id == rid ) {
                    strncpy(name, rname, 8);
+                   fclose( file);
                    return( TRUE);
                }
        }
@@ -790,7 +784,7 @@ int get_console_fd(char* tty_name)
 #endif
 
 
-#if !defined BB_REGEXP && (defined BB_GREP || defined BB_FIND || defined BB_SED)  
+#if !defined BB_REGEXP && (defined BB_GREP || defined BB_SED)  
 
 /* Do a case insensitive strstr() */
 char* stristr(char *haystack, const char *needle)
@@ -870,6 +864,108 @@ extern int replace_match(char *haystack, char *needle, char *newNeedle, int igno
 #endif
 
 
+#if defined BB_FIND
+/*
+ * Routine to see if a text string is matched by a wildcard pattern.
+ * Returns TRUE if the text is matched, or FALSE if it is not matched
+ * or if the pattern is invalid.
+ *  *          matches zero or more characters
+ *  ?          matches a single character
+ *  [abc]      matches 'a', 'b' or 'c'
+ *  \c         quotes character c
+ * Adapted from code written by Ingo Wilken, and
+ * then taken from sash, Copyright (c) 1999 by David I. Bell
+ * Permission is granted to use, distribute, or modify this source,
+ * provided that this copyright notice remains intact.
+ * Permission to distribute this code under the GPL has been granted.
+ */
+extern int
+check_wildcard_match(const char* text, const char* pattern)
+{
+    const char*        retryPat;
+    const char*        retryText;
+    int                ch;
+    int                found;
+
+    retryPat = NULL;
+    retryText = NULL;
+
+    while (*text || *pattern)
+    {
+       ch = *pattern++;
+
+       switch (ch)
+       {
+           case '*':  
+               retryPat = pattern;
+               retryText = text;
+               break;
+
+           case '[':  
+               found = FALSE;
+
+               while ((ch = *pattern++) != ']')
+               {
+                   if (ch == '\\')
+                       ch = *pattern++;
+
+                   if (ch == '\0')
+                       return FALSE;
+
+                   if (*text == ch)
+                       found = TRUE;
+               }
+
+               //if (!found)
+               if (found==TRUE)
+               {
+                   pattern = retryPat;
+                   text = ++retryText;
+               }
+
+               /* fall into next case */
+
+           case '?':  
+               if (*text++ == '\0')
+                   return FALSE;
+
+               break;
+
+           case '\\':  
+               ch = *pattern++;
+
+               if (ch == '\0')
+                       return FALSE;
+
+               /* fall into next case */
+
+           default:        
+               if (*text == ch)
+               {
+                   if (*text)
+                       text++;
+                   break;
+               }
+
+               if (*text)
+               {
+                   pattern = retryPat;
+                   text = ++retryText;
+                   break;
+               }
+
+               return FALSE;
+       }
+
+       if (pattern == NULL)
+               return FALSE;
+    }
+
+    return TRUE;
+}
+#endif
+
+
 
 
 #if defined BB_DF | defined BB_MTAB
@@ -926,6 +1022,92 @@ extern void whine_if_fstab_is_missing()
 #endif
 
 
-/* END CODE */
+#if defined BB_DD || defined BB_TAIL
+/*
+ * Read a number with a possible multiplier.
+ * Returns -1 if the number format is illegal.
+ */
+extern long getNum (const char *cp)
+{
+    long value;
+
+    if (!isDecimal (*cp))
+       return -1;
+
+    value = 0;
+
+    while (isDecimal (*cp))
+       value = value * 10 + *cp++ - '0';
 
+    switch (*cp++) {
+    case 'm':
+       value *= 1048576;
+       break;
 
+    case 'k':
+       value *= 1024;
+       break;
+
+    case 'b':
+       value *= 512;
+       break;
+
+    case 'w':
+       value *= 2;
+       break;
+
+    case '\0':
+       return value;
+
+    default:
+       return -1;
+    }
+
+    if (*cp)
+       return -1;
+
+    return value;
+}
+#endif
+
+
+#if defined BB_INIT || defined BB_HALT || defined BB_REBOOT 
+
+#if ! defined BB_FEATURE_USE_PROCFS
+#error Sorry, I depend on the /proc filesystem right now.
+#endif
+/* findInitPid()
+ *  
+ *  This finds the pid of init (which is not always 1).
+ *  Currently, it's implemented by rummaging through the proc filesystem.
+ *
+ *  [return]
+ *  0      failure
+ *  pid            when init's pid is found.
+ */
+extern pid_t
+findInitPid()
+{
+    pid_t   init_pid;
+    char    filename[256];
+    char    buffer[256];
+
+    /* no need to opendir ;) */
+    for (init_pid = 1; init_pid < 65536; init_pid++) {
+       FILE    *status;
+
+       sprintf(filename, "/proc/%d/status", init_pid);
+       status = fopen(filename, "r");
+       if (!status) { continue; }
+       fgets(buffer, 256, status);
+       fclose(status);
+
+       if ( (strstr(buffer, "init\n") != NULL )) {
+           return init_pid;
+       }
+    }
+    return 0;
+}
+#endif
+
+/* END CODE */