home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 6 File / 06-File.zip / colorls2.zip / color-ls.dif next >
Text File  |  1996-03-04  |  46KB  |  1,634 lines
  1. *** /tmp/fu/man/ls.1    Tue Apr 26 22:08:54 1994
  2. --- man/ls.1    Thu Feb 29 03:36:20 1996
  3. ***************
  4. *** 1,9 ****
  5. ! .TH LS 1L "GNU File Utilities" "FSF" \" -*- nroff -*-
  6.   .SH NAME
  7.   ls, dir, vdir \- list contents of directories
  8.   .SH SYNOPSIS
  9.   .B ls
  10. ! [\-abcdfgiklmnpqrstuxABCFGLNQRSUX1] [\-w cols] [\-T cols] [\-I pattern]
  11.   [\-\-all] [\-\-escape] [\-\-directory] [\-\-inode] [\-\-kilobytes]
  12.   [\-\-numeric-uid-gid] [--no-group] [\-\-hide-control-chars] [\-\-reverse]
  13.   [\-\-size] [\-\-width=cols] [\-\-tabsize=cols] [\-\-almost-all]
  14. --- 1,9 ----
  15. ! .TH LS 1L "GNU File Utilities" "FSF" \" -*- nroff -*- "
  16.   .SH NAME
  17.   ls, dir, vdir \- list contents of directories
  18.   .SH SYNOPSIS
  19.   .B ls
  20. ! [\-abcdefgiklmnopqrstuxABCFGLNQRSUX178] [\-w cols] [\-T cols] [\-I pattern]
  21.   [\-\-all] [\-\-escape] [\-\-directory] [\-\-inode] [\-\-kilobytes]
  22.   [\-\-numeric-uid-gid] [--no-group] [\-\-hide-control-chars] [\-\-reverse]
  23.   [\-\-size] [\-\-width=cols] [\-\-tabsize=cols] [\-\-almost-all]
  24. ***************
  25. *** 11,21 ****
  26.   [\-\-ignore=pattern] [\-\-dereference] [\-\-literal] [\-\-quote-name]
  27.   [\-\-recursive] [\-\-sort={none,time,size,extension}]
  28.   [\-\-format={long,verbose,commas,across,vertical,single-column}]
  29. ! [\-\-time={atime,access,use,ctime,status}] [\-\-help] [\-\-version] [name...]
  30.   .SH DESCRIPTION
  31.   This manual page
  32.   documents the GNU version of
  33. ! .BR ls .
  34.   .B dir
  35.   and
  36.   .B vdir
  37. --- 11,24 ----
  38.   [\-\-ignore=pattern] [\-\-dereference] [\-\-literal] [\-\-quote-name]
  39.   [\-\-recursive] [\-\-sort={none,time,size,extension}]
  40.   [\-\-format={long,verbose,commas,across,vertical,single-column}]
  41. ! [\-\-time={atime,access,use,ctime,status}]
  42. ! [\-\-color[={yes,no,tty}]] [\-\-colour[={yes,no,tty}]]
  43. ! [\-\-unix] [\-\-help] [\-\-version] [name...]
  44.   .SH DESCRIPTION
  45.   This manual page
  46.   documents the GNU version of
  47. ! .BR ls ,
  48. ! with color extensions.
  49.   .B dir
  50.   and
  51.   .B vdir
  52. ***************
  53. *** 49,54 ****
  54. --- 52,61 ----
  55.   .I "\-d, \-\-directory"
  56.   List directories like other files, rather than listing their contents.
  57.   .TP
  58. + .I "\-e, \-\-full-time"
  59. + List times in full, rather than using the standard abbreviation
  60. + heuristics.
  61. + .TP
  62.   .I "\-f"
  63.   Do not sort directory contents; list them in whatever order they are
  64.   stored on the disk.
  65. ***************
  66. *** 58,71 ****
  67.   .I \-U
  68.   and disabling
  69.   .I \-l,
  70.   .I \-s,
  71.   and
  72.   .I \-t.
  73.   .TP
  74. - .I "\-\-full-time"
  75. - List times in full, rather than using the standard abbreviation
  76. - heuristics.
  77. - .TP
  78.   .I \-g
  79.   Ignored; for Unix compatibility.
  80.   .TP
  81. --- 65,75 ----
  82.   .I \-U
  83.   and disabling
  84.   .I \-l,
  85. + .I \-o,
  86.   .I \-s,
  87.   and
  88.   .I \-t.
  89.   .TP
  90.   .I \-g
  91.   Ignored; for Unix compatibility.
  92.   .TP
  93. ***************
  94. *** 74,80 ****
  95.   .TP
  96.   .I "\-k, \-\-kilobytes"
  97.   If file sizes are being listed, print them in kilobytes.  This
  98. ! overrides the environment variable POSIXLY_CORRECT.
  99.   .TP
  100.   .I "\-l, \-\-format=long, \-\-format=verbose"
  101.   In addition to the name of each file, print the file type,
  102. --- 78,85 ----
  103.   .TP
  104.   .I "\-k, \-\-kilobytes"
  105.   If file sizes are being listed, print them in kilobytes.  This
  106. ! overrides the environment variable 
  107. ! .BR POSIXLY_CORRECT .
  108.   .TP
  109.   .I "\-l, \-\-format=long, \-\-format=verbose"
  110.   In addition to the name of each file, print the file type,
  111. ***************
  112. *** 91,96 ****
  113. --- 96,109 ----
  114.   .I "\-n, \-\-numeric-uid-gid"
  115.   List the numeric UID and GID instead of the names.
  116.   .TP
  117. + .I "\-o, \-\-color, \-\-colour, \-\-color=yes, \-\-colour=yes"
  118. + Colorize the names of files depending on the type of file.
  119. + See `DISPLAY COLORIZATION' below.  Note that
  120. + .I \-o
  121. + unlike
  122. + .I \-\-color
  123. + is a toggle.
  124. + .TP
  125.   .I \-p
  126.   Append a character to each file name indicating the file type.
  127.   .TP
  128. ***************
  129. *** 102,108 ****
  130.   .TP
  131.   .I "\-s, \-\-size"
  132.   Print the size of each file in 1K blocks to the left of the file name.
  133. ! If the environment variable POSIXLY_CORRECT is set, 512-byte blocks
  134.   are used instead.
  135.   .TP
  136.   .I "\-t, \-\-sort=time"
  137. --- 115,123 ----
  138.   .TP
  139.   .I "\-s, \-\-size"
  140.   Print the size of each file in 1K blocks to the left of the file name.
  141. ! If the environment variable 
  142. ! .B POSIXLY_CORRECT
  143. ! is set, 512-byte blocks
  144.   are used instead.
  145.   .TP
  146.   .I "\-t, \-\-sort=time"
  147. ***************
  148. *** 190,196 ****
  149.   .I "\-T, \-\-tabsize cols"
  150.   Assume that each tabstop is
  151.   .I cols
  152. ! columns wide.  The default is 8.
  153.   .TP
  154.   .I "\-I, \-\-ignore pattern"
  155.   Do not list files whose names match the shell pattern
  156. --- 205,214 ----
  157.   .I "\-T, \-\-tabsize cols"
  158.   Assume that each tabstop is
  159.   .I cols
  160. ! columns wide.  The default is 8, or whatever the
  161. ! .B TABSIZE
  162. ! environment variable says.  Setting the tabsize to 0 disables
  163. ! the use of tab characters completely.
  164.   .TP
  165.   .I "\-I, \-\-ignore pattern"
  166.   Do not list files whose names match the shell pattern
  167. ***************
  168. *** 199,209 ****
  169. --- 217,356 ----
  170.   initial `.' in a filename does not match a wildcard at the start of
  171.   .I pattern.
  172.   .TP
  173. + .I "\-\-color=tty, \-\-colour=tty"
  174. + Same as
  175. + .I \-o
  176. + but only if standard output is a terminal.  This is very useful for
  177. + shell scripts and command aliases, especially if your favorite pager
  178. + does not support color control codes.
  179. + .TP
  180. + .I "\-\-color=no, \-\-colour=no"
  181. + Disables colorization.  This is the default.  Provided to override a
  182. + previous color option.
  183. + .TP
  184.   .I "\-\-help"
  185.   Print a usage message on standard output and exit successfully.
  186.   .TP
  187.   .I "\-\-version"
  188.   Print version information on standard output then exit successfully.
  189. + .TP
  190. + .I "\-\-unix"
  191. + Print plain UNIX long format instead of OS/2 format. 
  192. + .SS DISPLAY COLORIZATION
  193. + When using the
  194. + .I "\-o"
  195. + or
  196. + .I "\-\-color"
  197. + options, this version of
  198. + .B ls
  199. + will colorize the file names printed according to the name and type of
  200. + file.  By default, this colorization is by type only, and the codes
  201. + used are ISO 6429 (ANSI) compliant.
  202. + .PP
  203. + You can override the default colors by defining the environment
  204. + variable 
  205. + .B LS_COLORS
  206. + (or 
  207. + .BR LS_COLOURS ).
  208. + The format of this variable is reminicent of the termcap(5) file
  209. + format; a colon-separated list of expressions of the form "xx=string",
  210. + where "xx" is a two-character variable name.  The variables with their
  211. + associated defaults are:
  212. + .sp
  213. + .RS +.2i
  214. + .ta 1.0i 2.5i
  215. + .nf
  216. + \fBno\fR    0    Normal (non-filename) text
  217. + \fBfi\fR    1    Regular file
  218. + \fBdi\fR    32;1    Directory
  219. + .\"" \fBln\fR    36    Symbolic link
  220. + .\"" \fBpi\fR    31    Named pipe (FIFO)
  221. + .\"" \fBso\fR    33    Socket
  222. + .\"" \fBbd\fR    44;37    Block device
  223. + .\"" \fBcd\fR    44;37    Character device
  224. + \fBex\fR    35;1    Executable file
  225. + \fBsy\fR    31;1    System file
  226. + \fBro\fR    33;1    Read-only file
  227. + \fBhi\fR    44;37;1    Hidden file
  228. + .\"" \fBmi\fR    (none)    Missing file (defaults to fi)
  229. + .\"" \fBor\fR    (none)    Orphanned symbolic link (defaults to ln)
  230. + \fBlc\fR    \ee[    Left code
  231. + \fBrc\fR    m    Right code
  232. + \fBec\fR    (none)    End code (replaces lc+no+rc)
  233. + .fi
  234. + .RE
  235. + .sp
  236. + You only need to include the variables you want to change from the
  237. + default.
  238. + .PP
  239. + File names can also be colorized based on filename extension.  This is
  240. + specified in the LS_COLORS variable using the syntax "*ext=string".
  241. + For example, using ISO 6429 codes, to color all C-language source
  242. + files blue you would specify "*.c=34".  This would color all files
  243. + ending in .c in blue (34) color.
  244. + .PP
  245. + Control characters can be written either in C-style \e-escaped
  246. + notation, or in
  247. + .BR stty -like
  248. + ^-notation.  The C-style notation adds \ee for Escape, \e_ for a
  249. + normal space characer, and \e? for Delete.  In addition, the \e escape
  250. + character can be used to override the default interpretation of \e, ^,
  251. + : and =.
  252. + .PP
  253. + Each file will be written as <lc> <color\ code> <rc> <filename> <ec>.
  254. + If the <ec> code is undefined, the sequence <lc> <no> <rc> will be
  255. + used instead.  This is generally more convenient to use, but less
  256. + general.  The left, right and end codes are provided so you don't have
  257. + to type common parts over and over again and to support weird
  258. + terminals; you will generally not need to change them at all unless
  259. + your terminal does not use ISO 6429 color sequences but a different
  260. + system.
  261. + .PP
  262. + If your terminal does use ISO 6429 color codes, you can compose the type
  263. + codes (i.e. all except the 
  264. + .BR lc ,
  265. + .BR rc ,
  266. + and
  267. + .B ec
  268. + codes) from numerical commands separated by semicolons.  The most
  269. + common commands are:
  270. + .sp
  271. + .RS +.2i
  272. + .ta 1.0i
  273. + .nf
  274. +  0    to restore default color
  275. +  1    for brighter colors 
  276. +  4    for underlined text
  277. +  5    for flashing text
  278. + 30    for black foreground
  279. + 31    for red foreground
  280. + 32    for green foreground
  281. + 33    for yellow (or brown) foreground
  282. + 34    for blue foreground
  283. + 35    for purple foreground
  284. + 36    for cyan foreground
  285. + 37    for white (or gray) foreground
  286. + 40    for black background
  287. + 41    for red background
  288. + 42    for green background
  289. + 43    for yellow (or brown) background
  290. + 44    for blue background
  291. + 45    for purple background
  292. + 46    for cyan background
  293. + 47    for white (or gray) background
  294. + .fi
  295. + .RE
  296. + .sp
  297. + Not all commands will work on all systems or display devices.
  298. + .PP
  299. + A few terminal programs do not recognize the default end code
  300. + properly.  If all text gets colorized after you do a directory
  301. + listing, try changing the
  302. + .B no
  303. + and
  304. + .B fi
  305. + codes from 0 to the numerical codes for your standard fore- and
  306. + background colors.
  307.   .SH BUGS
  308.   On BSD systems, the
  309.   .I \-s
  310. ***************
  311. *** 214,216 ****
  312. --- 361,374 ----
  313.   HP-UX
  314.   .B ls
  315.   program.
  316. + .PP
  317. + Character set selection should be more system independent.
  318. + .PP
  319. + Using the colorization options disables the use of the tab character for
  320. + column spacing unless the
  321. + .I \-T
  322. + option is used; apparently some systems do not like tabs and color
  323. + codes in conjunction.
  324. + .PP
  325. + If there was a single standard for the English language it would not
  326. + be necessary to support redundant spellings.
  327. *** /tmp/fu/src/ls.c    Fri Dec 16 22:13:16 1994
  328. --- src/ls.c    Mon Mar 04 00:00:48 1996
  329. ***************
  330. *** 15,37 ****
  331.      along with this program; if not, write to the Free Software
  332.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  333.   
  334. ! /* If the macro MULTI_COL is defined,
  335.      the multi-column format is the default regardless
  336.      of the type of output device.
  337.      This is for the `dir' program.
  338.   
  339. !    If the macro LONG_FORMAT is defined,
  340.      the long format is the default regardless of the
  341.      type of output device.
  342.      This is for the `vdir' program.
  343.   
  344. !    If neither is defined,
  345.      the output format depends on whether the output
  346.      device is a terminal.
  347. !    This is for the `ls' program. */
  348.   
  349.   /* Written by Richard Stallman and David MacKenzie. */
  350.   
  351.   #ifdef _AIX
  352.    #pragma alloca
  353.   #endif
  354. --- 15,48 ----
  355.      along with this program; if not, write to the Free Software
  356.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  357.   
  358. ! /* If the first character after the last slash in argv[0] is 'd',
  359.      the multi-column format is the default regardless
  360.      of the type of output device.
  361.      This is for the `dir' program.
  362.   
  363. !    If the first character after the last slash in argv[0] is 'v',
  364.      the long format is the default regardless of the
  365.      type of output device.
  366.      This is for the `vdir' program.
  367.   
  368. !    If the first character after the last slash in argv[0] is 'l',
  369.      the output format depends on whether the output
  370.      device is a terminal.
  371. !    This is for the `ls' program.
  372. ! 
  373. !    If it is anything else, the default will depend on if this program
  374. !    is linked with ls-ls.c, ls-dir.c or ls-vdir.c.
  375. ! 
  376. !    This behaviour can be overridden by defining NO_NAME_DEPENDENCE
  377. !    at compile time.  */
  378.   
  379.   /* Written by Richard Stallman and David MacKenzie. */
  380.   
  381. + /* Colour and 8-bit support by Peter Anvin <hpa@nwu.edu> and
  382. +    Dennis Flaherty <dennisf@denix.elk.miles.com> based on original
  383. +    patches by Greg Lee <lee@uhunix.uhcc.hawaii.edu>.  See file
  384. +    color-ls.log for revision history. */
  385. + 
  386.   #ifdef _AIX
  387.    #pragma alloca
  388.   #endif
  389. ***************
  390. *** 114,119 ****
  391. --- 125,131 ----
  392.   static int compare_extension ();
  393.   static int rev_cmp_extension ();
  394.   static int decode_switches ();
  395. + static void parse_ls_color ();
  396.   static int file_interesting ();
  397.   static int gobble_file ();
  398.   static int is_not_dot_or_dotdot ();
  399. ***************
  400. *** 130,137 ****
  401. --- 142,152 ----
  402.   static void print_horizontal ();
  403.   static void print_long_format ();
  404.   static void print_many_per_line ();
  405. + static void print_fancy_name ();
  406.   static void print_name_with_quoting ();
  407.   static void print_type_indicator ();
  408. + static void print_color_indicator ();
  409. + static void put_indicator ();
  410.   static void print_with_commas ();
  411.   static void queue_directory ();
  412.   static void sort_files ();
  413. ***************
  414. *** 162,167 ****
  415. --- 177,186 ----
  416.     /* For symbolic link and long listing, st_mode of file linked to, otherwise
  417.        zero. */
  418.     unsigned int linkmode;
  419. +   
  420. +   /* For symbolic link and color printing, 1 if linked-to file exits,
  421. +      otherwise 0 */
  422. +   int linkok;
  423.   
  424.     enum filetype filetype;
  425.   };
  426. ***************
  427. *** 214,220 ****
  428.      one_per_line for just names, one per line.
  429.      many_per_line for just names, many per line, sorted vertically.
  430.      horizontal for just names, many per line, sorted horizontally.
  431. !    with_commas for just names, many per line, separated by commas.
  432.   
  433.      -l, -1, -C, -x and -m control this parameter.  */
  434.   
  435. --- 233,239 ----
  436.      one_per_line for just names, one per line.
  437.      many_per_line for just names, many per line, sorted vertically.
  438.      horizontal for just names, many per line, sorted horizontally.
  439. !    with_commas for just names, many per line, separated by commas
  440.   
  441.      -l, -1, -C, -x and -m control this parameter.  */
  442.   
  443. ***************
  444. *** 240,246 ****
  445.   
  446.   static enum time_type time_type;
  447.   
  448. ! /* print the full time, otherwise the standard unix heuristics. */
  449.   
  450.   int full_time;
  451.   
  452. --- 259,265 ----
  453.   
  454.   static enum time_type time_type;
  455.   
  456. ! /* print the full time, otherwise the standard unix heuristics. -e */
  457.   
  458.   int full_time;
  459.   
  460. ***************
  461. *** 305,310 ****
  462. --- 324,439 ----
  463.   
  464.   static enum indicator_style indicator_style;
  465.   
  466. + /* Nonzero means use colors to mark types.  Also define the different
  467. +    colors as well as the stuff for the LS_COLORS environment variable.
  468. +    The LS_COLORS variable is now in a termcap-like format.  -o */
  469. + 
  470. + int print_with_color;
  471. + 
  472. + enum color_type
  473. + {
  474. +   color_no,            /* 0: default or --color=no */
  475. +   color_yes,            /* 1: -o or --color=yes */
  476. +   color_if_tty            /* 2: --color=tty */
  477. + };
  478. + 
  479. + /* Note that color_no and color_yes equals boolean values; they will
  480. +    be assigned to print_with_color which is a boolean variable */
  481. + 
  482. + #ifndef OS2
  483. + enum indicator_no
  484. + { C_LEFT, C_RIGHT, C_END, C_NORM, C_FILE, C_DIR, C_LINK, C_FIFO, C_SOCK, 
  485. +   C_BLK, C_CHR, C_MISSING, C_ORPHAN, C_EXEC };
  486. + 
  487. + char *indicator_name[]=
  488. + {
  489. +   "lc","rc","ec","no","fi","di","ln","pi","so","bd","cd","mi","or",
  490. +   "ex",NULL
  491. + };
  492. + #else
  493. + enum indicator_no
  494. + { C_LEFT, C_RIGHT, C_END, C_NORM, C_FILE, C_DIR, C_LINK, C_FIFO, C_SOCK, 
  495. +   C_BLK, C_CHR, C_MISSING, C_ORPHAN, C_EXEC, C_SYSTEM, C_RDONLY, C_HIDDEN, };
  496. + 
  497. + char *indicator_name[]=
  498. + {
  499. +   "lc","rc","ec","no","fi","di","ln","pi","so","bd","cd","mi","or",
  500. +   "ex","sy","ro","hi",NULL
  501. + };
  502. + #define S_IFRDONLY    01000000
  503. + #define S_IFHIDDEN    02000000
  504. + #define S_IFSYSTEM    04000000
  505. + #define S_ISRDONLY(mode)    (((mode) & S_IFRDONLY) == S_IFRDONLY)
  506. + #define S_ISHIDDEN(mode)    (((mode) & S_IFHIDDEN) == S_IFHIDDEN)
  507. + #define S_ISSYSTEM(mode)    (((mode) & S_IFSYSTEM) == S_IFSYSTEM)
  508. + static __inline void os2_modify_stat( struct stat* buf ) {
  509. +     buf->st_mode |= (buf->st_attr&7)<<18;
  510. +     return;
  511. + }
  512. + #endif
  513. + 
  514. + /* Null is a valid character in a color indicator (think about Epson
  515. +    printers, for example) so we have to use a length/buffer string
  516. +    type. */
  517. + 
  518. + struct bin_str
  519. + {
  520. +   unsigned int len;        /* Number of bytes */
  521. +   char *string;            /* Pointer to the same */
  522. + };
  523. + 
  524. + struct bin_str color_indicator[] =
  525. + {
  526. +   { 2, "\033[" },        /* lc: Left of color sequence */
  527. +   { 1, "m" },            /* rc: Right of color sequence */
  528. +   { 0, NULL },            /* ec: End color (replaces lc+no+rc) */
  529. +   { 1, "0" },            /* no: Normal */
  530. + #ifndef OS2
  531. +   { 1, "0" },            /* fi: File: default */
  532. +   { 2, "32" },            /* di: Directory: green */
  533. +   { 2, "36" },            /* ln: Symlink: cyan */
  534. +   { 2, "31" },            /* pi: Pipe: red */
  535. +   { 2, "33" },            /* so: Socket: yellow/brown */
  536. +   { 5, "44;37" },        /* bd: Block device: white on blue */
  537. +   { 5, "44;37" },        /* cd: Char device: white on blue */
  538. +   { 0, NULL },            /* mi: Missing file: undefined */
  539. +   { 0, NULL },            /* or: Orphanned symlink: undefined */
  540. +   { 2, "35" }            /* ex: Executable: purple */
  541. + #else
  542. +   { 1, "1" },            /* fi: File: default+ */
  543. +   { 4, "32;1" },        /* di: Directory: green+ */
  544. +   { 2, "36" },            /* ln: Symlink: cyan */
  545. +   { 2, "31" },            /* pi: Pipe: red */
  546. +   { 2, "33" },            /* so: Socket: yellow/brown */
  547. +   { 5, "44;37" },        /* bd: Block device: white on blue */
  548. +   { 5, "44;37" },        /* cd: Char device: white on blue */
  549. +   { 0, NULL },            /* mi: Missing file: undefined */
  550. +   { 0, NULL },            /* or: Orphanned symlink: undefined */
  551. +   { 4, "35;1" },        /* ex: Executable: purple+ */
  552. +   { 4, "31;1" },        /* sy: System: red+ */
  553. +   { 4, "33;1" },        /* ro: Read-only: yellow+ */
  554. +   { 7, "44;37;1" },        /* hi: Hidden: white on blue + */
  555. + #endif
  556. + };
  557. + 
  558. + struct col_ext_type
  559. + {
  560. +   struct bin_str ext;        /* The extension we're looking for */
  561. +   struct bin_str seq;        /* The sequence to output when we do */
  562. +   struct col_ext_type *next;    /* Next in list */
  563. + };
  564. + 
  565. + struct col_ext_type *col_ext_list = NULL;
  566. + char *color_buf;        /* Buffer for color sequences */
  567. + 
  568. + /* Nonzero means print using ISO 8859 characters.  The default is specified
  569. +    here as well.  -8 enables, -7 disables.  */
  570. + 
  571. + int print_iso8859;
  572. + #ifndef DEFAULT_ISO8859
  573. + #define DEFAULT_ISO8859  1
  574. + #endif
  575. + 
  576.   /* Nonzero means mention the inode number of each file.  -i  */
  577.   
  578.   static int print_inode;
  579. ***************
  580. *** 407,413 ****
  581.     {"escape", no_argument, 0, 'b'},
  582.     {"directory", no_argument, 0, 'd'},
  583.     {"dired", no_argument, 0, 'D'},
  584. !   {"full-time", no_argument, &full_time, 1},
  585.     {"inode", no_argument, 0, 'i'},
  586.     {"kilobytes", no_argument, 0, 'k'},
  587.     {"numeric-uid-gid", no_argument, 0, 'n'},
  588. --- 536,542 ----
  589.     {"escape", no_argument, 0, 'b'},
  590.     {"directory", no_argument, 0, 'd'},
  591.     {"dired", no_argument, 0, 'D'},
  592. !   {"full-time", no_argument, 0, 'e'},
  593.     {"inode", no_argument, 0, 'i'},
  594.     {"kilobytes", no_argument, 0, 'k'},
  595.     {"numeric-uid-gid", no_argument, 0, 'n'},
  596. ***************
  597. *** 434,439 ****
  598. --- 563,572 ----
  599.   #endif
  600.     {"help", no_argument, &show_help, 1},
  601.     {"version", no_argument, &show_version, 1},
  602. +   {"color", optional_argument, 0, 13},
  603. +   {"colour", optional_argument, 0, 13},
  604. +   {"7bit", no_argument, 0, '7'},
  605. +   {"8bit", no_argument, 0, '8'},
  606.     {0, 0, 0, 0}
  607.   };
  608.   
  609. ***************
  610. *** 512,517 ****
  611. --- 645,662 ----
  612.     time_atime, time_atime, time_atime, time_ctime, time_ctime
  613.   };
  614.   
  615. + static char const* color_args[] = 
  616. + {
  617. +   /* Note: "no" is a prefix of "none" so we don't include it */
  618. +   /* force and none are for compatibility with another color-ls version */ 
  619. +   "yes", "force", "none", "tty", "if-tty"
  620. + };
  621. + 
  622. + static enum color_type const color_types[] =
  623. + {
  624. +   color_yes, color_yes, color_no, color_if_tty, color_if_tty
  625. + };
  626. + 
  627.   
  628.   /* Write to standard output the string PREFIX followed by a space-separated
  629.      list of the integers stored in OS all on one line.  */
  630. ***************
  631. *** 551,567 ****
  632.   
  633.     if (show_version)
  634.       {
  635. !       printf ("%s\n", version_string);
  636.         exit (0);
  637.       }
  638.   
  639.     if (show_help)
  640.       usage (0);
  641.   
  642.     format_needs_stat = sort_type == sort_time || sort_type == sort_size
  643.       || format == long_format
  644.       || trace_links || trace_dirs || indicator_style != none
  645. !     || print_block_size || print_inode;
  646.   
  647.     if (dired && format == long_format)
  648.       {
  649. --- 696,715 ----
  650.   
  651.     if (show_version)
  652.       {
  653. !       printf ("%s with color-ls patch %s\n", version_string, color_ls_version);
  654.         exit (0);
  655.       }
  656.   
  657.     if (show_help)
  658.       usage (0);
  659.   
  660. +   if ( print_with_color )
  661. +     parse_ls_color();
  662. +  
  663.     format_needs_stat = sort_type == sort_time || sort_type == sort_size
  664.       || format == long_format
  665.       || trace_links || trace_dirs || indicator_style != none
  666. !     || print_block_size || print_inode || print_with_color;
  667.   
  668.     if (dired && format == long_format)
  669.       {
  670. ***************
  671. *** 653,658 ****
  672. --- 801,819 ----
  673.       dired_dump_obstack ("//SUBDIRED//", &subdired_obstack);
  674.       }
  675.   
  676. +   if (print_with_color)
  677. +     {
  678. +       struct col_ext_type *ext;
  679. + 
  680. +       free(color_buf);
  681. +       while ( col_ext_list )
  682. +     {
  683. +       ext = col_ext_list;
  684. +       col_ext_list = col_ext_list->next;
  685. +       free(ext);
  686. +     }
  687. +     }
  688. + 
  689.     exit (exit_status);
  690.   }
  691.   
  692. ***************
  693. *** 673,678 ****
  694. --- 834,893 ----
  695.   
  696.     /* initialize all switches to default settings */
  697.   
  698. +   /* program_name is advertised as being the program name without
  699. +      any leading path, but that doesn't seem to be the case.  Get the
  700. +      first character of the actual program name. */
  701. + 
  702. + #if defined(STDC_HEADERS) || defined(HAVE_STRING_H)
  703. +   p = strrchr(program_name,'/');
  704. + #else
  705. +   {
  706. +     /* Lame version of strrchr() for lame systems */
  707. +     
  708. +     register char *q;
  709. + 
  710. +     p = NULL;
  711. +     for ( q = program_name ; *q ; q++ )
  712. +       {
  713. +     if ( *q == '/' )
  714. +       p = q;
  715. +       }
  716. +   }
  717. + #endif
  718. + 
  719. + #ifndef NO_NAME_DEPENDENCE
  720. +   if ( p )
  721. +     p++;            /* Get character after last / */
  722. +   else
  723. +     p = program_name;        /* Get first character */
  724. + 
  725. +   switch(*p)
  726. +     {
  727. +     case 'D':
  728. +     case 'd':
  729. +       /* This is for the 'dir' program. */
  730. +       ls_mode = LS_MULTI_COL;
  731. +       break;
  732. + 
  733. +     case 'V':
  734. +     case 'v':
  735. +       /* This is for the 'vdir' program. */
  736. +       ls_mode = LS_LONG_FORMAT;
  737. +       break;
  738. + 
  739. +     case 'L':
  740. +     case 'l':
  741. +       /* This is for the `ls' program. */
  742. +       ls_mode = LS_LS;
  743. +       break;
  744. +       
  745. +     default:
  746. +       /* Use default, depending on whenether linked with ls-ls.o,
  747. +      ls-dir.o or ls-vdir.o */
  748. +       break;
  749. +     }
  750. + #endif
  751. + 
  752.     switch (ls_mode)
  753.       {
  754.       case LS_MULTI_COL:
  755. ***************
  756. *** 721,726 ****
  757. --- 936,943 ----
  758.     really_all_files = 0;
  759.     ignore_patterns = 0;
  760.     quote_as_string = 0;
  761. +   print_with_color = 0;
  762. +   print_iso8859 = DEFAULT_ISO8859;  
  763.   
  764.     p = getenv ("COLUMNS");
  765.     line_length = p ? atoi (p) : 80;
  766. ***************
  767. *** 737,743 ****
  768.     p = getenv ("TABSIZE");
  769.     tabsize = p ? atoi (p) : 8;
  770.   
  771. !   while ((c = getopt_long (argc, argv, "abcdfgiklmnpqrstuw:xABCDFGI:LNQRST:UX1?h",
  772.                  long_options, (int *) 0)) != EOF)
  773.       {
  774.         switch (c)
  775. --- 954,961 ----
  776.     p = getenv ("TABSIZE");
  777.     tabsize = p ? atoi (p) : 8;
  778.   
  779. !   if ( tabsize == 0 )  tabsize = line_length;
  780. !   while ((c = getopt_long (argc, argv, "abcdefgiklmnopqrstuw:xABCDFGI:LNQRST:UX178?h",
  781.                  long_options, (int *) 0)) != EOF)
  782.       {
  783.         switch (c)
  784. ***************
  785. *** 763,770 ****
  786.         immediate_dirs = 1;
  787.         break;
  788.   
  789.       case 'f':
  790. !       /* Same as enabling -a -U and disabling -l -s.  */
  791.         all_files = 1;
  792.         really_all_files = 1;
  793.         sort_type = sort_none;
  794. --- 981,992 ----
  795.         immediate_dirs = 1;
  796.         break;
  797.   
  798. +     case 'e':
  799. +       full_time = 1;
  800. +       break;
  801. + 
  802.       case 'f':
  803. !       /* Same as enabling -a -U and disabling -l -s -o.  */
  804.         all_files = 1;
  805.         really_all_files = 1;
  806.         sort_type = sort_none;
  807. ***************
  808. *** 772,777 ****
  809. --- 994,1000 ----
  810.         if (format == long_format)
  811.           format = (isatty (1) ? many_per_line : one_per_line);
  812.         print_block_size = 0;  /* disable -s */
  813. +       print_with_color = 0;  /* disable -o */
  814.         break;
  815.   
  816.       case 'g':
  817. ***************
  818. *** 798,803 ****
  819. --- 1021,1034 ----
  820.         numeric_users = 1;
  821.         break;
  822.   
  823. +     case 'o':
  824. +       print_with_color = !print_with_color;
  825. +       
  826. +       if ( print_with_color )
  827. +         tabsize = line_length; /* Some systems don't like tabs and
  828. +                       color codes in combination */
  829. +       break;
  830. + 
  831.       case 'p':
  832.         indicator_style = not_programs;
  833.         break;
  834. ***************
  835. *** 887,894 ****
  836.   
  837.       case 'T':
  838.         tabsize = atoi (optarg);
  839. !       if (tabsize < 1)
  840.           error (1, 0, "invalid tab size: %s", optarg);
  841.         break;
  842.   
  843.       case 'U':
  844. --- 1118,1127 ----
  845.   
  846.       case 'T':
  847.         tabsize = atoi (optarg);
  848. !       if (tabsize < 0)
  849.           error (1, 0, "invalid tab size: %s", optarg);
  850. +       else if (tabsize == 0)
  851. +         tabsize = line_length;
  852.         break;
  853.   
  854.       case 'U':
  855. ***************
  856. *** 903,909 ****
  857.         format = one_per_line;
  858.         break;
  859.   
  860. !     case 10:        /* +sort */
  861.         i = argmatch (optarg, sort_args);
  862.         if (i < 0)
  863.           {
  864. --- 1136,1150 ----
  865.         format = one_per_line;
  866.         break;
  867.   
  868. !     case '7':
  869. !       print_iso8859 = 0;
  870. !       break;
  871. ! 
  872. !     case '8':
  873. !       print_iso8859 = 1;
  874. !       break;
  875. ! 
  876. !     case 10:        /* --sort */
  877.         i = argmatch (optarg, sort_args);
  878.         if (i < 0)
  879.           {
  880. ***************
  881. *** 913,919 ****
  882.         sort_type = sort_types[i];
  883.         break;
  884.   
  885. !     case 11:        /* +time */
  886.         i = argmatch (optarg, time_args);
  887.         if (i < 0)
  888.           {
  889. --- 1154,1160 ----
  890.         sort_type = sort_types[i];
  891.         break;
  892.   
  893. !     case 11:        /* --time */
  894.         i = argmatch (optarg, time_args);
  895.         if (i < 0)
  896.           {
  897. ***************
  898. *** 923,929 ****
  899.         time_type = time_types[i];
  900.         break;
  901.   
  902. !     case 12:        /* +format */
  903.         i = argmatch (optarg, format_args);
  904.         if (i < 0)
  905.           {
  906. --- 1164,1170 ----
  907.         time_type = time_types[i];
  908.         break;
  909.   
  910. !     case 12:        /* --format */
  911.         i = argmatch (optarg, format_args);
  912.         if (i < 0)
  913.           {
  914. ***************
  915. *** 933,938 ****
  916. --- 1174,1203 ----
  917.         format = formats[i];
  918.         break;
  919.   
  920. +     case 13:                /* --color */ 
  921. +       if (optarg)
  922. +         {
  923. +           i = argmatch(optarg, color_args);
  924. +           if (i < 0)
  925. +         {
  926. +           invalid_arg("colorization criterion", optarg, i);
  927. +           usage(1);
  928. +         }
  929. +           i = color_types[i];
  930. +         }
  931. +       else
  932. +         i = color_yes;    /* Only --color -> --color=yes */
  933. + 
  934. +       if ( i == color_if_tty )
  935. +         print_with_color = isatty(1) ? 1 : 0;
  936. +       else
  937. +         print_with_color = i;
  938. + 
  939. +       if ( print_with_color )
  940. +         tabsize = line_length; /* Some systems don't like tabs and
  941. +                       color codes in combination */
  942. +       break;
  943. +         
  944.       default:
  945.         usage (0);
  946.       }
  947. ***************
  948. *** 941,946 ****
  949. --- 1206,1537 ----
  950.     return optind;
  951.   }
  952.   
  953. + /* Parse the LS_COLORS/LS_COLOURS variable */
  954. + 
  955. + static void
  956. + parse_ls_color ()
  957. + {
  958. +   char *p;            /* Pointer to character being parsed */
  959. +   char *whichvar;        /* LS_COLORS or LS_COLOURS? */
  960. +   char *buf;            /* color_buf buffer pointer */
  961. +   int state;            /* State of parser */
  962. +   int ind_no;            /* Indicator number */
  963. +   char label[3] = "??";        /* Indicator label */
  964. +   struct col_ext_type *ext;    /* Extension we are working on */
  965. +   struct col_ext_type *ext2;    /* Extra pointer */
  966. + 
  967. +   if ( (p = getenv(whichvar = "LS_COLORS")) ||
  968. +        (p = getenv(whichvar = "LS_COLOURS")) )
  969. +     {
  970. +       buf = color_buf = xmalloc(strlen(p));
  971. +       /* This is an overly conservative estimate, but any possible
  972. +          LS_COLORS string will *not* generate a color_buf longer than
  973. +      itself, so it is a safe way of allocating a buffer in
  974. +      advance. */
  975. +       
  976. +       state = 1;
  977. +       while ( state > 0 )
  978. +     {
  979. +       switch(state)
  980. +         {
  981. +         case 1:        /* First label character */
  982. +           switch ( *p )
  983. +         {
  984. +         case ':':
  985. +           p++;
  986. +           break;
  987. +           
  988. +         case '*':
  989. +           /* Allocate new extension block and add to head
  990. +              of linked list (this way a later definition will
  991. +              override an earlier one, which can be useful for
  992. +              having terminal-specific defs override global) */
  993. +           
  994. +           ext = (struct col_ext_type *)
  995. +             xmalloc(sizeof(struct col_ext_type));
  996. +           ext->next = col_ext_list;
  997. +           col_ext_list = ext;
  998. + 
  999. +           p++;
  1000. +           ext->ext.string = buf;
  1001. +           
  1002. +           state = (ext->ext.len =
  1003. +                get_funky_string(&buf,&p,1)) < 0 ? -1 : 4;
  1004. +           break;
  1005. +           
  1006. +         case '\0':
  1007. +           state = 0;    /* Done! */
  1008. +           break;
  1009. +           
  1010. +         default:    /* Assume it is file type label */
  1011. +           label[0] = *(p++);
  1012. +           state = 2;
  1013. +           break;
  1014. +         }
  1015. +           break;
  1016. +           
  1017. +         case 2:        /* Second label character */
  1018. +           if ( *p )
  1019. +         {
  1020. +           label[1] = *(p++);
  1021. +           state = 3;
  1022. +         }
  1023. +           else
  1024. +         state = -1;    /* Error */
  1025. +           break;
  1026. + 
  1027. +         case 3:        /* Equal sign after indicator label */
  1028. +           state = -1;    /* Assume failure... */
  1029. +           if ( *(p++) == '=' )    /* It *should* be... */
  1030. +         {
  1031. +           for ( ind_no = 0 ; indicator_name[ind_no] != NULL ;
  1032. +                ind_no++ )
  1033. +             {
  1034. +               if ( strcmp(label,indicator_name[ind_no]) == 0 )
  1035. +             {
  1036. +               color_indicator[ind_no].string = buf;
  1037. +               state = (color_indicator[ind_no].len =
  1038. +                    get_funky_string(&buf,&p,0)) < 0 ?
  1039. +                      -1 : 1;
  1040. +               break;
  1041. +             }
  1042. +             }
  1043. +           if ( state == -1 )
  1044. +             fprintf(stderr, "Unknown prefix: %s\n", label);
  1045. +         }
  1046. +           break;
  1047. + 
  1048. +         case 4:        /* Equal sign after *.ext */
  1049. +           if ( *(p++) == '=' )
  1050. +         {
  1051. +           ext->seq.string = buf;
  1052. +           state = (ext->seq.len =
  1053. +                get_funky_string(&buf,&p,0)) < 0 ?
  1054. +                  -1 : 1;
  1055. +         }
  1056. +           else
  1057. +         state = -1;
  1058. +           break;
  1059. +         }
  1060. +     }
  1061. + 
  1062. +       if ( state < 0 )
  1063. +     {
  1064. +       fprintf(stderr, "Bad %s variable\n", whichvar);
  1065. +       free(color_buf);
  1066. +       for ( ext = col_ext_list ; ext != NULL ; )
  1067. +         {
  1068. +           ext2 = ext;
  1069. +           ext = ext->next;
  1070. +           free (ext2);
  1071. +         }
  1072. +       print_with_color = 0;
  1073. +     }
  1074. +     }
  1075. + }
  1076. + 
  1077. + /* Parse a string as part of the LS_COLO(U)RS variable; this may involve
  1078. +    decoding all kinds of escape characters.  If equals_end is set an
  1079. +    unescaped equal sign ends the string, otherwise only a : or \0
  1080. +    does.  Returns the number of characters output, or -1 on failure.
  1081. + 
  1082. +    The resulting string is *not* null-terminated, but may contain
  1083. +    embedded nulls.
  1084. + 
  1085. +    Note that both dest and src are char **; on return they point to
  1086. +    the first free byte after the array and the character that ended
  1087. +    the input string, respectively. */
  1088. + 
  1089. + int
  1090. + get_funky_string (dest, src, equals_end)
  1091. +      char **dest;
  1092. +      char **src;
  1093. +      int equals_end;
  1094. + {
  1095. +   int num;            /* For numerical codes */
  1096. +   int count;            /* Something to count with */
  1097. +   enum { st_gnd, st_backslash, st_octal, st_hex, st_caret,
  1098. +      st_end, st_error } state;
  1099. +   char *p, *q;
  1100. + 
  1101. +   p = *src;  q = *dest;        /* We don't want to double-indirect
  1102. +                    the whole darn time */
  1103. +   
  1104. +   count = 0;            /* No characters counted in yet */
  1105. + 
  1106. +   state = st_gnd;        /* Start in ground state */
  1107. +   while ( state < st_end )
  1108. +     {
  1109. +       switch ( state )
  1110. +     {
  1111. +     case st_gnd:        /* Ground state (no escapes) */
  1112. +       switch ( *p )
  1113. +         {
  1114. +         case ':':
  1115. +         case '\0':
  1116. +           state = st_end;    /* End of string */
  1117. +           break;
  1118. +         case '\\':
  1119. +           state = st_backslash; /* Backslash scape sequence */
  1120. +           p++;
  1121. +           break;
  1122. +         case '^':
  1123. +           state = st_caret;    /* Caret escape */
  1124. +           p++;
  1125. +           break;
  1126. +         case '=':
  1127. +           if ( equals_end )
  1128. +         {
  1129. +           state = st_end; /* End */
  1130. +           break;
  1131. +         }
  1132. +           /* else fall through */
  1133. +         default:
  1134. +           *(q++) = *(p++);
  1135. +           count++;
  1136. +           break;
  1137. +         }
  1138. +       break;
  1139. + 
  1140. +     case st_backslash:    /* Backslash escaped character */
  1141. +       switch ( *p )
  1142. +         {
  1143. +         case '0':
  1144. +         case '1':
  1145. +         case '2':
  1146. +         case '3':
  1147. +         case '4':
  1148. +         case '5':
  1149. +         case '6':
  1150. +         case '7':
  1151. +           state = st_octal;    /* Octal sequence */
  1152. +           num = *p - '0';
  1153. +           break;
  1154. +         case 'x':
  1155. +         case 'X':
  1156. +           state = st_hex;    /* Hex sequence */
  1157. +           num = 0;
  1158. +           break;
  1159. +         case 'a':        /* Bell */
  1160. +           num = 7;        /* Not all C compilers know what \a means */
  1161. +           break;
  1162. +         case 'b':        /* Backspace */
  1163. +           num = '\b';
  1164. +           break;
  1165. +         case 'e':        /* Escape */
  1166. +           num = 27;
  1167. +           break;
  1168. +         case 'f':        /* Form feed */
  1169. +           num = '\f';
  1170. +           break;
  1171. +         case 'n':        /* Newline */
  1172. +           num = '\n';
  1173. +           break;
  1174. +         case 'r':        /* Carriage return */
  1175. +           num = '\r';
  1176. +           break;
  1177. +         case 't':        /* Tab */
  1178. +           num = '\t';
  1179. +           break;
  1180. +         case 'v':        /* Vtab */
  1181. +           num = '\v';
  1182. +           break;
  1183. +         case '?':        /* Delete */
  1184. +           num = 127;
  1185. +           break;
  1186. +         case '_':        /* Space */
  1187. +           num = ' ';
  1188. +           break;
  1189. +         case '\0':        /* End of string */
  1190. +           state = st_error;    /* Error! */
  1191. +           break;
  1192. +         default:        /* Escaped character like \ ^ : = */
  1193. +           num = *p;
  1194. +           break;
  1195. +         }
  1196. +       if ( state == st_backslash )
  1197. +         {
  1198. +           *(q++) = num;
  1199. +           count++;
  1200. +           state = st_gnd;
  1201. +         }
  1202. +       p++;
  1203. +       break;
  1204. + 
  1205. +     case st_octal:        /* Octal sequence */
  1206. +       if ( *p < '0' || *p > '7' )
  1207. +         {
  1208. +           *(q++) = num;
  1209. +           count++;
  1210. +           state = st_gnd;
  1211. +         }
  1212. +       else
  1213. +           num = ( num << 3 ) + ( *(p++) - '0' );
  1214. +       break;
  1215. + 
  1216. +     case st_hex:        /* Hex sequence */
  1217. +       switch ( *p )
  1218. +         {
  1219. +         case '0':
  1220. +         case '1':
  1221. +         case '2':
  1222. +         case '3':
  1223. +         case '4':
  1224. +         case '5':
  1225. +         case '6':
  1226. +         case '7':
  1227. +         case '8':
  1228. +         case '9':
  1229. +           num = ( num << 4 ) + ( *(p++) - '0' );
  1230. +           break;
  1231. +         case 'a':
  1232. +         case 'b':
  1233. +         case 'c':
  1234. +         case 'd':
  1235. +         case 'e':
  1236. +         case 'f':
  1237. +           num = ( num << 4 ) + ( *(p++) - 'a' ) + 10;
  1238. +           break;
  1239. +         case 'A':
  1240. +         case 'B':
  1241. +         case 'C':
  1242. +         case 'D':
  1243. +         case 'E':
  1244. +         case 'F':
  1245. +           num = ( num << 4 ) + ( *(p++) - 'A' ) + 10;
  1246. +           break;
  1247. +         default:
  1248. +           *(q++) = num;
  1249. +           count++;
  1250. +           state = st_gnd;
  1251. +           break;
  1252. +         }
  1253. +       break;
  1254. + 
  1255. +     case st_caret:        /* Caret escape */
  1256. +       state = st_gnd;    /* Should be the next state... */
  1257. +       if ( *p >= '@' && *p <= '~' )
  1258. +         {
  1259. +           *(q++) = *(p++) & 037;
  1260. +           count++;
  1261. +         }
  1262. +       else if ( *p == '?' )
  1263. +         {
  1264. +           *(q++) = 127;
  1265. +           count++;
  1266. +         }
  1267. +       else
  1268. +         state = st_error;
  1269. +       break;
  1270. +     }
  1271. +     }
  1272. + 
  1273. +   *dest = q;  *src = p;
  1274. + 
  1275. +   return ( state == st_error ) ? -1 : count;
  1276. + }
  1277. + 
  1278. + 
  1279.   /* Request that the directory named `name' have its contents listed later.
  1280.      If `realname' is nonzero, it will be used instead of `name' when the
  1281.      directory name is printed.  This allows symbolic links to directories
  1282. ***************
  1283. *** 1166,1172 ****
  1284.   
  1285.   #ifdef S_ISLNK
  1286.         if (S_ISLNK (files[files_index].stat.st_mode)
  1287. !       && (explicit_arg || format == long_format))
  1288.       {
  1289.         char *linkpath;
  1290.         struct stat linkstats;
  1291. --- 1757,1763 ----
  1292.   
  1293.   #ifdef S_ISLNK
  1294.         if (S_ISLNK (files[files_index].stat.st_mode)
  1295. !       && (explicit_arg || format == long_format || print_with_color))
  1296.       {
  1297.         char *linkpath;
  1298.         struct stat linkstats;
  1299. ***************
  1300. *** 1178,1185 ****
  1301.            they won't be traced and when no indicator is needed. */
  1302.         if (linkpath
  1303.             && ((explicit_arg && format != long_format)
  1304. !            || indicator_style != none)
  1305. !           && SAFE_STAT (linkpath, &linkstats) == 0)
  1306.           {
  1307.             /* Symbolic links to directories that are mentioned on the
  1308.            command line are automatically traced if not being
  1309. --- 1769,1777 ----
  1310.            they won't be traced and when no indicator is needed. */
  1311.         if (linkpath
  1312.             && ((explicit_arg && format != long_format)
  1313. !            || indicator_style != none || print_with_color)
  1314. !           && ( files[files_index].linkok =
  1315. !           (SAFE_STAT (linkpath, &linkstats) == 0) ) )
  1316.           {
  1317.             /* Symbolic links to directories that are mentioned on the
  1318.            command line are automatically traced if not being
  1319. ***************
  1320. *** 1207,1213 ****
  1321.           free (linkpath);
  1322.       }
  1323.   #endif
  1324. ! 
  1325.   #ifdef S_ISLNK
  1326.         if (S_ISLNK (files[files_index].stat.st_mode))
  1327.       files[files_index].filetype = symbolic_link;
  1328. --- 1799,1805 ----
  1329.           free (linkpath);
  1330.       }
  1331.   #endif
  1332. !       
  1333.   #ifdef S_ISLNK
  1334.         if (S_ISLNK (files[files_index].stat.st_mode))
  1335.       files[files_index].filetype = symbolic_link;
  1336. ***************
  1337. *** 1690,1696 ****
  1338.     DIRED_INDENT ();
  1339.     FPUTS (bigbuf, stdout, p - bigbuf);
  1340.     PUSH_CURRENT_DIRED_POS (&dired_obstack);
  1341. !   print_name_with_quoting (f->name);
  1342.     PUSH_CURRENT_DIRED_POS (&dired_obstack);
  1343.   
  1344.     if (f->filetype == symbolic_link)
  1345. --- 2282,2291 ----
  1346.     DIRED_INDENT ();
  1347.     FPUTS (bigbuf, stdout, p - bigbuf);
  1348.     PUSH_CURRENT_DIRED_POS (&dired_obstack);
  1349. ! #ifdef OS2
  1350. !   os2_modify_stat( &f->stat );
  1351. ! #endif
  1352. !   print_fancy_name (f->name, f->stat.st_mode, f->linkok);
  1353.     PUSH_CURRENT_DIRED_POS (&dired_obstack);
  1354.   
  1355.     if (f->filetype == symbolic_link)
  1356. ***************
  1357. *** 1698,1704 ****
  1358.         if (f->linkname)
  1359.       {
  1360.         FPUTS_LITERAL (" -> ", stdout);
  1361. !       print_name_with_quoting (f->linkname);
  1362.         if (indicator_style != none)
  1363.           print_type_indicator (f->linkmode);
  1364.       }
  1365. --- 2293,2299 ----
  1366.         if (f->linkname)
  1367.       {
  1368.         FPUTS_LITERAL (" -> ", stdout);
  1369. !       print_fancy_name (f->linkname, f->linkmode, f->linkok-1);
  1370.         if (indicator_style != none)
  1371.           print_type_indicator (f->linkmode);
  1372.       }
  1373. ***************
  1374. *** 1717,1723 ****
  1375.        register const char *p;
  1376.        size_t *quoted_length;
  1377.   {
  1378. !   register unsigned char c;
  1379.     const char *p0 = p;
  1380.     char *quoted, *q;
  1381.     int found_quotable;
  1382. --- 2312,2318 ----
  1383.        register const char *p;
  1384.        size_t *quoted_length;
  1385.   {
  1386. !   register unsigned char c;    /* Unsigned for ISO 8859 test */
  1387.     const char *p0 = p;
  1388.     char *quoted, *q;
  1389.     int found_quotable;
  1390. ***************
  1391. *** 1887,1899 ****
  1392.           (unsigned) convert_blocks (ST_NBLOCKS (f->stat),
  1393.                          kilobyte_blocks));
  1394.   
  1395. !   print_name_with_quoting (f->name);
  1396.   
  1397.     if (indicator_style != none)
  1398.       print_type_indicator (f->stat.st_mode);
  1399.   }
  1400.   
  1401.   static void
  1402.   print_type_indicator (mode)
  1403.        unsigned int mode;
  1404.   {
  1405. --- 2482,2522 ----
  1406.           (unsigned) convert_blocks (ST_NBLOCKS (f->stat),
  1407.                          kilobyte_blocks));
  1408.   
  1409. ! #ifdef OS2
  1410. !   os2_modify_stat( &f->stat );
  1411. ! #endif
  1412. !   print_fancy_name (f->name, f->stat.st_mode, f->linkok);
  1413.   
  1414.     if (indicator_style != none)
  1415.       print_type_indicator (f->stat.st_mode);
  1416.   }
  1417.   
  1418.   static void
  1419. + print_fancy_name (name, mode, linkok)
  1420. +      char *name;
  1421. +      unsigned int mode;
  1422. +      int linkok;
  1423. + {
  1424. +   if (print_with_color)
  1425. +     {
  1426. +       print_color_indicator(name, mode, linkok);
  1427. +       print_name_with_quoting(name);
  1428. +       if ( color_indicator[C_END].string )
  1429. +     {
  1430. +       put_indicator(&color_indicator[C_END]);
  1431. +     }
  1432. +       else
  1433. +     {
  1434. +       put_indicator(&color_indicator[C_LEFT]);
  1435. +       put_indicator(&color_indicator[C_NORM]);
  1436. +       put_indicator(&color_indicator[C_RIGHT]);
  1437. +     }
  1438. +     }
  1439. +   else
  1440. +     print_name_with_quoting(name);
  1441. + }
  1442. + 
  1443. + static void
  1444.   print_type_indicator (mode)
  1445.        unsigned int mode;
  1446.   {
  1447. ***************
  1448. *** 1920,1931 ****
  1449.       PUTCHAR ('*');
  1450.   }
  1451.   
  1452.   static int
  1453.   length_of_file_name_and_frills (f)
  1454.        struct fileinfo *f;
  1455.   {
  1456.     register char *p = f->name;
  1457. !   register char c;
  1458.     register int len = 0;
  1459.   
  1460.     if (print_inode)
  1461. --- 2543,2660 ----
  1462.       PUTCHAR ('*');
  1463.   }
  1464.   
  1465. + static void
  1466. + print_color_indicator (name, mode, linkok)
  1467. +      char *name;
  1468. +      unsigned int mode;
  1469. +      int linkok;
  1470. + {
  1471. +   int i;
  1472. +   int shi;            /* Bits to shift mode */
  1473. +   int type = C_FILE;
  1474. +   struct col_ext_type *ext;    /* Color extension */
  1475. +   int len;            /* Length of name */
  1476. + 
  1477. +   /* Is this a nonexistent file?  If so, linkok == -1 */
  1478. + 
  1479. +   if ( linkok == -1 && color_indicator[C_MISSING].string )
  1480. +     {
  1481. +       ext = NULL;
  1482. +       type = C_MISSING;
  1483. +     }
  1484. +   else
  1485. +     {
  1486. +       /* Test if is is a recognized extension */
  1487. + 
  1488. +       len = strlen(name);
  1489. +       name += len;            /* Pointer to final \0 */
  1490. +       for ( ext = col_ext_list ; ext != NULL ; ext = ext->next )
  1491. +     {
  1492. +       if ( ext->ext.len <= len &&
  1493. + #ifdef OS2
  1494. +           strnicmp(name-ext->ext.len,ext->ext.string,ext->ext.len)  == 0 )
  1495. + #else
  1496. +           strncmp(name-ext->ext.len,ext->ext.string,ext->ext.len)  == 0 )
  1497. + #endif
  1498. +         break;
  1499. +     }
  1500. +       
  1501. +       if ( !ext )
  1502. +     {
  1503. +       if (S_ISDIR (mode))
  1504. +         type = C_DIR;
  1505. +       
  1506. + #ifdef S_ISSYSTEM
  1507. +       else if (S_ISSYSTEM (mode))
  1508. +         type = C_SYSTEM;
  1509. + #endif
  1510. + 
  1511. + #ifdef S_ISHIDDEN
  1512. +       else if (S_ISHIDDEN (mode))
  1513. +         type = C_HIDDEN;
  1514. + #endif
  1515. + 
  1516. + #ifdef S_ISRDONLY
  1517. +       else if (S_ISRDONLY (mode))
  1518. +         type = C_RDONLY;
  1519. + #endif
  1520. + 
  1521. + #ifdef S_ISLNK
  1522. +       else if (S_ISLNK (mode))
  1523. +         type = (!linkok && color_indicator[C_ORPHAN].string) ?
  1524. +           C_ORPHAN : C_LINK;
  1525. + #endif
  1526. +       
  1527. + #ifdef S_ISFIFO
  1528. +       else if (S_ISFIFO (mode))
  1529. +         type = C_FIFO;
  1530. + #endif
  1531. +       
  1532. + #ifdef S_ISSOCK
  1533. +       else if (S_ISSOCK (mode))
  1534. +         type = C_SOCK;
  1535. + #endif
  1536. +       
  1537. + #ifdef S_ISBLK
  1538. +       else if (S_ISBLK (mode))
  1539. +         type = C_BLK;
  1540. + #endif
  1541. +       
  1542. + #ifdef S_ISCHR
  1543. +       else if (S_ISCHR (mode))
  1544. +         type = C_CHR;
  1545. + #endif
  1546. + 
  1547. +     if ( type == C_FILE && (mode & (S_IEXEC|S_IEXEC>>3|S_IEXEC>>6)) )
  1548. +     type = C_EXEC;
  1549. +     }
  1550. +     }
  1551. + 
  1552. +   put_indicator(&color_indicator[C_LEFT]);
  1553. +   put_indicator(ext ? &(ext->seq) : &color_indicator[type]);
  1554. +   put_indicator(&color_indicator[C_RIGHT]);
  1555. + }
  1556. + 
  1557. + /* Output a color indicator (which may contain nulls) */
  1558. + static void
  1559. + put_indicator(ind)
  1560. +      struct bin_str *ind;
  1561. + {
  1562. +   register int i;
  1563. +   register char *p;
  1564. + 
  1565. +   p = ind->string;
  1566. + 
  1567. +   for ( i = ind->len ; i ; i-- )
  1568. +     putchar(*(p++));
  1569. + }
  1570. + 
  1571.   static int
  1572.   length_of_file_name_and_frills (f)
  1573.        struct fileinfo *f;
  1574.   {
  1575.     register char *p = f->name;
  1576. !   register unsigned char c;    /* Unsigned for ISO 8859 test */
  1577.     register int len = 0;
  1578.   
  1579.     if (print_inode)
  1580. ***************
  1581. *** 1961,1967 ****
  1582.             break;
  1583.   
  1584.           default:
  1585. !           if (c >= 040 && c < 0177)
  1586.           len += 1;
  1587.             else
  1588.           len += 4;
  1589. --- 2690,2697 ----
  1590.             break;
  1591.   
  1592.           default:
  1593. !           if ( (c >= 0x20 && c <= 0x7E) ||
  1594. !            (print_iso8859 && c >= 0xA1 && c <= 0xFF) )
  1595.           len += 1;
  1596.             else
  1597.           len += 4;
  1598. ***************
  1599. *** 2209,2219 ****
  1600.     -c                         sort by change time; with -l: show ctime\n\
  1601.     -D, --dired                generate output well suited to Emacs' dired mode\n\
  1602.     -d, --directory            list directory entries instead of contents\n\
  1603.     -F, --classify             append a character for typing each entry\n\
  1604. !   -f                         do not sort, enable -aU, disable -lst\n\
  1605.         --format=WORD          across -x, commas -m, horizontal -x, long -l,\n\
  1606. !                                single-column -1, verbose -l, vertical -C\n\
  1607. !       --full-time            list both full date and full time\n");
  1608.   
  1609.         printf ("\
  1610.     -G, --no-group             inhibit display of group information\n\
  1611. --- 2939,2949 ----
  1612.     -c                         sort by change time; with -l: show ctime\n\
  1613.     -D, --dired                generate output well suited to Emacs' dired mode\n\
  1614.     -d, --directory            list directory entries instead of contents\n\
  1615. +   -e, --full-time            list both date and full time\n\
  1616.     -F, --classify             append a character for typing each entry\n\
  1617. !   -f                         do not sort, enable -aU, disable -lsto\n\
  1618.         --format=WORD          across -x, commas -m, horizontal -x, long -l,\n\
  1619. !                                single-column -1, verbose -l, vertical -C\n");
  1620.   
  1621.         printf ("\
  1622.     -G, --no-group             inhibit display of group information\n\
  1623. ***************
  1624. *** 2226,2231 ****
  1625. --- 2956,2963 ----
  1626.     -m                         fill width with a comma separated list of entries\n\
  1627.     -N, --literal              do not quote entry names\n\
  1628.     -n, --numeric-uid-gid      list numeric UIDs and GIDs instead of names\n\
  1629. +   -o, --color, --colour      colorize entries according to type\n\
  1630. +       --colo(u)r=WORD        yes -o, no, tty (if output is a terminal)\n\
  1631.     -p                         append a character for typing each entry\n\
  1632.     -Q, --quote-name           enclose entry names in double quotes\n\
  1633.     -q, --hide-control-chars   print ? instead of non graphic characters\n\
  1634.