Teach libc5 what a sighandler_t is
[oweals/busybox.git] / dd.c
diff --git a/dd.c b/dd.c
index 07f092cc23c8d1e91053fefc5ba8bfc91352faee..d46db82a03074c94e19359548b9d10ea4a091a4e 100644 (file)
--- a/dd.c
+++ b/dd.c
+/* vi: set sw=4 ts=4: */
 /*
- * Copyright (c) 1999 by David I. Bell
- * Permission is granted to use, distribute, or modify this source,
- * provided that this copyright notice remains intact.
+ * Mini dd implementation for busybox
  *
- * The "dd" command, originally taken from sash.
  *
- * Permission to distribute this code under the GPL has been granted.
- * Majorly modified, and bugs fixed for busybox by Erik Andersen <andersee@debian.org> <andersen@lineo.com>
+ * Copyright (C) 2000 by Matt Kraai <kraai@alumni.carnegiemellon.edu>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ *
  */
 
-#include "internal.h"
-#ifdef BB_DD
-
-const char dd_usage[] = 
-"Copy a file, converting and formatting according to options\n\
-\n\
-usage: [if=name] [of=name] [bs=n] [count=n]\n\
-\tif=FILE\tread from FILE instead of stdin\n\
-\tof=FILE\twrite to FILE instead of stout\n\
-\tbs=n\tread and write N bytes at a time\n\
-\tcount=n\tcopy only n input blocks\n\
-\n\
-BYTES may be suffixed: by k for x1024, b for x512, and w for x2.\n";
-
-
+#include <sys/types.h>
+#include <stdlib.h>
 #include <stdio.h>
-#include <dirent.h>
-#include <errno.h>
+#include <unistd.h>
+#include <string.h>
 #include <fcntl.h>
-#include <signal.h>
-#include <time.h>
-
-
-#define        PAR_NONE        0
-#define        PAR_IF          1
-#define        PAR_OF          2
-#define        PAR_BS          3
-#define        PAR_COUNT       4
-
-
-typedef        struct
-{
-       const char *    name;
-       int             value;
-} PARAM;
-
-
-static const PARAM     params[] =
-{
-       {"if",          PAR_IF},
-       {"of",          PAR_OF},
-       {"bs",          PAR_BS},
-       {"count",       PAR_COUNT},
-       {NULL,          PAR_NONE}
+#include "busybox.h"
+
+
+static const struct suffix_mult dd_suffixes[] = {
+       { "c", 1 },
+       { "w", 2 },
+       { "b", 512 },
+       { "kD", 1000 },
+       { "k", 1024 },
+       { "MD", 1000000 },
+       { "M", 1048576 },
+       { "GD", 1000000000 },
+       { "G", 1073741824 },
+       { NULL, 0 }
 };
 
-
-static long    getNum(const char * cp);
-
-extern int
-dd_main (int argc, char **argv)
+int dd_main(int argc, char **argv)
 {
-       const char *    str;
-       const PARAM *   par;
-       const char *    inFile;
-       const char *    outFile;
-       char *          cp;
-       int             inFd;
-       int             outFd;
-       int             inCc=0;
-       int             outCc;
-       int             blockSize;
-       long            count;
-       long            intotal;
-       long            outTotal;
-       unsigned char*  buf;
-       unsigned char   localBuf[BUF_SIZE];
-
-       inFile = NULL;
-       outFile = NULL;
-       blockSize = 512;
-       count = 1;
-
-
-       while (--argc > 0)
-       {
-               str = *++argv;
-               cp = strchr(str, '=');
-
-               if (cp == NULL)
-               {
-                       fprintf(stderr, "Bad dd argument\n");
-                       goto usage;
-               }
-
-               *cp++ = '\0';
-
-               for (par = params; par->name; par++)
-               {
-                       if (strcmp(str, par->name) == 0)
-                               break;
-               }
-
-               switch (par->value)
-               {
-                       case PAR_IF:
-                               if (inFile)
-                               {
-                                       fprintf(stderr, "Multiple input files illegal\n");
-                                       goto usage;
-                               }
-       
-                               //fprintf(stderr, "if=%s\n", cp);
-                               inFile = cp;
-                               break;
-
-                       case PAR_OF:
-                               if (outFile)
-                               {
-                                       fprintf(stderr, "Multiple output files illegal\n");
-                                       goto usage;
+       int i, ifd, ofd, oflag, sync_flag = FALSE, trunc = TRUE;
+       size_t in_full = 0, in_part = 0, out_full = 0, out_part = 0;
+       size_t bs = 512, count = -1;
+       ssize_t n;
+       off_t seek = 0, skip = 0;
+       char *infile = NULL, *outfile = NULL, *buf;
+
+       for (i = 1; i < argc; i++) {
+               if (strncmp("bs=", argv[i], 3) == 0)
+                       bs = parse_number(argv[i]+3, dd_suffixes);
+               else if (strncmp("count=", argv[i], 6) == 0)
+                       count = parse_number(argv[i]+6, dd_suffixes);
+               else if (strncmp("seek=", argv[i], 5) == 0)
+                       seek = parse_number(argv[i]+5, dd_suffixes);
+               else if (strncmp("skip=", argv[i], 5) == 0)
+                       skip = parse_number(argv[i]+5, dd_suffixes);
+               else if (strncmp("if=", argv[i], 3) == 0)
+                       infile = argv[i]+3;
+               else if (strncmp("of=", argv[i], 3) == 0)
+                       outfile = argv[i]+3;
+               else if (strncmp("conv=", argv[i], 5) == 0) {
+                       buf = argv[i]+5;
+                       while (1) {
+                               if (strncmp("notrunc", buf, 7) == 0) {
+                                       trunc = FALSE;
+                                       buf += 7;
+                               } else if (strncmp("sync", buf, 4) == 0) {
+                                       sync_flag = TRUE;
+                                       buf += 4;
+                               } else {
+                                       error_msg_and_die("invalid conversion `%s'", argv[i]+5);
                                }
-
-                               //fprintf(stderr, "of=%s\n", cp);
-                               outFile = cp;
-                               break;
-
-                       case PAR_BS:
-                               blockSize = getNum(cp);
-                               //fprintf(stderr, "bs=%d\n", blockSize);
-
-                               if (blockSize <= 0)
-                               {
-                                       fprintf(stderr, "Bad block size value\n");
-                                       goto usage;
-                               }
-
-                               break;
-
-                       case PAR_COUNT:
-                               count = getNum(cp);
-                               //fprintf(stderr, "count=%ld\n", count);
-
-                               if (count < 0)
-                               {
-                                       fprintf(stderr, "Bad count value\n");
-                                       goto usage;
-                               }
-
-                               break;
-
-                       default:
-                               goto usage;
-               }
+                               if (buf[0] == '\0')
+                                       break;
+                               if (buf[0] == ',')
+                                       buf++;
+                       }
+               } else
+                       show_usage();
        }
 
-       buf = localBuf;
-
-       if (blockSize > sizeof(localBuf))
-       {
-               buf = malloc(blockSize);
+       buf = xmalloc(bs);
 
-               if (buf == NULL)
-               {
-                       fprintf(stderr, "Cannot allocate buffer\n");
-                       return 1;
-               }
+       if (infile != NULL) {
+               if ((ifd = open(infile, O_RDONLY)) < 0)
+                       perror_msg_and_die("%s", infile);
+       } else {
+               ifd = STDIN_FILENO;
+               infile = "standard input";
        }
 
-       intotal = 0;
-       outTotal = 0;
+       if (outfile != NULL) {
+               oflag = O_WRONLY | O_CREAT;
 
-       if (inFile == NULL)
-           inFd = STDIN;
-       else
-           inFd = open(inFile, 0);
+               if (!seek && trunc)
+                       oflag |= O_TRUNC;
 
-       if (inFd < 0)
-       {
-               perror(inFile);
+               if ((ofd = open(outfile, oflag, 0666)) < 0)
+                       perror_msg_and_die("%s", outfile);
 
-               if (buf != localBuf)
-                       free(buf);
-
-               return 1;
+               if (seek && trunc) {
+                       if (ftruncate(ofd, seek * bs) < 0)
+                               perror_msg_and_die("%s", outfile);
+               }
+       } else {
+               ofd = STDOUT_FILENO;
+               outfile = "standard output";
        }
 
-       if (outFile == NULL)
-           outFd = STDOUT;
-       else
-           outFd = creat(outFile, 0666);
-
-       if (outFd < 0)
-       {
-               perror(outFile);
-               close(inFd);
-
-               if (buf != localBuf)
-                       free(buf);
-
-               return 1;
+       if (skip) {
+               if (lseek(ifd, skip * bs, SEEK_CUR) < 0)
+                       perror_msg_and_die("%s", infile);
        }
 
-       while ( outTotal < count*blockSize )
-       {
-               inCc = read(inFd, buf, blockSize);
-               if (inCc < 0) {
-                   perror(inFile);
-                   goto cleanup;
-               }
-               //fprintf(stderr, "read in =%d\n", inCc);
-               intotal += inCc;
-               cp = buf;
-
-
-               while ( intotal > outTotal )
-               {
-                       if (outTotal+inCc > count*blockSize)
-                           inCc=count*blockSize-outTotal;
-                       outCc = write(outFd, cp, inCc);
-                       if (outCc < 0)
-                       {
-                               perror(outFile);
-                               goto cleanup;
-                       }
-                       //fprintf(stderr, "wrote out =%d\n", outCc);
-
-                       inCc -= outCc;
-                       cp += outCc;
-                       outTotal += outCc;
-                       //fprintf(stderr, "outTotal=%ld\n", outTotal);
-               }
+       if (seek) {
+               if (lseek(ofd, seek * bs, SEEK_CUR) < 0)
+                       perror_msg_and_die("%s", outfile);
        }
 
-       if (inCc < 0)
-               perror(inFile);
-
-cleanup:
-       close(inFd);
-
-       if (close(outFd) < 0)
-               perror(outFile);
-
-       if (buf != localBuf)
-               free(buf);
-
-       printf("%ld+%d records in\n", intotal / blockSize,
-               (intotal % blockSize) != 0);
-
-       printf("%ld+%d records out\n", outTotal / blockSize,
-               (outTotal % blockSize) != 0);
-       return 0;
-usage:
-       
-       fprintf(stderr, "%s", dd_usage);
-       return 1;
-}
-
-
-/*
- * Read a number with a possible multiplier.
- * Returns -1 if the number format is illegal.
- */
-static 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 'k':
-                       value *= 1024;
+       while (in_full + in_part != count) {
+               n = safe_read(ifd, buf, bs);
+               if (n < 0)
+                       perror_msg_and_die("%s", infile);
+               if (n == 0)
                        break;
-
-               case 'b':
-                       value *= 512;
-                       break;
-
-               case 'w':
-                       value *= 2;
-                       break;
-
-               case '\0':
-                       return value;
-
-               default:
-                       return -1;
+               if (n == bs)
+                       in_full++;
+               else
+                       in_part++;
+               if (sync_flag) {
+                       memset(buf + n, '\0', bs - n);
+                       n = bs;
+               }
+               n = full_write(ofd, buf, n);
+               if (n < 0)
+                       perror_msg_and_die("%s", outfile);
+               if (n == bs)
+                       out_full++;
+               else
+                       out_part++;
        }
 
-       if (*cp)
-               return -1;
+       fprintf(stderr, "%ld+%ld records in\n", (long)in_full, (long)in_part);
+       fprintf(stderr, "%ld+%ld records out\n", (long)out_full, (long)out_part);
 
-       return value;
+       return EXIT_SUCCESS;
 }
-
-#endif
-/* END CODE */
-