Bugfixes
[oweals/busybox.git] / coreutils / dd.c
index 33c45940ec7b7ab2a58fca523b100fc8c9d67949..9a149e24a8dd935f480d3e329013fc3435e182b4 100644 (file)
@@ -1,15 +1,9 @@
+/* vi: set sw=4 ts=4: */
 /*
  * Mini dd implementation for busybox
  *
- * Copyright (C) 1999 by Lineo, inc.
- * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
- * based in part on code 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.
+ * Copyright (C) 2000,2001  Matt Kraai
  *
  * 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
  *
  */
 
-
-#include "internal.h"
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <stdlib.h>
 #include <stdio.h>
+#include <unistd.h>
+#include <string.h>
 #include <fcntl.h>
-#include <errno.h>
-
-static const char dd_usage[] =
-"dd [if=name] [of=name] [bs=n] [count=n]\n"
-"Copy a file, converting and formatting according to options\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"
-//"\tskip=n\tskip n input blocks\n"
-"\n"
-"BYTES may be suffixed: by k for x1024, b for x512, and w for x2.\n";
-
-
-
-
-/*
- * Read a number with a possible multiplier.
- * Returns -1 if the number format is illegal.
- */
-static long getNum (const char *cp)
+#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 }
+};
+
+int dd_main(int argc, char **argv)
 {
-    long value;
-
-    if (!isDecimal (*cp))
-       return -1;
-
-    value = 0;
-
-    while (isDecimal (*cp))
-       value = value * 10 + *cp++ - '0';
-
-    switch (*cp++) {
-    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;
-}
+       size_t out_full = 0;
+       size_t out_part = 0;
+       size_t in_full = 0;
+       size_t in_part = 0;
+       size_t count = -1;
+       size_t bs = 512;
+       ssize_t n;
+       off_t seek = 0;
+       off_t skip = 0;
+       int sync_flag = FALSE;
+       int noerror = FALSE;
+       int trunc_flag = TRUE;
+       int oflag;
+       int ifd;
+       int ofd;
+       int i;
+       const char *infile = NULL;
+       const char *outfile = NULL;
+       char *buf;
+
+       for (i = 1; i < argc; i++) {
+               if (strncmp("bs=", argv[i], 3) == 0)
+                       bs = bb_xparse_number(argv[i]+3, dd_suffixes);
+               else if (strncmp("count=", argv[i], 6) == 0)
+                       count = bb_xparse_number(argv[i]+6, dd_suffixes);
+               else if (strncmp("seek=", argv[i], 5) == 0)
+                       seek = bb_xparse_number(argv[i]+5, dd_suffixes);
+               else if (strncmp("skip=", argv[i], 5) == 0)
+                       skip = bb_xparse_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_flag = FALSE;
+                                       buf += 7;
+                               } else if (strncmp("sync", buf, 4) == 0) {
+                                       sync_flag = TRUE;
+                                       buf += 4;
+                               } else if (strncmp("noerror", buf, 7) == 0) {
+                                       noerror = TRUE;
+                                       buf += 7;
+                               } else {
+                                       bb_error_msg_and_die("invalid conversion `%s'", argv[i]+5);
+                               }
+                               if (buf[0] == '\0')
+                                       break;
+                               if (buf[0] == ',')
+                                       buf++;
+                       }
+               } else
+                       bb_show_usage();
+       }
 
+       buf = xmalloc(bs);
 
-extern int dd_main (int argc, char **argv)
-{
-    const char *inFile;
-    const char *outFile;
-    char *cp;
-    int inFd;
-    int outFd;
-    int inCc = 0;
-    int outCc;
-    int skipBlocks;
-    int blockSize;
-    long count;
-    long intotal;
-    long outTotal;
-    unsigned char *buf;
-
-    inFile = NULL;
-    outFile = NULL;
-    blockSize = 512;
-    skipBlocks = 0;
-    count = 1;
-
-
-    argc--;
-    argv++;
-
-    /* Parse any options */
-    while (argc) {
-       if (inFile == NULL && (strncmp(*argv, "if", 2) == 0))
-           inFile=((strchr(*argv, '='))+1);
-       else if (outFile == NULL && (strncmp(*argv, "of", 2) == 0))
-           outFile=((strchr(*argv, '='))+1);
-       else if (strncmp("count", *argv, 5) == 0) {
-           count = getNum ((strchr(*argv, '='))+1);
-           if (count <= 0) {
-               fprintf (stderr, "Bad count value %ld\n", count);
-               goto usage;
-           }
-       }
-       else if (strncmp(*argv, "bs", 2) == 0) {
-           blockSize = getNum ((strchr(*argv, '='))+1);
-           if (blockSize <= 0) {
-               fprintf (stderr, "Bad block size value %d\n", blockSize);
-               goto usage;
-           }
+       if (infile != NULL) {
+               ifd = bb_xopen(infile, O_RDONLY);
+       } else {
+               ifd = STDIN_FILENO;
+               infile = bb_msg_standard_input;
        }
-#if 0
-       else if (strncmp(*argv, "skip", 4) == 0) {
-           skipBlocks = atoi( *argv); 
-           if (skipBlocks <= 0) {
-               fprintf (stderr, "Bad skip value %d\n", skipBlocks);
-               goto usage;
-           }
 
+       if (outfile != NULL) {
+               oflag = O_WRONLY | O_CREAT;
+
+               if (!seek && trunc_flag) {
+                       oflag |= O_TRUNC;
+               }
+
+               if ((ofd = open(outfile, oflag, 0666)) < 0) {
+                       bb_perror_msg_and_die("%s", outfile);
+               }
+
+               if (seek && trunc_flag) {
+                       if (ftruncate(ofd, seek * bs) < 0) {
+                               struct stat st;
+
+                               if (fstat (ofd, &st) < 0 || S_ISREG (st.st_mode) ||
+                                               S_ISDIR (st.st_mode)) {
+                                       bb_perror_msg_and_die("%s", outfile);
+                               }
+                       }
+               }
+       } else {
+               ofd = STDOUT_FILENO;
+               outfile = bb_msg_standard_output;
        }
-#endif
-       else {
-           goto usage;
+
+       if (skip) {
+               if (lseek(ifd, skip * bs, SEEK_CUR) < 0) {
+                       bb_perror_msg_and_die("%s", infile);
+               }
        }
-       argc--;
-       argv++;
-    }
-    if ( inFile == NULL || outFile == NULL)
-       goto usage;
-
-    buf = malloc (blockSize);
-    if (buf == NULL) {
-       fprintf (stderr, "Cannot allocate buffer\n");
-       exit( FALSE);
-    }
-
-    intotal = 0;
-    outTotal = 0;
-
-    if (inFile == NULL)
-       inFd = STDIN;
-    else
-       inFd = open (inFile, 0);
-
-    if (inFd < 0) {
-       perror (inFile);
-       free (buf);
-       exit( FALSE);
-    }
-
-    if (outFile == NULL)
-       outFd = STDOUT;
-    else
-       outFd = creat (outFile, 0666);
-
-    if (outFd < 0) {
-       perror (outFile);
-       close (inFd);
-       free (buf);
-       exit( FALSE);
-    }
-
-    //lseek(inFd, skipBlocks*blockSize, SEEK_SET);
-    while (outTotal < count * blockSize) {
-       inCc = read (inFd, buf, blockSize);
-       if (inCc < 0) {
-           perror (inFile);
-           goto cleanup;
+
+       if (seek) {
+               if (lseek(ofd, seek * bs, SEEK_CUR) < 0) {
+                       bb_perror_msg_and_die("%s", outfile);
+               }
        }
-       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;
-           }
-
-           inCc -= outCc;
-           cp += outCc;
-           outTotal += outCc;
+
+       while (in_full + in_part != count) {
+               if (noerror) {
+                       /* Pre-zero the buffer when doing the noerror thing */
+                       memset(buf, '\0', bs);
+               }
+               n = safe_read(ifd, buf, bs);
+               if (n < 0) {
+                       if (noerror) {
+                               n = bs;
+                               bb_perror_msg("%s", infile);
+                       } else {
+                               bb_perror_msg_and_die("%s", infile);
+                       }
+               }
+               if (n == 0) {
+                       break;
+               }
+               if (n == bs) {
+                       in_full++;
+               } else {
+                       in_part++;
+               }
+               if (sync_flag) {
+                       memset(buf + n, '\0', bs - n);
+                       n = bs;
+               }
+               n = bb_full_write(ofd, buf, n);
+               if (n < 0) {
+                       bb_perror_msg_and_die("%s", outfile);
+               }
+               if (n == bs) {
+                       out_full++;
+               } else {
+                       out_part++;
+               }
        }
-    }
 
-    if (inCc < 0)
-       perror (inFile);
+       if (close (ifd) < 0) {
+               bb_perror_msg_and_die("%s", infile);
+       }
 
-  cleanup:
-    close (inFd);
-    close (outFd);
-    free (buf);
+       if (close (ofd) < 0) {
+               bb_perror_msg_and_die("%s", outfile);
+       }
 
-    printf ("%ld+%d records in\n", intotal / blockSize,
-           (intotal % blockSize) != 0);
-    printf ("%ld+%d records out\n", outTotal / blockSize,
-           (outTotal % blockSize) != 0);
-    exit( TRUE);
-  usage:
+       fprintf(stderr, "%ld+%ld records in\n%ld+%ld records out\n",
+                       (long)in_full, (long)in_part,
+                       (long)out_full, (long)out_part);
 
-    fprintf (stderr, "%s", dd_usage);
-    exit( FALSE);
+       return EXIT_SUCCESS;
 }
-
-