home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / gnu / utils / bug / 2318 < prev    next >
Encoding:
Text File  |  1993-01-03  |  15.6 KB  |  508 lines
  1. Newsgroups: gnu.utils.bug
  2. Path: sparky!uunet!cis.ohio-state.edu!clsi.UUCP!mitch
  3. From: mitch@clsi.UUCP (Mitchell Perilstein)
  4. Subject: suggestion for ls
  5. Message-ID: <9301032211.AA26134@clsi.clsi.COM>
  6. Sender: gnulists@ai.mit.edu
  7. Organization: GNUs Not Usenet
  8. Distribution: gnu
  9. Date: Sun, 3 Jan 1993 22:11:58 GMT
  10. Approved: bug-gnu-utils@prep.ai.mit.edu
  11. Lines: 495
  12.  
  13. The following patches to fileutils-3.4 adds Yet Another Switch to ls:
  14.  
  15.      -M, --mountpoints
  16.           Indicate directories which are mountpoints by appending
  17.           a  `^'  character to their filename. If the long format
  18.           is also specified, indicates which device is mounted on
  19.           the mountpoint and the host, if remote.
  20.  
  21. Here is some sample output:
  22.  
  23. $ ls -M /
  24. backup          export          pcfs            var^
  25. bin             home^           sbin            vmunix
  26. boot            kadb            sys             vmunix.GENERIC
  27. clsi^           lib             tmp             vmunix.old
  28. dev             lost+found      tmp_rex
  29. etc             mnt             usr^
  30.  
  31. $ ls -lM /
  32. total 4820
  33. drwxrwxrwx   3 root     users         512 Jan  2 14:32 backup
  34. lrwxrwxrwx   1 root     wheel           7 May  1  1992 bin -> usr/bin
  35. -r--r--r--   1 root     bin        140904 May  1  1992 boot
  36. drwxr-xr-x   8 root     wheel         512 Jan  1 22:58 clsi <- /dev/sd0e
  37. drwxr-sr-x   2 bin      staff       11264 Dec 21 14:16 dev
  38. drwxr-sr-x   9 bin      staff        3072 Jan  3 12:20 etc
  39. drwxr-sr-x   4 root     wheel         512 May  1  1992 export
  40. drwxr-xr-x  11 root     wheel         512 Jan  1 23:04 home <- /dev/sd0h
  41. -rwxr-xr-x   1 root     wheel      311163 May  1  1992 kadb
  42. lrwxrwxrwx   1 root     wheel           7 May  1  1992 lib -> usr/lib
  43. ..
  44.  
  45. $ ls -lM /home/dev
  46. total 6
  47. drwxrws---  13 markb    rvcg          512 Dec 11 12:50 codegen <- dubhe:/dubhe/codegen
  48. drwxrws---   8 hank     users         512 Nov 11 14:22 internal <- unuk:/unuk/internal
  49. drwxrwsr-x   7 daniel   third         512 Jan  3 16:55 openhdl <- pollux:/pollux/openhdl
  50. drwxrws---  22 glenn    synth         512 Dec 18 15:49 synthesis <- capella:/capella/synthesis
  51. ..
  52.  
  53. --> NOTE
  54. --> Tested only on Sun4 SunOS 4.1 and RISC Ultrix V4.2A. There are
  55. --> some platform-dependent things in mountlist.c which I could not
  56. --> test; they might even produce syntax errors.
  57.  
  58. Recursive context diffs follow.  Thanks for such a nice and easily
  59. maintainable product!
  60.  
  61. Respectfully,
  62. ---
  63.  Mitchell N. Perilstein   CAD Language Systems, Inc.   410-992-5700 x225 
  64.  Member, League for Programming Freedom.  Mail lpf@uunet.uu.net for info.
  65.  
  66.  
  67. diff -cr fileutils-3.4.orig/ChangeLog fileutils-3.4/ChangeLog
  68. *** fileutils-3.4.orig/ChangeLog    Thu Oct 29 15:23:14 1992
  69. --- fileutils-3.4/ChangeLog    Fri Jan  1 17:41:26 1993
  70. ***************
  71. *** 1,3 ****
  72. --- 1,10 ----
  73. + Fri Jan  1 17:31:54 1993  Mitchell Perilstein  (mitch@clsi.com)
  74. + 
  75. +     * mountlist.{c,h}: read_filesystem_list records inode of mountdir.
  76. + 
  77. +     * Makefile.in, ls.1, ls.c: Add -M,--mountpoint option. ls calls
  78. +     read_filesystem_list; uses dev and inode to compare mountponts.
  79. + 
  80.   Thu Oct 29 14:57:21 1992  David J. MacKenzie  (djm@kropotkin.gnu.ai.mit.edu)
  81.   
  82.       * Version 3.4.
  83. Common subdirectories: fileutils-3.4.orig/lib and fileutils-3.4/lib
  84. Common subdirectories: fileutils-3.4.orig/man and fileutils-3.4/man
  85. Common subdirectories: fileutils-3.4.orig/src and fileutils-3.4/src
  86. diff -cr fileutils-3.4.orig/lib/mountlist.c fileutils-3.4/lib/mountlist.c
  87. *** fileutils-3.4.orig/lib/mountlist.c    Sat Apr 18 15:33:08 1992
  88. --- fileutils-3.4/lib/mountlist.c    Fri Jan  1 17:39:27 1993
  89. ***************
  90. *** 17,22 ****
  91. --- 17,23 ----
  92.   
  93.   #include <stdio.h>
  94.   #include <sys/types.h>
  95. + #include <sys/stat.h>
  96.   #include "mountlist.h"
  97.   
  98.   #ifdef STDC_HEADERS
  99. ***************
  100. *** 169,174 ****
  101. --- 170,176 ----
  102.     struct mount_entry *mount_list;
  103.     struct mount_entry *me;
  104.     struct mount_entry *mtail;
  105. +   struct stat statbuf;  
  106.   
  107.     /* Start the list off with a dummy entry. */
  108.     me = (struct mount_entry *) xmalloc (sizeof (struct mount_entry));
  109. ***************
  110. *** 195,200 ****
  111. --- 197,206 ----
  112.       me = (struct mount_entry *) xmalloc (sizeof (struct mount_entry));
  113.       me->me_devname = xstrdup (mnt->mnt_fsname);
  114.       me->me_mountdir = xstrdup (mnt->mnt_dir);
  115. +     if (stat (mnt->mnt_dir, &statbuf) >= 0)
  116. +         me->me_ino = statbuf.st_ino;
  117. +     else
  118. +         me->me_ino = 0;
  119.       me->me_type = xstrdup (mnt->mnt_type);
  120.       devopt = strstr (mnt->mnt_opts, "dev=");
  121.       if (devopt)
  122. ***************
  123. *** 233,238 ****
  124. --- 239,248 ----
  125.       me->me_mountdir = xstrdup (fsp->f_mntonname);
  126.       me->me_type = fstype_to_string (fsp->f_type);
  127.       me->me_dev = -1;    /* Magic; means not known yet. */
  128. +     if (stat (mnt->mnt_dir, &statbuf) >= 0)
  129. +         me->me_ino = statbuf.st_ino;
  130. +     else
  131. +         me->me_ino = 0;
  132.       me->me_next = NULL;
  133.   
  134.       /* Add to the linked list. */
  135. ***************
  136. *** 257,262 ****
  137. --- 267,276 ----
  138.       me->me_mountdir = xstrdup (fsd.fd_req.path);
  139.       me->me_type = gt_names[fsd.fd_req.fstype];
  140.       me->me_dev = fsd.fd_req.dev;
  141. +     if (stat (fsd.fd_req.path, &statbuf) >= 0)
  142. +         me->me_ino = statbuf.st_ino;
  143. +     else
  144. +         me->me_ino = 0;
  145.       me->me_next = NULL;
  146.   
  147.       /* Add to the linked list. */
  148. ***************
  149. *** 290,295 ****
  150. --- 304,313 ----
  151.   #endif
  152.       me->me_mountdir = xstrdup (mnt.mt_filsys);
  153.       me->me_dev = -1;    /* Magic; means not known yet. */
  154. +     if (stat (mnt.mt_filsys, &statbuf) >= 0)
  155. +         me->me_ino = statbuf.st_ino;
  156. +     else
  157. +         me->me_ino = 0;
  158.       me->me_type = "";
  159.   #ifdef GETFSTYP            /* SVR3.  */
  160.       if (need_fs_type)
  161. ***************
  162. *** 332,337 ****
  163. --- 350,359 ----
  164.       me->me_mountdir = xstrdup (mnt.mnt_mountp);
  165.       me->me_type = xstrdup (mnt.mnt_fstype);
  166.       me->me_dev = -1;    /* Magic; means not known yet. */
  167. +     if (stat (mnt.mnt_mountp, &statbuf) >= 0)
  168. +         me->me_ino = statbuf.st_ino;
  169. +     else
  170. +         me->me_ino = 0;
  171.       me->me_next = NULL;
  172.   
  173.       /* Add to the linked list. */
  174. ***************
  175. *** 384,389 ****
  176. --- 406,415 ----
  177.       me->me_mountdir = xstrdup (thisent + vmp->vmt_data[VMT_STUB].vmt_off);
  178.       me->me_type = xstrdup (fstype_to_string (vmp->vmt_gfstype));
  179.       me->me_dev = -1;    /* vmt_fsid might be the info we want.  */
  180. +     if (stat (me->me_mountdir, &statbuf) >= 0)
  181. +         me->me_ino = statbuf.st_ino;
  182. +     else
  183. +         me->me_ino = 0;
  184.       me->me_next = NULL;
  185.   
  186.       /* Add to the linked list. */
  187. diff -cr fileutils-3.4.orig/lib/mountlist.h fileutils-3.4/lib/mountlist.h
  188. *** fileutils-3.4.orig/lib/mountlist.h    Wed Mar 25 12:33:05 1992
  189. --- fileutils-3.4/lib/mountlist.h    Thu Dec 31 15:27:47 1992
  190. ***************
  191. *** 22,27 ****
  192. --- 22,28 ----
  193.     char *me_mountdir;        /* Mount point directory pathname. */
  194.     char *me_type;        /* "nfs", "4.2", etc. */
  195.     dev_t me_dev;            /* Device number of me_mountdir. */
  196. +   ino_t me_ino;            /* Inode of me_mountdir. */
  197.     struct mount_entry *me_next;
  198.   };
  199.   
  200. diff -cr fileutils-3.4.orig/man/ls.1 fileutils-3.4/man/ls.1
  201. *** fileutils-3.4.orig/man/ls.1    Wed Oct 14 23:17:11 1992
  202. --- fileutils-3.4/man/ls.1    Fri Jan  1 17:44:03 1993
  203. ***************
  204. *** 3,14 ****
  205.   ls, dir, vdir \- list contents of directories
  206.   .SH SYNOPSIS
  207.   .B ls
  208. ! [\-abcdgiklmnpqrstuxABCFLNQRSUX1] [\-w cols] [\-T cols] [\-I pattern]
  209.   [\-\-all] [\-\-escape] [\-\-directory] [\-\-inode] [\-\-kilobytes]
  210.   [\-\-numeric-uid-gid] [\-\-hide-control-chars] [\-\-reverse] [\-\-size]
  211.   [\-\-width=cols] [\-\-tabsize=cols] [\-\-almost-all] [\-\-ignore-backups]
  212.   [\-\-classify] [\-\-file-type] [\-\-ignore=pattern] [\-\-dereference]
  213. ! [\-\-literal] [\-\-quote-name] [\-\-recursive]
  214.   [\-\-sort={none,time,size,extension}]
  215.   [\-\-format={long,verbose,commas,across,vertical,single-column}]
  216.   [\-\-time={atime,access,use,ctime,status}] [path...]
  217. --- 3,14 ----
  218.   ls, dir, vdir \- list contents of directories
  219.   .SH SYNOPSIS
  220.   .B ls
  221. ! [\-abcdgiklmnpqrstuxABCFLMNQRSUX1] [\-w cols] [\-T cols] [\-I pattern]
  222.   [\-\-all] [\-\-escape] [\-\-directory] [\-\-inode] [\-\-kilobytes]
  223.   [\-\-numeric-uid-gid] [\-\-hide-control-chars] [\-\-reverse] [\-\-size]
  224.   [\-\-width=cols] [\-\-tabsize=cols] [\-\-almost-all] [\-\-ignore-backups]
  225.   [\-\-classify] [\-\-file-type] [\-\-ignore=pattern] [\-\-dereference]
  226. ! [\-\-literal] [\-\-mountpoints] [\-\-quote-name] [\-\-recursive]
  227.   [\-\-sort={none,time,size,extension}]
  228.   [\-\-format={long,verbose,commas,across,vertical,single-column}]
  229.   [\-\-time={atime,access,use,ctime,status}] [path...]
  230. ***************
  231. *** 119,124 ****
  232. --- 119,129 ----
  233.   .I "\-L, \-\-dereference"
  234.   List the files linked to by symbolic links instead of listing the
  235.   contents of the links.
  236. + .TP
  237. + .I "\-M, \-\-mountpoints"
  238. + Indicate directories which are mountpoints by appending a `^' character
  239. + to their filename. If the long format is also specified, indicates which
  240. + device is mounted on the mountpoint and the host, if remote.
  241.   .TP
  242.   .I "\-N, \-\-literal"
  243.   Do not quote file names.
  244. diff -cr fileutils-3.4.orig/src/ls.c fileutils-3.4/src/ls.c
  245. *** fileutils-3.4.orig/src/ls.c    Wed Oct 14 23:08:47 1992
  246. --- fileutils-3.4/src/ls.c    Fri Jan  1 18:18:52 1993
  247. ***************
  248. *** 45,50 ****
  249. --- 45,51 ----
  250.   #include <getopt.h>
  251.   #include <fnmatch.h>
  252.   #include "system.h"
  253. + #include "mountlist.h"
  254.   
  255.   #ifndef S_IEXEC
  256.   #define S_IEXEC S_IXUSR
  257. ***************
  258. *** 180,185 ****
  259. --- 181,191 ----
  260.   
  261.   /* The name the program was run with, stripped of any leading path. */
  262.   char *program_name;
  263. + 
  264. + /* List of mountpoints. Used only when show_mountpoints (-M) is nonzero. */
  265. + 
  266. + struct mount_entry *mountpoint_list;
  267. + 
  268.   
  269.   /* Option flags */
  270.   
  271. ***************
  272. *** 263,268 ****
  273. --- 269,280 ----
  274.   
  275.   enum indicator_style indicator_style;
  276.   
  277. + /* Nonzero means show when a directory is a mountpoint; `^' is an 
  278. +    displayed unless -l; `filename <- host:dir' when -l. Controlled 
  279. +    by -M. */
  280. + 
  281. + int show_mountpoints;
  282. + 
  283.   /* Nonzero means mention the inode number of each file.  -i  */
  284.   
  285.   int print_inode;
  286. ***************
  287. *** 367,373 ****
  288.     format_needs_stat = sort_type == sort_time || sort_type == sort_size
  289.       || format == long_format
  290.       || trace_links || trace_dirs || indicator_style != none
  291. !     || print_block_size || print_inode;
  292.   
  293.     nfiles = 100;
  294.     files = (struct file *) xmalloc (sizeof (struct file) * nfiles);
  295. --- 379,386 ----
  296.     format_needs_stat = sort_type == sort_time || sort_type == sort_size
  297.       || format == long_format
  298.       || trace_links || trace_dirs || indicator_style != none
  299. !     || print_block_size || print_inode 
  300. !     || show_mountpoints;
  301.   
  302.     nfiles = 100;
  303.     files = (struct file *) xmalloc (sizeof (struct file) * nfiles);
  304. ***************
  305. *** 437,442 ****
  306. --- 450,456 ----
  307.     {"file-type", 0, 0, 'F'},
  308.     {"ignore", 1, 0, 'I'},
  309.     {"dereference", 0, 0, 'L'},
  310. +   {"mountpoints", 0, 0, 'M'},
  311.     {"literal", 0, 0, 'N'},
  312.     {"quote-name", 0, 0, 'Q'},
  313.     {"recursive", 0, 0, 'R'},
  314. ***************
  315. *** 535,540 ****
  316. --- 549,555 ----
  317.     really_all_files = 0;
  318.     ignore_patterns = 0;
  319.     quote_as_string = 0;
  320. +   show_mountpoints = 0;
  321.   
  322.     p = getenv ("COLUMNS");
  323.     line_length = p ? atoi (p) : 80;
  324. ***************
  325. *** 551,557 ****
  326.     p = getenv ("TABSIZE");
  327.     tabsize = p ? atoi (p) : 8;
  328.   
  329. !   while ((c = getopt_long (argc, argv, "abcdgiklmnpqrstuw:xABCFI:LNQRST:UX1",
  330.                  long_options, (int *) 0)) != EOF)
  331.       {
  332.         switch (c)
  333. --- 566,572 ----
  334.     p = getenv ("TABSIZE");
  335.     tabsize = p ? atoi (p) : 8;
  336.   
  337. !   while ((c = getopt_long (argc, argv, "abcdgiklmnpqrstuw:xABCFI:LMNQRST:UX1",
  338.                  long_options, (int *) 0)) != EOF)
  339.       {
  340.         switch (c)
  341. ***************
  342. *** 663,668 ****
  343. --- 678,688 ----
  344.         qmark_funny_chars = 0;
  345.         break;
  346.         
  347. +     case 'M':
  348. +       show_mountpoints = 1;
  349. +       mountpoint_list = 0;
  350. +       break;
  351. +       
  352.       case 'Q':
  353.         quote_as_string = 1;
  354.         quote_funny_chars = 1;
  355. ***************
  356. *** 1141,1146 ****
  357. --- 1161,1218 ----
  358.   
  359.     return 1;
  360.   }
  361. + 
  362. + /* Based on cwd and pending list, calculate whole path to a file. 
  363. +    Returns allocated string. */
  364. + char *
  365. + get_whole_path(file)
  366. +      char *file;
  367. + {
  368. +   char *xgetcwd();
  369. +   char *result;
  370. +   
  371. +   if (dir_defaulted)
  372. +     {
  373. +       char *cwd = xgetcwd();    /* should error check this call?? */
  374. +       int cwdlen = strlen(cwd);
  375. +       
  376. +       result = (char *)xrealloc (cwd, cwdlen + strlen(file) + 2);
  377. +       result[cwdlen] = '\\';
  378. +       strcat(&result[cwdlen + 1], file) ;
  379. +     } 
  380. +   else 
  381. +     { 
  382. +       ;
  383. +       
  384. +     }    
  385. +   return result;
  386. + }
  387. + 
  388. + /* Returns char pointer to name of device if DIR is a mountpoint, otherwise
  389. +    returns NULL. */
  390. + char *
  391. + is_mountpoint(dir)
  392. +     struct file *dir;
  393. + {
  394. +     struct mount_entry *me;
  395. + 
  396. +     /* Init the mount list. Only do this first time it's needed. */
  397. +     if (!mountpoint_list)
  398. +       {
  399. +          mountpoint_list = read_filesystem_list(1, 1);
  400. +      if (!mountpoint_list)
  401. +        return (char *)NULL; /* Nonfatal error, just keep going. */
  402. +                   /* At worst, the listing will be wrong. */
  403. +       }    
  404. + 
  405. +     /* Compare directory against every mountpoint. Compare device 
  406. +        numbers and then inode numbers. */
  407. +     for (me = mountpoint_list; NULL != me; me = me->me_next)
  408. +     if (me->me_dev == dir->stat.st_dev && me->me_ino == dir->stat.st_ino) 
  409. +         return me->me_devname;
  410. + 
  411. +     return (char *)NULL;
  412. + }
  413.   
  414.   /* Sort the files now in the table.  */
  415.   
  416. ***************
  417. *** 1416,1422 ****
  418.           print_type_indicator (f->linkmode);
  419.       }
  420.       }
  421. !   else if (indicator_style != none)
  422.       print_type_indicator (f->stat.st_mode);
  423.   }
  424.   
  425. --- 1488,1504 ----
  426.           print_type_indicator (f->linkmode);
  427.       }
  428.       }
  429. !   else if ((f->filetype == directory || f->filetype == arg_directory)
  430. !        && show_mountpoints)
  431. !     {
  432. !       char *devname = is_mountpoint (f);
  433. !     
  434. !       if (NULL != devname)
  435. !     printf (" <- %s", devname);
  436. !       else if (indicator_style != none)
  437. !     print_type_indicator (f->stat.st_mode);
  438. !     }
  439. !  else if (indicator_style != none)
  440.       print_type_indicator (f->stat.st_mode);
  441.   }
  442.   
  443. ***************
  444. *** 1506,1513 ****
  445.   
  446.     print_name_with_quoting (f->name);
  447.   
  448. !   if (indicator_style != none)
  449. !     print_type_indicator (f->stat.st_mode);
  450.   }
  451.   
  452.   void
  453. --- 1588,1604 ----
  454.   
  455.     print_name_with_quoting (f->name);
  456.   
  457. !   if ((f->filetype == directory || f->filetype == arg_directory)
  458. !       && show_mountpoints)
  459. !     {
  460. !       if (NULL != is_mountpoint (f))    
  461. !     putchar ('^');
  462. !       else if (indicator_style != none)
  463. !       print_type_indicator (f->stat.st_mode);
  464. !     }
  465. !   else
  466. !     if (indicator_style != none)
  467. !       print_type_indicator (f->stat.st_mode);
  468.   }
  469.   
  470.   void
  471. ***************
  472. *** 1799,1805 ****
  473.   usage ()
  474.   {
  475.     fprintf (stderr, "\
  476. ! Usage: %s [-abcdgiklmnpqrstuxABCFLNQRSUX1] [-w cols] [-T cols] [-I pattern]\n\
  477.          [--all] [--escape] [--directory] [--inode] [--kilobytes] [--literal]\n\
  478.          [--numeric-uid-gid] [--hide-control-chars] [--reverse] [--size]\n\
  479.          [--width=cols] [--tabsize=cols] [--almost-all] [--ignore-backups]\n",
  480. --- 1890,1896 ----
  481.   usage ()
  482.   {
  483.     fprintf (stderr, "\
  484. ! Usage: %s [-abcdgiklmnpqrstuxABCFLMNQRSUX1] [-w cols] [-T cols] [-I pattern]\n\
  485.          [--all] [--escape] [--directory] [--inode] [--kilobytes] [--literal]\n\
  486.          [--numeric-uid-gid] [--hide-control-chars] [--reverse] [--size]\n\
  487.          [--width=cols] [--tabsize=cols] [--almost-all] [--ignore-backups]\n",
  488. ***************
  489. *** 1806,1812 ****
  490.          program_name);
  491.     fprintf (stderr, "\
  492.          [--classify] [--file-type] [--ignore=pattern] [--dereference]\n\
  493. !        [--quote-name] [--recursive] [--sort={none,time,size,extension}]\n\
  494.          [--format={long,verbose,commas,across,vertical,single-column}]\n\
  495.          [--time={atime,access,use,ctime,status}] [path...]\n");
  496.     exit (1);
  497. --- 1897,1904 ----
  498.          program_name);
  499.     fprintf (stderr, "\
  500.          [--classify] [--file-type] [--ignore=pattern] [--dereference]\n\
  501. !        [--mountpoints] [--quote-name] [--recursive]\n\
  502. !        [--sort={none,time,size,extension}]\n\
  503.          [--format={long,verbose,commas,across,vertical,single-column}]\n\
  504.          [--time={atime,access,use,ctime,status}] [path...]\n");
  505.     exit (1);
  506.  
  507.  
  508.