home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / compsrcs / unix / volume21 / mmv.pch < prev    next >
Encoding:
Text File  |  1990-06-14  |  11.6 KB  |  516 lines
  1. Path: wuarchive!zaphod.mps.ohio-state.edu!sdd.hp.com!samsung!uunet!papaya.bbn.com!rsalz
  2. From: rsalz@uunet.uu.net (Rich Salz)
  3. Newsgroups: comp.sources.unix
  4. Subject: v22i103:  CRITICAL patch to MMV
  5. Message-ID: <2643@litchi.bbn.com>
  6. Date: 8 Jun 90 13:05:21 GMT
  7. Lines: 505
  8. Approved: rsalz@uunet.UU.NET
  9. X-Checksum-Snefru: 30ca48d9 a276f24e 5f353026 1fcfba52
  10.  
  11. Submitted-by: Vladimir Lanin <lanin@csd4.cs.nyu.edu>
  12. Posting-number: Volume 22, Issue 103
  13. Archive-name: mmv.pch
  14. Patch-To: volume21/mmv
  15.  
  16. The following patch fixes a number of bugs in mmv 1.0 (as distributed on
  17. comp.sources.unix) and provides V7 compatibility.  The new version is
  18. known as mmv 1.01b.
  19.  
  20. Since one of the bugs can result in the unintended DELETION of the source
  21. file(s), it is imperative that the old version be replaced with the new
  22. one.
  23.  
  24. The two major bugs fixed are:
  25. 1) in its BSD reincarnation, whenever a file had to be moved between devices
  26. (by copying, then deleting), mmv 1.0 made a symbolic link to "/" instead
  27. of copying the file. It still deleted the original, though. Oops!
  28. 2) the uppercase/lowercase conversion feature did not work.
  29.  
  30. Vladimir Lanin
  31.  
  32. ---cut here---
  33. ***************
  34. *** 1,5 ****
  35.   /*
  36. !     mmv 1.0
  37.       Copyright (c) 1990 Vladimir Lanin.
  38.       This program may be freely used and copied on a non-commercial basis.
  39.       The author assumes no responsibility for any damage or data loss that may
  40. --- 1,5 ----
  41.   /*
  42. !     mmv 1.01b
  43.       Copyright (c) 1990 Vladimir Lanin.
  44.       This program may be freely used and copied on a non-commercial basis.
  45.       The author assumes no responsibility for any damage or data loss that may
  46. ***************
  47. *** 7,21 ****
  48.   
  49.       Author may be reached at:
  50.   
  51. !     lanin@csd4.nyu.edu
  52.   
  53.       Vladimir Lanin
  54.       330 Wadsworth Ave, Apt 6F,
  55.       New York, NY 10040
  56.   */
  57.   
  58.   /*
  59.       Define SYSV to compile under System V.
  60.       If your System V has a rename() call, define RENAME.
  61.       Otherwise, mmv will only be able to rename directories (via option -r)
  62.       when running as the super-user.
  63. --- 7,36 ----
  64.   
  65.       Author may be reached at:
  66.   
  67. !     lanin@csd4.cs.nyu.edu
  68.   
  69.       Vladimir Lanin
  70.       330 Wadsworth Ave, Apt 6F,
  71.       New York, NY 10040
  72. + 
  73. +     Many thanks to those who have to contributed to the design
  74. +     and/or coding of this program:
  75. + 
  76. +     Tom Albrecht:    initial Sys V adaptation, consultation, and testing
  77. +     Carl Mascott:    V7 adaptation
  78. +     Mark Lewis:    -n flag idea, consultation.
  79. +     Dave Bernhold:    upper/lowercase conversion idea.
  80. +     Paul Stodghill:    copy option, argv[0] checking.
  81. +     Frank Fiamingo:    consultation and testing.
  82. +     Tom Jordahl:    bug reports and testing.
  83. +     John Lukas, Hugh Redelmeyer, Barry Nelson, John Sauter,
  84. +     Phil Dench, John Nelson:
  85. +             bug reports.
  86.   */
  87.   
  88.   /*
  89.       Define SYSV to compile under System V.
  90. +     Define both SYSV and V7 to compile under V7.
  91.       If your System V has a rename() call, define RENAME.
  92.       Otherwise, mmv will only be able to rename directories (via option -r)
  93.       when running as the super-user.
  94. ***************
  95. *** 74,84 ****
  96.   
  97.   #include <stdio.h>
  98.   #include <ctype.h>
  99. - #include <string.h>
  100.   
  101.   #ifdef MSDOS
  102.   /* for MS-DOS (under Turbo C 1.5)*/
  103.   
  104.   #include <stdlib.h>
  105.   #include <sys/stat.h>
  106.   #include <dos.h>
  107. --- 89,99 ----
  108.   
  109.   #include <stdio.h>
  110.   #include <ctype.h>
  111.   
  112.   #ifdef MSDOS
  113.   /* for MS-DOS (under Turbo C 1.5)*/
  114.   
  115. + #include <string.h>
  116.   #include <stdlib.h>
  117.   #include <sys/stat.h>
  118.   #include <dos.h>
  119. ***************
  120. *** 109,116 ****
  121.   #include <sys/types.h>
  122.   #include <sys/stat.h>
  123.   #include <sys/file.h>
  124. ! #include <sys/signal.h>
  125. ! #include <fcntl.h>
  126.   extern char *getenv();
  127.   extern long lseek();
  128.   extern char *malloc();
  129. --- 124,130 ----
  130.   #include <sys/types.h>
  131.   #include <sys/stat.h>
  132.   #include <sys/file.h>
  133. ! 
  134.   extern char *getenv();
  135.   extern long lseek();
  136.   extern char *malloc();
  137. ***************
  138. *** 149,176 ****
  139.   
  140.   static char TTY[] = "/dev/tty";
  141.   
  142. ! #ifdef SYSV
  143. ! /* for System V */
  144.   
  145.   struct utimbuf {
  146.       time_t actime;
  147.       time_t modtime;
  148.   };
  149. ! #define utimes(f, t) utime((f), (t))
  150.   
  151. - 
  152.   #else
  153.   /* for BSD */
  154. - 
  155.   #define RENAME
  156. - 
  157.   #include <sys/time.h>
  158.   
  159.   #endif
  160. - 
  161.   #endif
  162.   
  163. - 
  164.   #define mylower(c) (isupper(c) ? (c)-'A'+'a' : (c))
  165.   #define myupper(c) (islower(c) ? (c)-'a'+'A' : (c))
  166.   #define STRLEN(s) (sizeof(s) - 1)
  167. --- 163,202 ----
  168.   
  169.   static char TTY[] = "/dev/tty";
  170.   
  171. ! #ifdef V7
  172. ! /* for Version 7 */
  173. ! #include <errno.h>
  174. ! extern int errno;
  175. ! #define strchr index
  176. ! extern char *strcpy(), *strchr();
  177. ! #include <signal.h>
  178. ! #define O_RDONLY 0
  179. ! #define O_WRONLY 1
  180. ! #define O_RDWR   2
  181.   
  182. + #else
  183. + /* for System V and BSD */
  184. + #include <string.h>
  185. + #include <sys/signal.h>
  186. + #include <fcntl.h>
  187. + #endif
  188. + 
  189. + #ifdef SYSV
  190. + /* for System V and Version 7*/
  191.   struct utimbuf {
  192.       time_t actime;
  193.       time_t modtime;
  194.   };
  195. ! #define utimes(f, t) utime((f), &(t))
  196.   
  197.   #else
  198.   /* for BSD */
  199.   #define RENAME
  200.   #include <sys/time.h>
  201.   
  202.   #endif
  203.   #endif
  204.   
  205.   #define mylower(c) (isupper(c) ? (c)-'A'+'a' : (c))
  206.   #define myupper(c) (islower(c) ? (c)-'a'+'A' : (c))
  207.   #define STRLEN(s) (sizeof(s) - 1)
  208. ***************
  209. *** 298,304 ****
  210.   static void init(/* */);
  211.   static void procargs(/* int argc, char **argv,
  212.       char **pfrompat, char **ptopat */);
  213. ! static void matchpats(/* char *cfrom, char *cto */);
  214.   static int getpat(/* */);
  215.   static int getword(/* char *buf */);
  216.   static void matchpat(/*  */);
  217. --- 324,330 ----
  218.   static void init(/* */);
  219.   static void procargs(/* int argc, char **argv,
  220.       char **pfrompat, char **ptopat */);
  221. ! static void domatch(/* char *cfrom, char *cto */);
  222.   static int getpat(/* */);
  223.   static int getword(/* char *buf */);
  224.   static void matchpat(/*  */);
  225. ***************
  226. *** 355,360 ****
  227. --- 381,387 ----
  228.   static void *challoc(/* int k, int which */);
  229.   static void chgive(/* void *p, unsigned k */);
  230.   static int mygetc(/* */);
  231. + static char *mygets(/* char *s, int l */);
  232.   #ifdef MSDOS
  233.   static int leave(/*  */);
  234.   static void cleanup(/*  */);
  235. ***************
  236. *** 394,406 ****
  237.   
  238.   static char PATLONG[] = "%.40s... : pattern too long.\n";
  239.   
  240. ! static char from[MAXPATLEN], to[MAXPATLEN];
  241.   static int fromlen, tolen;
  242.   static char *(stagel[MAXWILD]), *(firstwild[MAXWILD]), *(stager[MAXWILD]);
  243.   static int nwilds[MAXWILD];
  244.   static int nstages;
  245. ! static char pathbuf[MAXPATH];
  246. ! static char fullrep[MAXPATH + 1];
  247.   static char *(start[MAXWILD]);
  248.   static int len[MAXWILD];
  249.   static char hasdot[MAXWILD];
  250. --- 421,433 ----
  251.   
  252.   static char PATLONG[] = "%.40s... : pattern too long.\n";
  253.   
  254. ! char from[MAXPATLEN], to[MAXPATLEN];
  255.   static int fromlen, tolen;
  256.   static char *(stagel[MAXWILD]), *(firstwild[MAXWILD]), *(stager[MAXWILD]);
  257.   static int nwilds[MAXWILD];
  258.   static int nstages;
  259. ! char pathbuf[MAXPATH];
  260. ! char fullrep[MAXPATH + 1];
  261.   static char *(start[MAXWILD]);
  262.   static int len[MAXWILD];
  263.   static char hasdot[MAXWILD];
  264. ***************
  265. *** 446,452 ****
  266.   
  267.       init();
  268.       procargs(argc, argv, &frompat, &topat);
  269. !     matchpats(frompat, topat);
  270.       if (!(op & APPEND))
  271.           checkcollisions();
  272.       findorder();
  273. --- 473,479 ----
  274.   
  275.       init();
  276.       procargs(argc, argv, &frompat, &topat);
  277. !     domatch(frompat, topat);
  278.       if (!(op & APPEND))
  279.           checkcollisions();
  280.       findorder();
  281. ***************
  282. *** 616,622 ****
  283.   }
  284.   
  285.   
  286. ! static void matchpats(cfrom, cto)
  287.       char *cfrom, *cto;
  288.   {
  289.       if (cfrom == NULL)
  290. --- 643,649 ----
  291.   }
  292.   
  293.   
  294. ! static void domatch(cfrom, cto)
  295.       char *cfrom, *cto;
  296.   {
  297.       if (cfrom == NULL)
  298. ***************
  299. *** 1381,1392 ****
  300.       flags |= FI_STTAKEN;
  301.   #ifdef SYSV
  302.       if (stat(ffull, &fstat)) {
  303. !         fprintf("Strange, couldn't stat %s.\n", ffull);
  304.           quit();
  305.       }
  306.   #else
  307.       if (lstat(ffull, &fstat)) {
  308. !         fprintf("Strange, couldn't lstat %s.\n", ffull);
  309.           quit();
  310.       }
  311.       if ((flags & FI_INSTICKY) && fstat.st_uid != uid && uid != 0)
  312. --- 1408,1419 ----
  313.       flags |= FI_STTAKEN;
  314.   #ifdef SYSV
  315.       if (stat(ffull, &fstat)) {
  316. !         fprintf(stderr, "Strange, couldn't stat %s.\n", ffull);
  317.           quit();
  318.       }
  319.   #else
  320.       if (lstat(ffull, &fstat)) {
  321. !         fprintf(stderr, "Strange, couldn't lstat %s.\n", ffull);
  322.           quit();
  323.       }
  324.       if ((flags & FI_INSTICKY) && fstat.st_uid != uid && uid != 0)
  325. ***************
  326. *** 1967,1973 ****
  327.                   cnv = LOWER;
  328.                   c = *(++pat);
  329.               }
  330. !             if (c == 'u') {
  331.                   cnv = UPPER;
  332.                   c = *(++pat);
  333.               }
  334. --- 1994,2000 ----
  335.                   cnv = LOWER;
  336.                   c = *(++pat);
  337.               }
  338. !             else if (c == 'u') {
  339.                   cnv = UPPER;
  340.                   c = *(++pat);
  341.               }
  342. ***************
  343. *** 2358,2364 ****
  344.                   if (
  345.                       (op & (COPY | APPEND)) ?
  346.                           copy(p->r_ffrom,
  347. !                             p->r_flags & R_ISALIASED ? aliaslen : -1) :
  348.   #ifndef MSDOS
  349.                       (op & HARDLINK) ?
  350.                           link(pathbuf, fullrep) :
  351. --- 2385,2391 ----
  352.                   if (
  353.                       (op & (COPY | APPEND)) ?
  354.                           copy(p->r_ffrom,
  355. !                             p->r_flags & R_ISALIASED ? aliaslen : -1L) :
  356.   #ifndef MSDOS
  357.                       (op & HARDLINK) ?
  358.                           link(pathbuf, fullrep) :
  359. ***************
  360. *** 2484,2490 ****
  361.   #endif
  362.           while (
  363.               fprintf(stderr, "File name> "),
  364. !             (outfile = fopen(gets(fname), "w")) == NULL
  365.           )
  366.               fprintf(stderr, "Can't open %s.\n", fname);
  367.       }
  368. --- 2511,2517 ----
  369.   #endif
  370.           while (
  371.               fprintf(stderr, "File name> "),
  372. !             (outfile = fopen(mygets(fname, 80), "w")) == NULL
  373.           )
  374.               fprintf(stderr, "Can't open %s.\n", fname);
  375.       }
  376. ***************
  377. *** 2552,2558 ****
  378.           int llen;
  379.           char linkbuf[MAXPATH];
  380.   
  381. !         if ((llen = readlink(pathbuf, linkbuf, MAXPATH - 1)) != 1) {
  382.               linkbuf[llen] = '\0';
  383.               return(symlink(linkbuf, fullrep) || myunlink(pathbuf, p->r_ffrom));
  384.           }
  385. --- 2579,2585 ----
  386.           int llen;
  387.           char linkbuf[MAXPATH];
  388.   
  389. !         if ((llen = readlink(pathbuf, linkbuf, MAXPATH - 1)) >= 0) {
  390.               linkbuf[llen] = '\0';
  391.               return(symlink(linkbuf, fullrep) || myunlink(pathbuf, p->r_ffrom));
  392.           }
  393. ***************
  394. *** 2559,2565 ****
  395.       }
  396.   #endif
  397.   #endif
  398. !     return(copy(p->r_ffrom, -1) || myunlink(pathbuf, p->r_ffrom));
  399.   }
  400.   
  401.   
  402. --- 2586,2592 ----
  403.       }
  404.   #endif
  405.   #endif
  406. !     return(copy(p->r_ffrom, -1L) || myunlink(pathbuf, p->r_ffrom));
  407.   }
  408.   
  409.   
  410. ***************
  411. *** 2595,2601 ****
  412.               ff->fi_mode
  413.   #endif
  414.           ;
  415. !     mode = O_CREAT |
  416.   #ifdef MSDOS
  417.           O_BINARY | (op & ZAPPEND ? O_RDWR : O_WRONLY)
  418.   #else
  419. --- 2622,2636 ----
  420.               ff->fi_mode
  421.   #endif
  422.           ;
  423. ! 
  424. ! #ifdef V7
  425. !     if (
  426. !         !(op & APPEND) ||
  427. !         (((t = open(fullrep, O_RDWR)) < 0 && errno == ENOENT)
  428. !     )
  429. !         t = creat(fullrep, perm);
  430. ! #else
  431. !     mode = O_CREAT | (op & APPEND ? 0 : O_TRUNC) |
  432.   #ifdef MSDOS
  433.           O_BINARY | (op & ZAPPEND ? O_RDWR : O_WRONLY)
  434.   #else
  435. ***************
  436. *** 2602,2624 ****
  437.           O_WRONLY
  438.   #endif
  439.           ;
  440. !     if (!(op & APPEND))
  441. !         mode |= O_TRUNC;
  442. !     if ((t = open(fullrep, mode, perm)) < 0) {
  443.           close(f);
  444.           return(-1);
  445.       }
  446.       if (op & APPEND)
  447. !         lseek(t, 0, 2);
  448.   #ifdef MSDOS
  449.       if (op & ZAPPEND && filelength(t) != 0) {
  450. !         if (lseek(t, -1, 1) == -1L || read(t, &c, 1) != 1) {
  451.               close(f);
  452.               close(t);
  453.               return(-1);
  454.           }
  455.           if (c == 26)
  456. !             lseek(t, -1, 1);
  457.       }
  458.   #endif
  459.       if ((op & APPEND) && len != -1L) {
  460. --- 2637,2659 ----
  461.           O_WRONLY
  462.   #endif
  463.           ;
  464. !     t = open(fullrep, mode, perm);
  465. ! #endif
  466. !     if (t < 0) {
  467.           close(f);
  468.           return(-1);
  469.       }
  470.       if (op & APPEND)
  471. !         lseek(t, 0L, 2);
  472.   #ifdef MSDOS
  473.       if (op & ZAPPEND && filelength(t) != 0) {
  474. !         if (lseek(t, -1L, 1) == -1L || read(t, &c, 1) != 1) {
  475.               close(f);
  476.               close(t);
  477.               return(-1);
  478.           }
  479.           if (c == 26)
  480. !             lseek(t, -1L, 1);
  481.       }
  482.   #endif
  483.       if ((op & APPEND) && len != -1L) {
  484. ***************
  485. *** 2822,2827 ****
  486. --- 2857,2880 ----
  487.       if (lastc == EOF)
  488.           return(EOF);
  489.       return(lastc = getchar());
  490. + }
  491. + 
  492. + 
  493. + static char *mygets(s, l)
  494. +     char *s;
  495. +     int l;
  496. + {
  497. +     char *nl;
  498. + 
  499. +     for (;;) {
  500. +         if (fgets(s, l, stdin) == NULL)
  501. +             return(NULL);
  502. +         if ((nl = strchr(s, '\n')) != NULL)
  503. +             break;
  504. +         fprintf(stderr, "Input string too long. Try again> ");
  505. +     }
  506. +     *nl = '\0';
  507. +     return(s);
  508.   }
  509.   
  510.   
  511.  
  512. exit 0 # Just in case...
  513. -- 
  514. Please send comp.sources.unix-related mail to rsalz@uunet.uu.net.
  515. Use a domain-based address or give alternate paths, or you may lose out.
  516.