dd.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Mini dd implementation for busybox
   4  *
   5  * Copyright (C) 1999, 2000 by Lineo, inc.
   6  * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
   7  *
   8  * Based in part on code taken from sash.
   9  *   Copyright (c) 1999 by David I. Bell
  10  *   Permission is granted to use, distribute, or modify this source,
  11  *   provided that this copyright notice remains intact.
  12  *
  13  * Permission to distribute this code under the GPL has been granted.
  14  *
  15  * This program is free software; you can redistribute it and/or modify
  16  * it under the terms of the GNU General Public License as published by
  17  * the Free Software Foundation; either version 2 of the License, or
  18  * (at your option) any later version.
  19  *
  20  * This program is distributed in the hope that it will be useful,
  21  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  22  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  23  * General Public License for more details.
  24  *
  25  * You should have received a copy of the GNU General Public License
  26  * along with this program; if not, write to the Free Software
  27  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  28  *
  29  */
  30
  31
  32 #include "internal.h"
  33 #include <features.h>
  34 #include <stdio.h>
  35 #include <fcntl.h>
  36 #include <errno.h>
  37 #if (__GLIBC__ >= 2) && (__GLIBC_MINOR__ >= 1)
  38 #include <inttypes.h>
  39 #else
  40 typedef unsigned long long int uintmax_t;
  41 #endif
  42
  43 extern int dd_main(int argc, char **argv)
  44 {
  45         char *inFile = NULL;
  46         char *outFile = NULL;
  47         char *cp;
  48         int inFd;
  49         int outFd;
  50         int inCc = 0;
  51         int outCc;
  52         long blockSize = 512;
  53         uintmax_t skipBlocks = 0;
  54         uintmax_t seekBlocks = 0;
  55         uintmax_t count = (uintmax_t) - 1;
  56         uintmax_t intotal;
  57         uintmax_t outTotal;
  58         unsigned char *buf;
  59
  60         argc--;
  61         argv++;
  62
  63         /* Parse any options */
  64         while (argc) {
  65                 if (inFile == NULL && (strncmp(*argv, "if", 2) == 0))
  66                         inFile = ((strchr(*argv, '=')) + 1);
  67                 else if (outFile == NULL && (strncmp(*argv, "of", 2) == 0))
  68                         outFile = ((strchr(*argv, '=')) + 1);
  69                 else if (strncmp("count", *argv, 5) == 0) {
  70                         count = getNum((strchr(*argv, '=')) + 1);
  71                         if (count <= 0) {
  72                                 errorMsg("Bad count value %s\n", *argv);
  73                                 goto usage;
  74                         }
  75                 } else if (strncmp(*argv, "bs", 2) == 0) {
  76                         blockSize = getNum((strchr(*argv, '=')) + 1);
  77                         if (blockSize <= 0) {
  78                                 errorMsg("Bad block size value %s\n", *argv);
  79                                 goto usage;
  80                         }
  81                 } else if (strncmp(*argv, "skip", 4) == 0) {
  82                         skipBlocks = getNum((strchr(*argv, '=')) + 1);
  83                         if (skipBlocks <= 0) {
  84                                 errorMsg("Bad skip value %s\n", *argv);
  85                                 goto usage;
  86                         }
  87
  88                 } else if (strncmp(*argv, "seek", 4) == 0) {
  89                         seekBlocks = getNum((strchr(*argv, '=')) + 1);
  90                         if (seekBlocks <= 0) {
  91                                 errorMsg("Bad seek value %s\n", *argv);
  92                                 goto usage;
  93                         }
  94
  95                 } else {
  96                         goto usage;
  97                 }
  98                 argc--;
  99                 argv++;
 100         }
 101
 102         buf = xmalloc(blockSize);
 103
 104         intotal = 0;
 105         outTotal = 0;
 106
 107         if (inFile == NULL)
 108                 inFd = fileno(stdin);
 109         else
 110                 inFd = open(inFile, 0);
 111
 112         if (inFd < 0) {
 113                 /* Note that we are not freeing buf or closing
 114                  * files here to save a few bytes. This exits
 115                  * here anyways... */
 116
 117                 /* free(buf); */
 118                 fatalError( inFile);
 119         }
 120
 121         if (outFile == NULL)
 122                 outFd = fileno(stdout);
 123         else
 124                 outFd = open(outFile, O_WRONLY | O_CREAT | O_TRUNC, 0666);
 125
 126         if (outFd < 0) {
 127                 /* Note that we are not freeing buf or closing
 128                  * files here to save a few bytes. This exits
 129                  * here anyways... */
 130
 131                 /* close(inFd);
 132                    free(buf); */
 133                 fatalError( outFile);
 134         }
 135
 136         lseek(inFd, skipBlocks * blockSize, SEEK_SET);
 137         lseek(outFd, seekBlocks * blockSize, SEEK_SET);
 138         //
 139         //TODO: Convert to using fullRead & fullWrite
 140         // from utility.c
 141         //  -Erik
 142         while (outTotal < count * blockSize) {
 143                 inCc = read(inFd, buf, blockSize);
 144                 if (inCc < 0) {
 145                         perror(inFile);
 146                         goto cleanup;
 147                 } else if (inCc == 0) {
 148                         goto cleanup;
 149                 }
 150                 intotal += inCc;
 151                 cp = buf;
 152
 153                 while (intotal > outTotal) {
 154                         if (outTotal + inCc > count * blockSize)
 155                                 inCc = count * blockSize - outTotal;
 156                         outCc = write(outFd, cp, inCc);
 157                         if (outCc < 0) {
 158                                 perror(outFile);
 159                                 goto cleanup;
 160                         } else if (outCc == 0) {
 161                                 goto cleanup;
 162                         }
 163
 164                         inCc -= outCc;
 165                         cp += outCc;
 166                         outTotal += outCc;
 167                 }
 168         }
 169
 170         if (inCc < 0)
 171                 perror(inFile);
 172
 173   cleanup:
 174         /* Note that we are not freeing memory or closing
 175          * files here, to save a few bytes. */
 176 #ifdef BB_FEATURE_CLEAN_UP
 177         close(inFd);
 178         close(outFd);
 179         free(buf);
 180 #endif
 181
 182         printf("%ld+%d records in\n", (long) (intotal / blockSize),
 183                    (intotal % blockSize) != 0);
 184         printf("%ld+%d records out\n", (long) (outTotal / blockSize),
 185                    (outTotal % blockSize) != 0);
 186         exit(TRUE);
 187   usage:
 188
 189         usage(dd_usage);
 190 }