home *** CD-ROM | disk | FTP | other *** search
/ Mega CD-ROM 1 / megacd_rom_1.zip / megacd_rom_1 / GNUISH / FUTIL14.ZIP / PATCHES < prev    next >
Text File  |  1990-09-24  |  118KB  |  4,473 lines
  1. *** e:\tmp/RCSt1006574    Wed Sep 19 13:27:44 1990
  2. --- argmatch.c    Wed Sep 19 12:36:14 1990
  3. ***************
  4. *** 17,26 ****
  5. --- 17,43 ----
  6.   
  7.   /* Written by David MacKenzie <djm@ai.mit.edu> */
  8.   
  9. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  10. +    This port is also distributed under the terms of the
  11. +    GNU General Public License as published by the
  12. +    Free Software Foundation.
  13. + 
  14. +    Please note that this file is not identical to the
  15. +    original GNU release, you should have received this
  16. +    code as patch to the official release.
  17. + 
  18. +    $Header: e:/gnu/fileutil/RCS/argmatch.c 1.4.0.2 90/09/19 12:27:25 tho Exp $
  19. +  */
  20. + 
  21.   #include <stdio.h>
  22.   #ifdef STDC_HEADERS
  23.   #include <string.h>
  24.   #endif
  25. + 
  26. + #ifdef MSDOS
  27. + int argmatch (char *arg, char **optlist);
  28. + void invalid_arg (char *kind, char *value, int problem);
  29. + #endif /* MSDOS */
  30.   
  31.   extern char *program_name;
  32.   
  33. *** e:\tmp/RCSt1006574    Wed Sep 19 13:27:46 1990
  34. --- backupfi.c    Wed Sep 19 12:36:34 1990
  35. ***************
  36. *** 17,23 ****
  37. --- 17,36 ----
  38.   
  39.   /* David MacKenzie <djm@ai.mit.edu>.
  40.      Some algorithms adapted from GNU Emacs. */
  41. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  42. +    This port is also distributed under the terms of the
  43. +    GNU General Public License as published by the
  44. +    Free Software Foundation.
  45.   
  46. +    Please note that this file is not identical to the
  47. +    original GNU release, you should have received this
  48. +    code as patch to the official release.  */
  49. + 
  50. + #ifdef MSDOS
  51. + static char RCS_Id[] =
  52. +   "$Header: e:/gnu/fileutil/RCS/backupfi.c 1.4.0.2 90/09/19 12:27:27 tho Exp $";
  53. + #endif /* MSDOS */
  54. + 
  55.   #include <stdio.h>
  56.   #include <ctype.h>
  57.   #include <sys/types.h>
  58. ***************
  59. *** 59,64 ****
  60. --- 72,89 ----
  61.   char *malloc ();
  62.   #endif
  63.   
  64. + #ifdef MSDOS
  65. + extern char *find_backup_file_name (char *file);
  66. + static int max_backup_version (char *file, char *dir);
  67. + static char *make_version_name (char *file, int version);
  68. + static int version_number (char *base, char *backup, int base_length);
  69. + static char *dirname (char *path);
  70. + static char *basename (char *name);
  71. + static char *concat (char *str1, char *str2);
  72. + static char *copystring (char *str);
  73. + static char *chop_filename (char *path, int n);
  74. + #endif /* MSDOS */
  75. + 
  76.   /* Which type of backup file names are generated. */
  77.   enum backup_type backup_type = none;
  78.   
  79. ***************
  80. *** 131,137 ****
  81. --- 156,166 ----
  82.   
  83.     while ((dp = readdir (dirp)) != 0)
  84.       {
  85. + #ifdef MSDOS
  86. +       if (NLENGTH (dp) <= file_name_length)
  87. + #else /* not MSDOS */
  88.         if (dp->d_ino == 0 || NLENGTH (dp) <= file_name_length)
  89. + #endif /* not MSDOS */
  90.       continue;
  91.         
  92.         this_version = version_number (file, dp->d_name, file_name_length);
  93. ***************
  94. *** 142,147 ****
  95. --- 171,180 ----
  96.     return highest_version;
  97.   }
  98.   
  99. + #ifdef MSDOS
  100. + static char suffix[5];
  101. + #endif /* not MSDOS */
  102. + 
  103.   /* Return a string, allocated with malloc, containing
  104.      "FILE.~VERSION~".  Return 0 if out of memory. */
  105.   
  106. ***************
  107. *** 150,155 ****
  108. --- 183,192 ----
  109.        char *file;
  110.        int version;
  111.   {
  112. + #ifdef MSDOS
  113. +   sprintf (suffix, ".~%.1d~", version);
  114. +   return concat (file, suffix);
  115. + #else /* not MSDOS */
  116.     char *backup_name;
  117.   
  118.     backup_name = malloc (strlen (file) + 16);
  119. ***************
  120. *** 157,162 ****
  121. --- 194,200 ----
  122.       return 0;
  123.     sprintf (backup_name, "%s.~%d~", file, version);
  124.     return backup_name;
  125. + #endif /* not MSDOS */
  126.   }
  127.   
  128.   /* If BACKUP is a numbered backup of BASE, return its version number;
  129. ***************
  130. *** 171,183 ****
  131.   {
  132.     int version;
  133.     char *p;
  134. !   
  135.     version = 0;
  136.     if (!strncmp (base, backup, base_length) && ISDIGIT (backup[base_length]))
  137.       {
  138.         for (p = &backup[base_length]; ISDIGIT (*p); ++p)
  139.       version = version * 10 + *p - '0';
  140.         if (p[0] != '~' || p[1])
  141.       version = 0;
  142.       }
  143.     return version;
  144. --- 209,225 ----
  145.   {
  146.     int version;
  147.     char *p;
  148. ! 
  149.     version = 0;
  150.     if (!strncmp (base, backup, base_length) && ISDIGIT (backup[base_length]))
  151.       {
  152.         for (p = &backup[base_length]; ISDIGIT (*p); ++p)
  153.       version = version * 10 + *p - '0';
  154. + #ifdef MSDOS
  155. +       if (*p && *p != '~')
  156. + #else /* not MSDOS */
  157.         if (p[0] != '~' || p[1])
  158. + #endif /* not MSDOS */
  159.       version = 0;
  160.       }
  161.     return version;
  162. ***************
  163. *** 231,241 ****
  164. --- 273,300 ----
  165.     char *newstr;
  166.     char str1_length = strlen (str1);
  167.   
  168. + #ifdef MSDOS
  169. +   /* The MS-DOS version tries to squeeze the given string into a valid
  170. +      MS-DOS patch name.  STR1 is chopped and a leading period is removed
  171. +      from STR2.  Kludge: a leading period is counted in the length of STR2,
  172. +      this is because we will know, that in this case a digit will be appended
  173. +      afterwards.  */
  174. +   /* chop_filename () might add a '.', so allocate one more byte.  */
  175. +   newstr = malloc (str1_length + strlen (str2) + 2);
  176. +   if (newstr == 0)
  177. +     return 0;
  178. +   strcpy (newstr, str1);
  179. +   chop_filename (newstr, min (2, strlen(str2)));
  180. +   if (*str2 == '.')
  181. +     str2++;
  182. +   strcat (newstr, str2);
  183. + #else /* not MSDOS */
  184.     newstr = malloc (str1_length + strlen (str2) + 1);
  185.     if (newstr == 0)
  186.       return 0;
  187.     strcpy (newstr, str1);
  188.     strcpy (newstr + str1_length, str2);
  189. + #endif /* not MSDOS */
  190.     return newstr;
  191.   }
  192.   
  193. ***************
  194. *** 253,255 ****
  195. --- 312,343 ----
  196.     strcpy (newstr, str);
  197.     return newstr;
  198.   }
  199. + 
  200. + 
  201. + #ifdef MSDOS
  202. + /* Shorten a MS-DOS path to accomodate a backup suffix.  */
  203. + 
  204. + char *
  205. + chop_filename (char *path, int n)
  206. + {
  207. +   char *base;
  208. +   char *suffix;
  209. + 
  210. +   base = strrchr (path, '/');
  211. +   if (base == (char *)0)
  212. +     base = path;
  213. +   else
  214. +     base++;
  215. + 
  216. +   suffix = strchr (base, '.');
  217. +   if (suffix == (char *)0)
  218. +     strcat (base, ".");        /* is ok, since we have allocated enough! */
  219. +   else if (strlen (suffix) >= 4 - n)
  220. +     suffix[4-n] = '\0';
  221. + 
  222. +   return path;
  223. + }
  224. + #endif /* MSDOS */
  225. + 
  226. + 
  227. + 
  228. *** e:\tmp/RCSt1006574    Wed Sep 19 13:27:50 1990
  229. --- cat.c    Wed Sep 19 12:31:34 1990
  230. ***************
  231. *** 14,19 ****
  232. --- 14,44 ----
  233.      You should have received a copy of the GNU General Public License
  234.      along with this program; if not, write to the Free Software
  235.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  236. + 
  237. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  238. +    This port is also distributed under the terms of the
  239. +    GNU General Public License as published by the
  240. +    Free Software Foundation.
  241. + 
  242. +    Please note that this file is not identical to the
  243. +    original GNU release, you should have received this
  244. +    code as patch to the official release.  */
  245. + 
  246. + #ifdef MSDOS
  247. + static char RCS_Id[] =
  248. +   "$Header: e:/gnu/fileutil/RCS/cat.c 1.4.0.2 90/09/19 11:17:40 tho Exp $";
  249. + 
  250. + static char Program_Id[] = "cat";
  251. + static char RCS_Revision[] = "$Revision: 1.4.0.2 $";
  252. + 
  253. + #define VERSION \
  254. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  255. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  256. + 
  257. + #define COPYING \
  258. +   "This is free software, distributed under the terms of the\n" \
  259. +   "GNU General Public License.  For details, see the file COPYING.\n"
  260. + #endif /* MSDOS */
  261.   
  262.   /* Differences from the Unix cat:
  263.      * Always unbuffered, -u is ignored.
  264. ***************
  265. *** 27,34 ****
  266. --- 52,61 ----
  267.   #include <errno.h>
  268.   #include <sys/types.h>
  269.   #ifndef _POSIX_SOURCE
  270. + #ifndef MSDOS
  271.   #include <sys/ioctl.h>
  272.   #endif
  273. + #endif
  274.   #include "system.h"
  275.   
  276.   #ifdef STDC_HEADERS
  277. ***************
  278. *** 40,49 ****
  279.   extern int errno;
  280.   #endif
  281.   
  282. ! #define max(h,i) ((h) > (i) ? (h) : (i))
  283.   
  284. ! typedef unsigned char uchar;
  285.   
  286.   char *copystring ();
  287.   void cat ();
  288.   void error ();
  289. --- 67,92 ----
  290.   extern int errno;
  291.   #endif
  292.   
  293. ! #ifdef MSDOS
  294.   
  295. ! #include <string.h>
  296. ! #include <fcntl.h>
  297. ! #include <malloc.h>
  298. ! #include <io.h>
  299. ! 
  300. ! extern void main (int, char **);
  301. ! extern void error (int status, int errnum, char *message, ...);
  302. ! extern void usage (char *);
  303. ! extern void simple_cat (unsigned char *, int);
  304. ! extern void cat (unsigned char *, int, unsigned char *,\
  305. !          int, int, int, int, int, int, int);
  306. ! extern void next_line_num (void);
  307. ! extern char *copystring (char *, char *);
  308. ! 
  309. ! #else /* not MSDOS */
  310.   
  311. + #define max(h,i) ((h) > (i) ? (h) : (i))
  312. + 
  313.   char *copystring ();
  314.   void cat ();
  315.   void error ();
  316. ***************
  317. *** 50,55 ****
  318. --- 93,102 ----
  319.   void next_line_num ();
  320.   void simple_cat ();
  321.   
  322. + #endif /* not MSDOS */
  323. + 
  324. + typedef unsigned char uchar;
  325. + 
  326.   /* Name under which this program was invoked.  */
  327.   char *program_name;
  328.   
  329. ***************
  330. *** 89,98 ****
  331. --- 136,152 ----
  332.     if (reason != NULL)
  333.       fprintf (stderr, "%s: %s\n", program_name, reason);
  334.   
  335. + #ifdef MSDOS
  336. +   fprintf (stderr, "\
  337. + Usage: %s [-benstuvABET] [+number] [+number-nonblank] [+squeeze-blank]\n\
  338. +        [+show-nonprinting] [+show-ends] [+show-tabs] [+show-all] [+binary]\n\
  339. +        [+copying] [+version] [file...]\n", program_name);
  340. + #else /* not MSDOS */
  341.     fprintf (stderr, "\
  342.   Usage: %s [-benstuvAET] [+number] [+number-nonblank] [+squeeze-blank]\n\
  343.          [+show-nonprinting] [+show-ends] [+show-tabs] [+show-all] [file...]\n",
  344.          program_name);
  345. + #endif /* not MSDOS */
  346.   
  347.     exit (2);
  348.   }
  349. ***************
  350. *** 140,148 ****
  351. --- 194,210 ----
  352.     int output_tabs = 1;
  353.     int options = 0;
  354.     int longind;
  355. + #ifdef MSDOS
  356. +   int binary = 0;
  357. + #endif
  358.   
  359.     static struct option long_options[] =
  360.     {
  361. + #ifdef MSDOS
  362. +     {"binary", 0, NULL, 'B'},
  363. +     {"copying", 0, NULL, 30},
  364. +     {"version", 0, NULL, 31},
  365. + #endif
  366.       {"number-nonblank", 0, NULL, 'b'},
  367.       {"number", 0, NULL, 'n'},
  368.       {"squeeze-blank", 0, NULL, 's'},
  369. ***************
  370. *** 157,163 ****
  371. --- 219,229 ----
  372.   
  373.     /* Parse command line options.  */
  374.   
  375. + #ifdef MSDOS
  376. +   while ((c = getopt_long (argc, argv, "benstuvABET", long_options, &longind))
  377. + #else
  378.     while ((c = getopt_long (argc, argv, "benstuvAET", long_options, &longind))
  379. + #endif
  380.        != EOF)
  381.       {
  382.         options++;
  383. ***************
  384. *** 201,206 ****
  385. --- 267,289 ----
  386.         output_tabs = 0;
  387.         break;
  388.   
  389. + #ifdef MSDOS
  390. +     case 'B':
  391. +       binary++;
  392. +       options--;    /* stdout will be binary iff no other option!  */
  393. +       break;
  394. + 
  395. +     case 30:
  396. +       fprintf (stderr, COPYING);
  397. +       exit (0);
  398. +       break;
  399. + 
  400. +     case 31:
  401. +       fprintf (stderr, VERSION);
  402. +       exit (0);
  403. +       break;
  404. + #endif
  405. + 
  406.       case 'E':
  407.         mark_line_ends = 1;
  408.         break;
  409. ***************
  410. *** 263,268 ****
  411. --- 346,363 ----
  412.           }
  413.       }
  414.   
  415. + #ifdef MSDOS
  416. +       if (binary)
  417. +     {
  418. +       setmode (input_desc, O_BINARY);
  419. + 
  420. +       /* We will not set the output to binary mode if we have
  421. +          another (verbose) option active.  */
  422. +       if (options == 0)
  423. +         setmode (output_desc, O_BINARY);
  424. +     }
  425. + #endif
  426. + 
  427.         if (fstat (input_desc, &stat_buf) < 0)
  428.       {
  429.         error (0, errno, "%s", infile);
  430. ***************
  431. *** 299,304 ****
  432. --- 394,402 ----
  433.       }
  434.         else
  435.       {
  436. + #ifdef MSDOS            /* the user wants it slow, he can get it! */
  437. +       insize = outsize = 0x1000;
  438. + #endif
  439.         inbuf = (uchar *) malloc (insize + 1);
  440.         if (inbuf == NULL)
  441.           error (1, 0, "virtual memory exhausted");
  442. *** e:\tmp/RCSt1006574    Wed Sep 19 13:27:52 1990
  443. --- chmod.c    Wed Sep 19 12:32:40 1990
  444. ***************
  445. *** 15,20 ****
  446. --- 15,45 ----
  447.      along with this program; if not, write to the Free Software
  448.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  449.   
  450. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  451. +    This port is also distributed under the terms of the
  452. +    GNU General Public License as published by the
  453. +    Free Software Foundation.
  454. + 
  455. +    Please note that this file is not identical to the
  456. +    original GNU release, you should have received this
  457. +    code as patch to the official release.  */
  458. + 
  459. + #ifdef MSDOS
  460. + static char RCS_Id[] =
  461. +   "$Header: e:/gnu/fileutil/RCS/chmod.c 1.4.0.2 90/09/19 11:17:44 tho Exp $";
  462. + 
  463. + static char Program_Id[] = "chmod";
  464. + static char RCS_Revision[] = "$Revision: 1.4.0.2 $";
  465. + 
  466. + #define VERSION \
  467. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  468. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  469. + 
  470. + #define COPYING \
  471. +   "This is free software, distributed under the terms of the\n" \
  472. +   "GNU General Public License.  For details, see the file COPYING.\n"
  473. + #endif /* MSDOS */
  474. + 
  475.   /* Usage: chmod [-Rcdfv] mode file...
  476.             mode is [ugoa...][[+-=][rwxXstugo...]...][,...] or octal number.
  477.   
  478. ***************
  479. *** 44,49 ****
  480. --- 69,99 ----
  481.   extern int errno;
  482.   #endif
  483.   
  484. + #ifdef MSDOS
  485. + 
  486. + #include <malloc.h>
  487. + #include <io.h>
  488. + 
  489. + #define lstat stat
  490. + 
  491. + extern void main (int argc, char **argv);
  492. + extern void filemodestring (struct stat *,char *);
  493. + extern void error (int status, int errnum, char *message, ...);
  494. + extern void mode_string (unsigned short mode, char *str);
  495. + 
  496. + static int change_file_mode (char *file, struct mode_change *changes);
  497. + static int change_dir_mode (char *dir, struct mode_change *changes,\
  498. +                 struct stat *statp);
  499. + extern char *savedir (char *dir, unsigned name_size);
  500. + static char *stpcpy (char *dest, char *source);
  501. + static void describe_change (char *file, unsigned short mode, int changed);
  502. + static char *xmalloc (unsigned int n);
  503. + static char *xrealloc (char *p, unsigned n);
  504. + static char *stp_cpy (char *dest, char *source);
  505. + static void usage (void);
  506. + 
  507. + #else /* not MSDOS */
  508. + 
  509.   int lstat ();
  510.   int stat ();
  511.   
  512. ***************
  513. *** 57,62 ****
  514. --- 107,114 ----
  515.   void mode_string ();
  516.   void usage ();
  517.   
  518. + #endif /* not MSDOS */
  519. + 
  520.   typedef enum
  521.   {
  522.     false = 0, true = 1
  523. ***************
  524. *** 78,84 ****
  525. --- 130,140 ----
  526.   boolean changes_only;
  527.   
  528.   /* A pointer to either lstat or stat. */
  529. + #ifdef MSDOS
  530. + int (*xstat) (char *, struct stat *);
  531. + #else
  532.   int (*xstat) ();
  533. + #endif
  534.   
  535.   /* Parse the ASCII mode given on the command line into a linked list
  536.      of `struce mode_change' and apply that to each file argument. */
  537. ***************
  538. *** 103,109 ****
  539. --- 159,169 ----
  540.       {
  541.         thisind = optind ? optind : 1;
  542.   
  543. + #ifdef MSDOS
  544. +       c = getopt (argc, argv, "RcdfvrwxXstugoa,+-=CV");
  545. + #else
  546.         c = getopt (argc, argv, "RcdfvrwxXstugoa,+-=");
  547. + #endif
  548.         if (c == EOF)
  549.       break;
  550.   
  551. ***************
  552. *** 143,148 ****
  553. --- 203,218 ----
  554.       case 'v':
  555.         verbose = true;
  556.         break;
  557. + #ifdef MSDOS
  558. +     case 'C':
  559. +       fprintf (stderr, COPYING);
  560. +       exit (0);
  561. +       break;
  562. +     case 'V':
  563. +       fprintf (stderr, VERSION);
  564. +       exit (0);
  565. +       break;
  566. + #endif
  567.       default:
  568.         usage ();
  569.       }
  570. ***************
  571. *** 314,322 ****
  572. --- 384,399 ----
  573.   void
  574.   usage ()
  575.   {
  576. + #ifdef MSDOS
  577. +   fprintf (stderr, "\
  578. + Usage: %s [-RcdfvCV] mode file...\n\
  579. +        mode is [ugoa...][[+-=][rwxXstugo...]...][,...] or octal number\n",
  580. +        program_name);
  581. + #else /* not MSDOS */
  582.     fprintf (stderr, "\
  583.   Usage: %s [-Rcdfv] mode file...\n\
  584.          mode is [ugoa...][[+-=][rwxXstugo...]...][,...] or octal number\n",
  585.          program_name);
  586. + #endif /* not MSDOS */
  587.     exit (1);
  588.   }
  589. *** e:\tmp/RCSt1006574    Wed Sep 19 13:27:54 1990
  590. --- cmp.c    Wed Sep 19 12:34:26 1990
  591. ***************
  592. *** 14,19 ****
  593. --- 14,44 ----
  594.      You should have received a copy of the GNU General Public License
  595.      along with this program; if not, write to the Free Software
  596.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  597. + 
  598. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  599. +    This port is also distributed under the terms of the
  600. +    GNU General Public License as published by the
  601. +    Free Software Foundation.
  602. + 
  603. +    Please note that this file is not identical to the
  604. +    original GNU release, you should have received this
  605. +    code as patch to the official release.  */
  606. + 
  607. + #ifdef MSDOS
  608. + static char RCS_Id[] =
  609. +   "$Header: e:/gnu/fileutil/RCS/cmp.c 1.4.0.2 90/09/19 11:17:46 tho Exp $";
  610. + 
  611. + static char Program_Id[] = "cmp";
  612. + static char RCS_Revision[] = "$Revision: 1.4.0.2 $";
  613. + 
  614. + #define VERSION \
  615. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  616. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  617. + 
  618. + #define COPYING \
  619. +   "This is free software, distributed under the terms of the\n" \
  620. +   "GNU General Public License.  For details, see the file COPYING.\n"
  621. + #endif /* MSDOS */
  622.   
  623.   /* Differences from the Unix cmp:
  624.      * 6 - 40 - oo times faster.
  625. ***************
  626. *** 38,43 ****
  627. --- 63,82 ----
  628.   extern int errno;
  629.   #endif
  630.   
  631. + #ifdef MSDOS
  632. + #include <io.h>
  633. + #include <gnulib.h>
  634. + 
  635. + extern void main (int, char **);
  636. + extern void usage (char *);
  637. + extern void cmp (void);
  638. + extern int bcmp2 (char *, char *);
  639. + extern int bcmp_cnt (int *count, char *p1, char *p2, unsigned char c);
  640. + extern int bread (int, char *, int);
  641. + extern void printc (FILE *fs, int width, unsigned int c);
  642. + 
  643. + #else /* not MSDOS */
  644. + 
  645.   #define max(h, i)    ((h) > (i) ? (h) : (i))
  646.   #define min(l, o)    ((l) < (o) ? (l) : (o))
  647.   
  648. ***************
  649. *** 48,53 ****
  650. --- 87,94 ----
  651.   void printc ();
  652.   void error ();
  653.   
  654. + #endif /* not MSDOS */
  655. + 
  656.   /* Name under which this program was invoked.  */
  657.   
  658.   char *program_name;
  659. ***************
  660. *** 83,88 ****
  661. --- 124,133 ----
  662.   
  663.   struct option long_options[] =
  664.   {
  665. + #ifdef MSDOS
  666. +   {"copying", 0, NULL, 30},
  667. +   {"version", 0, NULL, 31},
  668. + #endif
  669.     {"show-chars", 0, &flag_print_chars, 1},
  670.     {"silent", 0, &flag, 's'},
  671.     {"quiet", 0, &flag, 's'},
  672. ***************
  673. *** 97,105 ****
  674. --- 142,157 ----
  675.     if (reason != NULL)
  676.       fprintf (stderr, "%s: %s\n", program_name, reason);
  677.   
  678. + #ifdef MSDOS
  679. +   fprintf (stderr, "\
  680. + Usage: %s [-cls] [+show-chars] [+verbose] [+silent] [+quiet]\n\
  681. +            [+copying] [+version] file1 [file2]\n",
  682. +        program_name);
  683. + #else /* not MSDOS */
  684.     fprintf (stderr, "\
  685.   Usage: %s [-cls] [+show-chars] [+verbose] [+silent] [+quiet] file1 [file2]\n",
  686.          program_name);
  687. + #endif /* not MSDOS */
  688.   
  689.     exit (2);
  690.   }
  691. ***************
  692. *** 139,144 ****
  693. --- 191,208 ----
  694.       flag = c;
  695.       break;
  696.   
  697. + #ifdef MSDOS
  698. +       case 30:
  699. +     fprintf (stderr, COPYING);
  700. +     exit (0);
  701. +     break;
  702. + 
  703. +       case 31:
  704. +     fprintf (stderr, VERSION);
  705. +     exit (0);
  706. +     break;
  707. + #endif
  708. + 
  709.         default:
  710.       usage ((char *) 0);
  711.         }
  712. ***************
  713. *** 233,238 ****
  714. --- 297,307 ----
  715.     if (buf1 == NULL || buf2 == NULL)
  716.       error (2, 0, "virtual memory exhausted");
  717.   
  718. + #ifdef MSDOS
  719. +   setmode (file1_desc, O_BINARY);
  720. +   setmode (file2_desc, O_BINARY);
  721. + #endif
  722. + 
  723.     cmp ();
  724.   }
  725.   
  726. ***************
  727. *** 426,431 ****
  728. --- 495,501 ----
  729.     return p1c - p1;
  730.   }
  731.   
  732. + 
  733.   /* Compare two blocks of memory P1 and P2 until they differ.
  734.      Assumes that P1 and P2 are aligned at long addresses!
  735.      If the blocks are not guaranteed to be different, put sentinels at the ends
  736. ***************
  737. *** 508,514 ****
  738. --- 578,589 ----
  739.         --width;
  740.       }
  741.   
  742. + #ifdef MSDOS
  743. +   putc ((int) c, fs);
  744. + #else
  745.     putc (c, fs);
  746. + #endif
  747. + 
  748.     while (--width > 0)
  749.       putc (' ', fs);
  750.   }
  751. *** e:\tmp/RCSt1006574    Wed Sep 19 13:27:58 1990
  752. --- cp-aux.c    Wed Sep 19 12:37:08 1990
  753. ***************
  754. *** 18,23 ****
  755. --- 18,35 ----
  756.       Written by Torbjorn Granlund, Sweden (tege@sics.se).
  757.   */
  758.   
  759. + /*  MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  760. +     This port is also distributed under the terms of the
  761. +     GNU General Public License as published by the
  762. +     Free Software Foundation.
  763. + 
  764. +     Please note that this file is not identical to the
  765. +     original GNU release, you should have received this
  766. +     code as patch to the official release.
  767. + 
  768. +     $Header: e:/gnu/fileutil/RCS/cp-aux.c 1.4.0.2 90/09/19 11:18:11 tho Exp $
  769. +  */
  770. + 
  771.   #include <stdio.h>
  772.   
  773.   #include "cp.h"
  774. ***************
  775. *** 31,36 ****
  776. --- 43,63 ----
  777.     if (reason != NULL)
  778.       fprintf (stderr, "%s: %s\n", program_name, reason);
  779.   
  780. + #ifdef MSDOS
  781. +   fprintf (stderr, "\
  782. + Usage: %s [-bdfipruvxR] [-S backup-suffix] [-V {numbered,existing,simple}]\n\
  783. +        [+backup] [+no-dereference] [+force] [+interactive] [+one-file-system]\n\
  784. +        [+preserve] [+recursive] [+update] [+verbose] [+suffix backup-suffix]\n\
  785. +        [+version-control {numbered,existing,simple}] [+copying] [+version]\n\
  786. +        source dest\n\
  787. + \n\
  788. +        %s [-bdfipruvxR] [-S backup-suffix] [-V {numbered,existing,simple}]\n\
  789. +        [+backup] [+no-dereference] [+force] [+interactive] [+one-file-system]\n\
  790. +        [+preserve] [+recursive] [+update] [+verbose] [+suffix backup-suffix]\n\
  791. +        [+version-control {numbered,existing,simple}] [+copying] [+version]\n\
  792. +        source... directory\n",
  793. +        program_name, program_name);
  794. + #else /* not MSDOS */
  795.     fprintf (stderr, "\
  796.   Usage: %s [-bdfipruvxR] [-S backup-suffix] [-V {numbered,existing,simple}]\n\
  797.          [+backup] [+no-dereference] [+force] [+interactive] [+one-file-system]\n\
  798. ***************
  799. *** 42,51 ****
  800. --- 69,82 ----
  801.          [+preserve] [+recursive] [+update] [+verbose] [+suffix backup-suffix]\n\
  802.          [+version-control {numbered,existing,simple}] source... directory\n",
  803.          program_name, program_name);
  804. + #endif /* not MSDOS */
  805.   
  806.     exit (2);
  807.   }
  808.   
  809. + /* Use the one from gnulib */
  810. + #ifndef MSDOS
  811. + 
  812.   char *
  813.   xmalloc (size)
  814.        unsigned size;
  815. ***************
  816. *** 67,72 ****
  817. --- 98,105 ----
  818.     return x;
  819.   }
  820.   
  821. + #endif /* not MSDOS */
  822. + 
  823.   char *
  824.   stpcpy (s1, s2)
  825.        char *s1;
  826. ***************
  827. *** 89,94 ****
  828. --- 122,130 ----
  829.     return c == 'y' || c == 'Y';
  830.   }
  831.   
  832. + 
  833. + #ifndef MSDOS            /* no links ... */
  834. + 
  835.   int
  836.   is_ancestor (sb, ancestors)
  837.        struct stat *sb;
  838. ***************
  839. *** 103,108 ****
  840. --- 139,145 ----
  841.     return 0;
  842.   }
  843.   
  844. + 
  845.   /* Remove trailing slashes from PATH; they cause some system calls to fail. */
  846.   
  847.   void
  848. ***************
  849. *** 115,117 ****
  850. --- 152,166 ----
  851.     while (last > 0 && path[last] == '/')
  852.       path[last--] = '\0';
  853.   }
  854. + 
  855. + #else /* MSDOS */
  856. + 
  857. + void
  858. + strip_trailing_slashes (char **path)
  859. + {
  860. +   char *new_path = _fullpath (NULL, *path, 0);
  861. +   free (*path);
  862. +   *path = msdos_format_filename (new_path);
  863. + }
  864. + 
  865. + #endif /* MSDOS */
  866. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:00 1990
  867. --- cp.c    Wed Sep 19 12:35:14 1990
  868. ***************
  869. *** 17,22 ****
  870. --- 17,45 ----
  871.   
  872.       Written by Torbjorn Granlund and David MacKenzie. */
  873.   
  874. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  875. +    This port is also distributed under the terms of the
  876. +    GNU General Public License as published by the
  877. +    Free Software Foundation.
  878. + 
  879. +    Please note that this file is not identical to the
  880. +    original GNU release, you should have received this
  881. +    code as patch to the official release.  */
  882. + 
  883. + static char RCS_Id[] =
  884. +   "$Header: e:/gnu/fileutil/RCS/cp.c 1.4.0.2 90/09/19 11:18:06 tho Exp $";
  885. + 
  886. + static char Program_Id[] = "cp";
  887. + static char RCS_Revision[] = "$Revision: 1.4.0.2 $";
  888. + 
  889. + #define VERSION \
  890. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  891. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  892. + 
  893. + #define COPYING \
  894. +   "This is free software, distributed under the terms of the\n" \
  895. +   "GNU General Public License.  For details, see the file COPYING.\n"
  896. + 
  897.   /* Yet to be done:
  898.   
  899.    * Symlink translation. */
  900. ***************
  901. *** 26,31 ****
  902. --- 49,70 ----
  903.   #include "cp.h"
  904.   #include "backupfile.h"
  905.   
  906. + #ifdef MSDOS
  907. + #include <assert.h>
  908. + 
  909. + extern enum backup_type get_version (char *version);
  910. + extern char *savedir (char *dir, unsigned name_size);
  911. + 
  912. + #define strip_trailing_slashes(path)    strip_trailing_slashes (&path)
  913. + #define is_ancestor(statb, ancestors)    0
  914. + #define hash_init(module, size)
  915. + #define remember_copied(path, ino, dev)    NULL
  916. + #define remember_created(path)        0
  917. + #define forget_all()
  918. + char new_file;
  919. + 
  920. + #endif
  921. + 
  922.   #ifdef MKFIFO_MISSING
  923.   /* This definition assumes that MODE has the S_IFIFO bit set. */
  924.   #define mkfifo(path, mode) (mknod ((path), (mode), 0))
  925. ***************
  926. *** 42,48 ****
  927. --- 81,91 ----
  928.   
  929.   /* A pointer to either lstat or stat, depending on
  930.      whether dereferencing of symlinks is done.  */
  931. + #ifdef MSDOS
  932. + int (*xstat) (char *, struct stat *);
  933. + #else
  934.   int (*xstat) ();
  935. + #endif
  936.   
  937.   /* The invocation name of this program.  */
  938.   char *program_name;
  939. ***************
  940. *** 87,92 ****
  941. --- 130,139 ----
  942.   
  943.   struct option long_opts[] =
  944.   {
  945. + #ifdef MSDOS
  946. +   {"copying", 0, NULL, 30},
  947. +   {"version", 0, NULL, 31},
  948. + #endif
  949.     {"backup", 0, NULL, 'b'},
  950.     {"force", 0, NULL, 'f'},
  951.     {"interactive", 0, NULL, 'i'},
  952. ***************
  953. *** 123,129 ****
  954. --- 170,180 ----
  955.        that created directories can be written, even if it would not
  956.        have been allowed with the mask this process was started with.  */
  957.   
  958. + #ifdef MSDOS            /* not 100%ly correct ... */
  959. +   umask_kill = 07777 ^ umask (0);
  960. + #else
  961.     umask_kill = 0777777 ^ umask (0);
  962. + #endif
  963.   
  964.     while ((c = getopt_long (argc, argv, "bdfipruvxRS:V:", long_opts, &ind))
  965.        != EOF)
  966. ***************
  967. *** 185,190 ****
  968. --- 236,253 ----
  969.         version = optarg;
  970.         break;
  971.   
  972. + #ifdef MSDOS
  973. +     case 30:
  974. +       fprintf (stderr, COPYING);
  975. +       exit (0);
  976. +       break;
  977. + 
  978. +     case 31:
  979. +       fprintf (stderr, VERSION);
  980. +       exit (0);
  981. +       break;
  982. + #endif
  983. + 
  984.       default:
  985.         usage ((char *) 0);
  986.       }
  987. ***************
  988. *** 194,200 ****
  989. --- 257,267 ----
  990.       backup_type = get_version (version);
  991.   
  992.     if (flag_preserve == 1)
  993. + #ifdef MSDOS            /* not 100%ly correct ... */
  994. +     umask_kill = 07777;
  995. + #else
  996.       umask_kill = 0777777;
  997. + #endif
  998.   
  999.     /* The key difference between -d (+no-dereference) and not is the version
  1000.        of `stat' to call.  */
  1001. ***************
  1002. *** 280,285 ****
  1003. --- 347,359 ----
  1004.         else
  1005.           ap++;
  1006.         dst_path = xmalloc (strlen (target) + strlen (ap) + 2);
  1007. + #ifdef MSDOS
  1008. +       /* Here a trailing slash might still be present (needed for
  1009. +          stat()'ing root directories), take care of that. */
  1010. +       if (target[strlen(target) - 1] == '/')
  1011. +         stpcpy (stpcpy (dst_path, target), ap);
  1012. +       else
  1013. + #endif /* MSDOS */
  1014.         stpcpy (stpcpy (stpcpy (dst_path, target), "/"), ap);
  1015.   
  1016.         ret |= copy (arg, dst_path, new_dst, 0, (struct dir_list *) 0);
  1017. ***************
  1018. *** 317,323 ****
  1019. --- 391,401 ----
  1020.     struct stat src_sb;
  1021.     struct stat dst_sb;
  1022.     int src_mode;
  1023. + #ifdef MSDOS
  1024. +   unsigned int src_type;
  1025. + #else /* not MSDOS */
  1026.     int src_type;
  1027. + #endif /* not MSDOS */
  1028.     char *earlier_file;
  1029.     char *dst_backup = NULL;
  1030.     int dir_mode_changed = 0;
  1031. ***************
  1032. *** 373,379 ****
  1033.         else
  1034.       {
  1035.         /* The file exists already.  */
  1036. ! 
  1037.         if (src_sb.st_ino == dst_sb.st_ino && src_sb.st_dev == dst_sb.st_dev)
  1038.           {
  1039.             error (0, 0, "`%s' and `%s' are the same file",
  1040. --- 451,463 ----
  1041.         else
  1042.       {
  1043.         /* The file exists already.  */
  1044. ! #ifdef MSDOS
  1045. !       if (strcmp (dst_path, src_path) == 0)
  1046. !         {
  1047. !           error (0, 0, "`%s': can't copy file to itself", src_path);
  1048. !           return 1;
  1049. !         }
  1050. ! #else /* not MSDOS */
  1051.         if (src_sb.st_ino == dst_sb.st_ino && src_sb.st_dev == dst_sb.st_dev)
  1052.           {
  1053.             error (0, 0, "`%s' and `%s' are the same file",
  1054. ***************
  1055. *** 380,385 ****
  1056. --- 464,470 ----
  1057.                src_path, dst_path);
  1058.             return 1;
  1059.           }
  1060. + #endif /* not MSDOS */
  1061.   
  1062.         if (src_type != S_IFDIR)
  1063.           {
  1064. ***************
  1065. *** 496,501 ****
  1066. --- 581,587 ----
  1067.         break;
  1068.   #endif
  1069.   
  1070. + #ifndef MSDOS
  1071.       case S_IFBLK:
  1072.       case S_IFCHR:
  1073.   #ifdef S_IFSOCK
  1074. ***************
  1075. *** 507,512 ****
  1076. --- 593,599 ----
  1077.         goto un_backup;
  1078.       }
  1079.         break;
  1080. + #endif /* not MSDOS */
  1081.   
  1082.       case S_IFDIR:
  1083.         {
  1084. ***************
  1085. *** 526,531 ****
  1086. --- 613,623 ----
  1087.       /* Insert the current directory in the list of parents.  */
  1088.   
  1089.       dir = (struct dir_list *) alloca (sizeof (struct dir_list));
  1090. + #ifdef MSDOS            /* always short of stack space ... */
  1091. +     if (!dir)
  1092. +       error (1, 0, "%s: stack overflow", src_path);
  1093. + #endif
  1094. + 
  1095.       dir->parent = ancestors;
  1096.       dir->ino = src_sb.st_ino;
  1097.       dir->dev = src_sb.st_dev;
  1098. ***************
  1099. *** 668,674 ****
  1100. --- 760,771 ----
  1101.     int ret = 0;
  1102.   
  1103.     errno = 0;
  1104. + #ifdef MSDOS
  1105. +   assert (src_sb->st_size < 0xffffL);
  1106. +   name_space = savedir (src_path_in, (size_t) src_sb->st_size);
  1107. + #else
  1108.     name_space = savedir (src_path_in, src_sb->st_size);
  1109. + #endif
  1110.     if (name_space == 0)
  1111.       {
  1112.         if (errno)
  1113. ***************
  1114. *** 728,734 ****
  1115. --- 825,835 ----
  1116.     int *ip;
  1117.     int last_write_made_hole = 0;
  1118.   
  1119. + #ifdef MSDOS
  1120. +   source_desc = open (src_path, O_BINARY | O_RDONLY);
  1121. + #else
  1122.     source_desc = open (src_path, O_RDONLY);
  1123. + #endif
  1124.     if (source_desc < 0)
  1125.       {
  1126.         error (0, errno, "%s", src_path);
  1127. ***************
  1128. *** 738,744 ****
  1129. --- 839,849 ----
  1130.     /* Create the new regular file with small permissions initially,
  1131.        to not create a security hole.  */
  1132.   
  1133. + #ifdef MSDOS
  1134. +   target_desc = open (dst_path, O_BINARY|O_WRONLY|O_CREAT|O_TRUNC, 0600);
  1135. + #else
  1136.     target_desc = open (dst_path, O_WRONLY | O_CREAT | O_TRUNC, 0600);
  1137. + #endif
  1138.     if (target_desc < 0)
  1139.       {
  1140.         error (0, errno, "cannot create regular file `%s'", dst_path);
  1141. ***************
  1142. *** 760,765 ****
  1143. --- 865,874 ----
  1144.     /* Make a buffer with space for a sentinel at the end.  */
  1145.   
  1146.     buf = (char *) alloca (buf_size + sizeof (int));
  1147. + #ifdef MSDOS
  1148. +   if (!buf)
  1149. +     error (2, 0, "%s: stack overflow", src_path);
  1150. + #endif
  1151.   
  1152.     for (;;)
  1153.       {
  1154. ***************
  1155. *** 773,779 ****
  1156. --- 882,892 ----
  1157.         if (n_read == 0)
  1158.       break;
  1159.   
  1160. + #ifdef MSDOS
  1161. +       n_read_total += (long) n_read;
  1162. + #else
  1163.         n_read_total += n_read;
  1164. + #endif
  1165.   
  1166.         buf[n_read] = 1;        /* Sentinel to stop loop.  */
  1167.   
  1168. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:02 1990
  1169. --- cp.h    Wed Sep 19 12:35:24 1990
  1170. ***************
  1171. *** 17,22 ****
  1172. --- 17,34 ----
  1173.   
  1174.       Written by Torbjorn Granlund, Sweden (tege@sics.se). */
  1175.   
  1176. + /*  MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  1177. +     This port is also distributed under the terms of the
  1178. +     GNU General Public License as published by the
  1179. +     Free Software Foundation.
  1180. + 
  1181. +     Please note that this file is not identical to the
  1182. +     original GNU release, you should have received this
  1183. +     code as patch to the official release.
  1184. + 
  1185. +     $Header: e:/gnu/fileutil/RCS/cp.h 1.4.0.2 90/09/19 12:27:43 tho Exp $
  1186. +  */
  1187. + 
  1188.   #include <sys/types.h>
  1189.   
  1190.   #include "system.h"
  1191. ***************
  1192. *** 48,53 ****
  1193. --- 60,77 ----
  1194.   extern int exit_status;
  1195.   extern struct htab *htab;
  1196.   
  1197. + #ifdef MSDOS
  1198. + 
  1199. + #include <gnulib.h>
  1200. + 
  1201. + extern void forget_all (void);
  1202. + extern int copy_reg (char *, char *);
  1203. + extern void hash_init (unsigned int, unsigned int);
  1204. + extern int remember_created (char *);
  1205. + extern char *remember_copied (char *, unsigned short, short);
  1206. + 
  1207. + #else /* not MSDOS */
  1208. + 
  1209.   extern char *xmalloc ();
  1210.   extern char *xrealloc ();
  1211.   extern void forget_copied ();
  1212. ***************
  1213. *** 57,66 ****
  1214. --- 81,106 ----
  1215.   extern char *remember_copied ();
  1216.   extern int remember_created ();
  1217.   
  1218. + #endif /* not MSDOS */
  1219. + 
  1220.   /* For created inodes, a pointer in the search structure to this
  1221.      character identifies that the inode as new.  */
  1222.   extern char new_file;
  1223.   
  1224. + #ifdef MSDOS
  1225. + extern  void main (int, char **);
  1226. + extern  void usage (char *);
  1227. + extern  void error (int status, int errnum, char *message, ...);
  1228. + extern  int yesno (void);
  1229. + extern  char *stpcpy (char *, char *);
  1230. + extern  int user_confirm_overwriting (char *);
  1231. + extern  int member (int);
  1232. + extern  int do_copy (int, char **);
  1233. + extern  int copy (char *, char *, int, short, struct dir_list *);
  1234. + extern  int copy_dir(char *,char *,int,struct stat *,struct dir_list *);
  1235. + extern  void strip_trailing_slashes (char **path);
  1236. + #endif /* MSDOS */
  1237. + 
  1238.   extern void error ();
  1239.   extern void usage ();
  1240.   extern char *savedir ();
  1241. ***************
  1242. *** 73,78 ****
  1243. --- 113,136 ----
  1244.   extern int is_ancestor ();
  1245.   
  1246.   /* System calls.  */
  1247. + 
  1248. + #ifdef MSDOS
  1249. + 
  1250. + #include <direct.h>
  1251. + #include <io.h>
  1252. + #include <malloc.h>
  1253. + #include <pwd.h>
  1254. + 
  1255. + /* Very "interesting" system calls ... */
  1256. + #define    link(a, b)            (-1)
  1257. + #define chown(path, uid, gid)        0
  1258. + #define mkdir(path, mode)        mkdir (path)
  1259. + #define ftruncate            chsize
  1260. + 
  1261. + extern  int eaccess_stat (struct stat *statp, int mode);
  1262. + 
  1263. + #else /* not MSDOS */
  1264. + 
  1265.   extern int mknod ();
  1266.   
  1267.   #ifdef _POSIX_SOURCE
  1268. ***************
  1269. *** 100,105 ****
  1270. --- 158,165 ----
  1271.   extern int isatty ();
  1272.   extern off_t lseek ();
  1273.   #endif
  1274. + 
  1275. + #endif /* not MSDOS */
  1276.   
  1277.   /* Library calls.  */
  1278.   #include <errno.h>
  1279. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:04 1990
  1280. --- cut.c    Wed Sep 19 12:38:18 1990
  1281. ***************
  1282. *** 62,67 ****
  1283. --- 62,92 ----
  1284.   
  1285.      A FILE of `-' means standard input. */
  1286.   
  1287. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  1288. +    This port is also distributed under the terms of the
  1289. +    GNU General Public License as published by the
  1290. +    Free Software Foundation.
  1291. + 
  1292. +    Please note that this file is not identical to the
  1293. +    original GNU release, you should have received this
  1294. +    code as patch to the official release.  */
  1295. + 
  1296. + #ifdef MSDOS
  1297. + static char RCS_Id[] =
  1298. +   "$Header: e:/gnu/fileutil/RCS/cut.c 1.4.0.3 90/09/19 11:17:49 tho Exp $";
  1299. + 
  1300. + static char Program_Id[] = "cut";
  1301. + static char RCS_Revision[] = "$Revision: 1.4.0.3 $";
  1302. + 
  1303. + #define VERSION \
  1304. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  1305. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  1306. + 
  1307. + #define COPYING \
  1308. +   "This is free software, distributed under the terms of the\n" \
  1309. +   "GNU General Public License.  For details, see the file COPYING.\n"
  1310. + #endif /* MSDOS */
  1311. + 
  1312.   #include <stdio.h>
  1313.   #include <errno.h>
  1314.   #include <getopt.h>
  1315. ***************
  1316. *** 78,83 ****
  1317. --- 103,123 ----
  1318.   extern int errno;
  1319.   #endif
  1320.   
  1321. + #ifdef MSDOS
  1322. + 
  1323. + #include <gnulib.h>
  1324. + 
  1325. + void main (int argc, char **argv);
  1326. + int set_fields (char *fieldstr);
  1327. + void cut_file (FILE * stream);
  1328. + void cut_file_bytes (FILE * fno);
  1329. + void cut_file_fields (FILE * fno);
  1330. + void enlarge_line (int new_size);
  1331. + void invalid_list (void);
  1332. + void usage (void);
  1333. + 
  1334. + #else /* not MSDOS */
  1335. + 
  1336.   char *xmalloc ();
  1337.   char *xrealloc ();
  1338.   int set_fields ();
  1339. ***************
  1340. *** 89,94 ****
  1341. --- 129,136 ----
  1342.   void invalid_list ();
  1343.   void usage ();
  1344.   
  1345. + #endif /* not MSDOS */
  1346. + 
  1347.   /* The number of elements allocated for the input line
  1348.      and the byte or field number.
  1349.      Enlarged as necessary. */
  1350. ***************
  1351. *** 138,143 ****
  1352. --- 180,189 ----
  1353.   
  1354.   struct option longopts[] =
  1355.   {
  1356. + #ifdef MSDOS
  1357. +   {"copying", 0, NULL, 30},
  1358. +   {"version", 0, NULL, 31},
  1359. + #endif
  1360.     {"bytes", 1, 0, 'b'},
  1361.     {"characters", 1, 0, 'c'},
  1362.     {"fields", 1, 0, 'f'},
  1363. ***************
  1364. *** 211,216 ****
  1365. --- 257,274 ----
  1366.         delimited_lines_only++;
  1367.         break;
  1368.   
  1369. + #ifdef MSDOS
  1370. +     case 30:
  1371. +       fprintf (stderr, COPYING);
  1372. +       exit (0);
  1373. +       break;
  1374. + 
  1375. +     case 31:
  1376. +       fprintf (stderr, VERSION);
  1377. +       exit (0);
  1378. +       break;
  1379. + #endif
  1380. + 
  1381.       default:
  1382.         usage ();
  1383.       }
  1384. ***************
  1385. *** 528,533 ****
  1386. --- 586,594 ----
  1387.     line_size = new_size;
  1388.   }
  1389.   
  1390. + 
  1391. + #ifndef MSDOS            /* We have it in gnulib  */
  1392. + 
  1393.   /* Allocate N bytes of memory dynamically, with error checking.  */
  1394.   
  1395.   char *
  1396. ***************
  1397. *** 553,558 ****
  1398. --- 614,621 ----
  1399.     return p;
  1400.   }
  1401.   
  1402. + #endif /* not MSDOS */
  1403. + 
  1404.   void
  1405.   invalid_list ()
  1406.   {
  1407. ***************
  1408. *** 562,567 ****
  1409. --- 625,641 ----
  1410.   void
  1411.   usage ()
  1412.   {
  1413. + 
  1414. + #ifdef MSDOS
  1415. +   fprintf (stderr, "\
  1416. + Usage: %s {-b byte-list,+bytes byte-list} [-n] [+copying]\n\
  1417. +        [+version] [file...]\n\
  1418. +        %s {-c character-list,+characters character-list} [+copying]\n\
  1419. +        [+version] [file...]\n\
  1420. +        %s {-f field-list,+fields field-list} [-d delim] [-s]\n\
  1421. +        [+delimiter delim] [+only-delimited] [+copying] [+version] [file...]\n",
  1422. +        program_name, program_name, program_name);
  1423. + #else /* not MSDOS */
  1424.     fprintf (stderr, "\
  1425.   Usage: %s {-b byte-list,+bytes byte-list} [-n] [file...]\n\
  1426.          %s {-c character-list,+characters character-list} [file...]\n\
  1427. ***************
  1428. *** 568,572 ****
  1429. --- 642,647 ----
  1430.          %s {-f field-list,+fields field-list} [-d delim] [-s]\n\
  1431.          [+delimiter delim] [+only-delimited] [file...]\n",
  1432.          program_name, program_name, program_name);
  1433. + #endif /* not MSDOS */
  1434.     exit (2);
  1435.   }
  1436. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:08 1990
  1437. --- dd.c    Wed Sep 19 12:41:20 1990
  1438. ***************
  1439. *** 17,22 ****
  1440. --- 17,47 ----
  1441.   
  1442.   /* Written by Paul Rubin and David MacKenzie. */
  1443.   
  1444. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  1445. +    This port is also distributed under the terms of the
  1446. +    GNU General Public License as published by the
  1447. +    Free Software Foundation.
  1448. + 
  1449. +    Please note that this file is not identical to the
  1450. +    original GNU release, you should have received this
  1451. +    code as patch to the official release.  */
  1452. + 
  1453. + #ifdef MSDOS
  1454. + static char RCS_Id[] =
  1455. +   "$Header: e:/gnu/fileutil/RCS/dd.c 1.4.0.2 90/09/19 11:17:53 tho Exp $";
  1456. + 
  1457. + static char Program_Id[] = "dd";
  1458. + static char RCS_Revision[] = "$Revision: 1.4.0.2 $";
  1459. + 
  1460. + #define VERSION \
  1461. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  1462. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  1463. + 
  1464. + #define COPYING \
  1465. +   "This is free software, distributed under the terms of the\n" \
  1466. +   "GNU General Public License.  For details, see the file COPYING.\n"
  1467. + #endif /* MSDOS */
  1468. + 
  1469.   /* Options:
  1470.   
  1471.      Numbers can be followed by a multiplier:
  1472. ***************
  1473. *** 53,58 ****
  1474. --- 78,90 ----
  1475.      sync                Pad every input block to size of ibs with
  1476.                   trailing NULs. */
  1477.   
  1478. + #ifdef MSDOS
  1479. + /*
  1480. +    im={text,binary}        Input file translation mode (default: text)
  1481. +    om={text,binary}        Output file translation mode (default: text)
  1482. +  */
  1483. + #endif
  1484. + 
  1485.   #include <stdio.h>
  1486.   #include <ctype.h>
  1487.   #ifdef STDC_HEADERS
  1488. ***************
  1489. *** 65,70 ****
  1490. --- 97,103 ----
  1491.   #include <sys/types.h>
  1492.   #include <signal.h>
  1493.   #include "system.h"
  1494. + 
  1495.   #ifdef STDC_HEADERS
  1496.   #include <errno.h>
  1497.   #include <stdlib.h>
  1498. ***************
  1499. *** 79,85 ****
  1500. --- 112,120 ----
  1501.   #endif
  1502.   
  1503.   #define equal(p, q) (strcmp ((p),(q)) == 0)
  1504. + #ifndef MSDOS
  1505.   #define max(a, b) ((a) > (b) ? (a) : (b))
  1506. + #endif
  1507.   
  1508.   /* Default input and output blocksize. */
  1509.   #define DEFAULT_BLOCKSIZE 512
  1510. ***************
  1511. *** 98,103 ****
  1512. --- 133,160 ----
  1513.   /* Use separate input and output buffers, and combine partial input blocks. */
  1514.   #define C_TWOBUFS 04000
  1515.   
  1516. + 
  1517. + #ifdef MSDOS
  1518. + 
  1519. + #include <io.h>
  1520. + extern void error (int status, int errnum, char *message, ...);
  1521. + 
  1522. + extern void main (int argc, char **argv);
  1523. + static void copy (void);
  1524. + static void scanargs (int argc, char **argv);
  1525. + static int parse_integer (char *str);
  1526. + static void parse_conversion (char *str);
  1527. + static void apply_translations (void);
  1528. + static void translate_charset (unsigned char *new_trans);
  1529. + static int bit_count (unsigned int i);
  1530. + static void print_stats (void);
  1531. + static void quit (int code);
  1532. + static SIGTYPE interrupt_handler (void);
  1533. + static char *xmalloc (unsigned short n);
  1534. + static void usage (char *string, char *arg0, char *arg1);
  1535. + 
  1536. + #else /* not MSDOS */
  1537. + 
  1538.   char *xmalloc ();
  1539.   SIGTYPE interrupt_handler ();
  1540.   int bit_count ();
  1541. ***************
  1542. *** 112,117 ****
  1543. --- 169,176 ----
  1544.   void scanargs ();
  1545.   void usage ();
  1546.   
  1547. + #endif /* not MSDOS */
  1548. + 
  1549.   /* The name this program was run with. */
  1550.   char *program_name;
  1551.   
  1552. ***************
  1553. *** 128,146 ****
  1554. --- 187,221 ----
  1555.   int output_fd = 1;
  1556.   
  1557.   /* The number of bytes in which atomic reads are done. */
  1558. + #ifdef MSDOS
  1559. + int input_blocksize = -1;
  1560. + #else
  1561.   long input_blocksize = -1;
  1562. + #endif
  1563.   
  1564.   /* The number of bytes in which atomic writes are done. */
  1565. + #ifdef MSDOS
  1566. + int output_blocksize = -1;
  1567. + #else
  1568.   long output_blocksize = -1;
  1569. + #endif
  1570.   
  1571.   /* Conversion buffer size, in bytes.  0 prevents conversions. */
  1572. + #ifdef MSDOS
  1573. + int conversion_blocksize = 0;
  1574. + #else
  1575.   long conversion_blocksize = 0;
  1576. + #endif
  1577.   
  1578.   /* Skip this many records of `input_blocksize' bytes before input. */
  1579.   int skip_records = 0;
  1580.   
  1581.   /* Skip this many records of `output_blocksize' bytes before output. */
  1582. + #ifdef MSDOS
  1583. + int seek_record = 0;
  1584. + #else
  1585.   long seek_record = 0;
  1586. + #endif
  1587.   
  1588.   /* Copy only this many records.  <0 means no limit. */
  1589.   int max_record = -1;
  1590. ***************
  1591. *** 163,168 ****
  1592. --- 238,249 ----
  1593.   /* Records truncated by conv=block. */
  1594.   unsigned r_truncate = 0;
  1595.   
  1596. + #ifdef MSDOS
  1597. + /* Translation modes */
  1598. + int input_file_mode = O_TEXT;
  1599. + int output_file_mode = O_TEXT;
  1600. + #endif
  1601. + 
  1602.   /* Output representation of newline and space characters. */
  1603.   unsigned char newline_character = '\n';
  1604.   unsigned char space_character = ' ';
  1605. ***************
  1606. *** 312,317 ****
  1607. --- 393,399 ----
  1608.     for (i = 0; i < 256; i++)
  1609.       trans_table[i] = i;
  1610.   
  1611. + 
  1612.     /* Decode arguments. */
  1613.     scanargs (argc, argv);
  1614.     apply_translations ();
  1615. ***************
  1616. *** 333,339 ****
  1617.       }
  1618.     else
  1619.       output_file = "standard output";
  1620. !   
  1621.     signal (SIGINT, interrupt_handler);
  1622.     copy ();
  1623.   }
  1624. --- 415,426 ----
  1625.       }
  1626.     else
  1627.       output_file = "standard output";
  1628. ! 
  1629. ! #ifdef MSDOS
  1630. !   setmode (input_fd, input_file_mode);
  1631. !   setmode (output_fd, output_file_mode);
  1632. ! #endif
  1633. ! 
  1634.     signal (SIGINT, interrupt_handler);
  1635.     copy ();
  1636.   }
  1637. ***************
  1638. *** 369,375 ****
  1639. --- 456,466 ----
  1640.       }
  1641.     if ((in_stats.st_mode & S_IFMT) == S_IFREG)
  1642.       {
  1643. + #ifdef MSDOS
  1644. +       if (lseek (input_fd, skip_records * (long) input_blocksize, L_SET) < 0)
  1645. + #else
  1646.         if (lseek (input_fd, skip_records * input_blocksize, L_SET) < 0)
  1647. + #endif
  1648.       {
  1649.         error (0, errno, "%s", input_file);
  1650.         quit (1);
  1651. ***************
  1652. *** 393,399 ****
  1653. --- 484,494 ----
  1654.       }
  1655.     if ((out_stats.st_mode & S_IFMT) == S_IFREG)
  1656.       {
  1657. + #ifdef MSDOS
  1658. +       if (lseek (output_fd, seek_record * (long) output_blocksize, L_SET) < 0)
  1659. + #else
  1660.         if (lseek (output_fd, seek_record * output_blocksize, L_SET) < 0)
  1661. + #endif
  1662.       {
  1663.         error (0, errno, "%s", output_file);
  1664.         quit (1);
  1665. ***************
  1666. *** 643,648 ****
  1667. --- 738,755 ----
  1668.         char *name, *val;
  1669.   
  1670.         name = argv[i];
  1671. + #ifdef MSDOS
  1672. +       if (equal (name, "copying"))
  1673. +     {
  1674. +       fprintf (stderr, COPYING);
  1675. +       exit (0);
  1676. +     }
  1677. +       else if (equal (name, "version"))
  1678. +     {
  1679. +       fprintf (stderr, VERSION);
  1680. +       exit (0);
  1681. +     }
  1682. + #endif
  1683.         val = index (name, '=');
  1684.         if (val == NULL)
  1685.       usage ("unrecognized option `%s'", name);
  1686. ***************
  1687. *** 654,659 ****
  1688. --- 761,786 ----
  1689.       output_file = val;
  1690.         else if (equal (name, "conv"))
  1691.       parse_conversion (val);
  1692. + #ifdef MSDOS
  1693. +       else if (equal (name, "im"))
  1694. +     {
  1695. +       if (equal (val, "text"))
  1696. +         input_file_mode = O_TEXT;
  1697. +       else if (equal (val, "binary"))
  1698. +         input_file_mode = O_BINARY;
  1699. +       else
  1700. +         error (1, 0, "Input file mode must be text or binary");
  1701. +     }
  1702. +       else if (equal (name, "om"))
  1703. +     {
  1704. +       if (equal (val, "text"))
  1705. +         output_file_mode = O_TEXT;
  1706. +       else if (equal (val, "binary"))
  1707. +         output_file_mode = O_BINARY;
  1708. +       else
  1709. +         error (1, 0, "Output file mode must be text or binary");
  1710. +     }
  1711. + #endif /* MSDOS */
  1712.         else
  1713.       {
  1714.         n = parse_integer (val);
  1715. ***************
  1716. *** 886,891 ****
  1717. --- 1013,1028 ----
  1718.     fprintf (stderr, "%s: ", program_name);
  1719.     fprintf (stderr, string, arg0, arg1);
  1720.     fprintf (stderr, "\n");
  1721. + #ifdef MSDOS
  1722. +   fprintf (stderr, "\
  1723. + Usage: %s [if=file] [of=file] [ibs=bytes] [obs=bytes] [bs=bytes] [cbs=bytes]\n\
  1724. +        [skip=blocks] [seek=blocks] [count=blocks]\n\
  1725. +        [im={text,binary}] [om={text,binary}] [copying] [version]\n\
  1726. +        [conv={ascii,ebcdic,ibm,block,unblock,lcase,ucase,swab,noerror,sync}]\n\
  1727. + Numbers can be followed by a multiplier:\n\
  1728. + b=512, k=1024, w=2, xm=number m\n",
  1729. +        program_name);
  1730. + #else /* not MSDOS */
  1731.     fprintf (stderr, "\
  1732.   Usage: %s [if=file] [of=file] [ibs=bytes] [obs=bytes] [bs=bytes] [cbs=bytes]\n\
  1733.          [skip=blocks] [seek=blocks] [count=blocks]\n\
  1734. ***************
  1735. *** 893,897 ****
  1736. --- 1030,1035 ----
  1737.   Numbers can be followed by a multiplier:\n\
  1738.   b=512, k=1024, w=2, xm=number m\n",
  1739.          program_name);
  1740. + #endif /* not MSDOS */
  1741.     exit (1);
  1742.   }
  1743. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:10 1990
  1744. --- eaccess.c    Wed Sep 19 12:37:30 1990
  1745. ***************
  1746. *** 17,33 ****
  1747. --- 17,55 ----
  1748.   
  1749.   /* David MacKenzie and Torbjorn Granlund */
  1750.   
  1751. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  1752. +    This port is also distributed under the terms of the
  1753. +    GNU General Public License as published by the
  1754. +    Free Software Foundation.
  1755. + 
  1756. +    Please note that this file is not identical to the
  1757. +    original GNU release, you should have received this
  1758. +    code as patch to the official release.
  1759. + 
  1760. +    $Header: e:/gnu/fileutil/RCS/eaccess.c 1.4.0.2 90/09/19 12:27:30 tho Exp $
  1761. +  */
  1762. + 
  1763.   #include <sys/types.h>
  1764.   #include <sys/stat.h>
  1765.   #ifdef _POSIX_SOURCE
  1766.   #include <unistd.h>
  1767.   #else
  1768. + #ifdef MSDOS
  1769. + #include <pwd.h>
  1770. + #else /* not MSDOS */
  1771.   #include <sys/param.h>
  1772. + #endif /* not MSDOS */
  1773.   #endif
  1774.   #include <errno.h>
  1775.   #if defined(EACCES) && !defined(EACCESS)
  1776.   #define EACCESS EACCES
  1777.   #endif
  1778. + 
  1779. + #ifdef MSDOS
  1780. + #include <stdlib.h>
  1781. + extern  int eaccess (char *path, int mode);
  1782. + extern  int eaccess_stat (struct stat *statp, int mode);
  1783. + #endif /* MSDOS */
  1784.   
  1785.   #ifndef _POSIX_SOURCE
  1786.   #define F_OK 0
  1787. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:14 1990
  1788. --- filemode.c    Wed Sep 19 12:33:12 1990
  1789. ***************
  1790. *** 14,19 ****
  1791. --- 14,31 ----
  1792.      You should have received a copy of the GNU General Public License
  1793.      along with this program; if not, write to the Free Software
  1794.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  1795. + 
  1796. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  1797. +    This port is also distributed under the terms of the
  1798. +    GNU General Public License as published by the
  1799. +    Free Software Foundation.
  1800. + 
  1801. +    Please note that this file is not identical to the
  1802. +    original GNU release, you should have received this
  1803. +    code as patch to the official release.
  1804. + 
  1805. +    $Header: e:/gnu/fileutil/RCS/filemode.c 1.4.0.1 90/09/17 08:18:12 tho Exp $
  1806. +  */
  1807.   
  1808.   #include <sys/types.h>
  1809.   #include <sys/stat.h>
  1810. ***************
  1811. *** 23,32 ****
  1812. --- 35,52 ----
  1813.   #define S_IEXEC S_IXUSR
  1814.   #endif
  1815.   
  1816. + #ifdef MSDOS
  1817. + extern void filemodestring (struct stat *, char *);
  1818. + extern void mode_string (unsigned short mode, char *str);
  1819. + static char ftypelet (unsigned short bits);
  1820. + static void rwx (unsigned short, char *);
  1821. + static void setst (unsigned short, char *);
  1822. + #else /* not MSDOS */
  1823.   void mode_string ();
  1824.   static char ftypelet ();
  1825.   static void rwx ();
  1826.   static void setst ();
  1827. + #endif /* not MSDOS */
  1828.   
  1829.   /* filemodestring - fill in string STR with an ls-style ASCII
  1830.      representation of the st_mode field of file stats block STATP.
  1831. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:16 1990
  1832. --- getdate.y    Wed Sep 19 12:52:14 1990
  1833. ***************
  1834. *** 5,10 ****
  1835. --- 5,24 ----
  1836.       /*    University of North Carolina at Chapel Hill    */
  1837.       /*    @(#)getdate.y    2.17    11/30/87            */
  1838.   
  1839. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  1840. +    This port is also distributed under the terms of the
  1841. +    GNU General Public License as published by the
  1842. +    Free Software Foundation.
  1843. + 
  1844. +    Please note that this file is not identical to the
  1845. +    original GNU release, you should have received this
  1846. +    code as patch to the official release.  */
  1847. + 
  1848. + #ifdef MSDOS
  1849. + static char RCS_Id[] =
  1850. +   "$Header: e:/gnu/fileutil/RCS/getdate.y 1.4.0.2 90/09/19 12:27:47 tho Exp $";
  1851. + #endif /* MSDOS */
  1852. + 
  1853.   /* #include "defs.h" JF not used any more */
  1854.   #include <sys/types.h>
  1855.   #ifdef USG
  1856. ***************
  1857. *** 39,44 ****
  1858. --- 53,74 ----
  1859.   #endif
  1860.   #endif
  1861.   
  1862. + #ifdef MSDOS
  1863. + #include <malloc.h>
  1864. + int getdate_yyparse (void);
  1865. + long getdate (char *p, struct timeb *now);
  1866. + void ftime (struct timeb *timeb);
  1867. + static long dateconv (int mm, int dd, int yy, int h, int m, int s, int mer,
  1868. +               int zone, int dayflag);
  1869. + static long dayconv (int ord, int day, long now);
  1870. + static long timeconv (int hh, int mm, int ss, int mer);
  1871. + static long monthadd (long sdate, long relmonth);
  1872. + static long daylcorr (long future, long now);
  1873. + static int lookup (char *id);
  1874. + static int yyerror (char *s);
  1875. + static int yylex (void);
  1876. + #endif /* MSDOS */
  1877. + 
  1878.   #ifndef NULL
  1879.   #define    NULL    0
  1880.   #endif
  1881. ***************
  1882. *** 604,609 ****
  1883. --- 634,640 ----
  1884.   {
  1885.     return 0;
  1886.   }
  1887. + 
  1888.   
  1889.   #ifdef USG
  1890.   static void
  1891. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:18 1990
  1892. --- getversi.c    Wed Sep 19 12:37:46 1990
  1893. ***************
  1894. *** 17,26 ****
  1895. --- 17,44 ----
  1896.   
  1897.   /* Written by David MacKenzie <djm@ai.mit.edu> */
  1898.   
  1899. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  1900. +    This port is also distributed under the terms of the
  1901. +    GNU General Public License as published by the
  1902. +    Free Software Foundation.
  1903. + 
  1904. +    Please note that this file is not identical to the
  1905. +    original GNU release, you should have received this
  1906. +    code as patch to the official release.
  1907. + 
  1908. +    $Header: e:/gnu/fileutil/RCS/getversi.c 1.4.0.2 90/09/19 12:27:31 tho Exp $
  1909. +  */
  1910. + 
  1911.   #include "backupfile.h"
  1912.   
  1913. + #ifdef MSDOS
  1914. + extern enum backup_type get_version (char *version);
  1915. + extern int argmatch (char *arg, char **optlist);
  1916. + extern void invalid_arg (char *kind, char *value, int problem);
  1917. + #else /* not MSDOS */
  1918.   int argmatch ();
  1919.   void invalid_arg ();
  1920. + #endif /* not MSDOS */
  1921.   
  1922.   extern char *program_name;
  1923.   
  1924. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:20 1990
  1925. --- head.c    Wed Sep 19 12:42:30 1990
  1926. ***************
  1927. *** 15,20 ****
  1928. --- 15,45 ----
  1929.      along with this program; if not, write to the Free Software
  1930.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  1931.   
  1932. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  1933. +    This port is also distributed under the terms of the
  1934. +    GNU General Public License as published by the
  1935. +    Free Software Foundation.
  1936. + 
  1937. +    Please note that this file is not identical to the
  1938. +    original GNU release, you should have received this
  1939. +    code as patch to the official release.  */
  1940. + 
  1941. + #ifdef MSDOS
  1942. + static char RCS_Id[] =
  1943. +   "$Header: e:/gnu/fileutil/RCS/head.c 1.4.0.3 90/09/19 11:17:59 tho Exp $";
  1944. + 
  1945. + static char Program_Id[] = "head";
  1946. + static char RCS_Revision[] = "$Revision: 1.4.0.3 $";
  1947. + 
  1948. + #define VERSION \
  1949. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  1950. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  1951. + 
  1952. + #define COPYING \
  1953. +   "This is free software, distributed under the terms of the\n" \
  1954. +   "GNU General Public License.  For details, see the file COPYING.\n"
  1955. + #endif /* MSDOS */
  1956. + 
  1957.   /* Usage: head [-b #] [-c #] [-n #] [-qv] [+blocks #] [+bytes #] [+lines #]
  1958.             [+quiet] [+silent] [+verbose] [file...]
  1959.   
  1960. ***************
  1961. *** 64,69 ****
  1962. --- 89,97 ----
  1963.   #define BYTES 1            /* Head in bytes. */
  1964.   #define BLOCKS 2        /* Head in blocks. */
  1965.   #define HEADERS 4        /* Write filename headers. */
  1966. + #ifdef MSDOS
  1967. + #define BINARY 32        /* Suppress crlf translation. */
  1968. + #endif
  1969.   
  1970.   /* When to print the filename banners. */
  1971.   enum header_mode
  1972. ***************
  1973. *** 71,76 ****
  1974. --- 99,125 ----
  1975.     multiple_files, always, never
  1976.   };
  1977.   
  1978. + #ifdef MSDOS
  1979. + 
  1980. + #include <string.h>
  1981. + #include <stdarg.h>
  1982. + #include <io.h>
  1983. + 
  1984. + #include <gnulib.h>
  1985. + 
  1986. + extern  void main (int, char **);
  1987. + extern  int head_file (char *, int, long);
  1988. + extern  void write_header (char *);
  1989. + extern  int head (char *, int, int, long);
  1990. + extern  int head_bytes (char *, int, long);
  1991. + extern  int head_lines (char *, int, long);
  1992. + extern  void xwrite (int, char *, int);
  1993. + extern  long atou (char *);
  1994. + extern  char *basename (char *);
  1995. + extern  void usage (void);
  1996. + 
  1997. + #else /* not MSDOS */
  1998. + 
  1999.   int head ();
  2000.   int head_bytes ();
  2001.   int head_file ();
  2002. ***************
  2003. *** 81,91 ****
  2004. --- 130,147 ----
  2005.   void write_header ();
  2006.   void xwrite ();
  2007.   
  2008. + #endif /* MSDOS */
  2009. + 
  2010.   /* The name this program was run with. */
  2011.   char *program_name;
  2012.   
  2013.   struct option long_options[] =
  2014.   {
  2015. + #ifdef MSDOS
  2016. +   {"binary", 1, NULL, 'B'},
  2017. +   {"copying", 0, NULL, 30},
  2018. +   {"version", 0, NULL, 31},
  2019. + #endif
  2020.     {"blocks", 1, NULL, 'b'},
  2021.     {"bytes", 1, NULL, 'c'},
  2022.     {"lines", 1, NULL, 'n'},
  2023. ***************
  2024. *** 154,164 ****
  2025. --- 210,240 ----
  2026.         argc--;
  2027.       }
  2028.   
  2029. + #ifdef MSDOS
  2030. +   while ((c = getopt_long (argc, argv, "Bb:c:n:qv", long_options, &longind))
  2031. + #else
  2032.     while ((c = getopt_long (argc, argv, "b:c:n:qv", long_options, &longind))
  2033. + #endif
  2034.        != EOF)
  2035.       {
  2036.         switch (c)
  2037.       {
  2038. + #ifdef MSDOS
  2039. +     case 30:
  2040. +       fprintf (stderr, COPYING);
  2041. +       exit (0);
  2042. +       break;
  2043. + 
  2044. +     case 31:
  2045. +       fprintf (stderr, VERSION);
  2046. +       exit (0);
  2047. +       break;
  2048. + 
  2049. +     case 'B':
  2050. +       mode |= BINARY;
  2051. +       break;
  2052. + #endif
  2053. + 
  2054.       case 'b':
  2055.         mode |= BLOCKS;
  2056.         mode &= ~BYTES;
  2057. ***************
  2058. *** 274,283 ****
  2059. --- 350,382 ----
  2060.        int mode;
  2061.        long number;
  2062.   {
  2063. + #ifdef MSDOS
  2064. +   int errors;
  2065. + 
  2066. +   if (mode & BINARY)
  2067. +     {
  2068. +       setmode (fileno (stdout), O_BINARY);
  2069. +       setmode (fd, O_BINARY);
  2070. +     }
  2071. + 
  2072. +   if (mode & (BYTES | BLOCKS))
  2073. +     errors = head_bytes (filename, fd, number);
  2074. +   else
  2075. +     errors = head_lines (filename, fd, number);
  2076. + 
  2077. +   if (mode & BINARY)
  2078. +     setmode (fileno (stdout), O_TEXT);
  2079. + 
  2080. +   return errors;
  2081. + 
  2082. + #else /* not MSDOS */
  2083. + 
  2084.     if (mode & (BYTES | BLOCKS))
  2085.       return head_bytes (filename, fd, number);
  2086.     else
  2087.       return head_lines (filename, fd, number);
  2088. + 
  2089. + #endif /* not MSDOS */
  2090.   }
  2091.   
  2092.   int
  2093. ***************
  2094. *** 299,308 ****
  2095. --- 398,414 ----
  2096.       }
  2097.         if (bytes_read == 0)
  2098.       break;
  2099. + #ifdef MSDOS
  2100. +       if ((long) bytes_read > bytes_to_write)
  2101. +     bytes_read = (int) bytes_to_write;
  2102. +       xwrite (1, buffer, bytes_read);
  2103. +       bytes_to_write -= (long) bytes_read;
  2104. + #else /* not MSDOS */
  2105.         if (bytes_read > bytes_to_write)
  2106.       bytes_read = bytes_to_write;
  2107.         xwrite (1, buffer, bytes_read);
  2108.         bytes_to_write -= bytes_read;
  2109. + #endif /* not MSDOS */
  2110.       }
  2111.     return 0;
  2112.   }
  2113. ***************
  2114. *** 356,371 ****
  2115.   atou (str)
  2116.        char *str;
  2117.   {
  2118. !   int value;
  2119.   
  2120.     for (value = 0; ISDIGIT (*str); ++str)
  2121.       value = value * 10 + *str - '0';
  2122. !   return *str ? -1 : value;
  2123.   }
  2124.   
  2125.   void
  2126.   usage ()
  2127.   {
  2128.     fprintf (stderr, "\
  2129.   Usage: %s [-b #] [-c #] [-n #] [-qv] [+blocks #] [+bytes #] [+lines #]\n\
  2130.          [+quiet] [+silent] [+verbose] [file...]\n\
  2131. --- 462,486 ----
  2132.   atou (str)
  2133.        char *str;
  2134.   {
  2135. !   long value;
  2136.   
  2137.     for (value = 0; ISDIGIT (*str); ++str)
  2138.       value = value * 10 + *str - '0';
  2139. !   return *str ? -1L : value;
  2140.   }
  2141.   
  2142.   void
  2143.   usage ()
  2144.   {
  2145. + #ifdef MSDOS
  2146. +   fprintf (stderr, "\
  2147. + Usage: %s [-b #] [-c #] [-n #] [-qvB] [+blocks #] [+bytes #]\n\
  2148. +        [+lines #] [+quiet] [+silent] [+verbose] [+binary] [+version]\n\
  2149. +        [+copying] [file...]\n\
  2150. + \n\
  2151. +        %s [-#bclqv] [file...]\n", program_name, program_name);
  2152. +   exit (1);
  2153. + #else
  2154.     fprintf (stderr, "\
  2155.   Usage: %s [-b #] [-c #] [-n #] [-qv] [+blocks #] [+bytes #] [+lines #]\n\
  2156.          [+quiet] [+silent] [+verbose] [file...]\n\
  2157. ***************
  2158. *** 372,375 ****
  2159. --- 487,491 ----
  2160.   \n\
  2161.          %s [-#bclqv] [file...]\n", program_name, program_name);
  2162.     exit (1);
  2163. + #endif
  2164.   }
  2165. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:24 1990
  2166. --- ls.c    Wed Sep 19 12:39:12 1990
  2167. ***************
  2168. *** 14,19 ****
  2169. --- 14,43 ----
  2170.      You should have received a copy of the GNU General Public License
  2171.      along with this program; if not, write to the Free Software
  2172.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  2173. + 
  2174. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  2175. +    This port is also distributed under the terms of the
  2176. +    GNU General Public License as published by the
  2177. +    Free Software Foundation.
  2178. + 
  2179. +    Please note that this file is not identical to the
  2180. +    original GNU release, you should have received this
  2181. +    code as patch to the official release.  */
  2182. + 
  2183. + #ifdef MSDOS
  2184. + static char RCS_Id[] =
  2185. +   "$Header: e:/gnu/fileutil/RCS/ls.c 1.4.0.2 90/09/19 11:18:27 tho Exp $";
  2186. + 
  2187. + static char RCS_Revision[] = "$Revision: 1.4.0.2 $";
  2188. + 
  2189. + #define VERSION \
  2190. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", PROGNAME, \
  2191. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  2192. + 
  2193. + #define COPYING \
  2194. +   "This is free software, distributed under the terms of the\n" \
  2195. +   "GNU General Public License.  For details, see the file COPYING.\n"
  2196. + #endif /* MSDOS */
  2197.   
  2198.   /* If the macro MULTI_COL is defined,
  2199.      the multi-column format is the default regardless
  2200. ***************
  2201. *** 36,45 ****
  2202. --- 60,73 ----
  2203.   #ifdef _POSIX_SOURCE
  2204.   #define S_IEXEC S_IXUSR
  2205.   #else
  2206. + #ifndef MSDOS
  2207.   #include <sys/ioctl.h>
  2208. + #endif /* not MSDOS */
  2209.   #endif
  2210.   #include <stdio.h>
  2211. + #ifndef MSDOS
  2212.   #include <grp.h>
  2213. + #endif
  2214.   #include <pwd.h>
  2215.   #include <getopt.h>
  2216.   #include "system.h"
  2217. ***************
  2218. *** 65,70 ****
  2219. --- 93,150 ----
  2220.   extern int errno;
  2221.   #endif
  2222.   
  2223. + #ifdef MSDOS
  2224. + #include <string.h>
  2225. + #include <io.h>
  2226. + 
  2227. + #include <gnulib.h>
  2228. + 
  2229. + extern  int glob_match (char *, char *, int);
  2230. + extern  void mode_string (unsigned short mode, char *str);
  2231. + extern  void main (int, char **);
  2232. + extern  int argmatch (char *, char **);
  2233. + extern  int decode_switches (int, char **);
  2234. + extern  void invalid_arg (char *, char *, int);
  2235. + extern  void queue_directory (char *, char *);
  2236. + extern  void print_dir (char *, char *);
  2237. + extern  void add_ignore_pattern (char *);
  2238. + extern  int file_interesting (struct direct *);
  2239. + extern  void clear_files (void);
  2240. + extern  int gobble_file (char *, int, char *);
  2241. + extern  void extract_dirs_from_files (char *, int);
  2242. + extern  int is_not_dot_or_dotdot (char *);
  2243. + extern  void sort_files (void);
  2244. + extern  int compare_ctime (struct file *, struct file *);
  2245. + extern  int rev_cmp_ctime (struct file *, struct file *);
  2246. + extern  int compare_mtime (struct file *, struct file *);
  2247. + extern  int rev_cmp_mtime (struct file *, struct file *);
  2248. + extern  int compare_atime (struct file *, struct file *);
  2249. + extern  int rev_cmp_atime (struct file *, struct file *);
  2250. + extern  int compare_size (struct file *, struct file *);
  2251. + extern  int rev_cmp_size (struct file *, struct file *);
  2252. + extern  int compare_name (struct file *, struct file *);
  2253. + extern  int rev_cmp_name (struct file *, struct file *);
  2254. + extern  int compare_extension (struct file *file1, struct file *file2);
  2255. + extern  int rev_cmp_extension (struct file *file1, struct file *file2);
  2256. + extern  void print_current_files (void);
  2257. + extern  void print_long_format (struct file *);
  2258. + extern  void print_name_with_quoting (char *);
  2259. + extern  void print_file_name_and_frills (struct file *);
  2260. + extern  void print_type_indicator (unsigned int);
  2261. + extern  int length_of_file_name_and_frills (struct file *);
  2262. + extern  void print_many_per_line (void);
  2263. + extern  void print_horizontal (void);
  2264. + extern  void print_with_commas (void);
  2265. + extern  char *getuser (unsigned short);
  2266. + extern  char *getgroup (unsigned short);
  2267. + extern  void indent (int, int);
  2268. + extern  char *copystring (char *);
  2269. + extern  void attach (char *, char *, char *);
  2270. + extern  char *basename (char *);
  2271. + extern  void usage (void);
  2272. + 
  2273. + #else /* not MSDOS */
  2274. + 
  2275.   struct group *getgrgid ();
  2276.   struct passwd *getpwuid ();
  2277.   int glob_match ();
  2278. ***************
  2279. *** 114,119 ****
  2280. --- 194,201 ----
  2281.   void queue_directory ();
  2282.   void sort_files ();
  2283.   void usage ();
  2284. + 
  2285. + #endif /* not MSDOS */
  2286.   
  2287.   enum filetype
  2288.   {
  2289. ***************
  2290. *** 376,383 ****
  2291. --- 458,484 ----
  2292.   
  2293.     if (i < argc)
  2294.       dir_defaulted = 0;
  2295. + 
  2296. + #ifdef MSDOS
  2297. +   for (; i < argc; i++)
  2298. +     {
  2299. +       if (strlen (argv[i]) == 2 && argv[i][1] == ':')
  2300. +     {
  2301. +       /* The user wants the cwd on another drive.  Help
  2302. +          DOS by appending a `.'!  (This allows to stat()
  2303. +          the directory.)  */
  2304. +       char *temp = (char *) xmalloc (4);
  2305. +       strcpy (temp, argv[i]);
  2306. +       strcat (temp, ".");
  2307. +       argv[i] = temp;
  2308. +     }
  2309. + 
  2310. +       gobble_file (argv[i], 1, "");
  2311. +     }
  2312. + #else /* not MSDOS */
  2313.     for (; i < argc; i++)
  2314.       gobble_file (argv[i], 1, "");
  2315. + #endif /* not MSDOS */
  2316.   
  2317.     if (dir_defaulted)
  2318.       {
  2319. ***************
  2320. *** 420,425 ****
  2321. --- 521,530 ----
  2322.   
  2323.   struct option long_options[] =
  2324.   {
  2325. + #ifdef MSDOS
  2326. +   {"copying", 0, NULL, 30},
  2327. +   {"version", 0, NULL, 31},
  2328. + #endif
  2329.     {"all", 0, 0, 'a'},
  2330.     {"escape", 0, 0, 'b'},
  2331.     {"directory", 0, 0, 'd'},
  2332. ***************
  2333. *** 726,732 ****
  2334.           }
  2335.         format = formats[longind];
  2336.         break;
  2337. !       
  2338.       default:
  2339.         usage ();
  2340.       }
  2341. --- 831,849 ----
  2342.           }
  2343.         format = formats[longind];
  2344.         break;
  2345. ! 
  2346. ! #ifdef MSDOS
  2347. !     case 30:
  2348. !       fprintf (stderr, COPYING);
  2349. !       exit (0);
  2350. !       break;
  2351. ! 
  2352. !     case 31:
  2353. !       fprintf (stderr, VERSION);
  2354. !       exit (0);
  2355. !       break;
  2356. ! #endif
  2357. ! 
  2358.       default:
  2359.         usage ();
  2360.       }
  2361. ***************
  2362. *** 989,998 ****
  2363. --- 1106,1117 ----
  2364.                      kilobyte_blocks);
  2365.         if (blocks >= 10000 && block_size_size < 5)
  2366.       block_size_size = 5;
  2367. + #ifndef MSDOS
  2368.         if (blocks >= 100000 && block_size_size < 6)
  2369.       block_size_size = 6;
  2370.         if (blocks >= 1000000 && block_size_size < 7)
  2371.       block_size_size = 7;
  2372. + #endif /* not MSDOS */
  2373.       }
  2374.     else
  2375.       blocks = 0;
  2376. ***************
  2377. *** 1380,1387 ****
  2378. --- 1499,1510 ----
  2379.     else
  2380.       printf ("%-8.8s ", getgroup (f->stat.st_gid));
  2381.   
  2382. + #ifdef S_IFBLK
  2383.     if ((f->stat.st_mode & S_IFMT) == S_IFCHR
  2384.         || (f->stat.st_mode & S_IFMT) == S_IFBLK)
  2385. + #else /* not S_IFBLK */
  2386. +   if ((f->stat.st_mode & S_IFMT) == S_IFCHR)
  2387. + #endif /* not S_IFBLK */
  2388.       printf ("%3u, %3u ", major (f->stat.st_rdev), minor (f->stat.st_rdev));
  2389.     else
  2390.       printf ("%8lu ", f->stat.st_size);
  2391. ***************
  2392. *** 1769,1774 ****
  2393. --- 1892,1898 ----
  2394.         return tail->name;
  2395.   
  2396.     pwent = getpwuid (uid);
  2397. + 
  2398.     tail = (struct userid *) xmalloc (sizeof (struct userid));
  2399.     tail->uid = uid;
  2400.     tail->next = user_alist;
  2401. ***************
  2402. *** 1839,1844 ****
  2403. --- 1963,1970 ----
  2404.   /* Low level subroutines of general use,
  2405.      not specifically related to the task of listing a directory.  */
  2406.   
  2407. + #ifndef MSDOS
  2408. + 
  2409.   char *
  2410.   xrealloc (obj, size)
  2411.        char *obj;
  2412. ***************
  2413. *** 1864,1869 ****
  2414. --- 1990,1997 ----
  2415.     return val;
  2416.   }
  2417.   
  2418. + #endif /* MSDOS */
  2419. + 
  2420.   /* Return a newly allocated copy of `string'. */
  2421.   
  2422.   char *
  2423. ***************
  2424. *** 1904,1913 ****
  2425. --- 2032,2050 ----
  2426.          [+numeric-uid-gid] [+hide-control-chars] [+reverse] [+size]\n\
  2427.          [+width cols] [+tabsize cols] [+almost-all] [+ignore-backups]\n",
  2428.          program_name);
  2429. + #ifdef MSDOS
  2430. +   fprintf (stderr, "\
  2431. +        [+classify] [+file-type] [+ignore pattern] [+dereference] [+literal]\n\
  2432. +        [+quote-name] [+recursive] [+sort {none,time,size,extension}]\n\
  2433. +        [+format {long,verbose,commas,across,vertical,single-column}]\n\
  2434. +        [+time {atime,access,use,ctime,status}] [+copying] [+version]\n\
  2435. +        [path...]\n");
  2436. + #else /* not MSDOS */
  2437.     fprintf (stderr, "\
  2438.          [+classify] [+file-type] [+ignore pattern] [+dereference] [+literal]\n\
  2439.          [+quote-name] [+recursive] [+sort {none,time,size,extension}]\n\
  2440.          [+format {long,verbose,commas,across,vertical,single-column}]\n\
  2441.          [+time {atime,access,use,ctime,status}] [path...]\n");
  2442. + #endif /* not MSDOS */
  2443.     exit (1);
  2444.   }
  2445. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:28 1990
  2446. --- mkdir.c    Wed Sep 19 12:45:00 1990
  2447. ***************
  2448. *** 14,20 ****
  2449. --- 14,44 ----
  2450.      You should have received a copy of the GNU General Public License
  2451.      along with this program; if not, write to the Free Software
  2452.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  2453. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  2454. +    This port is also distributed under the terms of the
  2455. +    GNU General Public License as published by the
  2456. +    Free Software Foundation.
  2457.   
  2458. +    Please note that this file is not identical to the
  2459. +    original GNU release, you should have received this
  2460. +    code as patch to the official release.  */
  2461. + 
  2462. + #ifdef MSDOS
  2463. + static char RCS_Id[] =
  2464. +   "$Header: e:/gnu/fileutil/RCS/mkdir.c 1.4.0.2 90/09/19 12:10:16 tho Exp $";
  2465. + 
  2466. + static char Program_Id[] = "mkdir";
  2467. + static char RCS_Revision[] = "$Revision: 1.4.0.2 $";
  2468. + 
  2469. + #define VERSION \
  2470. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  2471. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  2472. + 
  2473. + #define COPYING \
  2474. +   "This is free software, distributed under the terms of the\n" \
  2475. +   "GNU General Public License.  For details, see the file COPYING.\n"
  2476. + #endif /* MSDOS */
  2477. + 
  2478.   /* Usage: mkdir [-p] [-m mode] [+path] [+mode mode] dir...
  2479.   
  2480.      Options:
  2481. ***************
  2482. *** 42,52 ****
  2483. --- 66,94 ----
  2484.   extern int errno;
  2485.   #endif
  2486.   
  2487. + #ifdef MSDOS
  2488. + 
  2489. + #include <direct.h>
  2490. + #include <io.h>
  2491. + #include <gnulib.h>
  2492. + 
  2493. + extern void main (int argc, char **argv);
  2494. + static int make_path (char *path, unsigned short mode,\
  2495. +               unsigned short parent_mode);
  2496. + static void strip_trailing_slashes (char *path);
  2497. + static void usage (void);
  2498. + 
  2499. + #define mkdir(path, mode)    mkdir (path)
  2500. + 
  2501. + #else /* not MSDOS */
  2502. + 
  2503.   int make_path ();
  2504.   void error ();
  2505.   void strip_trailing_slashes ();
  2506.   void usage ();
  2507.   
  2508. + #endif /* not MSDOS */
  2509. + 
  2510.   /* If nonzero, ensure that a path exists.  */
  2511.   int path_mode;
  2512.   
  2513. ***************
  2514. *** 55,60 ****
  2515. --- 97,106 ----
  2516.   
  2517.   struct option longopts[] =
  2518.   {
  2519. + #ifdef MSDOS
  2520. +   {"copying", 0, NULL, 30},
  2521. +   {"version", 0, NULL, 31},
  2522. + #endif
  2523.     {"mode", 1, NULL, 'm'},
  2524.     {"path", 0, &path_mode, 1},
  2525.     {NULL, 0, NULL, 0}
  2526. ***************
  2527. *** 89,94 ****
  2528. --- 135,150 ----
  2529.       case 'm':
  2530.         symbolic_mode = optarg;
  2531.         break;
  2532. + #ifdef MSDOS
  2533. +     case 30:
  2534. +       fprintf (stderr, COPYING);
  2535. +       exit (0);
  2536. +       break;
  2537. +     case 31:
  2538. +       fprintf (stderr, VERSION);
  2539. +       exit (0);
  2540. +       break;
  2541. + #endif
  2542.       default:
  2543.         usage ();
  2544.       }
  2545. ***************
  2546. *** 198,206 ****
  2547.   void
  2548.   usage ()
  2549.   {
  2550.     fprintf (stderr, "\
  2551.   Usage: %s [-p] [-m mode] [+path] [+mode mode] dir...\n",
  2552.          program_name);
  2553.     exit (1);
  2554.   }
  2555. - 
  2556. --- 254,267 ----
  2557.   void
  2558.   usage ()
  2559.   {
  2560. + #ifdef MSDOS
  2561. +   fprintf (stderr, "\
  2562. + Usage: %s [-p] [-m mode] [+path] [+mode mode] [+copying] \n\
  2563. +        [+version] dir...\n", program_name);
  2564. + #else
  2565.     fprintf (stderr, "\
  2566.   Usage: %s [-p] [-m mode] [+path] [+mode mode] dir...\n",
  2567.          program_name);
  2568. + #endif
  2569.     exit (1);
  2570.   }
  2571. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:30 1990
  2572. --- modechan.c    Wed Sep 19 12:33:30 1990
  2573. ***************
  2574. *** 15,20 ****
  2575. --- 15,32 ----
  2576.      along with this program; if not, write to the Free Software
  2577.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  2578.   
  2579. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  2580. +    This port is also distributed under the terms of the
  2581. +    GNU General Public License as published by the
  2582. +    Free Software Foundation.
  2583. + 
  2584. +    Please note that this file is not identical to the
  2585. +    original GNU release, you should have received this
  2586. +    code as patch to the official release.
  2587. + 
  2588. +    $Header: e:/gnu/fileutil/RCS/modechan.c 1.4.0.1 90/09/17 09:27:41 tho Exp $
  2589. +  */
  2590. + 
  2591.   /* Written by David MacKenzie <djm@ai.mit.edu> */
  2592.   
  2593.   /* The ASCII mode string is compiled into a linked list of `struct
  2594. ***************
  2595. *** 27,32 ****
  2596. --- 39,50 ----
  2597.   #include <sys/types.h>
  2598.   #include <sys/stat.h>
  2599.   #include "modechange.h"
  2600. + 
  2601. + #ifdef MSDOS
  2602. + #include <stdio.h>
  2603. + #include <io.h>
  2604. + static int oatoi (char *s);
  2605. + #endif
  2606.   
  2607.   #ifdef STDC_HEADERS
  2608.   #include <stdlib.h>
  2609. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:40 1990
  2610. --- mv.c    Wed Sep 19 12:45:40 1990
  2611. ***************
  2612. *** 14,20 ****
  2613. --- 14,44 ----
  2614.      You should have received a copy of the GNU General Public License
  2615.      along with this program; if not, write to the Free Software
  2616.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  2617. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  2618. +    This port is also distributed under the terms of the
  2619. +    GNU General Public License as published by the
  2620. +    Free Software Foundation.
  2621.   
  2622. +    Please note that this file is not identical to the
  2623. +    original GNU release, you should have received this
  2624. +    code as patch to the official release.  */
  2625. + 
  2626. + #ifdef MSDOS
  2627. + static char RCS_Id[] =
  2628. +   "$Header: e:/gnu/fileutil/RCS/mv.c 1.4.0.2 90/09/19 12:11:15 tho Exp $";
  2629. + 
  2630. + static char Program_Id[] = "mv";
  2631. + static char RCS_Revision[] = "$Revision: 1.4.0.2 $";
  2632. + 
  2633. + #define VERSION \
  2634. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  2635. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  2636. + 
  2637. + #define COPYING \
  2638. +   "This is free software, distributed under the terms of the\n" \
  2639. +   "GNU General Public License.  For details, see the file COPYING.\n"
  2640. + #endif /* MSDOS */
  2641. + 
  2642.   /* Options:
  2643.      -f, +force        Assume a 'y' answer to all questions it would
  2644.               normally ask, and not ask the questions.
  2645. ***************
  2646. *** 52,57 ****
  2647. --- 76,105 ----
  2648.   extern int errno;
  2649.   #endif
  2650.   
  2651. + #ifdef MSDOS
  2652. + 
  2653. + #include <io.h>
  2654. + #include <gnulib.h>
  2655. + 
  2656. + extern  void main (int argc, char **argv);
  2657. + extern  void error (int status, int errnum, char *message, ...);
  2658. + extern  int eaccess_stat (struct stat *statp, int mode);
  2659. + extern  enum backup_type get_version (char *version);
  2660. + static  int isdir (char *fn);
  2661. + static  int movefile (char *from, char *to);
  2662. + static  int do_move (char *from, char *to);
  2663. + static  int copy (char *from, char *to);
  2664. + static  int yesno (void );
  2665. + static  void strip_trailing_slashes (char **path);
  2666. + static  int force_unlink (char *filename);
  2667. + static  void usage (void );
  2668. + 
  2669. + #define unlink(name)        force_unlink (name)
  2670. + #define rename(from, to)    (unlink (to) || rename (from, to))
  2671. + #define strip_trailing_slashes(path)    strip_trailing_slashes (&path)
  2672. + 
  2673. + #else /* not MSDOS */
  2674. + 
  2675.   enum backup_type get_version ();
  2676.   int copy ();
  2677.   int do_move ();
  2678. ***************
  2679. *** 62,67 ****
  2680. --- 110,117 ----
  2681.   void strip_trailing_slashes ();
  2682.   void usage ();
  2683.   
  2684. + #endif /* not MSDOS */
  2685. + 
  2686.   /* The name this program was run with. */
  2687.   char *program_name;
  2688.   
  2689. ***************
  2690. *** 77,82 ****
  2691. --- 127,136 ----
  2692.   
  2693.   struct option long_options[] =
  2694.   {
  2695. + #ifdef MSDOS
  2696. +   {"copying", 0, NULL, 30},
  2697. +   {"version", 0, NULL, 31},
  2698. + #endif
  2699.     {"backup", 0, NULL, 'b'},
  2700.     {"force", 0, NULL, 'f'},
  2701.     {"interactive", 0, NULL, 'i'},
  2702. ***************
  2703. *** 134,139 ****
  2704. --- 188,203 ----
  2705.       case 'V':
  2706.         version = optarg;
  2707.         break;
  2708. + #ifdef MSDOS
  2709. +     case 30:
  2710. +       fprintf (stderr, COPYING);
  2711. +       exit (0);
  2712. +       break;
  2713. +     case 31:
  2714. +       fprintf (stderr, VERSION);
  2715. +       exit (0);
  2716. +       break;
  2717. + #endif
  2718.       default:
  2719.         usage ();
  2720.       }
  2721. ***************
  2722. *** 178,183 ****
  2723. --- 242,254 ----
  2724.       cp = from;
  2725.   
  2726.         newto = (char *) alloca (strlen (to) + 1 + strlen (cp) + 1);
  2727. + #ifdef MSDOS
  2728. +       /* Here a trailing slash might still be present (needed for
  2729. +      stat()'ing root directories), take care of that. */
  2730. +       if (to[strlen(to) - 1] == '/')
  2731. +     sprintf (newto, "%s%s", to, cp);
  2732. +       else
  2733. + #endif /* MSDOS */
  2734.         sprintf (newto, "%s/%s", to, cp);
  2735.         return do_move (from, newto);
  2736.       }
  2737. ***************
  2738. *** 206,211 ****
  2739. --- 277,289 ----
  2740.   
  2741.     if (lstat (to, &to_stats) == 0)
  2742.       {
  2743. + #ifdef MSDOS
  2744. +       if (strcmp (to, from) == 0)
  2745. +     {
  2746. +       error (0, 0, "`%s': can't move file to itself", from);
  2747. +       return 1;
  2748. +     }
  2749. + #else /* not MSDOS */
  2750.         if (from_stats.st_dev == to_stats.st_dev
  2751.         && from_stats.st_ino == to_stats.st_ino)
  2752.       {
  2753. ***************
  2754. *** 212,217 ****
  2755. --- 290,296 ----
  2756.         error (0, 0, "`%s' and `%s' are the same file", from, to);
  2757.         return 1;
  2758.       }
  2759. + #endif /* not MSDOS */
  2760.   
  2761.         if ((to_stats.st_mode & S_IFMT) == S_IFDIR)
  2762.       {
  2763. ***************
  2764. *** 324,336 ****
  2765. --- 403,424 ----
  2766.         return 1;
  2767.       }
  2768.   
  2769. + #ifdef MSDOS
  2770. +   ifd = open (from, O_RDONLY | O_BINARY, 0);
  2771. + #else /* not MSDOS */
  2772.     ifd = open (from, O_RDONLY, 0);
  2773. + #endif /* not MSDOS */
  2774.     if (ifd < 0)
  2775.       {
  2776.         error (0, errno, "%s", from);
  2777.         return 1;
  2778.       }
  2779. + 
  2780. + #ifdef MSDOS
  2781. +   ofd = open (to, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY, 0777);
  2782. + #else /* not MSDOS */
  2783.     ofd = open (to, O_WRONLY | O_CREAT | O_TRUNC, 0777);
  2784. + #endif /* not MSDOS */
  2785.     if (ofd < 0)
  2786.       {
  2787.         error (0, errno, "%s", to);
  2788. ***************
  2789. *** 431,436 ****
  2790. --- 519,538 ----
  2791.   
  2792.   /* Remove trailing slashes from PATH. */
  2793.   
  2794. + 
  2795. + #ifdef MSDOS
  2796. + #undef strip_trailing_slashes
  2797. + 
  2798. + void
  2799. + strip_trailing_slashes (char **path)
  2800. + {
  2801. +   char *new_path = _fullpath (NULL, *path, 0);
  2802. +   free (*path);
  2803. +   *path = msdos_format_filename (new_path);
  2804. + }
  2805. + 
  2806. + #else /* not MSDOS */
  2807. + 
  2808.   void
  2809.   strip_trailing_slashes (path)
  2810.        char *path;
  2811. ***************
  2812. *** 442,450 ****
  2813. --- 544,567 ----
  2814.       path[last--] = '\0';
  2815.   }
  2816.   
  2817. + #endif /* not MSDOS */
  2818. + 
  2819.   void
  2820.   usage ()
  2821.   {
  2822. + #ifdef MSDOS
  2823. +   fprintf (stderr, "\
  2824. + Usage: %s [-bfiuv] [-S backup-suffix] [-V {numbered,existing,simple}]\n\
  2825. +        [+backup] [+force] [+interactive] [+update] [+verbose]\n\
  2826. +        [+suffix backup-suffix] [+version-control {numbered,existing,simple}]\n\
  2827. +        [+copying] [+version] source dest\n\
  2828. + \n\
  2829. +        %s [-bfiuv] [-S backup-suffix] [-V {numbered,existing,simple}]\n\
  2830. +        [+backup] [+force] [+interactive] [+update] [+verbose]\n\
  2831. +        [+suffix backup-suffix] [+version-control {numbered,existing,simple}]\n\
  2832. +        [+copying] [+version] source... directory\n",
  2833. +        program_name, program_name);
  2834. + #else /* not MSDOS */
  2835.     fprintf (stderr, "\
  2836.   Usage: %s [-bfiuv] [-S backup-suffix] [-V {numbered,existing,simple}]\n\
  2837.          [+backup] [+force] [+interactive] [+update] [+verbose]\n\
  2838. ***************
  2839. *** 456,460 ****
  2840. --- 573,600 ----
  2841.          [+suffix backup-suffix] [+version-control {numbered,existing,simple}]\n\
  2842.          source... directory\n",
  2843.          program_name, program_name);
  2844. + #endif /* not MSDOS */
  2845.     exit (1);
  2846.   }
  2847. + 
  2848. + #ifdef MSDOS
  2849. + #undef unlink                    /* nasty tricks ... */
  2850. + 
  2851. + int
  2852. + force_unlink (char *filename)
  2853. + {
  2854. +   if (access (filename, 0))    /* file doesn't exist, pretend success */
  2855. +     return 0;
  2856. +   else
  2857. +     {
  2858. +       if (access (filename, 2)              /* no write permission */
  2859. +       && chmod (filename, S_IREAD|S_IWRITE))  /* can't force it ...  */
  2860. +     {
  2861. +       error (0, errno, "can't force write permission for %s", filename);
  2862. +       return -1;
  2863. +     }
  2864. +       else
  2865. +     return unlink (filename);
  2866. +     }
  2867. + }
  2868. + #endif /* MSDOS */
  2869. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:42 1990
  2870. --- paste.c    Wed Sep 19 12:46:38 1990
  2871. ***************
  2872. *** 40,46 ****
  2873. --- 40,70 ----
  2874.                   start again at its beginning.
  2875.      A FILE of `-' means standard input.
  2876.      If no FILEs are given, standard input is used. */
  2877. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  2878. +    This port is also distributed under the terms of the
  2879. +    GNU General Public License as published by the
  2880. +    Free Software Foundation.
  2881.   
  2882. +    Please note that this file is not identical to the
  2883. +    original GNU release, you should have received this
  2884. +    code as patch to the official release.  */
  2885. + 
  2886. + #ifdef MSDOS
  2887. + static char RCS_Id[] =
  2888. +   "$Header: e:/gnu/fileutil/RCS/paste.c 1.4.0.3 90/09/19 12:11:19 tho Exp $";
  2889. + 
  2890. + static char Program_Id[] = "paste";
  2891. + static char RCS_Revision[] = "$Revision: 1.4.0.3 $";
  2892. + 
  2893. + #define VERSION \
  2894. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  2895. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  2896. + 
  2897. + #define COPYING \
  2898. +   "This is free software, distributed under the terms of the\n" \
  2899. +   "GNU General Public License.  For details, see the file COPYING.\n"
  2900. + #endif /* MSDOS */
  2901. + 
  2902.   #include <stdio.h>
  2903.   #include <errno.h>
  2904.   #include <getopt.h>
  2905. ***************
  2906. *** 57,62 ****
  2907. --- 81,98 ----
  2908.   extern int errno;
  2909.   #endif
  2910.   
  2911. + #ifdef MSDOS
  2912. + 
  2913. + #include <gnulib.h>
  2914. + 
  2915. + void main (int argc, char **argv);
  2916. + char *collapse_escapes (char *strptr);
  2917. + int paste_parallel (int nfiles, char **fnamptr);
  2918. + int paste_serial (int nfiles, char **fnamptr);
  2919. + void usage (void);
  2920. + 
  2921. + #else /* not MSDOS */
  2922. + 
  2923.   char *collapse_escapes ();
  2924.   char *xmalloc ();
  2925.   char *xrealloc ();
  2926. ***************
  2927. *** 65,70 ****
  2928. --- 101,109 ----
  2929.   void error ();
  2930.   void usage ();
  2931.   
  2932. + #endif /* not MSDOS */
  2933. + 
  2934. + 
  2935.   /* Indicates that no delimiter should be added in the current position. */
  2936.   #define EMPTY_DELIM '\0'
  2937.   
  2938. ***************
  2939. *** 89,94 ****
  2940. --- 128,137 ----
  2941.   
  2942.   struct option longopts[] =
  2943.   {
  2944. + #ifdef MSDOS
  2945. +   {"copying", 0, NULL, 30},
  2946. +   {"version", 0, NULL, 31},
  2947. + #endif
  2948.     {"serial", 0, 0, 's'},
  2949.     {"delimiters", 1, 0, 'd'},
  2950.     {0, 0, 0, 0}
  2951. ***************
  2952. *** 124,129 ****
  2953. --- 167,184 ----
  2954.         serial_merge++;
  2955.         break;
  2956.   
  2957. + #ifdef MSDOS
  2958. +     case 30:
  2959. +       fprintf (stderr, COPYING);
  2960. +       exit (0);
  2961. +       break;
  2962. + 
  2963. +     case 31:
  2964. +       fprintf (stderr, VERSION);
  2965. +       exit (0);
  2966. +       break;
  2967. + #endif
  2968. + 
  2969.       default:
  2970.         usage ();
  2971.       }
  2972. ***************
  2973. *** 438,443 ****
  2974. --- 493,500 ----
  2975.     return errors;
  2976.   }
  2977.   
  2978. + #ifndef MSDOS            /* We have it in gnulib  */
  2979. + 
  2980.   /* Allocate N bytes of memory dynamically, with error checking.  */
  2981.   
  2982.   char *
  2983. ***************
  2984. *** 463,474 ****
  2985. --- 520,540 ----
  2986.     return p;
  2987.   }
  2988.   
  2989. + #endif /* not MSDOS */
  2990. + 
  2991.   void
  2992.   usage ()
  2993.   {
  2994. + 
  2995. + #ifdef MSDOS
  2996. +   fprintf (stderr, "\
  2997. + Usage: %s [-s] [-d delim-list] [+serial] [+delimiters delim-list]\n\
  2998. +        [+copying] [+version] [file...]\n",
  2999. + #else /* not MSDOS */
  3000.     fprintf (stderr, "\
  3001.   Usage: %s [-s] [-d delim-list] [+serial] [+delimiters delim-list]\n\
  3002.          [file...]\n",
  3003. + #endif /* not MSDOS */
  3004.          program_name);
  3005.     exit (1);
  3006.   }
  3007. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:44 1990
  3008. --- posixtim.y    Wed Sep 19 12:54:42 1990
  3009. ***************
  3010. *** 17,25 ****
  3011. --- 17,39 ----
  3012.   
  3013.   /* Written by Jim Kingdon and David MacKenzie. */
  3014.   
  3015. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  3016. +    This port is also distributed under the terms of the
  3017. +    GNU General Public License as published by the
  3018. +    Free Software Foundation.
  3019. + 
  3020. +    Please note that this file is not identical to the
  3021. +    original GNU release, you should have received this
  3022. +    code as patch to the official release.  */
  3023. + 
  3024.   %token digit
  3025.   
  3026.   %{
  3027. + #ifdef MSDOS
  3028. + static char RCS_Id[] =
  3029. +   "$Header: e:/gnu/fileutil/RCS/posixtim.y 1.4.0.2 90/09/19 12:54:32 tho Exp $";
  3030. + #endif /* MSDOS */
  3031. + 
  3032.   #include <stdio.h>
  3033.   #include <sys/types.h>
  3034.   #include <time.h>
  3035. ***************
  3036. *** 41,49 ****
  3037.   
  3038.   time_t mktime ();
  3039.   
  3040.   static int yylex ();
  3041. - #define yyparse posixtime_yyparse
  3042.   static int yyerror ();
  3043.   %}
  3044.   
  3045.   %%
  3046. --- 55,70 ----
  3047.   
  3048.   time_t mktime ();
  3049.   
  3050. + #ifdef MSDOS
  3051. + #include <malloc.h>
  3052. + static int yyerror (void);
  3053. + static int yylex (void);
  3054. + #else /* not MSDOS */
  3055.   static int yylex ();
  3056.   static int yyerror ();
  3057. + #endif /* not MSDOS */
  3058. + 
  3059. + #define yyparse posixtime_yyparse
  3060.   %}
  3061.   
  3062.   %%
  3063. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:46 1990
  3064. --- rm.c    Wed Sep 19 12:47:36 1990
  3065. ***************
  3066. *** 17,22 ****
  3067. --- 17,47 ----
  3068.   
  3069.   /* Written by Paul Rubin, David MacKenzie, and Richard Stallman. */
  3070.   
  3071. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  3072. +    This port is also distributed under the terms of the
  3073. +    GNU General Public License as published by the
  3074. +    Free Software Foundation.
  3075. + 
  3076. +    Please note that this file is not identical to the
  3077. +    original GNU release, you should have received this
  3078. +    code as patch to the official release.  */
  3079. + 
  3080. + #ifdef MSDOS
  3081. + static char RCS_Id[] =
  3082. +   "$Header: e:/gnu/fileutil/RCS/rm.c 1.4.0.3 90/09/20 08:46:14 tho Exp $";
  3083. + 
  3084. + static char Program_Id[] = "rm";
  3085. + static char RCS_Revision[] = "$Revision: 1.4.0.3 $";
  3086. + 
  3087. + #define VERSION \
  3088. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  3089. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  3090. + 
  3091. + #define COPYING \
  3092. +   "This is free software, distributed under the terms of the\n" \
  3093. +   "GNU General Public License.  For details, see the file COPYING.\n"
  3094. + #endif /* MSDOS */
  3095. + 
  3096.   #include <stdio.h>
  3097.   #include <getopt.h>
  3098.   #include <sys/types.h>
  3099. ***************
  3100. *** 32,37 ****
  3101. --- 57,91 ----
  3102.   extern int errno;
  3103.   #endif
  3104.   
  3105. + #ifdef MSDOS
  3106. + #include <string.h>
  3107. + #include <malloc.h>
  3108. + #include <io.h>
  3109. + #include <direct.h>
  3110. + 
  3111. + #include <gnulib.h>
  3112. + 
  3113. + extern  void main (int argc, char **argv);
  3114. + static  int rm (void);
  3115. + static  int remove_file (struct stat *statp);
  3116. + static  int remove_dir (struct stat *statp);
  3117. + static  int clear_directory (struct stat *statp);
  3118. + static  int yesno (void);
  3119. + static  char *basename (char *name);
  3120. + static  char *stpcpy (char *dest, char *source);
  3121. + static  void usage (void);
  3122. + 
  3123. + extern  int eaccess (char *path, int mode);
  3124. + extern  int eaccess_stat (struct stat *statp, int mode);
  3125. + 
  3126. + static  void strip_trailing_slashes (char **path);
  3127. + #define strip_trailing_slashes(path)    strip_trailing_slashes (&path)
  3128. + #define check_stack(stck, ino)        0
  3129. + #define unlink(name)            force_unlink (name)
  3130. + static int force_unlink (char *filename);
  3131. + 
  3132. + #else /* not MSDOS */
  3133. + 
  3134.   char *basename ();
  3135.   char *stpcpy ();
  3136.   char *xmalloc ();
  3137. ***************
  3138. *** 47,52 ****
  3139. --- 101,109 ----
  3140.   void strip_trailing_slashes ();
  3141.   void usage ();
  3142.   
  3143. + #endif /* not MSDOS */
  3144. + 
  3145. + 
  3146.   /* Path of file now being processed; extended as necessary. */
  3147.   char *pathname;
  3148.   
  3149. ***************
  3150. *** 80,85 ****
  3151. --- 137,146 ----
  3152.   
  3153.   struct option long_opts[] =
  3154.   {
  3155. + #ifdef MSDOS
  3156. +   {"copying", 0, NULL, 30},
  3157. +   {"version", 0, NULL, 31},
  3158. + #endif
  3159.     {"directory", 0, &unlink_dirs, 1},
  3160.     {"force", 0, NULL, 'f'},
  3161.     {"interactive", 0, NULL, 'i'},
  3162. ***************
  3163. *** 101,108 ****
  3164.     verbose = ignore_missing_files = recursive = interactive
  3165.       = unlink_dirs = 0;
  3166.     pnsize = 256;
  3167. -   pathname = xmalloc (pnsize);
  3168.     program_name = argv[0];
  3169.   
  3170.     while ((c = getopt_long (argc, argv, "dfirvR", long_opts, &ind)) != EOF)
  3171.       {
  3172. --- 162,169 ----
  3173.     verbose = ignore_missing_files = recursive = interactive
  3174.       = unlink_dirs = 0;
  3175.     pnsize = 256;
  3176.     program_name = argv[0];
  3177. +   pathname = xmalloc (pnsize);
  3178.   
  3179.     while ((c = getopt_long (argc, argv, "dfirvR", long_opts, &ind)) != EOF)
  3180.       {
  3181. ***************
  3182. *** 128,133 ****
  3183. --- 189,204 ----
  3184.       case 'v':
  3185.         verbose = 1;
  3186.         break;
  3187. + #ifdef MSDOS
  3188. +     case 30:
  3189. +       fprintf (stderr, COPYING);
  3190. +       exit (0);
  3191. +       break;
  3192. +     case 31:
  3193. +       fprintf (stderr, VERSION);
  3194. +       exit (0);
  3195. +       break;
  3196. + #endif
  3197.       default:
  3198.         usage ();
  3199.       }
  3200. ***************
  3201. *** 136,141 ****
  3202. --- 207,213 ----
  3203.     if (optind == argc)
  3204.       usage ();
  3205.   
  3206. + #ifndef MSDOS            /* this fails at the root ... */
  3207.     if (lstat (".", &stats))
  3208.       error (1, errno, ".");
  3209.     dot_dev = stats.st_dev;
  3210. ***************
  3211. *** 144,149 ****
  3212. --- 216,222 ----
  3213.       error (1, errno, "..");
  3214.     dotdot_dev = stats.st_dev;
  3215.     dotdot_ino = stats.st_ino;
  3216. + #endif /* not MSDOS */
  3217.   
  3218.     for (; optind < argc; optind++)
  3219.       {
  3220. ***************
  3221. *** 180,185 ****
  3222. --- 253,259 ----
  3223.         return 1;
  3224.       }
  3225.   
  3226. + #ifndef MSDOS
  3227.     if ((path_stats.st_dev == dot_dev && path_stats.st_ino == dot_ino)
  3228.         || (path_stats.st_dev == dotdot_dev && path_stats.st_ino == dotdot_ino))
  3229.       {
  3230. ***************
  3231. *** 186,191 ****
  3232. --- 260,266 ----
  3233.         error (0, 0, "%s: cannot remove current directory or parent", pathname);
  3234.         return 1;
  3235.       }
  3236. + #endif /* not MSDOS */
  3237.   
  3238.     if ((path_stats.st_mode & S_IFMT) == S_IFDIR && !unlink_dirs)
  3239.       return remove_dir (&path_stats);
  3240. ***************
  3241. *** 329,341 ****
  3242. --- 404,425 ----
  3243.         return 1;
  3244.       }
  3245.   
  3246. + #ifdef MSDOS                /* stat () it ourselves ... */
  3247. +   statp->st_size = 0L;
  3248. +   for (dp = readdir (dirp); dp != NULL; dp = readdir (dirp))
  3249. +     statp->st_size += strlen(dp->d_name) + 1;
  3250. +   seekdir(dirp, 0L);
  3251. + #endif /* MSDOS */
  3252. + 
  3253.     name_size = statp->st_size;
  3254.     name_space = (char *) xmalloc (name_size);
  3255.     namep = name_space;
  3256.   
  3257. + #ifndef MSDOS
  3258.     inode_size = statp->st_size;
  3259.     inode_space = (ino_t *) xmalloc (inode_size);
  3260.     inodep = inode_space;
  3261. + #endif /* not MSDOS */
  3262.   
  3263.     while ((dp = readdir (dirp)) != NULL)
  3264.       {
  3265. ***************
  3266. *** 359,364 ****
  3267. --- 443,449 ----
  3268.           }
  3269.         namep = stpcpy (namep, dp->d_name) + 1;
  3270.   
  3271. + #ifndef MSDOS
  3272.         if (inodep == inode_space + inode_size)
  3273.           {
  3274.             ino_t *new_inode_space;
  3275. ***************
  3276. *** 369,374 ****
  3277. --- 454,460 ----
  3278.             inode_space = new_inode_space;
  3279.           }
  3280.         *inodep++ = dp->d_ino;
  3281. + #endif /* not MSDOS */
  3282.       }
  3283.       }
  3284.     *namep = '\0';
  3285. ***************
  3286. *** 415,424 ****
  3287. --- 501,513 ----
  3288.         pathstack = pathstack->next;    /* Pop the stack. */
  3289.       }
  3290.     free (name_space);
  3291. + #ifndef MSDOS
  3292.     free (inode_space);
  3293. + #endif /* not MSDOS */
  3294.     return err;
  3295.   }
  3296.   
  3297. + #ifndef MSDOS
  3298.   /* If STACK does not already have an entry with the same i-number as INUM,
  3299.      return 0. Otherwise, ask the user whether to continue;
  3300.      if yes, return 1, and if no, exit.
  3301. ***************
  3302. *** 455,460 ****
  3303. --- 544,550 ----
  3304.       }
  3305.     return 0;
  3306.   }
  3307. + #endif /* !MSDOS */
  3308.   
  3309.   /* Query the user for a line from the keyboard;
  3310.      return 1 if yes, 0 otherwise. */
  3311. ***************
  3312. *** 476,482 ****
  3313. --- 566,585 ----
  3314.   
  3315.   /* Remove trailing slashes from PATH; they cause some system calls to fail. */
  3316.   
  3317. + #ifdef MSDOS
  3318. + #undef strip_trailing_slashes
  3319. + 
  3320.   void
  3321. + strip_trailing_slashes (char **path)
  3322. + {
  3323. +   char *new_path = _fullpath (NULL, *path, 0);
  3324. +   free (*path);
  3325. +   *path = msdos_format_filename (new_path);
  3326. + }
  3327. + 
  3328. + #else /* not MSDOS */
  3329. + 
  3330. + void
  3331.   strip_trailing_slashes (path)
  3332.        char *path;
  3333.   {
  3334. ***************
  3335. *** 510,515 ****
  3336. --- 613,620 ----
  3337.     return p;
  3338.   }
  3339.   
  3340. + #endif /* not MSDOS */
  3341. + 
  3342.   /* Return NAME with any leading path stripped off.  */
  3343.   
  3344.   char *
  3345. ***************
  3346. *** 539,547 ****
  3347. --- 644,671 ----
  3348.   void
  3349.   usage ()
  3350.   {
  3351. + #ifdef MSDOS
  3352. +   fprintf (stderr, "\
  3353. + Usage: %s [-dfirvR] [+directory] [+force] [+interactive] [+recursive]\n\
  3354. +        [+verbose] [+copying] [+version] path...\n",
  3355. + #else /* not MSDOS */
  3356.     fprintf (stderr, "\
  3357.   Usage: %s [-dfirvR] [+directory] [+force] [+interactive] [+recursive]\n\
  3358.          [+verbose] path...\n",
  3359. + #endif /* not MSDOS */
  3360.          program_name);
  3361.     exit (1);
  3362.   }
  3363. + 
  3364. + #ifdef MSDOS
  3365. + int
  3366. + force_unlink(char *filename)
  3367. + {
  3368. +   if (access( filename, 2))            /* read only */
  3369. +     if (chmod( filename, S_IREAD|S_IWRITE))
  3370. +       error (0, errno, "can't force write permission for %s", filename);
  3371. + 
  3372. + #undef unlink                    /* nasty tricks ... */
  3373. +   return unlink (filename);
  3374. + }
  3375. + #endif /* MSDOS */
  3376. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:50 1990
  3377. --- rmdir.c    Wed Sep 19 12:48:32 1990
  3378. ***************
  3379. *** 15,20 ****
  3380. --- 15,45 ----
  3381.      along with this program; if not, write to the Free Software
  3382.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  3383.   
  3384. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  3385. +    This port is also distributed under the terms of the
  3386. +    GNU General Public License as published by the
  3387. +    Free Software Foundation.
  3388. + 
  3389. +    Please note that this file is not identical to the
  3390. +    original GNU release, you should have received this
  3391. +    code as patch to the official release.  */
  3392. + 
  3393. + #ifdef MSDOS
  3394. + static char RCS_Id[] =
  3395. +   "$Header: e:/gnu/fileutil/RCS/rmdir.c 1.4.0.2 90/09/19 12:09:14 tho Exp $";
  3396. + 
  3397. + static char Program_Id[] = "rmdir";
  3398. + static char RCS_Revision[] = "$Revision: 1.4.0.2 $";
  3399. + 
  3400. + #define VERSION \
  3401. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  3402. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  3403. + 
  3404. + #define COPYING \
  3405. +   "This is free software, distributed under the terms of the\n" \
  3406. +   "GNU General Public License.  For details, see the file COPYING.\n"
  3407. + #endif /* MSDOS */
  3408. + 
  3409.   /* Usage: rmdir [-p] [+path] dir...
  3410.   
  3411.      Options:
  3412. ***************
  3413. *** 36,46 ****
  3414. --- 61,85 ----
  3415.   extern int errno;
  3416.   #endif
  3417.   
  3418. + #ifdef MSDOS
  3419. + 
  3420. + #include <direct.h>
  3421. + #include <gnulib.h>
  3422. + 
  3423. + extern void main (int argc, char * *argv);
  3424. + static void remove_parents (char *path);
  3425. + static void strip_trailing_slashes (char *path);
  3426. + static void usage (void);
  3427. + 
  3428. + #else /* not MSDOS */
  3429. + 
  3430.   void remove_parents ();
  3431.   void error ();
  3432.   void strip_trailing_slashes ();
  3433.   void usage ();
  3434.   
  3435. + #endif /* not MSDOS */
  3436. + 
  3437.   /* If nonzero, remove empty parent directories. */
  3438.   int empty_paths;
  3439.   
  3440. ***************
  3441. *** 49,54 ****
  3442. --- 88,97 ----
  3443.   
  3444.   struct option longopts[] =
  3445.   {
  3446. + #ifdef MSDOS
  3447. +   {"copying", 0, NULL, 30},
  3448. +   {"version", 0, NULL, 31},
  3449. + #endif
  3450.     {"path", 0, &empty_paths, 1},
  3451.     {NULL, 0, NULL, 0}
  3452.   };
  3453. ***************
  3454. *** 74,79 ****
  3455. --- 117,132 ----
  3456.       case 'p':
  3457.         empty_paths = 1;
  3458.         break;
  3459. + #ifdef MSDOS
  3460. +     case 30:
  3461. +       fprintf (stderr, COPYING);
  3462. +       exit (0);
  3463. +       break;
  3464. +     case 31:
  3465. +       fprintf (stderr, VERSION);
  3466. +       exit (0);
  3467. +       break;
  3468. + #endif
  3469.       default:
  3470.         usage ();
  3471.       }
  3472. ***************
  3473. *** 136,142 ****
  3474. --- 189,199 ----
  3475.   void
  3476.   usage ()
  3477.   {
  3478. + #ifdef MSDOS
  3479. +   fprintf (stderr, "Usage: %s [-p] [+path] [+copying] [+version] dir...\n",
  3480. + #else /* not MSDOS */
  3481.     fprintf (stderr, "Usage: %s [-p] [+path] dir...\n",
  3482. + #endif /* not MSDOS */
  3483.          program_name);
  3484.     exit (1);
  3485.   }
  3486. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:50 1990
  3487. --- savedir.c    Wed Sep 19 12:33:58 1990
  3488. ***************
  3489. *** 17,23 ****
  3490. --- 17,36 ----
  3491.   
  3492.   /* Written by David MacKenzie <djm@ai.mit.edu>. */
  3493.   
  3494. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  3495. +    This port is also distributed under the terms of the
  3496. +    GNU General Public License as published by the
  3497. +    Free Software Foundation.
  3498. + 
  3499. +    Please note that this file is not identical to the
  3500. +    original GNU release, you should have received this
  3501. +    code as patch to the official release.
  3502. + 
  3503. +    $Header: e:/gnu/fileutil/RCS/savedir.c 1.4.0.2 90/09/17 09:28:48 tho Exp $
  3504. +  */
  3505. + 
  3506.   #include <sys/types.h>
  3507. + 
  3508.   #ifdef DIRENT
  3509.   #include <dirent.h>
  3510.   #ifdef direct
  3511. ***************
  3512. *** 50,55 ****
  3513. --- 63,74 ----
  3514.   #endif
  3515.   #endif
  3516.   
  3517. + #ifdef MSDOS
  3518. + #include <stdio.h>
  3519. + extern char *savedir (char *dir, unsigned name_size);
  3520. + static char *stpcpy (char *dest, char *source);
  3521. + #endif /* MSDOS */
  3522. + 
  3523.   static char *stpcpy ();
  3524.   
  3525.   /* Return a freshly allocated string containing the filenames
  3526. ***************
  3527. *** 72,77 ****
  3528. --- 91,103 ----
  3529.     dirp = opendir (dir);
  3530.     if (dirp == NULL)
  3531.       return NULL;
  3532. + 
  3533. + #ifdef MSDOS                 /* stat () it ourselves ... */
  3534. +   name_size = 0;
  3535. +   for (dp = readdir (dirp); dp != NULL; dp = readdir (dirp))
  3536. +     name_size += strlen(dp->d_name) + 1;
  3537. +   seekdir(dirp, 0L);
  3538. + #endif /* MSDOS */
  3539.   
  3540.     name_space = (char *) malloc (name_size);
  3541.     if (name_space == NULL)
  3542. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:52 1990
  3543. --- system.h    Wed Sep 19 12:31:38 1990
  3544. ***************
  3545. *** 17,22 ****
  3546. --- 17,34 ----
  3547.   
  3548.   /* Include sys/types.h before this file.  */
  3549.   
  3550. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  3551. +    This port is also distributed under the terms of the
  3552. +    GNU General Public License as published by the
  3553. +    Free Software Foundation.
  3554. + 
  3555. +    Please note that this file is not identical to the
  3556. +    original GNU release, you should have received this
  3557. +    code as patch to the official release.
  3558. + 
  3559. +    $Header: e:/gnu/fileutil/RCS/system.h 1.4.0.2 90/09/19 12:27:45 tho Exp $
  3560. +  */
  3561. + 
  3562.   #include <sys/stat.h>
  3563.   
  3564.   #ifdef _POSIX_SOURCE
  3565. ***************
  3566. *** 25,36 ****
  3567. --- 37,54 ----
  3568.   #else
  3569.   
  3570.   #ifdef USG
  3571. + #ifdef MSDOS
  3572. + #include <time.h>
  3573. + #else /* not MSDOS */
  3574.   #include <sys/times.h>
  3575. + #endif /* not MSDOS */
  3576.   #else
  3577.   #include <sys/time.h>
  3578.   #endif
  3579.   
  3580. + #ifndef MSDOS
  3581.   #include <sys/param.h>
  3582. + #endif /* not MSDOS */
  3583.   #define _POSIX_PATH_MAX 255
  3584.   #define _POSIX_NAME_MAX 14
  3585.   
  3586. ***************
  3587. *** 67,73 ****
  3588. --- 85,96 ----
  3589.   #define makedev(maj, min)  (((maj) << 8) | (min))
  3590.   #else
  3591.   #ifdef USG
  3592. + #ifdef MSDOS
  3593. + #define major(dev)  (((dev) >> 8) & 0xff)
  3594. + #define minor(dev)  ((dev) & 0xff)
  3595. + #else /* not MSDOS */
  3596.   #include <sys/sysmacros.h>
  3597. + #endif /* not MSDOS */
  3598.   #endif
  3599.   #endif
  3600.   
  3601. ***************
  3602. *** 79,84 ****
  3603. --- 102,110 ----
  3604.     long actime;
  3605.     long modtime;
  3606.   };
  3607. + #ifdef MSDOS
  3608. + int utime(char *, struct utimbuf *);
  3609. + #endif /* MSDOS */
  3610.   #endif
  3611.   
  3612.   #if defined(USG) || defined(STDC_HEADERS)
  3613. ***************
  3614. *** 134,139 ****
  3615. --- 160,173 ----
  3616.   #endif
  3617.   #endif
  3618.   
  3619. + 
  3620. + #ifdef MSDOS
  3621. + 
  3622. + #define ST_BLKSIZE(statbuf) BLKSIZE
  3623. + #define ST_NBLOCKS(statbuf) (((statbuf).st_size + DEV_BSIZE - 1) / DEV_BSIZE)
  3624. + 
  3625. + #else /* not MSDOS */
  3626. + 
  3627.   /* Extract data from a `struct stat'.
  3628.      ST_BLKSIZE: Optimal I/O blocksize for the file.
  3629.      ST_NBLOCKS: Number of blocks in the file (including indirect blocks). */
  3630. ***************
  3631. *** 152,157 ****
  3632. --- 186,193 ----
  3633.   #endif
  3634.   #endif
  3635.   
  3636. + #endif /* not MSDOS */
  3637. + 
  3638.   /* Convert B blocks of DEV_BSIZE bytes
  3639.      to kilobytes if K is nonzero, otherwise to blocks of 512 bytes. */
  3640.   
  3641. ***************
  3642. *** 181,186 ****
  3643. --- 217,226 ----
  3644.   #ifdef sparc
  3645.   #include <alloca.h>
  3646.   #else
  3647. + #ifdef MSDOS
  3648. + #include <malloc.h>
  3649. + #else
  3650.   char *alloca ();
  3651. + #endif
  3652.   #endif
  3653.   #endif
  3654. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:54 1990
  3655. --- tac.c    Wed Sep 19 12:49:08 1990
  3656. ***************
  3657. *** 18,23 ****
  3658. --- 18,48 ----
  3659.   /* Written by Jay Lepreau (lepreau@cs.utah.edu).
  3660.      GNU enhancements by David MacKenzie (djm@ai.mit.edu). */
  3661.   
  3662. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  3663. +    This port is also distributed under the terms of the
  3664. +    GNU General Public License as published by the
  3665. +    Free Software Foundation.
  3666. + 
  3667. +    Please note that this file is not identical to the
  3668. +    original GNU release, you should have received this
  3669. +    code as patch to the official release.  */
  3670. + 
  3671. + #ifdef MSDOS
  3672. + static char RCS_Id[] =
  3673. +   "$Header: e:/gnu/fileutil/RCS/tac.c 1.4.0.3 90/09/19 12:09:16 tho Exp $";
  3674. + 
  3675. + static char Program_Id[] = "tac";
  3676. + static char RCS_Revision[] = "$Revision: 1.4.0.3 $";
  3677. + 
  3678. + #define VERSION \
  3679. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  3680. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  3681. + 
  3682. + #define COPYING \
  3683. +   "This is free software, distributed under the terms of the\n" \
  3684. +   "GNU General Public License.  For details, see the file COPYING.\n"
  3685. + #endif /* MSDOS */
  3686. + 
  3687.   /* Usage: tac [-br] [-s separator] [+before] [+regex] [+separator separator]
  3688.             [file...]
  3689.   
  3690. ***************
  3691. *** 67,72 ****
  3692. --- 92,121 ----
  3693.   off_t lseek ();
  3694.   #endif
  3695.   
  3696. + #ifdef MSDOS
  3697. + 
  3698. + #include <gnulib.h>
  3699. + #include <io.h>
  3700. + 
  3701. + /* We need a static malloc (with cleanup) here, so mask off
  3702. +    the one from gnulib   */
  3703. + #define xmalloc _xmalloc
  3704. + #define xrealloc _xrealloc
  3705. + 
  3706. + static char *_xmalloc (unsigned int n);
  3707. + static char *_xrealloc (char *p, unsigned int n);
  3708. + 
  3709. + extern void main (int argc, char **argv);
  3710. + static int tac (int fd, char *file);
  3711. + static int tac_file (char *file);
  3712. + static int tac_stdin (void );
  3713. + static void output (char *start, char *past_end);
  3714. + static void save_stdin (void );
  3715. + static void xwrite (int desc, char *buffer, int size);
  3716. + static SIGTYPE cleanup (void );
  3717. + 
  3718. + #else /* not MSDOS */
  3719. + 
  3720.   SIGTYPE cleanup ();
  3721.   int tac ();
  3722.   int tac_file ();
  3723. ***************
  3724. *** 77,82 ****
  3725. --- 126,132 ----
  3726.   void error ();
  3727.   void save_stdin ();
  3728.   void xwrite ();
  3729. + #endif /* not MSDOS */
  3730.   
  3731.   /* The name this program was run with. */
  3732.   char *program_name;
  3733. ***************
  3734. *** 114,119 ****
  3735. --- 164,173 ----
  3736.   
  3737.   struct option longopts[] =
  3738.   {
  3739. + #ifdef MSDOS
  3740. +   {"copying", 0, NULL, 30},
  3741. +   {"version", 0, NULL, 31},
  3742. + #endif
  3743.     {"before", 0, &separator_ends_record, 0},
  3744.     {"regex", 0, &sentinel_length, 0},
  3745.     {"separator", 1, NULL, 's'},
  3746. ***************
  3747. *** 120,126 ****
  3748.     {NULL, 0, NULL, 0}
  3749.   };
  3750.   
  3751. ! int
  3752.   main (argc, argv)
  3753.        int argc;
  3754.        char **argv;
  3755. --- 174,180 ----
  3756.     {NULL, 0, NULL, 0}
  3757.   };
  3758.   
  3759. ! void
  3760.   main (argc, argv)
  3761.        int argc;
  3762.        char **argv;
  3763. ***************
  3764. *** 129,134 ****
  3765. --- 183,193 ----
  3766.     int optc, longind, errors;
  3767.   
  3768.     program_name = argv[0];
  3769. + #ifdef MSDOS
  3770. +   setmode (0, O_BINARY);
  3771. +   setmode (1, O_BINARY);
  3772. + #endif /* MSDOS */
  3773. + 
  3774.     errors = 0;
  3775.     separator = "\n";
  3776.     sentinel_length = 1;
  3777. ***************
  3778. *** 152,161 ****
  3779. --- 211,236 ----
  3780.         if (*separator == 0)
  3781.           error (1, 0, "separator cannot be empty");
  3782.         break;
  3783. + #ifdef MSDOS
  3784. +     case 30:
  3785. +       fprintf (stderr, COPYING);
  3786. +       exit (0);
  3787. +       break;
  3788. +     case 31:
  3789. +       fprintf (stderr, VERSION);
  3790. +       exit (0);
  3791. +       break;
  3792. + #endif
  3793.       default:
  3794. + #ifdef MSDOS
  3795. +       fprintf (stderr, "\
  3796. + Usage: %s [-br] [-s separator] [+before] [+regex] [+separator separator]\n\
  3797. +        [+copying] [+version] [file...]\n",
  3798. + #else /* not MSDOS */
  3799.         fprintf (stderr, "\
  3800.   Usage: %s [-br] [-s separator] [+before] [+regex] [+separator separator]\n\
  3801.          [file...]\n",
  3802. + #endif /* not MSDOS */
  3803.              program_name);
  3804.         exit (1);
  3805.       }
  3806. ***************
  3807. *** 164,170 ****
  3808. --- 239,250 ----
  3809.     if (sentinel_length == 0)
  3810.       {
  3811.         compiled_separator.allocated = 100;
  3812. + #ifdef MSDOS
  3813. +       compiled_separator.buffer
  3814. +     = xmalloc ((size_t) compiled_separator.allocated);
  3815. + #else /* not MSDOS */
  3816.         compiled_separator.buffer = xmalloc (compiled_separator.allocated);
  3817. + #endif /* not MSDOS */
  3818.         compiled_separator.fastmap = xmalloc (256);
  3819.         compiled_separator.translate = 0;
  3820.         error_message = re_compile_pattern (separator, strlen (separator),
  3821. ***************
  3822. *** 235,243 ****
  3823. --- 315,325 ----
  3824.     sigint = signal (SIGINT, SIG_IGN);
  3825.     if (sigint != SIG_IGN)
  3826.       signal (SIGINT, cleanup);
  3827. + #ifdef SIGHUP
  3828.     sighup = signal (SIGHUP, SIG_IGN);
  3829.     if (sighup != SIG_IGN)
  3830.       signal (SIGHUP, cleanup);
  3831. + #endif
  3832.     sigterm = signal (SIGTERM, SIG_IGN);
  3833.     if (sigterm != SIG_IGN)
  3834.       signal (SIGTERM, cleanup);
  3835. ***************
  3836. *** 247,259 ****
  3837. --- 329,348 ----
  3838.   
  3839.     unlink (tempfile);
  3840.     signal (SIGINT, sigint);
  3841. + #ifdef SIGHUP
  3842.     signal (SIGHUP, sighup);
  3843. + #endif
  3844.     signal (SIGTERM, sigterm);
  3845.     return errors;
  3846.   }
  3847.   
  3848. + #ifdef MSDOS
  3849. + char template[] = "/tacXXXXXX";
  3850. + char *workplate;
  3851. + #else /* not MSDOS */
  3852.   char template[] = "/tmp/tacXXXXXX";
  3853.   char workplate[sizeof template];
  3854. + #endif /* not MSDOS */
  3855.   
  3856.   /* Make a copy of the standard input in `tempfile'. */
  3857.   
  3858. ***************
  3859. *** 263,276 ****
  3860. --- 352,391 ----
  3861.     int fd;
  3862.     int bytes_read;
  3863.   
  3864. + #ifdef MSDOS
  3865. +   char *p;
  3866. + 
  3867. +   if ((p = getenv ("TMP")) || (p = getenv ("TEMP")))
  3868. +     {
  3869. +       int len = strlen (p);
  3870. +       workplate = (char *) xmalloc (sizeof (template) + len + 1);
  3871. +       strcpy (workplate, p);
  3872. +       p = workplate + len - 1;
  3873. +       if (*p == '/' || *p == '\\')    /*  strip trailing slash */
  3874. +     *p = '\0';
  3875. +     }
  3876. +   else
  3877. +     {
  3878. +       workplate = (char *) xmalloc (sizeof (template) + 2);
  3879. +       strcpy (workplate, ".");
  3880. +     }
  3881. +   strcat (workplate, template);
  3882. + #else /* not MSDOS */
  3883.     strcpy (workplate, template);
  3884. + #endif /* not MSDOS */
  3885.     tempfile = mktemp (workplate);
  3886. + 
  3887. + #ifdef MSDOS
  3888. +   fd = open (tempfile, O_CREAT|O_TRUNC|O_RDWR|O_BINARY, S_IWRITE|S_IREAD);
  3889. + #else /* not MSDOS */
  3890.     fd = creat (tempfile, 0600);
  3891. + #endif /* not MSDOS */
  3892.     if (fd == -1)
  3893.       {
  3894.         error (0, errno, "%s", tempfile);
  3895.         cleanup ();
  3896.       }
  3897. + 
  3898.     while ((bytes_read = read (0, buffer, read_size)) > 0)
  3899.       if (write (fd, buffer, bytes_read) != bytes_read)
  3900.         {
  3901. ***************
  3902. *** 294,300 ****
  3903. --- 409,419 ----
  3904.   {
  3905.     int fd, errors;
  3906.   
  3907. + #ifdef MSDOS
  3908. +   fd = open (file, O_RDONLY|O_BINARY);
  3909. + #else /* not MSDOS */
  3910.     fd = open (file, 0);
  3911. + #endif /* not MSDOS */
  3912.     if (fd == -1)
  3913.       {
  3914.         error (0, errno, "%s", file);
  3915. ***************
  3916. *** 340,346 ****
  3917. --- 459,469 ----
  3918.        not always hold during the program run, but since it usually will, leave
  3919.        it here for i/o efficiency (page/sector boundaries and all that).
  3920.        Note: the efficiency gain has not been verified. */
  3921. + #ifdef MSDOS
  3922. +   saved_record_size = (unsigned int) (file_pos % read_size);
  3923. + #else /* not MSDOS */
  3924.     saved_record_size = file_pos % read_size;
  3925. + #endif /* not MSDOS */
  3926.     if (saved_record_size == 0)
  3927.       saved_record_size = read_size;
  3928.     file_pos -= saved_record_size;
  3929. ***************
  3930. *** 354,359 ****
  3931. --- 477,498 ----
  3932.         return 1;
  3933.       }
  3934.   
  3935. + #ifdef MSDOS
  3936. +   /* Some loosing editors add one or more ^Z to the end of a text file and
  3937. +      loosing MS-DOS devices interpret this as End Of File.  We turn them
  3938. +      into spaces and print a warning message.  */
  3939. +     {
  3940. +       char *ctrl_z = buffer + saved_record_size - 1;
  3941. +       if (*ctrl_z == '\032')
  3942. +     {
  3943. +       *ctrl_z = ' ';
  3944. +       error (0, 0, "%s: trailing ^Z translated to space.", file);
  3945. +       while (*--ctrl_z == '\032')
  3946. +         *ctrl_z = ' ';
  3947. +     }
  3948. +     }
  3949. + #endif /* MSDOS */
  3950. + 
  3951.     match_start = past_end = buffer + saved_record_size;
  3952.     /* For non-regexp search, move past impossible positions for a match. */
  3953.     if (sentinel_length)
  3954. ***************
  3955. *** 430,436 ****
  3956.           file_pos -= read_size;
  3957.         else
  3958.           {
  3959. !           read_size = file_pos;
  3960.             file_pos = 0;
  3961.           }
  3962.         lseek (fd, file_pos, L_SET);
  3963. --- 569,575 ----
  3964.           file_pos -= read_size;
  3965.         else
  3966.           {
  3967. !           read_size = (unsigned) file_pos;
  3968.             file_pos = 0;
  3969.           }
  3970.         lseek (fd, file_pos, L_SET);
  3971. ***************
  3972. *** 528,533 ****
  3973. --- 667,673 ----
  3974.         cleanup ();
  3975.       }
  3976.   }
  3977. + 
  3978.   
  3979.   /* Allocate N bytes of memory dynamically, with error checking.  */
  3980.   
  3981. *** e:\tmp/RCSt1006574    Wed Sep 19 13:28:58 1990
  3982. --- tail.c    Wed Sep 19 12:50:58 1990
  3983. ***************
  3984. *** 15,20 ****
  3985. --- 15,45 ----
  3986.      along with this program; if not, write to the Free Software
  3987.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  3988.   
  3989. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  3990. +    This port is also distributed under the terms of the
  3991. +    GNU General Public License as published by the
  3992. +    Free Software Foundation.
  3993. + 
  3994. +    Please note that this file is not identical to the
  3995. +    original GNU release, you should have received this
  3996. +    code as patch to the official release.  */
  3997. + 
  3998. + #ifdef MSDOS
  3999. + static char RCS_Id[] =
  4000. +   "$Header: e:/gnu/fileutil/RCS/tail.c 1.4.0.4 90/09/19 12:09:20 tho Exp $";
  4001. + 
  4002. + static char Program_Id[] = "tail";
  4003. + static char RCS_Revision[] = "$Revision: 1.4.0.4 $";
  4004. + 
  4005. + #define VERSION \
  4006. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  4007. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  4008. + 
  4009. + #define COPYING \
  4010. +   "This is free software, distributed under the terms of the\n" \
  4011. +   "GNU General Public License.  For details, see the file COPYING.\n"
  4012. + #endif /* MSDOS */
  4013. + 
  4014.   /* Can display any amount of data, unlike the Unix version, which uses
  4015.      a fixed size buffer and therefore can only deliver a limited number
  4016.      of lines.
  4017. ***************
  4018. *** 86,91 ****
  4019. --- 111,119 ----
  4020.   #define FOREVER 4        /* Read from end of file forever. */
  4021.   #define START 8            /* Count from start of file instead of end. */
  4022.   #define HEADERS 16        /* Print filename headers. */
  4023. + #ifdef MSDOS
  4024. + #define BINARY 32        /* Suppress crlf translation. */
  4025. + #endif
  4026.   
  4027.   /* When to print the filename banners. */
  4028.   enum header_mode
  4029. ***************
  4030. *** 93,98 ****
  4031. --- 121,152 ----
  4032.     multiple_files, always, never
  4033.   };
  4034.   
  4035. + #ifdef MSDOS
  4036. + 
  4037. + #include <io.h>
  4038. + #include <string.h>
  4039. + 
  4040. + extern  void main (int, char **);
  4041. + extern  void write_header (char *);
  4042. + extern  int tail (char *, int, int, long);
  4043. + extern  int tail_file (char *, int, long);
  4044. + extern  int tail_bytes (char *, int, int, long);
  4045. + extern  int tail_lines (char *, int, int, long);
  4046. + extern  int file_lines (char *, int, long, long);
  4047. + extern  int pipe_lines (char *, int, long);
  4048. + extern  int pipe_bytes (char *, int, long);
  4049. + extern  int start_bytes (char *, int, long);
  4050. + extern  int start_lines (char *, int, long);
  4051. + extern  void dump_remainder (char *, int, int);
  4052. + extern  void xwrite (int, char *, int);
  4053. + extern  char *xmalloc (int);
  4054. + extern  long atou (char *);
  4055. + extern  char *basename (char *);
  4056. + extern  void error (int status, int errnum, char *message, ...);
  4057. + extern  void usage (void);
  4058. + 
  4059. + #else  /* not MSDOS */
  4060. + 
  4061.   char *xmalloc ();
  4062.   int file_lines ();
  4063.   int pipe_bytes ();
  4064. ***************
  4065. *** 110,116 ****
  4066.   void write_header ();
  4067.   void xwrite ();
  4068.   
  4069. ! extern int errno;
  4070.   
  4071.   /* The name this program was run with. */
  4072.   char *program_name;
  4073. --- 164,170 ----
  4074.   void write_header ();
  4075.   void xwrite ();
  4076.   
  4077. ! #endif /* not MSDOS */
  4078.   
  4079.   /* The name this program was run with. */
  4080.   char *program_name;
  4081. ***************
  4082. *** 117,122 ****
  4083. --- 171,181 ----
  4084.   
  4085.   struct option long_options[] =
  4086.   {
  4087. + #ifdef MSDOS
  4088. +   {"binary", 1, NULL, 'B'},
  4089. +   {"copying", 0, NULL, 30},
  4090. +   {"version", 0, NULL, 31},
  4091. + #endif
  4092.     {"blocks", 1, NULL, 'b'},
  4093.     {"bytes", 1, NULL, 'c'},
  4094.     {"follow", 0, NULL, 'f'},
  4095. ***************
  4096. *** 200,210 ****
  4097. --- 259,289 ----
  4098.         argc--;
  4099.       }
  4100.   
  4101. + #ifdef MSDOS
  4102. +   while ((c = getopt_long (argc, argv, "b:c:n:fqvB", long_options, &longind))
  4103. + #else
  4104.     while ((c = getopt_long (argc, argv, "b:c:n:fqv", long_options, &longind))
  4105. + #endif
  4106.        != EOF)
  4107.       {
  4108.         switch (c)
  4109.       {
  4110. + #ifdef MSDOS
  4111. +     case 30:
  4112. +       fprintf (stderr, COPYING);
  4113. +       exit (0);
  4114. +       break;
  4115. + 
  4116. +     case 31:
  4117. +       fprintf (stderr, VERSION);
  4118. +       exit (0);
  4119. +       break;
  4120. + 
  4121. +     case 'B':
  4122. +       mode |= BINARY;
  4123. +       break;
  4124. + #endif
  4125. + 
  4126.       case 'b':
  4127.         mode |= BLOCKS;
  4128.         mode &= ~BYTES;
  4129. ***************
  4130. *** 236,242 ****
  4131.         break;
  4132.   
  4133.       case 'f':
  4134. !       mode |= FOREVER;
  4135.         break;
  4136.   
  4137.       case 'n':
  4138. --- 315,323 ----
  4139.         break;
  4140.   
  4141.       case 'f':
  4142. ! #ifndef MSDOS
  4143. !         mode |= FOREVER;
  4144. ! #endif /* not MSDOS */
  4145.         break;
  4146.   
  4147.       case 'n':
  4148. ***************
  4149. *** 365,374 ****
  4150. --- 446,478 ----
  4151.        int mode;
  4152.        long number;
  4153.   {
  4154. + #ifdef MSDOS
  4155. +   int errors;
  4156. + 
  4157. +   if (mode & BINARY)
  4158. +     {
  4159. +       setmode (fileno (stdout), O_BINARY);
  4160. +       setmode (fd, O_BINARY);
  4161. +     }
  4162. + 
  4163. +   if (mode & (BYTES | BLOCKS))
  4164. +     errors = tail_bytes (filename, fd, mode, number);
  4165. +   else
  4166. +     errors = tail_lines (filename, fd, mode, number);
  4167. + 
  4168. +   if (mode & BINARY)
  4169. +     setmode (fileno (stdout), O_TEXT);
  4170. + 
  4171. +   return errors;
  4172. + 
  4173. + #else /* not MSDOS */
  4174. + 
  4175.     if (mode & (BYTES | BLOCKS))
  4176.       return tail_bytes (filename, fd, mode, number);
  4177.     else
  4178.       return tail_lines (filename, fd, mode, number);
  4179. + 
  4180. + #endif /* not MSDOS */
  4181.   }
  4182.   
  4183.   /* Display the last part of file `filename', open for reading in`fd',
  4184. ***************
  4185. *** 485,491 ****
  4186. --- 589,599 ----
  4187.   
  4188.     /* Set `bytes_read' to the size of the last, probably partial, buffer;
  4189.        0 < `bytes_read' <= `BUFSIZE'. */
  4190. + #ifdef MSDOS                /* shut up the compiler */
  4191. +   bytes_read = (int) (pos % (long) BUFSIZE);
  4192. + #else
  4193.     bytes_read = pos % BUFSIZE;
  4194. + #endif
  4195.     if (bytes_read == 0)
  4196.       bytes_read = BUFSIZE;
  4197.     /* Make `pos' a multiple of `BUFSIZE' (0 if the file is short), so that all
  4198. ***************
  4199. *** 557,563 ****
  4200.     typedef struct linebuffer LBUFFER;
  4201.     LBUFFER *first, *last, *tmp;
  4202.     int i;            /* Index into buffers. */
  4203. !   int total_lines = 0;        /* Total number of newlines in all buffers. */
  4204.     int errors = 0;
  4205.   
  4206.     first = last = (LBUFFER *) xmalloc (sizeof (LBUFFER));
  4207. --- 665,671 ----
  4208.     typedef struct linebuffer LBUFFER;
  4209.     LBUFFER *first, *last, *tmp;
  4210.     int i;            /* Index into buffers. */
  4211. !   long total_lines = 0;        /* Total number of newlines in all buffers. */
  4212.     int errors = 0;
  4213.   
  4214.     first = last = (LBUFFER *) xmalloc (sizeof (LBUFFER));
  4215. ***************
  4216. *** 637,643 ****
  4217. --- 745,755 ----
  4218.         /* Skip `total_lines' - `number' newlines.  We made sure that
  4219.            `total_lines' - `number' <= `tmp->nlines'. */
  4220.         cp = tmp->buffer;
  4221. + #ifdef MSDOS                /* shut up the compiler */
  4222. +       for (i = (int) (total_lines - number); i; --i)
  4223. + #else
  4224.         for (i = total_lines - number; i; --i)
  4225. + #endif
  4226.       while (*cp++ != '\n')
  4227.         /* Do nothing. */ ;
  4228.         i = cp - tmp->buffer;
  4229. ***************
  4230. *** 678,684 ****
  4231. --- 790,800 ----
  4232.     typedef struct charbuffer CBUFFER;
  4233.     CBUFFER *first, *last, *tmp;
  4234.     int i;            /* Index into buffers. */
  4235. + #ifdef MSDOS
  4236. +   long total_bytes = 0;        /* Total characters in all buffers. */
  4237. + #else
  4238.     int total_bytes = 0;        /* Total characters in all buffers. */
  4239. + #endif
  4240.     int errors = 0;
  4241.   
  4242.     first = last = (CBUFFER *) xmalloc (sizeof (CBUFFER));
  4243. ***************
  4244. *** 737,743 ****
  4245. --- 853,863 ----
  4246.     /* Find the correct beginning, then print the rest of the file.
  4247.        We made sure that `total_bytes' - `number' <= `tmp->nbytes'. */
  4248.     if (total_bytes > number)
  4249. + #ifdef MSDOS                /* shut up the compiler */
  4250. +     i = (int) (total_bytes - number);
  4251. + #else
  4252.       i = total_bytes - number;
  4253. + #endif
  4254.     else
  4255.       i = 0;
  4256.     xwrite (1, &tmp->buffer[i], tmp->nbytes - i);
  4257. ***************
  4258. *** 776,782 ****
  4259. --- 896,906 ----
  4260.         return 1;
  4261.       }
  4262.     else if (number < 0)
  4263. + #ifdef MSDOS                /* |number| < 64k ??? */
  4264. +     xwrite (1, &buffer[bytes_read + number], (unsigned int) (-number));
  4265. + #else
  4266.       xwrite (1, &buffer[bytes_read + number], -number);
  4267. + #endif
  4268.     return 0;
  4269.   }
  4270.   
  4271. ***************
  4272. *** 829,839 ****
  4273. --- 953,965 ----
  4274.       xwrite (1, buffer, bytes_read);
  4275.     if (bytes_read == -1)
  4276.       error (1, errno, "%s", filename);
  4277. + #ifndef MSDOS
  4278.     if (mode & FOREVER)
  4279.       {
  4280.         sleep (1);
  4281.         goto output;
  4282.       }
  4283. + #endif
  4284.   }
  4285.   
  4286.   /* Write plus error check. */
  4287. ***************
  4288. *** 874,885 ****
  4289.   
  4290.     for (value = 0; ISDIGIT (*str); ++str)
  4291.       value = value * 10 + *str - '0';
  4292. !   return *str ? -1 : value;
  4293.   }
  4294.   
  4295.   void
  4296.   usage ()
  4297.   {
  4298.     fprintf (stderr, "\
  4299.   Usage: %s [-b [+]#] [-c [+]#] [-n [+]#] [-fqv] [+blocks [+]#]\n\
  4300.          [+bytes [+]#] [+lines [+]#] [+follow] [+quiet] [+silent]\n\
  4301. --- 1000,1020 ----
  4302.   
  4303.     for (value = 0; ISDIGIT (*str); ++str)
  4304.       value = value * 10 + *str - '0';
  4305. !   return *str ? -1L : value;
  4306.   }
  4307.   
  4308.   void
  4309.   usage ()
  4310.   {
  4311. + #ifdef MSDOS
  4312. +   fprintf (stderr, "\
  4313. + Usage: %s [-b [+]#] [-c [+]#] [-n [+]#] [-fqvB] [+blocks [+]#]\n\
  4314. +        [+bytes [+]#] [+lines [+]#] [+follow] [+quiet] [+silent]\n\
  4315. +        [+verbose] [+binary] [+copying] [+version] [file...]\n\
  4316. + \n\
  4317. +        %s [+/-#bcflqv] [file...]\n", program_name, program_name);
  4318. +   exit (1);
  4319. + #else
  4320.     fprintf (stderr, "\
  4321.   Usage: %s [-b [+]#] [-c [+]#] [-n [+]#] [-fqv] [+blocks [+]#]\n\
  4322.          [+bytes [+]#] [+lines [+]#] [+follow] [+quiet] [+silent]\n\
  4323. ***************
  4324. *** 887,890 ****
  4325. --- 1022,1026 ----
  4326.   \n\
  4327.          %s [+/-#bcflqv] [file...]\n", program_name, program_name);
  4328.     exit (1);
  4329. + #endif
  4330.   }
  4331. *** e:\tmp/RCSt1006574    Wed Sep 19 13:29:02 1990
  4332. --- touch.c    Wed Sep 19 12:51:54 1990
  4333. ***************
  4334. *** 15,20 ****
  4335. --- 15,45 ----
  4336.      along with this program; if not, write to the Free Software
  4337.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  4338.   
  4339. + /* MS-DOS port (c) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  4340. +    This port is also distributed under the terms of the
  4341. +    GNU General Public License as published by the
  4342. +    Free Software Foundation.
  4343. + 
  4344. +    Please note that this file is not identical to the
  4345. +    original GNU release, you should have received this
  4346. +    code as patch to the official release.  */
  4347. + 
  4348. + #ifdef MSDOS
  4349. + static char RCS_Id[] =
  4350. +   "$Header: e:/gnu/fileutil/RCS/touch.c 1.4.0.2 90/09/19 12:09:27 tho Exp $";
  4351. + 
  4352. + static char Program_Id[] = "touch";
  4353. + static char RCS_Revision[] = "$Revision: 1.4.0.2 $";
  4354. + 
  4355. + #define VERSION \
  4356. +   "GNU %s, Version %.*s (compiled %s %s for MS-DOS)\n", Program_Id, \
  4357. +   (sizeof RCS_Revision - 14), (RCS_Revision + 11), __DATE__, __TIME__
  4358. + 
  4359. + #define COPYING \
  4360. +   "This is free software, distributed under the terms of the\n" \
  4361. +   "GNU General Public License.  For details, see the file COPYING.\n"
  4362. + #endif /* MSDOS */
  4363. + 
  4364.   /* Usage: touch [-acm] [-r reference-file] [-t MMDDhhmm[[CC]YY][.ss]]
  4365.             [-d time] [+time {atime,access,use,mtime,modify}] [+date time]
  4366.             [+file reference-file] [+no-create] file...
  4367. ***************
  4368. *** 58,63 ****
  4369. --- 83,104 ----
  4370.   long lseek ();
  4371.   #endif
  4372.   
  4373. + 
  4374. + #ifdef MSDOS
  4375. + 
  4376. + #include <io.h>
  4377. + #include <gnulib.h>
  4378. + 
  4379. + extern int argmatch (char *arg, char **optlist);
  4380. + extern void invalid_arg (char *kind, char *value, int problem);
  4381. + extern time_t posixtime (char *s);
  4382. + extern time_t getdate (char *p, struct timeb *now);
  4383. + void main (int argc, char **argv);
  4384. + int touch (char *file);
  4385. + void usage (void);
  4386. + 
  4387. + #else /* not MSDOS */
  4388. + 
  4389.   int argmatch ();
  4390.   int touch ();
  4391.   time_t getdate ();
  4392. ***************
  4393. *** 66,71 ****
  4394. --- 107,114 ----
  4395.   void invalid_arg ();
  4396.   void usage ();
  4397.   
  4398. + #endif /* not MSDOS */
  4399. + 
  4400.   /* Bitmasks for `change_times'. */
  4401.   #define CH_ATIME 1
  4402.   #define CH_MTIME 2
  4403. ***************
  4404. *** 104,109 ****
  4405. --- 147,156 ----
  4406.   
  4407.   struct option longopts[] =
  4408.   {
  4409. + #ifdef MSDOS
  4410. +   {"copying", 0, NULL, 30},
  4411. +   {"version", 0, NULL, 31},
  4412. + #endif
  4413.     {"time", 1, 0, 130},
  4414.     {"no-create", 0, 0, 'c'},
  4415.     {"date", 1, 0, 'd'},
  4416. ***************
  4417. *** 185,190 ****
  4418. --- 232,249 ----
  4419.         change_times |= time_masks[longind];
  4420.         break;
  4421.   
  4422. + #ifdef MSDOS
  4423. +     case 30:
  4424. +       fprintf (stderr, COPYING);
  4425. +       exit (0);
  4426. +       break;
  4427. + 
  4428. +     case 31:
  4429. +       fprintf (stderr, VERSION);
  4430. +       exit (0);
  4431. +       break;
  4432. + #endif
  4433. + 
  4434.       default:
  4435.         usage ();
  4436.       }
  4437. ***************
  4438. *** 335,340 ****
  4439. --- 394,401 ----
  4440.     return 0;
  4441.   }
  4442.   
  4443. + /*  Use the one from gnulib */
  4444. + #ifndef MSDOS
  4445.   
  4446.   /* Like malloc but get error if no storage available. */
  4447.   
  4448. ***************
  4449. *** 363,375 ****
  4450. --- 424,445 ----
  4451.     return val;
  4452.   }
  4453.   
  4454. + #endif /* not MSDOS */
  4455. + 
  4456.   void
  4457.   usage ()
  4458.   {
  4459. + #ifdef MSDOS
  4460. +   fprintf (stderr, "\
  4461. + Usage: %s [-acm] [-r reference-file] [-t MMDDhhmm[[CC]YY][.ss]]\n\
  4462. +        [-d time] [+time {atime,access,use,mtime,modify}] [+date time]\n\
  4463. +        [+file reference-file] [+no-create] [+copying] [+version] file...\n",
  4464. + #else /* not MSDOS */
  4465.     fprintf (stderr, "\
  4466.   Usage: %s [-acm] [-r reference-file] [-t MMDDhhmm[[CC]YY][.ss]]\n\
  4467.          [-d time] [+time {atime,access,use,mtime,modify}] [+date time]\n\
  4468.          [+file reference-file] [+no-create] file...\n",
  4469. + #endif /* not MSDOS */
  4470.          program_name);
  4471.     exit (1);
  4472.   }
  4473.