home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_progs / prog_c / indent.lha / Indent.lha / indent-1.4amiga.diffs next >
Encoding:
Text File  |  1992-06-24  |  13.4 KB  |  596 lines
  1. Only in dh2:indent-1.4: Makefile.amiga
  2. Only in dh2:indent-1.4: README.Amiga
  3. diff -c -r ram:indent-1.4-orig/args.c dh2:indent-1.4/args.c
  4. *** ram:indent-1.4-orig/args.c    Fri Jun 12 02:31:38 1992
  5. --- dh2:indent-1.4/args.c    Wed Jun 24 20:02:48 1992
  6. ***************
  7. *** 716,721 ****
  8. --- 716,741 ----
  9.     static char prof[]= INDENT_PROFILE;
  10.     char *homedir;
  11.   
  12. + #ifdef AMIGA
  13. +   if ((f = fopen (prof, "r")) != NULL)
  14. +     {
  15. +       scan_profile (f);
  16. +       (void) fclose (f);
  17. +       fname = xmalloc (sizeof prof);
  18. +       strcpy (fname, prof);
  19. +       return fname;
  20. +     }
  21. + 
  22. +   fname = xmalloc (sizeof prof + 5);
  23. +   sprintf (fname, "S:%s", prof);
  24. + 
  25. +   if ((f = fopen (fname, "r")) != NULL)
  26. +     {
  27. +       scan_profile (f);
  28. +       (void) fclose (f);
  29. +       return fname;
  30. +     }
  31. + #else
  32.     if ((f = fopen (INDENT_PROFILE, "r")) != NULL)
  33.       {
  34.         int len = strlen (INDENT_PROFILE) + 3;
  35. ***************
  36. *** 745,750 ****
  37. --- 765,771 ----
  38.   
  39.         free (fname);
  40.       }
  41. + #endif
  42.   
  43.     return 0;
  44.   }
  45. diff -c -r ram:indent-1.4-orig/backup.c dh2:indent-1.4/backup.c
  46. *** ram:indent-1.4-orig/backup.c    Fri Jun 05 19:56:42 1992
  47. --- dh2:indent-1.4/backup.c    Wed Jun 24 21:02:09 1992
  48. ***************
  49. *** 75,80 ****
  50. --- 75,83 ----
  51.   #else /* !USG */
  52.   #ifdef SYSDIR
  53.   #include <sys/dir.h>
  54. + #ifdef AMIGA
  55. + #define dirent direct
  56. + #endif
  57.   #endif /* SYSDIR */
  58.   #endif /* !USG */
  59.   #endif /* !DIRENT */
  60. ***************
  61. *** 92,98 ****
  62. --- 95,105 ----
  63.   #endif /* NODIR */
  64.   
  65.   /* Default backup file suffix to use */
  66. + #ifdef AMIGA
  67. + char *simple_backup_suffix = "!";
  68. + #else
  69.   char *simple_backup_suffix = "~";
  70. + #endif
  71.   
  72.   /* What kinds of backup files to make -- see
  73.      table `version_control_values' below. */
  74. ***************
  75. *** 133,139 ****
  76. --- 140,150 ----
  77.       {
  78.         for (p = &direntry[base_length + 2]; ISDIGIT (*p); ++p)
  79.       version = version * 10 + *p - '0';
  80. + #ifdef AMIGA
  81. +       if (p[0] != '!' || p[1])
  82. + #else
  83.         if (p[0] != '~' || p[1])
  84. + #endif
  85.       version = 0;
  86.       }
  87.   
  88. ***************
  89. *** 189,194 ****
  90. --- 200,235 ----
  91.     int version;
  92.   
  93.     p = pathname + pathlen - 1;
  94. + #ifdef AMIGA
  95. +   while (p > pathname && *p != '/' && *p != ':')
  96. +     p--;
  97. +   if (*p == '/')
  98. +     {
  99. +       int dirlen = p - pathname;
  100. +       register char *dirname;
  101. + 
  102. +       filename = p + 1;
  103. +       dirname = xmalloc (dirlen + 1);
  104. +       strncpy (dirname, pathname, (dirlen));
  105. +       dirname[dirlen] = '\0';
  106. +       version = highest_version (filename, dirname);
  107. +       free (dirname);
  108. +       return version;
  109. +     }
  110. +   else if (*p == ':')
  111. +     {
  112. +       int dirlen = p - pathname + 1;
  113. +       register char *dirname;
  114. + 
  115. +       filename = p + 1;
  116. +       dirname = xmalloc (dirlen + 1);
  117. +       strncpy (dirname, pathname, (dirlen));
  118. +       dirname[dirlen] = '\0';
  119. +       version = highest_version (filename, dirname);
  120. +       free (dirname);
  121. +       return version;
  122. +     }
  123. + #else
  124.     while (p > pathname && *p != '/')
  125.       p--;
  126.   
  127. ***************
  128. *** 205,213 ****
  129. --- 246,259 ----
  130.         free (dirname);
  131.         return version;
  132.       }
  133. + #endif
  134.   
  135.     filename = pathname;
  136. + #ifdef AMIGA
  137. +   version = highest_version (filename, "");
  138. + #else
  139.     version = highest_version (filename, ".");
  140. + #endif
  141.     return version;
  142.   }
  143.   
  144. ***************
  145. *** 239,245 ****
  146. --- 285,295 ----
  147.     if (! backup_name)
  148.       return 0;
  149.   
  150. + #ifdef AMIGA
  151. +   sprintf (backup_name, "%s.!%d!", pathname, last_numbered_version);
  152. + #else
  153.     sprintf (backup_name, "%s.~%d~", pathname, last_numbered_version);
  154. + #endif
  155.     return backup_name;
  156.   }
  157.   #endif /* !NODIR */
  158. ***************
  159. *** 322,332 ****
  160. --- 372,401 ----
  161.     char *new_backup_name;
  162.   
  163.     backup_filename = generate_backup_filename (version_control, file->name);
  164. + #ifdef AMIGA
  165. +   /* The original code contains a bug here. generate_backup_filename sets
  166. +      the return value to NULL if version_control == none. Just do nothing
  167. +      in this case. */
  168.     if (! backup_filename)
  169.       {
  170. +       if (version_control != none)
  171. +         {
  172. +           fprintf (stderr, "indent: Can't make backup filename of %s\n", file->name);
  173. +           exit (1);
  174. +         }
  175. +       else
  176. +         {
  177. +           free (backup_filename);
  178. +           return;
  179. +         }
  180. +     }
  181. + #else
  182. +   if (! backup_filename)
  183. +     {
  184.         fprintf (stderr, "indent: Can't make backup filename of %s", file->name);
  185.         exit (1);
  186.       }
  187. + #endif
  188.   
  189.     fd = creat (backup_filename, 0666);
  190.     if (fd < 0)
  191. Only in dh2:indent-1.4: dirent_def.h
  192. Only in dh2:indent-1.4: indent
  193. diff -c -r ram:indent-1.4-orig/indent.c dh2:indent-1.4/indent.c
  194. *** ram:indent-1.4-orig/indent.c    Fri Jun 12 02:30:28 1992
  195. --- dh2:indent-1.4/indent.c    Wed Jun 24 20:24:15 1992
  196. ***************
  197. *** 21,26 ****
  198. --- 21,41 ----
  199.   #include "indent.h"
  200.   #include <ctype.h>
  201.   
  202. + #ifdef AMIGA
  203. + #include <exec/types.h>
  204. + #include <dos/dos.h>
  205. + #include <dos/dosextens.h>
  206. + #include <dos/dosasl.h>
  207. + #include <proto/dos.h>
  208. + 
  209. + #define MAXPATH 200
  210. + #define MAXARGS 256
  211. + 
  212. + extern struct DosLibrary *DOSBase;
  213. + 
  214. + int expand_args ();
  215. + #endif
  216. + 
  217.   void
  218.   usage ()
  219.   {
  220. ***************
  221. *** 1514,1519 ****
  222. --- 1529,1537 ----
  223.     struct file_buffer *current_input;
  224.     char *profile_pathname = 0;
  225.     int using_stdin = false;
  226. + #ifdef AMIGA
  227. +   int ex_err;
  228. + #endif
  229.   
  230.   #ifdef DEBUG
  231.     if (debug)
  232. ***************
  233. *** 1520,1525 ****
  234. --- 1538,1568 ----
  235.       debug_init ();
  236.   #endif
  237.   
  238. + #ifdef AMIGA
  239. +   if (DOSBase->dl_lib.lib_Version < 37)
  240. +     {
  241. +       fprintf (stderr, "You must have Kickstart 2.0 (V37) or higher!\n");
  242. +       exit (20);
  243. +     }
  244. + 
  245. +   if (argc == 2 && stricmp (argv[1],"-h") == 0)
  246. +     {
  247. +       usage ();
  248. +       exit (0);
  249. +     }
  250. + 
  251. +   if ((ex_err = expand_args (&argc, &argv)) == 0)
  252. +     {
  253. +       fprintf (stderr, "Couldn't expand wildcards\n");
  254. +       exit (20);
  255. +     }
  256. +   if (ex_err == 2)
  257. +     {
  258. +       fprintf (stderr, "Wildcards didn't match a file\n");
  259. +       exit (5);
  260. +     }
  261. + #endif
  262. + 
  263.     init_parser ();
  264.     initialize_backups ();
  265.   
  266. ***************
  267. *** 1620,1627 ****
  268. --- 1663,1678 ----
  269.   
  270.         for (i = 0; input_files; i++, input_files--)
  271.       {
  272. + #ifdef AMIGA
  273. +           /* Reset line- and comment-count */
  274. +           out_lines = out_coms = 0;
  275. + #endif
  276.         current_input = read_file (in_file_names[i]);
  277.         in_name = out_name = in_file_names[i];
  278. + #ifdef AMIGA
  279. +           if (verbose)
  280. +             printf ("\n%s:\n", out_name);
  281. + #endif
  282.         output = fopen (out_name, "w");
  283.         if (output == 0)
  284.           {
  285. ***************
  286. *** 1652,1657 ****
  287. --- 1703,1712 ----
  288.         if (! out_name && ! use_stdout)
  289.           {
  290.             out_name = in_file_names[0];
  291. + #ifdef AMIGA
  292. +               if (verbose)
  293. +                 printf ("\n%s:\n", out_name);
  294. + #endif
  295.             make_backup (current_input);
  296.           }
  297.       }
  298. ***************
  299. *** 1677,1679 ****
  300. --- 1732,1855 ----
  301.   
  302.     exit (0);
  303.   }
  304. + 
  305. + 
  306. + #ifdef AMIGA
  307. + char *expand_next_file (pattern)
  308. +      char *pattern;
  309. + {
  310. +   long err;
  311. +   char *pathname;
  312. +   static struct AnchorPath *an = NULL;
  313. + 
  314. +   pathname = NULL;
  315. +   if (pattern == NULL)
  316. +     err = -1;
  317. +   else
  318. +     do
  319. +       {
  320. +         if (an == NULL)
  321. +           {
  322. +             an = malloc (sizeof (struct AnchorPath) + MAXPATH);
  323. +             memset (an, 0, sizeof (struct AnchorPath) + MAXPATH);
  324. +             an->ap_BreakBits = SIGBREAKF_CTRL_C;
  325. +             an->ap_Strlen = MAXPATH;
  326. +             an->ap_Flags = APF_DOWILD;
  327. +             err = MatchFirst (pattern, an);
  328. +           }
  329. +         else
  330. +           err = MatchNext (an);
  331. + 
  332. +         /* Expand only files */
  333. +         if (an->ap_Info.fib_DirEntryType < 0)
  334. +           pathname = an->ap_Buf;
  335. +       } while (err == 0 && pathname == NULL);
  336. + 
  337. +   if (err)
  338. +     {
  339. +       MatchEnd (an);
  340. +       free (an);
  341. +       an = NULL;
  342. +       return NULL;
  343. +     }
  344. +   else
  345. +     return pathname;
  346. + }
  347. + 
  348. + 
  349. + int
  350. + in_prev_args (arg, argv, argc)
  351. +      char *arg, **argv;
  352. +      int argc;
  353. + {
  354. +   int i, is_in_args;
  355. + 
  356. +   is_in_args = 0;
  357. +   for (i = 1; i < argc - 1; i++)
  358. +     if (strcmp (arg, argv[i]) == 0)
  359. +       is_in_args = 1;
  360. +   return is_in_args;
  361. + }
  362. + 
  363. + 
  364. + int
  365. + expand_args (oargc, oargv)
  366. +      int *oargc;
  367. +      char ***oargv;
  368. + {
  369. +   int i;
  370. +   char *str, **argv, buf[MAXPATH];
  371. +   int argc, no_match_at_all, num_matches, contains_wildcards;
  372. + 
  373. +   no_match_at_all = 1;
  374. +   contains_wildcards = 0;
  375. +   argc = 0;
  376. +   argv = malloc (MAXARGS * sizeof (char *));
  377. +   if (argv == NULL)
  378. +     return 0;
  379. + 
  380. +   argv[argc++] = (*oargv)[0];
  381. +   for (i = 1; i < *oargc; i++)
  382. +     {
  383. +       if (ParsePattern ((*oargv)[i], buf, MAXPATH))
  384. +         {
  385. +           contains_wildcards = 1;
  386. +           num_matches = 0;
  387. +           while (str = expand_next_file ((*oargv)[i]))
  388. +             if (argc >= MAXARGS)
  389. +               {
  390. +                 expand_next_file (NULL);
  391. +                 return 0;
  392. +               }
  393. +             else
  394. +               {
  395. +                 /* Avoid duplicate entries */
  396. +                 if (!in_prev_args (str, argv, argc))
  397. +                   {
  398. +                     argv[argc++] = strdup (str);
  399. +                     num_matches++;
  400. +                   }
  401. +               }
  402. +           if (num_matches != 0)
  403. +             no_match_at_all = 0;
  404. +         }
  405. +       else
  406. +         if (argc >= MAXARGS)
  407. +           return 0;
  408. +         else
  409. +           {
  410. +             if ((*oargv)[i][0] != '-' && (*oargv)[i][0] != '+')
  411. +               /* Found a file with no wildcards */
  412. +               no_match_at_all = 0;
  413. +             if (!in_prev_args ((*oargv)[i], argv, argc))
  414. +               argv[argc++] = (*oargv)[i];
  415. +           }
  416. +     }
  417. +   *oargc = argc;
  418. +   *oargv = argv;
  419. +   if (no_match_at_all && contains_wildcards)
  420. +     return 2;
  421. +   else
  422. +     return 1;
  423. + }
  424. + #endif
  425. diff -c -r ram:indent-1.4-orig/io.c dh2:indent-1.4/io.c
  426. *** ram:indent-1.4-orig/io.c    Fri Jun 12 20:44:46 1992
  427. --- dh2:indent-1.4/io.c    Wed Jun 24 20:30:58 1992
  428. ***************
  429. *** 26,33 ****
  430. --- 26,40 ----
  431.      <sys/fcntl.h> or <sys/file.h> instead.  */
  432.   #include <fcntl.h>
  433.   
  434. + #ifdef AMIGA
  435. + #include <exec/types.h>
  436. + #include <dos/dos.h>
  437. + #include <proto/dos.h>
  438. + #define bcopy(s,d,l) memcpy(d,s,l)
  439. + #else
  440.   #include <sys/types.h>
  441.   #include <sys/stat.h>
  442. + #endif
  443.   
  444.   /* number of levels a label is placed to left of code */ 
  445.   #define LABEL_OFFSET 2
  446. ***************
  447. *** 431,439 ****
  448. --- 438,471 ----
  449.        char *filename;
  450.   {
  451.     int fd;
  452. + #ifndef AMIGA
  453.     struct stat file_stats;
  454. + #endif
  455.     int namelen = strlen (filename);
  456. + #ifdef AMIGA
  457. +   BPTR in_fh;
  458. +   struct FileInfoBlock __aligned in_fib;
  459. + #endif
  460. + 
  461. + #ifdef AMIGA
  462. +   in_fh = Lock (filename, SHARED_LOCK);
  463. +   if (in_fh == 0)
  464. +     sys_error (filename);
  465. + 
  466. +   if (Examine (in_fh, &in_fib) == 0)
  467. +     sys_error (filename);
  468. + 
  469. +   if (fileptr.data != 0)
  470. +     free (fileptr.data);
  471. +   fileptr.size = in_fib.fib_Size;
  472. +   fileptr.data = (char *) xmalloc (fileptr.size + 3);
  473.   
  474. +   UnLock (in_fh);
  475. + 
  476. +   fd = open (filename, O_RDONLY, 0777);
  477. +   if (fd < 0)
  478. +     sys_error (filename);
  479. + #else
  480.     fd = open (filename, O_RDONLY, 0777);
  481.     if (fd < 0)
  482.       sys_error (filename);
  483. ***************
  484. *** 445,450 ****
  485. --- 477,483 ----
  486.       free (fileptr.data);
  487.     fileptr.size = file_stats.st_size;
  488.     fileptr.data = (char *) xmalloc (file_stats.st_size + 3);
  489. + #endif
  490.   
  491.     if (read (fd, fileptr.data, fileptr.size) < 0)
  492.       sys_error (filename);
  493. ***************
  494. *** 479,488 ****
  495. --- 512,558 ----
  496.     unsigned int size = 15 * BUFSIZ;
  497.     int ch;
  498.     register char *p;
  499. + #ifdef AMIGA
  500. +   char *in_prog;
  501. +   int in_prog_size;
  502. + #endif
  503.   
  504.     if (stdinptr.data != 0)
  505.       free (stdinptr.data);
  506.   
  507. + /* The following code had to be changed, because you can't assume, that
  508. +    xrealloc() always returns the original pointer. By the way: the original
  509. +    code violates the GNU coding standards!!! */
  510. + 
  511. + #ifdef AMIGA
  512. +   in_prog = (char *) xmalloc (size + 3);
  513. +   in_prog_size = 0;
  514. +   do
  515. +     {
  516. +       for (; in_prog_size < size; in_prog_size++)
  517. +     {
  518. +       ch = getc (stdin);
  519. +       if (ch == EOF)
  520. +         break;
  521. +       in_prog[in_prog_size] = ch;
  522. +     }
  523. + 
  524. +       if (ch != EOF)
  525. +     {
  526. +       size += (2 * BUFSIZ);
  527. +       in_prog = xrealloc (in_prog, size);
  528. +     }
  529. +     }
  530. +   while (ch != EOF);
  531. + 
  532. +   stdinptr.data = in_prog;
  533. +   stdinptr.size = in_prog_size;
  534. +   stdinptr.name = "Standard Input";
  535. + 
  536. +   stdinptr.data[stdinptr.size] = ' ';
  537. +   stdinptr.data[stdinptr.size + 1] = '\n';
  538. +   stdinptr.data[stdinptr.size + 2] = '\0';
  539. + #else
  540.     stdinptr.data = (char *) xmalloc (size + 3);
  541.     stdinptr.size = 0;
  542.     p = stdinptr.data;
  543. ***************
  544. *** 511,516 ****
  545. --- 581,587 ----
  546.     stdinptr.data[stdinptr.size] = ' ';
  547.     stdinptr.data[stdinptr.size + 1] = '\n';
  548.     stdinptr.data[stdinptr.size + 2] = '\0';
  549. + #endif
  550.   
  551.     return &stdinptr;
  552.   }
  553. diff -c -r ram:indent-1.4-orig/sys.h dh2:indent-1.4/sys.h
  554. *** ram:indent-1.4-orig/sys.h    Fri Jun 12 21:31:08 1992
  555. --- dh2:indent-1.4/sys.h    Wed Jun 24 20:34:05 1992
  556. ***************
  557. *** 8,13 ****
  558. --- 8,18 ----
  559.      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  */
  560.   
  561.   #include <stdio.h>
  562. + #ifdef AMIGA
  563. + /* For malloc, etc... */
  564. + #include <stdlib.h>
  565. + #include <string.h>
  566. + #endif
  567.   
  568.   #ifdef DEBUG
  569.   extern int debug;
  570. ***************
  571. *** 23,30 ****
  572. --- 28,37 ----
  573.   extern struct file_buffer *read_file (), *read_stdin ();
  574.   
  575.   /* Standard memory allocation routines.  */
  576. + #ifndef AMIGA
  577.   char *malloc ();
  578.   char *realloc ();
  579. + #endif
  580.   
  581.   /* Similar, but abort with an error if out of memory (see globs.c).  */
  582.   char *xmalloc ();
  583. ***************
  584. *** 45,48 ****
  585. --- 52,61 ----
  586.   #define mymemcpy(to,from,len) bcopy ((from),(to),(len))
  587.   #endif
  588.   
  589. + #ifdef AMIGA
  590. + #define mymemcpy(from,to,len) (void) memcpy ((from),(to),(len))
  591. + #endif
  592. + 
  593. + #ifndef AMIGA
  594.   char *mymemcpy ();
  595. + #endif
  596.