home *** CD-ROM | disk | FTP | other *** search
/ CICA 1995 September (Japanese) / CICA Shareware for Windows CD-ROM (Walnut Creek) (September 1995) (Japanese) (Disc 2).iso / disc2 / nt / source.exe / POSIX / LS / PRINT.C < prev    next >
Encoding:
C/C++ Source or Header  |  1992-10-30  |  7.8 KB  |  327 lines
  1. /*
  2.  * Copyright (c) 1989 The Regents of the University of California.
  3.  * All rights reserved.
  4.  *
  5.  * This code is derived from software contributed to Berkeley by
  6.  * Michael Fischbein.
  7.  *
  8.  * Redistribution and use in source and binary forms, with or without
  9.  * modification, are permitted provided that the following conditions
  10.  * are met:
  11.  * 1. Redistributions of source code must retain the above copyright
  12.  *    notice, this list of conditions and the following disclaimer.
  13.  * 2. Redistributions in binary form must reproduce the above copyright
  14.  *    notice, this list of conditions and the following disclaimer in the
  15.  *    documentation and/or other materials provided with the distribution.
  16.  * 3. All advertising materials mentioning features or use of this software
  17.  *    must display the following acknowledgement:
  18.  *    This product includes software developed by the University of
  19.  *    California, Berkeley and its contributors.
  20.  * 4. Neither the name of the University nor the names of its contributors
  21.  *    may be used to endorse or promote products derived from this software
  22.  *    without specific prior written permission.
  23.  *
  24.  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  25.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  26.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  27.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  28.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  29.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  30.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  31.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  32.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  33.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  34.  * SUCH DAMAGE.
  35.  */
  36.  
  37. #ifdef DF_POSIX /* DF_DSC */
  38. #include <misc.h>
  39. #include <bsdlib.h>
  40. #endif
  41.  
  42. #ifndef lint
  43. static char sccsid[] = "@(#)print.c    5.24 (Berkeley) 10/19/90";
  44. #endif /* not lint */
  45.  
  46. #ifdef DF_POSIX /* DF_DSC */
  47. #include <sys/cdefs.h>
  48. #else
  49. #include <sys/param.h>
  50. #endif
  51. #include <sys/stat.h>
  52. #include <stdio.h>
  53. #include <grp.h>
  54. #include <pwd.h>
  55. #include <utmp.h>
  56. #include <tzfile.h>
  57. #if WIN_NT
  58. #include <string.h>
  59. #include <time.h>
  60. #endif
  61. #include "ls.h"
  62.  
  63. #if WIN_NT
  64. extern char *user_from_uid __P((uid_t, int));
  65. extern char *group_from_gid __P((gid_t, int));
  66.  
  67. int printaname __P((LS *));
  68. void printtime __P((time_t));
  69. int printtype __P((mode_t));
  70. void printlink __P((char *));
  71. #endif
  72.  
  73. void
  74. #if __STDC__
  75. printscol (register LS *stats, register int num)
  76. #else
  77. printscol(stats, num)
  78.     register LS *stats;
  79.     register int num;
  80. #endif
  81. {
  82.     for (; num--; ++stats) {
  83.         (void)printaname(stats);
  84.         (void)putchar('\n');
  85.     }
  86. }
  87.  
  88. void
  89. #if __STDC__
  90. printlong (LS *stats, register int num)
  91. #else
  92. printlong(stats, num)
  93.     LS *stats;
  94.     register int num;
  95. #endif
  96. {
  97.     extern int errno;
  98. #if WIN_NT
  99.     char modep[15];
  100. #else
  101.     char modep[15], *user_from_uid(), *group_from_gid(), *strerror();
  102. #endif
  103.  
  104. #ifndef _POSIX_SOURCE /* DF_MSS */
  105.     if (f_total)
  106.         (void)printf("total %lu\n", f_kblocks ?
  107.             howmany(stats[0].lstat.st_btotal, 2) :
  108.             stats[0].lstat.st_btotal);
  109. #endif
  110.     for (; num--; ++stats) {
  111.         if (f_inode)
  112.             (void)printf("%6lu ", stats->lstat.st_ino);
  113. #ifndef _POSIX_SOURCE /* DF_MSS */
  114.         if (f_size)
  115.             (void)printf("%4ld ", f_kblocks ?
  116.                 howmany(stats->lstat.st_blocks, 2) :
  117.                 stats->lstat.st_blocks);
  118. #endif
  119.         (void)strmode(stats->lstat.st_mode, modep);
  120.         (void)printf("%s %3u %-*s ", modep, stats->lstat.st_nlink,
  121.             UT_NAMESIZE, user_from_uid(stats->lstat.st_uid, 0));
  122.         if (f_group)
  123.             (void)printf("%-*s ", UT_NAMESIZE,
  124.                 group_from_gid(stats->lstat.st_gid, 0));
  125. #ifndef _POSIX_SOURCE /* DF_MSS */
  126.         if (S_ISCHR(stats->lstat.st_mode) ||
  127.             S_ISBLK(stats->lstat.st_mode))
  128.             (void)printf("%3d, %3d ", major(stats->lstat.st_rdev),
  129.                 minor(stats->lstat.st_rdev));
  130.         else
  131. #endif
  132.             (void)printf("%8ld ", stats->lstat.st_size);
  133.         if (f_accesstime)
  134.             printtime(stats->lstat.st_atime);
  135.         else if (f_statustime)
  136.             printtime(stats->lstat.st_ctime);
  137.         else
  138.             printtime(stats->lstat.st_mtime);
  139.         (void)printf("%s", stats->name);
  140.         if (f_type)
  141.             (void)printtype(stats->lstat.st_mode);
  142. #ifndef _POSIX_SOURCE /* DF_MSS */
  143.         if (S_ISLNK(stats->lstat.st_mode))
  144.             printlink(stats->name);
  145. #endif
  146.         (void)putchar('\n');
  147.     }
  148. }
  149.  
  150. #define    TAB    8
  151.  
  152. void
  153. #if __STDC__
  154. printcol (LS *stats, register int num)
  155. #else
  156. printcol(stats, num)
  157.     LS *stats;
  158.     register int num;
  159. #endif
  160. {
  161.     extern int termwidth;
  162.     register int base, chcnt, cnt, col, colwidth;
  163.     int endcol, numcols, numrows, row;
  164. #ifdef _POSIX_SOURCE /* DF_MSS */
  165.     colwidth = 14;    
  166. #else
  167.     colwidth = stats[0].lstat.st_maxlen;
  168. #endif
  169.     if (f_inode)
  170.         colwidth += 6;
  171.     if (f_size)
  172.         colwidth += 5;
  173.     if (f_type)
  174.         colwidth += 1;
  175.  
  176.     colwidth = (colwidth + TAB) & ~(TAB - 1);
  177.     if (termwidth < 2 * colwidth) {
  178.         printscol(stats, num);
  179.         return;
  180.     }
  181.  
  182.     numcols = termwidth / colwidth;
  183.     numrows = num / numcols;
  184.     if (num % numcols)
  185.         ++numrows;
  186.  
  187. #ifndef _POSIX_SOURCE /* DF_MSS */
  188.     if (f_size && f_total)
  189.         (void)printf("total %lu\n", f_kblocks ?
  190.             howmany(stats[0].lstat.st_btotal, 2) :
  191.             stats[0].lstat.st_btotal);
  192. #endif
  193.     for (row = 0; row < numrows; ++row) {
  194.         endcol = colwidth;
  195.         for (base = row, chcnt = col = 0; col < numcols; ++col) {
  196.             chcnt += printaname(stats + base);
  197.             if ((base += numrows) >= num)
  198.                 break;
  199.             while ((cnt = (chcnt + TAB & ~(TAB - 1))) <= endcol) {
  200.                 (void)putchar('\t');
  201.                 chcnt = cnt;
  202.             }
  203.             endcol += colwidth;
  204.         }
  205.         putchar('\n');
  206.     }
  207. }
  208.  
  209. /*
  210.  * print [inode] [size] name
  211.  * return # of characters printed, no trailing characters
  212.  */
  213. int
  214. #if __STDC__
  215. printaname (LS *lp)
  216. #else
  217. printaname(lp)
  218.     LS *lp;
  219. #endif
  220. {
  221.     int chcnt;
  222.  
  223.     chcnt = 0;
  224.     if (f_inode)
  225.         chcnt += printf("%5lu ", lp->lstat.st_ino);
  226. #ifndef _POSIX_SOURCE /* DF_MSS */
  227.     if (f_size)
  228.         chcnt += printf("%4ld ", f_kblocks ?
  229.             howmany(lp->lstat.st_blocks, 2) : lp->lstat.st_blocks);
  230. #endif
  231.     chcnt += printf("%s", lp->name);
  232.     if (f_type)
  233.         chcnt += printtype(lp->lstat.st_mode);
  234.     return(chcnt);
  235. }
  236.  
  237. void
  238. #if __STDC__
  239. printtime (time_t ftime)
  240. #else
  241. printtime(ftime)
  242.     time_t ftime;
  243. #endif
  244. {
  245.     int i;
  246. #if WIN_NT
  247.     char *longstring;
  248. #else
  249.     char *longstring, *ctime();
  250.     time_t time();
  251. #endif
  252.  
  253.     longstring = ctime((long *)&ftime);
  254.     for (i = 4; i < 11; ++i)
  255.         (void)putchar(longstring[i]);
  256.  
  257. #define    SIXMONTHS    ((DAYSPERNYEAR / 2) * SECSPERDAY)
  258.     if (f_sectime)
  259.         for (i = 11; i < 24; i++)
  260.             (void)putchar(longstring[i]);
  261.     else if (ftime + SIXMONTHS > time((time_t *)NULL))
  262.         for (i = 11; i < 16; ++i)
  263.             (void)putchar(longstring[i]);
  264.     else {
  265.         (void)putchar(' ');
  266.         for (i = 20; i < 24; ++i)
  267.             (void)putchar(longstring[i]);
  268.     }
  269.     (void)putchar(' ');
  270. }
  271.  
  272. int
  273. #if __STDC__
  274. printtype (mode_t mode)
  275. #else
  276. printtype(mode)
  277.     mode_t mode;
  278. #endif
  279. {
  280.     switch(mode & S_IFMT) {
  281.     case S_IFDIR:
  282.         (void)putchar('/');
  283.         return(1);
  284. #ifndef _POSIX_SOURCE /* DF_MSS */
  285.     case S_IFLNK:
  286.         (void)putchar('@');
  287.         return(1);
  288.     case S_IFSOCK:
  289.         (void)putchar('=');
  290.         return(1);
  291. #endif
  292.     }
  293.     if (mode & (S_IXUSR | S_IXGRP | S_IXOTH)) {
  294.         (void)putchar('*');
  295.         return(1);
  296.     }
  297.     return(0);
  298. }
  299.  
  300. void
  301. #if __STDC__
  302. printlink (char *name)
  303. #else
  304. printlink(name)
  305.     char *name;
  306. #endif
  307. {
  308.     int lnklen;
  309. #if WIN_NT
  310.     char path[MAXPATHLEN + 1];
  311. #else
  312.     char path[MAXPATHLEN + 1], *strerror();
  313. #endif
  314.  
  315. #ifdef _POSIX_SOURCE /* DF_MSS */
  316.     if (name == NULL)
  317.         ;
  318. #else
  319.     if ((lnklen = readlink(name, path, MAXPATHLEN)) == -1) {
  320.         (void)fprintf(stderr, "\nls: %s: %s\n", name, strerror(errno));
  321.         return;
  322.     }
  323. #endif
  324.     path[lnklen] = '\0';
  325.     (void)printf(" -> %s", path);
  326. }
  327.