home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume1 / 8710 / 2 < prev    next >
Encoding:
Text File  |  1990-07-13  |  8.6 KB  |  338 lines
  1. Path: uunet!husc6!necntc!ncoast!allbery
  2. From: drw@culdev1.UUCP (Dale Worley)
  3. Newsgroups: comp.sources.misc
  4. Subject: Upgrade to uudecode
  5. Message-ID: <4810@ncoast.UUCP>
  6. Date: 5 Oct 87 00:16:11 GMT
  7. Sender: allbery@ncoast.UUCP
  8. Organization: Cullinet Software, Westwood, MA, USA
  9. Lines: 325
  10. Approved: allbery@ncoast.UUCP
  11. X-Archive: comp.sources.misc/8710/2
  12.  
  13. The following is a patch to the p.d. uudecode posted here recently.
  14. It adds an option "-f", which cures what I consider to be the most
  15. annoying feature of uudecode:  it insists on writing its output to the
  16. file name specified in the input.  When "-f" is given, output goes to
  17. stdout, so uudecode can be used as a filter.  (If there is more than
  18. one file in the encoded file, they are concatenated together.)
  19.  
  20. Dale
  21. ----------------------------------------
  22. *** uudecode.old    Tue Sep 29 12:51:21 1987
  23. --- uudecode.c    Tue Sep 29 13:43:11 1987
  24. ***************
  25. *** 13,21 ****
  26.      loop for multiple decodes from a single file, and to handle common
  27.      BITNET mangling.  Also kludged around a missing string function in Aztec
  28.      C */
  29.   
  30.   /*
  31. !  * uudecode [input]
  32.    *
  33.    * Decode a file encoded with uuencode.  WIll extract multiple encoded
  34.    * modules from a single file.    Can deal with most mangled files, including
  35. --- 13,26 ----
  36.      loop for multiple decodes from a single file, and to handle common
  37.      BITNET mangling.  Also kludged around a missing string function in Aztec
  38.      C */
  39. + /* Modified by drw (Dale Worley, drw@math.mit.edu) to add the -f switch, which
  40. +    forces the output to be on stdout.  This makes uudecode into a filter, and
  41. +    frees the user from perversions in the file name and mode given in the
  42. +    input file. These changes Copyright (C) 1987 Dale R. Worley, and are hereby
  43. +    put in the public domain. */
  44.   
  45.   /*
  46. !  * uudecode [-f] [input]
  47.    *
  48.    * Decode a file encoded with uuencode.  WIll extract multiple encoded
  49.    * modules from a single file.    Can deal with most mangled files, including
  50. ***************
  51. *** 37,42 ****
  52. --- 42,50 ----
  53.   #include <sys/stat.h>
  54.   #endif
  55.   
  56. + long    written_size;    /* number of bytes written to output, used instead of
  57. +                of ftell, because ftell doesn't work with -f */
  58. + 
  59.   #define SUMSIZE 64
  60.   #define DEC(c)    (((c) - ' ') & 077)    /* single character decode */
  61.   
  62. ***************
  63. *** 49,54 ****
  64. --- 57,63 ----
  65.   long    filesize;    /* theoretical file size (from header) */
  66.   char    dest[128];
  67.   char    buf[80];
  68. + int    f_option = 0;    /* set to 1 if -f option is present */
  69.   
  70.   #ifdef AMIGA_LATTICE
  71.   extern    int Enable_Abort;
  72. ***************
  73. *** 55,60 ****
  74. --- 64,76 ----
  75.       Enable_Abort=1;
  76.   #endif
  77.   
  78. +     /* First, check for the -f option */
  79. +     if (argc >= 2 && strcmp(argv[1], "-f") == 0)
  80. +         {
  81. +         f_option = 1;
  82. +         argc--; argv++;
  83. +         }
  84. + 
  85.       /* A filename can be specified to be uudecoded, or nothing can
  86.       be specified, and the input will come from STDIN */
  87.   
  88. ***************
  89. *** 68,80 ****
  90.       if ((in = fopen(argv[1], "r")) == NULL)
  91.           {
  92.           fprintf(stderr, "ERROR: can't find %s\n", argv[1]);
  93. !         fprintf(stderr, "USAGE: uudecode [infile]\n");
  94.           exit(10);
  95.           }
  96.       break;
  97.   
  98.       default:
  99. !     fprintf(stderr, "USAGE: uudecode [infile]\n");
  100.       exit(11);
  101.       break;
  102.       }
  103. --- 84,96 ----
  104.       if ((in = fopen(argv[1], "r")) == NULL)
  105.           {
  106.           fprintf(stderr, "ERROR: can't find %s\n", argv[1]);
  107. !         fprintf(stderr, "USAGE: uudecode [-f] [infile]\n");
  108.           exit(10);
  109.           }
  110.       break;
  111.   
  112.       default:
  113. !     fprintf(stderr, "USAGE: uudecode [-f] [infile]\n");
  114.       exit(11);
  115.       break;
  116.       }
  117. ***************
  118. *** 104,149 ****
  119.       }
  120.       sscanf(buf, "begin %o %s", &mode, dest);
  121.   
  122.   #ifdef unix
  123. !     /* handle ~user/file format */
  124. !     if (dest[0] == '~')
  125. !     {
  126. !     char *sl;
  127. !     struct passwd *getpwnam();
  128. !     char *index();
  129. !     struct passwd *user;
  130. !     char dnbuf[100];
  131. ! 
  132. !     sl = index(dest, '/');
  133. !     if (sl == NULL)
  134.           {
  135. !         fprintf(stderr, "Illegal ~user\n");
  136. !         exit(13);
  137.           }
  138. -     *sl++ = 0;
  139. -     user = getpwnam(dest+1);
  140. -     if (user == NULL)
  141. -         {
  142. -         fprintf(stderr, "No such user as %s\n", dest);
  143. -         exit(14);
  144. -         }
  145. -     strcpy(dnbuf, user->pw_dir);
  146. -     strcat(dnbuf, "/");
  147. -     strcat(dnbuf, sl);
  148. -     strcpy(dest, dnbuf);
  149. -     }
  150.   #endif
  151.   
  152. !     /* create output file */
  153. !     if ((out = fopen(dest, "w")) == NULL)
  154. !     {
  155. !     fprintf(stderr, "ERROR: can't open output file %s\n", dest);
  156. !     exit(15);
  157. !     }
  158.   #ifdef unix
  159. !     chmod(dest, mode);
  160.   #endif
  161.   
  162.       decode(in, out, dest);
  163.   
  164.       if (fgets(buf, sizeof buf, in) == NULL || strncmp(buf,"end",3))
  165. --- 120,177 ----
  166.       }
  167.       sscanf(buf, "begin %o %s", &mode, dest);
  168.   
  169. +     /* set up the output file */
  170. +     if (f_option)
  171. +         {
  172. +         /* the -f option is used, so use stdout */
  173. +     out = stdout;
  174. +         }
  175. +     else
  176. +         {
  177. +         /* the -f option is not used, so use the filename (and mode) in the
  178. +          * begin line */
  179.   #ifdef unix
  180. !     /* handle ~user/file format */
  181. !     if (dest[0] == '~')
  182.           {
  183. !         char *sl;
  184. !         struct passwd *getpwnam();
  185. !         char *index();
  186. !         struct passwd *user;
  187. !         char dnbuf[100];
  188. ! 
  189. !         sl = index(dest, '/');
  190. !         if (sl == NULL)
  191. !         {
  192. !         fprintf(stderr, "Illegal ~user\n");
  193. !             exit(13);
  194. !         }
  195. !         *sl++ = 0;
  196. !         user = getpwnam(dest+1);
  197. !         if (user == NULL)
  198. !         {
  199. !         fprintf(stderr, "No such user as %s\n", dest);
  200. !         exit(14);
  201. !         }
  202. !         strcpy(dnbuf, user->pw_dir);
  203. !         strcat(dnbuf, "/");
  204. !         strcat(dnbuf, sl);
  205. !         strcpy(dest, dnbuf);
  206.           }
  207.   #endif
  208.   
  209. !     /* create output file */
  210. !     if ((out = fopen(dest, "w")) == NULL)
  211. !         {
  212. !         fprintf(stderr, "ERROR: can't open output file %s\n", dest);
  213. !         exit(15);
  214. !         }
  215.   #ifdef unix
  216. !     chmod(dest, mode);
  217.   #endif
  218. +        }
  219.   
  220. +     /* actually decode the data */
  221.       decode(in, out, dest);
  222.   
  223.       if (fgets(buf, sizeof buf, in) == NULL || strncmp(buf,"end",3))
  224. ***************
  225. *** 155,166 ****
  226.       if (!(fgets(buf,sizeof buf,in) == NULL || strncmp(buf,"size ",3)))
  227.       {
  228.       sscanf(buf, "size %ld", &filesize);
  229. !     if (ftell(out) != filesize)
  230.           {
  231. !         fprintf(stderr, "ERROR: file should have been %ld bytes long but was %ld.\n", filesize, ftell(out));
  232.           exit(17);
  233.           }
  234.       }
  235.       through_loop = 1;
  236.   }   /* forever */
  237.   }   /* main */
  238. --- 183,203 ----
  239.       if (!(fgets(buf,sizeof buf,in) == NULL || strncmp(buf,"size ",3)))
  240.       {
  241.       sscanf(buf, "size %ld", &filesize);
  242. !     if (written_size != filesize)
  243.           {
  244. !         fprintf(stderr, "ERROR: file should have been %ld bytes long but was %ld.\n", filesize, written_size);
  245.           exit(17);
  246.           }
  247.       }
  248. + 
  249. +     /* close the output file */
  250. +     if (!f_option)
  251. +         if (fclose(out) != 0)
  252. +             {
  253. +         fprintf(stderr, "ERROR: error closing file %s.\n", dest);
  254. +         exit(20);
  255. +         }
  256. + 
  257.       through_loop = 1;
  258.   }   /* forever */
  259.   }   /* main */
  260. ***************
  261. *** 185,190 ****
  262. --- 222,230 ----
  263.   register int n;
  264.   int checksum, line;
  265.   
  266. +     /* zero the byte count */
  267. +     written_size = 0;
  268. + 
  269.       for (line = 1; ; line++)    /* for each input line */
  270.       {
  271.       if (fgets(buf, sizeof buf, in) == NULL)
  272. ***************
  273. *** 220,228 ****
  274.   
  275.       while (n >= 4)
  276.           {
  277. !         j = DEC(bp[0]) << 2 | DEC(bp[1]) >> 4; putc(j, out); checksum += j;
  278. !         j = DEC(bp[1]) << 4 | DEC(bp[2]) >> 2; putc(j, out); checksum += j;
  279. !         j = DEC(bp[2]) << 6 | DEC(bp[3]);       putc(j, out); checksum += j;
  280.           checksum = checksum % SUMSIZE;
  281.           bp += 4;
  282.           n -= 3;
  283. --- 260,280 ----
  284.   
  285.       while (n >= 4)
  286.           {
  287. !         j = DEC(bp[0]) << 2 | DEC(bp[1]) >> 4;
  288. !         putc(j, out);
  289. !         checksum += j;
  290. !         written_size++;
  291. ! 
  292. !         j = DEC(bp[1]) << 4 | DEC(bp[2]) >> 2;
  293. !         putc(j, out);
  294. !         checksum += j;
  295. !         written_size++;
  296. ! 
  297. !         j = DEC(bp[2]) << 6 | DEC(bp[3]);
  298. !         putc(j, out);
  299. !         checksum += j;
  300. !         written_size++;
  301. ! 
  302.           checksum = checksum % SUMSIZE;
  303.           bp += 4;
  304.           n -= 3;
  305. ***************
  306. *** 231,245 ****
  307. --- 283,306 ----
  308.           j = DEC(bp[0]) << 2 | DEC(bp[1]) >> 4;
  309.           checksum += j;
  310.           if (n >= 1)
  311. +             {
  312.               putc(j, out);
  313. +             written_size++;
  314. +             }
  315.           j = DEC(bp[1]) << 4 | DEC(bp[2]) >> 2;
  316.           checksum += j;
  317.           if (n >= 2)
  318. +             {
  319.               putc(j, out);
  320. +             written_size++;
  321. +             }
  322.           j = DEC(bp[2]) << 6 | DEC(bp[3]);
  323.           checksum += j;
  324.           if (n >= 3)
  325. +             {
  326.               putc(j, out);
  327. +             written_size++;
  328. +             }
  329.           checksum = checksum % SUMSIZE;
  330.           bp += 4;
  331.           n -= 3;
  332. ----------------------------------------
  333. -- 
  334. Dale Worley    Cullinet Software      ARPA: culdev1!drw@eddie.mit.edu
  335. UUCP: ...!seismo!harvard!mit-eddie!culdev1!drw
  336. "Thank you for your cooperation.  Goodnight." -- Robocop
  337. "Don't f--k with the babysitter." -- Adventures in Babysitting
  338.