home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 22 gnu / 22-gnu.zip / less2912.zip / patches.os2 < prev    next >
Text File  |  1995-11-09  |  49KB  |  1,925 lines
  1. Only in new: zfiles.c
  2. diff -cbr orig/ch.c new/ch.c
  3. *** orig/ch.c    Thu Nov 09 10:35:26 1995
  4. --- new/ch.c    Mon Apr 10 10:05:52 1995
  5. ***************
  6. *** 707,713 ****
  7.            * But don't really close it if it was opened via popen(),
  8.            * because pclose() wants to close it.
  9.            */
  10. !         if (!(ch_flags & CH_POPENED))
  11.               close(ch_file);
  12.           ch_file = -1;
  13.       } else
  14. --- 707,715 ----
  15.            * But don't really close it if it was opened via popen(),
  16.            * because pclose() wants to close it.
  17.            */
  18. !             if (ch_flags & CH_COMPRESSED)
  19. !               Zclose(ch_file);
  20. !         else if (!(ch_flags & CH_POPENED))
  21.               close(ch_file);
  22.           ch_file = -1;
  23.       } else
  24. diff -cbr orig/charset.c new/charset.c
  25. *** orig/charset.c    Wed Feb 01 01:55:28 1995
  26. --- new/charset.c    Thu Nov 09 10:36:38 1995
  27. ***************
  28. *** 211,229 ****
  29.   {
  30.       register char *s;
  31.   
  32. !     s = getenv("LESSBINFMT");
  33.       setbinfmt(s);
  34.       
  35.       /*
  36.        * See if environment variable LESSCHARSET is defined.
  37.        */
  38. !     s = getenv("LESSCHARSET");
  39.       if (icharset(s))
  40.           return;
  41.       /*
  42.        * LESSCHARSET is not defined: try LESSCHARDEF.
  43.        */
  44. !     s = getenv("LESSCHARDEF");
  45.       if (s != NULL && *s != '\0')
  46.       {
  47.           ichardef(s);
  48. --- 211,229 ----
  49.   {
  50.       register char *s;
  51.   
  52. !     s = lgetenv("LESSBINFMT");
  53.       setbinfmt(s);
  54.       
  55.       /*
  56.        * See if environment variable LESSCHARSET is defined.
  57.        */
  58. !     s = lgetenv("LESSCHARSET");
  59.       if (icharset(s))
  60.           return;
  61.       /*
  62.        * LESSCHARSET is not defined: try LESSCHARDEF.
  63.        */
  64. !     s = lgetenv("LESSCHARDEF");
  65.       if (s != NULL && *s != '\0')
  66.       {
  67.           ichardef(s);
  68. diff -cbr orig/cmd.h new/cmd.h
  69. *** orig/cmd.h    Wed Feb 01 01:55:28 1995
  70. --- new/cmd.h    Thu Nov 09 10:36:38 1995
  71. ***************
  72. *** 115,117 ****
  73. --- 115,119 ----
  74.   #define    EC_NOHISTORY    02
  75.   #define    EC_NOCOMPLETE    04
  76.   
  77. + /* Environment variable stuff */
  78. + #define    EV_OK        01
  79. diff -cbr orig/decode.c new/decode.c
  80. *** orig/decode.c    Thu Mar 09 00:04:14 1995
  81. --- new/decode.c    Thu Nov 09 10:36:40 1995
  82. ***************
  83. *** 195,200 ****
  84. --- 195,201 ----
  85.    */
  86.   static struct tablelist *list_fcmd_tables = NULL;
  87.   static struct tablelist *list_ecmd_tables = NULL;
  88. + static struct tablelist *list_var_tables = NULL;
  89.   
  90.   
  91.   /*
  92. ***************
  93. *** 208,214 ****
  94.        */
  95.       add_fcmd_table((char*)cmdtable, sizeof(cmdtable));
  96.       add_ecmd_table((char*)edittable, sizeof(edittable));
  97. -     get_editkeys();
  98.   #if USERFILE
  99.       /*
  100.        * Try to add the tables in the standard lesskey file "$HOME/.less".
  101. --- 209,214 ----
  102. ***************
  103. *** 271,276 ****
  104. --- 271,318 ----
  105.   }
  106.   
  107.   /*
  108. +  * Insert a command table in the proper place - after default, but before
  109. +  * any .less file table.
  110. +  */
  111. +     public void
  112. + insert_fcmd_table(buf, len)
  113. +     char *buf;
  114. +     int len;
  115. + {
  116. +         if (list_fcmd_tables == NULL || list_fcmd_tables->t_next == NULL)
  117. +             add_fcmd_table(buf,len);
  118. +     else if (add_cmd_table(&(list_fcmd_tables->t_next), buf, len) < 0)
  119. +         error("Warning: some commands may be disabled", NULL_PARG);
  120. + }
  121. + 
  122. + /*
  123. +  * Insert an editing command table in the proper place - after default, but
  124. +  * before any .less file table.
  125. +  */
  126. +     public void
  127. + insert_ecmd_table(buf, len)
  128. +     char *buf;
  129. +     int len;
  130. + {
  131. +         if (list_ecmd_tables == NULL || list_ecmd_tables->t_next == NULL)
  132. +            add_ecmd_table(buf,len);
  133. +     else if (add_cmd_table(&(list_ecmd_tables->t_next), buf, len) < 0)
  134. +            error("Warning: some edit commands may be disabled", NULL_PARG);
  135. + }
  136. + 
  137. + /*
  138. +  * Add an environment variable table.
  139. +  */
  140. +     public void
  141. + add_var_table(buf, len)
  142. +     char *buf;
  143. +     int len;
  144. + {
  145. +     if (add_cmd_table(&list_var_tables, buf, len) < 0)
  146. +         error("Warning: environment variables from lesskey file unavailable", NULL_PARG);
  147. + }
  148. + 
  149. + /*
  150.    * Search a single command table for the command string in cmd.
  151.    */
  152.       public int
  153. ***************
  154. *** 403,409 ****
  155. --- 445,473 ----
  156.       return (cmd_decode(list_ecmd_tables, cmd, sp));
  157.   }
  158.   
  159. + /*
  160. +  * Get the value of an environment variable.
  161. +  * Looks first in the lesskey file, then in the real environment.
  162. +  */
  163. +     public char *
  164. + lgetenv(var)
  165. +     char *var;
  166. + {
  167. +     int a;
  168. +     char *s;
  169. + 
  170. +     a = cmd_decode(list_var_tables, var, &s);
  171. +     if (a == EV_OK)
  172. +         return (s);
  173. +     return (getenv(var));
  174. + }
  175. + 
  176.   #if USERFILE
  177. + /*
  178. +  * Get an "integer" from a lesskey file.
  179. +  * Integers are stored in a funny format: 
  180. +  * two bytes, low order first, in radix KRADIX.
  181. +  */
  182.       static int
  183.   gint(sp)
  184.       char **sp;
  185. ***************
  186. *** 415,420 ****
  187. --- 479,487 ----
  188.       return (n);
  189.   }
  190.   
  191. + /*
  192. +  * Process an old (pre-v241) lesskey file.
  193. +  */
  194.       static int
  195.   old_lesskey(buf, len)
  196.       char *buf;
  197. ***************
  198. *** 433,438 ****
  199. --- 500,508 ----
  200.       return (0);
  201.   }
  202.   
  203. + /* 
  204. +  * Process a new (post-v241) lesskey file.
  205. +  */
  206.       static int
  207.   new_lesskey(buf, len)
  208.       char *buf;
  209. ***************
  210. *** 440,446 ****
  211.   {
  212.       char *p;
  213.       register int c;
  214. -     register int done;
  215.       register int n;
  216.   
  217.       /*
  218. --- 510,515 ----
  219. ***************
  220. *** 452,459 ****
  221.           buf[len-1] != C2_END_LESSKEY_MAGIC)
  222.           return (-1);
  223.       p = buf + 4;
  224. !     done = 0;
  225. !     while (!done)
  226.       {
  227.           c = *p++;
  228.           switch (c)
  229. --- 521,527 ----
  230.           buf[len-1] != C2_END_LESSKEY_MAGIC)
  231.           return (-1);
  232.       p = buf + 4;
  233. !     for (;;)
  234.       {
  235.           c = *p++;
  236.           switch (c)
  237. ***************
  238. *** 468,482 ****
  239.               add_ecmd_table(p, n);
  240.               p += n;
  241.               break;
  242. !         case END_SECTION:
  243. !             done = 1;
  244.               break;
  245.           default:
  246. !             free(buf);
  247.               return (-1);
  248.           }
  249.       }
  250. -     return (0);
  251.   }
  252.   
  253.   /*
  254. --- 536,555 ----
  255.               add_ecmd_table(p, n);
  256.               p += n;
  257.               break;
  258. !         case VAR_SECTION:
  259. !             n = gint(&p);
  260. !             add_var_table(p, n);
  261. !             p += n;
  262.               break;
  263. +         case END_SECTION:
  264. +             return (0);
  265.           default:
  266. !             /*
  267. !              * Unrecognized section type.
  268. !              */
  269.               return (-1);
  270.           }
  271.       }
  272.   }
  273.   
  274.   /*
  275. ***************
  276. *** 641,647 ****
  277.            * This does NOT include the original character that was 
  278.            * passed in as a parameter.
  279.            */
  280. !         while (nch > 1) {
  281.               ungetcc(usercmd[--nch]);
  282.           }
  283.       } else
  284. --- 714,721 ----
  285.            * This does NOT include the original character that was 
  286.            * passed in as a parameter.
  287.            */
  288. !         while (nch > 1) 
  289. !         {
  290.               ungetcc(usercmd[--nch]);
  291.           }
  292.       } else
  293. diff -cbr orig/defines.dos new/defines.dos
  294. *** orig/defines.dos    Fri Feb 24 22:25:42 1995
  295. --- new/defines.dos    Thu Nov 09 10:36:40 1995
  296. ***************
  297. *** 195,213 ****
  298.   #define HAVE_VOID 1
  299.   
  300.   /* Define HAVE_TIME_T if your system supports the "time_t" type. */
  301. ! #define HAVE_TIME_T 0
  302.   
  303.   /* Define HAVE_STRERROR if you have the strerror() function. */
  304. ! #define HAVE_STRERROR 0
  305.   
  306.   /* Define HAVE_FILENO if you have the fileno() macro. */
  307. ! #define HAVE_FILENO 0
  308.   
  309.   /* Define HAVE_ERRNO if you have the errno variable */
  310.   #define HAVE_ERRNO 0
  311.   
  312.   /* Define HAVE_SYS_ERRLIST if you have the sys_errlist[] variable */
  313. ! #define HAVE_SYS_ERRLIST 0
  314.   
  315.   /* Define HAVE_OSPEED if your termcap library has the ospeed variable */
  316.   #define HAVE_OSPEED 0
  317. --- 195,213 ----
  318.   #define HAVE_VOID 1
  319.   
  320.   /* Define HAVE_TIME_T if your system supports the "time_t" type. */
  321. ! #define HAVE_TIME_T 1
  322.   
  323.   /* Define HAVE_STRERROR if you have the strerror() function. */
  324. ! #define HAVE_STRERROR 1
  325.   
  326.   /* Define HAVE_FILENO if you have the fileno() macro. */
  327. ! #define HAVE_FILENO 1
  328.   
  329.   /* Define HAVE_ERRNO if you have the errno variable */
  330.   #define HAVE_ERRNO 0
  331.   
  332.   /* Define HAVE_SYS_ERRLIST if you have the sys_errlist[] variable */
  333. ! #define HAVE_SYS_ERRLIST 1
  334.   
  335.   /* Define HAVE_OSPEED if your termcap library has the ospeed variable */
  336.   #define HAVE_OSPEED 0
  337. ***************
  338. *** 216,222 ****
  339.   #define MUST_DEFINE_OSPEED 0
  340.   
  341.   /* Define HAVE_LOCALE if you have locale.h and setlocale. */
  342. ! #define HAVE_LOCALE 0
  343.   
  344.   /* Define HAVE_TERMIOS_FUNCS if you have tcgetattr/tcsetattr */
  345.   #define HAVE_TERMIOS_FUNCS 0
  346. --- 216,222 ----
  347.   #define MUST_DEFINE_OSPEED 0
  348.   
  349.   /* Define HAVE_LOCALE if you have locale.h and setlocale. */
  350. ! #define HAVE_LOCALE 1
  351.   
  352.   /* Define HAVE_TERMIOS_FUNCS if you have tcgetattr/tcsetattr */
  353.   #define HAVE_TERMIOS_FUNCS 0
  354. ***************
  355. *** 243,249 ****
  356.   #define HAVE_CTYPE_H 1
  357.   
  358.   /* Define if you have the <errno.h> header file.  */
  359. ! #define HAVE_ERRNO_H 0
  360.   
  361.   /* Define if you have the <fcntl.h> header file.  */
  362.   #define HAVE_FCNTL_H 1
  363. --- 243,249 ----
  364.   #define HAVE_CTYPE_H 1
  365.   
  366.   /* Define if you have the <errno.h> header file.  */
  367. ! #define HAVE_ERRNO_H 1
  368.   
  369.   /* Define if you have the <fcntl.h> header file.  */
  370.   #define HAVE_FCNTL_H 1
  371. ***************
  372. *** 261,279 ****
  373.   #define HAVE_SYS_STREAM_H    0
  374.   
  375.   /* Define if you have the <termcap.h> header file.  */
  376. ! /* #undef HAVE_TERMCAP_H */
  377.   
  378.   /* Define if you have the <termio.h> header file.  */
  379.   #define HAVE_TERMIO_H    0
  380.   
  381.   /* Define if you have the <termios.h> header file.  */
  382. ! #define HAVE_TERMIOS_H 1
  383.   
  384.   /* Define if you have the <time.h> header file.  */
  385.   #define HAVE_TIME_H 1
  386.   
  387.   /* Define if you have the <unistd.h> header file.  */
  388. ! #define HAVE_UNISTD_H 1
  389.   
  390.   /* Define if you have the <values.h> header file.  */
  391.   #define HAVE_VALUES_H 0
  392. --- 261,298 ----
  393.   #define HAVE_SYS_STREAM_H    0
  394.   
  395.   /* Define if you have the <termcap.h> header file.  */
  396. ! #define HAVE_TERMCAP_H    0
  397.   
  398.   /* Define if you have the <termio.h> header file.  */
  399.   #define HAVE_TERMIO_H    0
  400.   
  401.   /* Define if you have the <termios.h> header file.  */
  402. ! #define HAVE_TERMIOS_H 0
  403.   
  404.   /* Define if you have the <time.h> header file.  */
  405.   #define HAVE_TIME_H 1
  406.   
  407.   /* Define if you have the <unistd.h> header file.  */
  408. ! #define HAVE_UNISTD_H 0
  409.   
  410.   /* Define if you have the <values.h> header file.  */
  411.   #define HAVE_VALUES_H 0
  412. + 
  413. + #if _MSC_VER >= 700
  414. + /*
  415. +  * The names of these things changed in Microsoft C version 7.0.
  416. +  */
  417. + #define videoconfig    _videoconfig
  418. + #define rccoord        _rccoord
  419. + #define off_t        _off_t
  420. + #define O_RDONLY    _O_RDONLY
  421. + #define O_WRONLY    _O_WRONLY
  422. + #define O_APPEND    _O_APPEND
  423. + #define O_BINARY    _O_BINARY
  424. + #define O_TEXT        _O_TEXT
  425. + #define find_t        _find_t
  426. + #define stat        _stat
  427. + #define S_IFMT        _S_IFMT
  428. + #define S_IFDIR        _S_IFDIR
  429. + #define S_IFREG        _S_IFREG
  430. + #endif
  431. diff -cbr orig/defines.h new/defines.h
  432. *** orig/defines.h    Fri Feb 24 22:25:50 1995
  433. --- new/defines.h    Thu Nov 09 10:36:40 1995
  434. ***************
  435. *** 75,81 ****
  436.    * EDIT_PGM is the name of the (default) editor to be invoked.
  437.    */
  438.   #define    EDITOR        (!SECURE)
  439. ! #define    EDIT_PGM    "me"
  440.   
  441.   /*
  442.    * TAGS is 1 if you wish to support tag files.
  443. --- 75,81 ----
  444.    * EDIT_PGM is the name of the (default) editor to be invoked.
  445.    */
  446.   #define    EDITOR        (!SECURE)
  447. ! #define    EDIT_PGM    "emacs"
  448.   
  449.   /*
  450.    * TAGS is 1 if you wish to support tag files.
  451. diff -cbr orig/doscreen.c new/doscreen.c
  452. *** orig/doscreen.c    Wed Feb 01 01:55:36 1995
  453. --- new/doscreen.c    Thu Nov 09 10:36:42 1995
  454. ***************
  455. *** 49,54 ****
  456. --- 49,55 ----
  457.   public int ul_s_width, ul_e_width;    /* Printing width of underline seq */
  458.   public int so_s_width, so_e_width;    /* Printing width of standout seq */
  459.   public int bl_s_width, bl_e_width;    /* Printing width of blink seq */
  460. + public int can_goto_line;        /* Can move cursor to any line */
  461.   
  462.   public int nm_fg_color = 7;            /* Color of normal text */
  463.   public int nm_bg_color = 0;
  464. ***************
  465. *** 69,75 ****
  466.   extern int know_dumb;        /* Don't complain about a dumb terminal */
  467.   extern int back_scroll;
  468.   extern int swindow;
  469. - extern char *getenv();
  470.   
  471.   /*
  472.    * Change terminal to "raw mode", or restore to "normal" mode.
  473. --- 70,75 ----
  474. ***************
  475. *** 110,123 ****
  476.   
  477.       if (w.numtextrows)
  478.           *p_height = w.numtextrows;
  479. !     else if ((s = getenv("LINES")) != NULL && *s != '\0')
  480.           *p_height = atoi(s);
  481.       if (*p_height <= 0)
  482.           *p_height = 24;
  483.           
  484.       if (w.numtextcols > 0)
  485.           *p_width = w.numtextcols;
  486. !     else if ((s = getenv("COLUMNS")) != NULL)
  487.           *p_width = atoi(s);
  488.       if (*p_width <= 0)
  489.             *p_width = 80;
  490. --- 110,123 ----
  491.   
  492.       if (w.numtextrows)
  493.           *p_height = w.numtextrows;
  494. !     else if ((s = lgetenv("LINES")) != NULL && *s != '\0')
  495.           *p_height = atoi(s);
  496.       if (*p_height <= 0)
  497.           *p_height = 24;
  498.           
  499.       if (w.numtextcols > 0)
  500.           *p_width = w.numtextcols;
  501. !     else if ((s = lgetenv("COLUMNS")) != NULL)
  502.           *p_width = atoi(s);
  503.       if (*p_width <= 0)
  504.             *p_width = 80;
  505. ***************
  506. *** 181,186 ****
  507. --- 181,211 ----
  508.   
  509.   
  510.   /*
  511. +  * Initialize the screen to the correct color at startup.
  512. +  */
  513. +     static void
  514. + initcolor()
  515. + {
  516. +     struct videoconfig w;
  517. +     char *blanks;
  518. +     int row;
  519. +     int col;
  520. +     
  521. +     /*
  522. +      * Create a complete, blank screen using "normal" colors.
  523. +      */
  524. +     _settextcolor(nm_fg_color);
  525. +     _setbkcolor(nm_bg_color);
  526. +     _getvideoconfig(&w);
  527. +     blanks = (char *) ecalloc(w.numtextcols, sizeof(char));
  528. +     for (col = 0;  col < w.numtextcols;  col++)
  529. +         blanks[col] = ' ';
  530. +     for (row = w.numtextrows;  row > 0;  row--)
  531. +         _outmem(blanks, w.numtextcols);
  532. +     free(blanks);
  533. + }
  534. + 
  535. + /*
  536.    * Initialize terminal
  537.    */
  538.       public void
  539. ***************
  540. *** 189,194 ****
  541. --- 214,220 ----
  542.       /* {{ What could we take no_init (-X) to mean? }} */
  543.       sy_bg_color = _getbkcolor();
  544.       sy_fg_color = _gettextcolor();
  545. +     initcolor();
  546.       flush();
  547.       init_done = 1;
  548.   }
  549. ***************
  550. *** 273,278 ****
  551. --- 299,315 ----
  552.   {
  553.       flush();
  554.       _settextposition(sc_height,1);
  555. + }
  556. + 
  557. + /*
  558. +  * Goto a specific line on the screen.
  559. +  */
  560. +     public void
  561. + goto_line(slinenum)
  562. +     int slinenum;
  563. + {
  564. +     flush();
  565. +     _settextposition(slinenum, 1);
  566.   }
  567.   
  568.   /*
  569. diff -cbr orig/edit.c new/edit.c
  570. *** orig/edit.c    Thu Nov 09 10:35:26 1995
  571. --- new/edit.c    Mon Apr 10 10:05:54 1995
  572. ***************
  573. *** 276,281 ****
  574. --- 276,291 ----
  575.            */
  576.           (void) edit_ifile(was_curr_ifile);
  577.           return (1);
  578. +         } else if ((answer = isZfile(filename)) >= 0)
  579. +     {
  580. +         if ((f = Zopen(filename, answer)) < 0)
  581. +         {
  582. +                         parg.p_string = errno_message(filename);
  583. +             error("%s", &parg);
  584. +             free(parg.p_string);
  585. +             return (1);
  586. +                 }
  587. +         chflags |= CH_COMPRESSED;
  588.       } else if ((f = open(open_filename, OPEN_READ)) < 0)
  589.       {
  590.           /*
  591. diff -cbr orig/filename.c new/filename.c
  592. *** orig/filename.c    Thu Nov 09 11:12:22 1995
  593. --- new/filename.c    Thu Nov 09 10:36:42 1995
  594. ***************
  595. *** 92,105 ****
  596.       /*
  597.        * Try $HOME/filename.
  598.        */
  599. !     pathname = dirfile(getenv("HOME"), filename);
  600.       if (pathname != NULL)
  601.           return (pathname);
  602.   #if OS2
  603.       /*
  604.        * Try $INIT/filename.
  605.        */
  606. !     pathname = dirfile(getenv("INIT"), filename);
  607.       if (pathname != NULL)
  608.           return (pathname);
  609.   #endif
  610. --- 92,105 ----
  611.       /*
  612.        * Try $HOME/filename.
  613.        */
  614. !     pathname = dirfile(lgetenv("HOME"), filename);
  615.       if (pathname != NULL)
  616.           return (pathname);
  617.   #if OS2
  618.       /*
  619.        * Try $INIT/filename.
  620.        */
  621. !     pathname = dirfile(lgetenv("INIT"), filename);
  622.       if (pathname != NULL)
  623.           return (pathname);
  624.   #endif
  625. ***************
  626. *** 124,130 ****
  627.   {
  628.       register char *helpfile;
  629.       
  630. !     if ((helpfile = getenv("LESSHELP")) != NULL)
  631.           return (save(helpfile));
  632.   #if MSOFTC || OS2
  633.       return (homefile(HELPFILE));
  634. --- 124,130 ----
  635.   {
  636.       register char *helpfile;
  637.       
  638. !     if ((helpfile = lgetenv("LESSHELP")) != NULL)
  639.           return (save(helpfile));
  640.   #if MSOFTC || OS2
  641.       return (homefile(HELPFILE));
  642. ***************
  643. *** 134,141 ****
  644.   }
  645.   
  646.   /*
  647. !  * Expand a string, substituting any "%" with the current filename,
  648. !  * and any "#" with the previous filename.
  649.    * {{ This is a lot of work just to support % and #. }}
  650.    */
  651.       public char *
  652. --- 134,143 ----
  653.   }
  654.   
  655.   /*
  656. !  * Expand a string, substituting any single "%" with the current filename,
  657. !  * and any single "#" with the previous filename.
  658. !  * "#" and "%" are self quoting.  Any sequence of 2 or more of them
  659. !  * inserts the sequence - 1 of "%" or "#" chars into the command line.
  660.    * {{ This is a lot of work just to support % and #. }}
  661.    */
  662.       public char *
  663. ***************
  664. *** 145,178 ****
  665.       register char *fr, *to;
  666.       register int n;
  667.       register char *e;
  668.   
  669.       /*
  670.        * Make one pass to see how big a buffer we 
  671.        * need to allocate for the expanded string.
  672.        */
  673.       n = 0;
  674.       for (fr = s;  *fr != '\0';  fr++)
  675.       {
  676.           switch (*fr)
  677.           {
  678.           case '%':
  679. !             if (curr_ifile == NULL_IFILE)
  680.               {
  681. !                 /* error("No current file", NULL_PARG); */
  682. !                 return (save(s));
  683.               }
  684.               n += strlen(get_filename(curr_ifile));
  685.               break;
  686.           case '#':
  687. !             if (old_ifile == NULL_IFILE)
  688.               {
  689. !                 /* error("No previous file", NULL_PARG); */
  690. !                 return (save(s));
  691.               }
  692.               n += strlen(get_filename(old_ifile));
  693.               break;
  694.           default:
  695.               n++;
  696.               break;
  697.           }
  698.       }
  699. --- 147,210 ----
  700.       register char *fr, *to;
  701.       register int n;
  702.       register char *e;
  703. +     int percent_quote = FALSE;  /* Set initial state of machine to */      
  704. +     int hash_quote = FALSE;     /* no sequence in progress. */
  705.   
  706.       /*
  707.        * Make one pass to see how big a buffer we 
  708.        * need to allocate for the expanded string.
  709.        */
  710. +     /*
  711. +      * The self quoting system is a state machine.  We look ahead
  712. +      * one character to put ourselves into one or the other self
  713. +      * quote states, and when we get a different character, we
  714. +      * turn the previous quote state off.  We count and later
  715. +      * insert, 1 less than the actual sequence of special
  716. +      * characters into the output buffer, if there is a sequence.
  717. +      * If there is a file error condition, we no longer bug out,
  718. +      * we just do not count the unexpanded character or place it
  719. +      * in the output buffer and we continue to check the rest of
  720. +      * the string for single "%" or "#"s to expand or sequences to
  721. +      * insert.  
  722. +      */
  723.       n = 0;
  724.       for (fr = s;  *fr != '\0';  fr++)
  725.       {
  726.           switch (*fr)
  727.           {
  728.           case '%':
  729. !                 if (hash_quote)
  730. !                     hash_quote = FALSE;
  731. !                 if (*(fr+1) == '%' || percent_quote)
  732.               {
  733. !                     if (!percent_quote)
  734. !                         percent_quote = TRUE;
  735. !                 else
  736. !                         n++;
  737.               }
  738. +             else if (curr_ifile != NULL_IFILE)
  739.               n += strlen(get_filename(curr_ifile));
  740.               break;
  741.           case '#':
  742. !             if (percent_quote)
  743. !                     percent_quote = FALSE;
  744. !                 if (*(fr+1) == '#' || hash_quote)
  745.               {
  746. !                     if (!hash_quote)
  747. !                         hash_quote = TRUE;
  748. !                 else
  749. !                         n++;
  750.               }
  751. +             else if (old_ifile != NULL_IFILE)
  752.               n += strlen(get_filename(old_ifile));
  753.               break;
  754.           default:
  755.               n++;
  756. +             if (percent_quote || hash_quote)
  757. +             {
  758. +                      percent_quote = FALSE;
  759. +                      hash_quote = FALSE;
  760. +             }
  761.               break;
  762.           }
  763.       }
  764. ***************
  765. *** 183,202 ****
  766. --- 215,269 ----
  767.        * Now copy the string, expanding any "%" or "#".
  768.        */
  769.       to = e;
  770. +     /*
  771. +      * Reset the state machine in case we ended on a sequence 
  772. +      * of "%" or "#" characters.
  773. +      */
  774. +     percent_quote = FALSE;
  775. +     hash_quote = FALSE;
  776.       for (fr = s;  *fr != '\0';  fr++)
  777.       {
  778.           switch (*fr)
  779.           {
  780.           case '%':
  781. +             if (hash_quote)
  782. +                     hash_quote = FALSE;
  783. +                 if (*(fr+1) == '%' || percent_quote)
  784. +             {
  785. +                     if (!percent_quote)
  786. +                         percent_quote = TRUE;
  787. +                 else
  788. +                         *to++ = *fr;
  789. +             }                       
  790. +             else if (curr_ifile != NULL_IFILE)
  791. +                 {
  792.               strcpy(to, get_filename(curr_ifile));
  793.               to += strlen(to);
  794. +             }
  795.               break;
  796.           case '#':
  797. +             if (percent_quote)
  798. +                     percent_quote = FALSE;
  799. +                 if (*(fr+1) == '#' || hash_quote)
  800. +             {
  801. +                     if (!hash_quote)
  802. +                         hash_quote = TRUE;
  803. +                 else
  804. +                         *to++ = *fr;
  805. +             }                       
  806. +             else if (old_ifile != NULL_IFILE)
  807. +             {
  808.               strcpy(to, get_filename(old_ifile));
  809.               to += strlen(to);
  810. +             }
  811.               break;
  812.           default:
  813.               *to++ = *fr;
  814. +             if (percent_quote || hash_quote)
  815. +             {
  816. +                      percent_quote = FALSE;
  817. +                      hash_quote = FALSE;
  818. +             }
  819.               break;
  820.           }
  821.       }
  822. ***************
  823. *** 360,366 ****
  824.       scmd = (char *) ecalloc(len, sizeof(char));
  825.       sprintf(scmd, cmd, s1, s2);
  826.   #if HAVE_SHELL
  827. !     shell = getenv("SHELL");
  828.       if (shell != NULL && *shell != '\0')
  829.       {
  830.           /*
  831. --- 427,433 ----
  832.       scmd = (char *) ecalloc(len, sizeof(char));
  833.       sprintf(scmd, cmd, s1, s2);
  834.   #if HAVE_SHELL
  835. !     shell = lgetenv("SHELL");
  836.       if (shell != NULL && *shell != '\0')
  837.       {
  838.           /*
  839. ***************
  840. *** 395,407 ****
  841.       int length;
  842.   
  843.       list = _fnexplode(filename);
  844. !     length = 1;
  845.       for (cnt = 0;  list[cnt] != NULL;  cnt++)
  846.             length += strlen(list[cnt]) + 1;
  847.       gfilename = (char *) ecalloc(length, sizeof(char));
  848.       for (cnt = 0;  list[cnt] != NULL;  cnt++)
  849.       {
  850.           strcat(gfilename, list[cnt]);
  851.             strcat(gfilename, " ");
  852.       }
  853.       _fnexplodefree(list);
  854. --- 462,477 ----
  855.       int length;
  856.   
  857.       list = _fnexplode(filename);
  858. !     if (list == NULL)
  859. !         return (filename);
  860. !     length = 0;
  861.       for (cnt = 0;  list[cnt] != NULL;  cnt++)
  862.             length += strlen(list[cnt]) + 1;
  863.       gfilename = (char *) ecalloc(length, sizeof(char));
  864.       for (cnt = 0;  list[cnt] != NULL;  cnt++)
  865.       {
  866.           strcat(gfilename, list[cnt]);
  867. +         if (list[cnt+1] != NULL)
  868.             strcat(gfilename, " ");
  869.       }
  870.       _fnexplodefree(list);
  871. ***************
  872. *** 452,458 ****
  873.       FILE *fd;
  874.       
  875.       ch_ungetchar(-1);
  876. !     if ((lessopen = getenv("LESSOPEN")) == NULL)
  877.           return (NULL);
  878.       if (strcmp(filename, "-") == 0)
  879.           return (NULL);
  880. --- 522,528 ----
  881.       FILE *fd;
  882.       
  883.       ch_ungetchar(-1);
  884. !     if ((lessopen = lgetenv("LESSOPEN")) == NULL)
  885.           return (NULL);
  886.       if (strcmp(filename, "-") == 0)
  887.           return (NULL);
  888. ***************
  889. *** 525,531 ****
  890.       
  891.       if (pipefd != NULL)
  892.           pclose((FILE*) pipefd);
  893. !     if ((lessclose = getenv("LESSCLOSE")) == NULL)
  894.                return;
  895.       fd = shellcmd(lessclose, filename, altfilename);
  896.       pclose(fd);
  897. --- 595,601 ----
  898.       
  899.       if (pipefd != NULL)
  900.           pclose((FILE*) pipefd);
  901. !     if ((lessclose = lgetenv("LESSCLOSE")) == NULL)
  902.                return;
  903.       fd = shellcmd(lessclose, filename, altfilename);
  904.       pclose(fd);
  905. diff -cbr orig/forwback.c new/forwback.c
  906. *** orig/forwback.c    Thu Nov 09 10:35:26 1995
  907. --- new/forwback.c    Mon Apr 17 20:00:02 1995
  908. ***************
  909. *** 36,41 ****
  910. --- 36,42 ----
  911.   public int hit_eof;    /* Keeps track of how many times we hit end of file */
  912.   public int screen_trashed;
  913.   public int squished;
  914. + public int no_back_scroll = 0;
  915.   
  916.   extern int sigs;
  917.   extern int top_scroll;
  918. ***************
  919. *** 390,395 ****
  920. --- 391,398 ----
  921.       public int
  922.   get_back_scroll()
  923.   {
  924. +       if (no_back_scroll)
  925. +               return (0);
  926.       if (back_scroll >= 0)
  927.           return (back_scroll);
  928.       if (top_scroll)
  929. diff -cbr orig/funcs.h new/funcs.h
  930. *** orig/funcs.h    Thu Mar 09 22:34:20 1995
  931. --- new/funcs.h    Thu Nov 09 10:36:42 1995
  932. ***************
  933. *** 68,76 ****
  934. --- 68,78 ----
  935.       public void init_cmds ();
  936.       public void add_fcmd_table ();
  937.       public void add_ecmd_table ();
  938. +     public void add_var_table ();
  939.       public int cmd_search ();
  940.       public int fcmd_decode ();
  941.       public int ecmd_decode ();
  942. +     public char * lgetenv ();
  943.       public int lesskey ();
  944.       public void add_hometable ();
  945.       public int editchar ();
  946. diff -cbr orig/less.h new/less.h
  947. *** orig/less.h    Thu Nov 09 10:35:26 1995
  948. --- new/less.h    Mon Apr 10 10:05:54 1995
  949. ***************
  950. *** 244,252 ****
  951.   #define    QUIT_SAVED_STATUS (-1)
  952.   
  953.   /* filestate flags */
  954. ! #define    CH_CANSEEK    001
  955. ! #define    CH_KEEPOPEN    002
  956. ! #define    CH_POPENED    004
  957.   
  958.   #define    ch_zero()    ((POSITION)0)
  959.   
  960. --- 244,253 ----
  961.   #define    QUIT_SAVED_STATUS (-1)
  962.   
  963.   /* filestate flags */
  964. ! #define    CH_CANSEEK    0x01
  965. ! #define    CH_KEEPOPEN    0x02
  966. ! #define    CH_POPENED    0x04
  967. ! #define    CH_COMPRESSED    0x08
  968.   
  969.   #define    ch_zero()    ((POSITION)0)
  970.   
  971. diff -cbr orig/less.nro new/less.nro
  972. *** orig/less.nro    Thu Mar 02 23:15:00 1995
  973. --- new/less.nro    Thu Nov 09 10:36:42 1995
  974. ***************
  975. *** 113,122 ****
  976.   .IP "p or %"
  977.   Go to a position N percent into the file.
  978.   N should be between 0 and 100.
  979. - (This works if standard input is being read, but only if
  980. - .I less
  981. - has already read to the end of the file.
  982. - It is always fast, but not always useful.)
  983.   .PP
  984.   .IP "{"
  985.   If a left curly bracket appears in the top line displayed
  986. --- 113,118 ----
  987. ***************
  988. *** 1164,1169 ****
  989. --- 1160,1169 ----
  990.   changed to modify this default.
  991.   
  992.   .SH "ENVIRONMENT VARIABLES"
  993. + Environment variables may be specified either in the system environment
  994. + as usual, or in a 
  995. + .I lesskey
  996. + (1) file.
  997.   .IP COLUMNS
  998.   Sets the number of columns on the screen.
  999.   Takes precedence over the number of columns specified by the TERM variable.
  1000. diff -cbr orig/lesskey.c new/lesskey.c
  1001. *** orig/lesskey.c    Thu Nov 09 10:35:28 1995
  1002. --- new/lesskey.c    Thu Nov 09 10:36:44 1995
  1003. ***************
  1004. *** 63,70 ****
  1005. --- 63,74 ----
  1006.    *
  1007.    *    Blank lines and lines which start with # are ignored, 
  1008.    *    except for the special control lines:
  1009. +  *        #command    Signals the beginning of the command
  1010. +  *                keys section.
  1011.    *        #line-edit    Signals the beginning of the line-editing
  1012.    *                keys section.
  1013. +  *        #env        Signals the beginning of the environment
  1014. +  *                variable section.
  1015.    *        #stop        Stops command parsing in less;
  1016.    *                causes all default keys to be disabled.
  1017.    *
  1018. ***************
  1019. *** 96,101 ****
  1020. --- 100,106 ----
  1021.   #include "less.h"
  1022.   #include "lesskey.h"
  1023.   #include "cmd.h"
  1024. + #include <ctype.h>
  1025.   
  1026.   struct cmdname
  1027.   {
  1028. ***************
  1029. *** 190,195 ****
  1030. --- 195,201 ----
  1031.   
  1032.   struct table cmdtable;
  1033.   struct table edittable;
  1034. + struct table vartable;
  1035.   struct table *currtable = &cmdtable;
  1036.   
  1037.   char fileheader[] = {
  1038. ***************
  1039. *** 205,210 ****
  1040. --- 211,217 ----
  1041.   };
  1042.   char cmdsection[1] =    { CMD_SECTION };
  1043.   char editsection[1] =    { EDIT_SECTION };
  1044. + char varsection[1] =    { VAR_SECTION };
  1045.   char endsection[1] =    { END_SECTION };
  1046.   
  1047.   char *infile = NULL;
  1048. ***************
  1049. *** 308,313 ****
  1050. --- 315,323 ----
  1051.   
  1052.       edittable.names = editnames;
  1053.       edittable.pbuffer = edittable.buffer;
  1054. + 
  1055. +     vartable.names = NULL;
  1056. +     vartable.pbuffer = vartable.buffer;
  1057.   }
  1058.   
  1059.   /*
  1060. ***************
  1061. *** 450,455 ****
  1062. --- 460,470 ----
  1063.           currtable = &cmdtable;
  1064.           return (1);
  1065.       }
  1066. +     if (PREFIX(s, "#env"))
  1067. +     {
  1068. +         currtable = &vartable;
  1069. +         return (1);
  1070. +     }
  1071.       if (PREFIX(s, "#stop"))
  1072.       {
  1073.           add_cmd_char('\0');
  1074. ***************
  1075. *** 528,561 ****
  1076.   }
  1077.   
  1078.   
  1079. - /*
  1080. -  * Parse a line from the lesskey file.
  1081. -  */
  1082.       void
  1083. ! parse_line(line)
  1084. !     char *line;
  1085. ! {
  1086.       char *p;
  1087.       int cmdlen;
  1088.       char *actname;
  1089.       int action;
  1090.       int c;
  1091.   
  1092.       /*
  1093. -      * See if it is a control line.
  1094. -      */
  1095. -     if (control_line(line))
  1096. -         return;
  1097. -     /*
  1098. -      * Skip leading white space.
  1099. -      * Replace the final newline with a null byte.
  1100. -      * Ignore blank lines and comments.
  1101. -      */
  1102. -     p = clean_line(line);
  1103. -     if (*p == '\0')
  1104. -         return;
  1105. - 
  1106. -     /*
  1107.        * Parse the command string and store it in the current table.
  1108.        */
  1109.       cmdlen = 0;
  1110. --- 543,558 ----
  1111.   }
  1112.   
  1113.   
  1114.       void
  1115. ! parse_cmdline(p)
  1116.       char *p;
  1117. + {
  1118.       int cmdlen;
  1119.       char *actname;
  1120.       int action;
  1121.       int c;
  1122.   
  1123.       /*
  1124.        * Parse the command string and store it in the current table.
  1125.        */
  1126.       cmdlen = 0;
  1127. ***************
  1128. *** 614,619 ****
  1129. --- 611,679 ----
  1130.       }
  1131.   }
  1132.   
  1133. +     void
  1134. + parse_varline(p)
  1135. +     char *p;
  1136. + {
  1137. +     int c;
  1138. + 
  1139. +     do
  1140. +     {
  1141. +         c = tchar(&p);
  1142. +         add_cmd_char(toupper(c));
  1143. +     } while (*p != ' ' && *p != '\t' && *p != '=' && *p != '\0');
  1144. +     /*
  1145. +      * Terminate the variable name with a null byte.
  1146. +      */
  1147. +     add_cmd_char('\0');
  1148. + 
  1149. +     p = skipsp(p);
  1150. +     if (*p++ != '=')
  1151. +     {
  1152. +         error("missing =");
  1153. +         return;
  1154. +     }
  1155. + 
  1156. +     add_cmd_char(EV_OK|A_EXTRA);
  1157. + 
  1158. +     p = skipsp(p);
  1159. +     while (*p != '\0')
  1160. +     {
  1161. +         c = tchar(&p);
  1162. +         add_cmd_char(c);
  1163. +     }
  1164. +     add_cmd_char('\0');
  1165. + }
  1166. + 
  1167. + /*
  1168. +  * Parse a line from the lesskey file.
  1169. +  */
  1170. +     void
  1171. + parse_line(line)
  1172. +     char *line;
  1173. + {
  1174. +     char *p;
  1175. + 
  1176. +     /*
  1177. +      * See if it is a control line.
  1178. +      */
  1179. +     if (control_line(line))
  1180. +         return;
  1181. +     /*
  1182. +      * Skip leading white space.
  1183. +      * Replace the final newline with a null byte.
  1184. +      * Ignore blank lines and comments.
  1185. +      */
  1186. +     p = clean_line(line);
  1187. +     if (*p == '\0')
  1188. +         return;
  1189. + 
  1190. +     if (currtable == &vartable)
  1191. +         parse_varline(p);
  1192. +     else
  1193. +         parse_cmdline(p);
  1194. + }
  1195. + 
  1196.   main(argc, argv)
  1197.       int argc;
  1198.       char *argv[];
  1199. ***************
  1200. *** 622,627 ****
  1201. --- 682,692 ----
  1202.       FILE *out;
  1203.       char line[200];
  1204.   
  1205. + #ifdef OS2
  1206. +         if (argc == 1)
  1207. +           usage();
  1208. + #endif
  1209. + 
  1210.       /*
  1211.        * Process command line arguments.
  1212.        */
  1213. ***************
  1214. *** 679,684 ****
  1215. --- 744,754 ----
  1216.       fputbytes(out, editsection, sizeof(editsection));
  1217.       fputint(out, edittable.pbuffer - edittable.buffer);
  1218.       fputbytes(out, (char *)edittable.buffer, edittable.pbuffer-edittable.buffer);
  1219. + 
  1220. +     /* Environment variable section */
  1221. +     fputbytes(out, varsection, sizeof(varsection)); 
  1222. +     fputint(out, vartable.pbuffer - vartable.buffer);
  1223. +     fputbytes(out, (char *)vartable.buffer, vartable.pbuffer-vartable.buffer);
  1224.   
  1225.       /* File trailer */
  1226.       fputbytes(out, endsection, sizeof(endsection));
  1227. diff -cbr orig/lesskey.h new/lesskey.h
  1228. *** orig/lesskey.h    Wed Feb 01 01:55:52 1995
  1229. --- new/lesskey.h    Thu Nov 09 10:36:44 1995
  1230. ***************
  1231. *** 18,23 ****
  1232. --- 18,24 ----
  1233.   
  1234.   #define    CMD_SECTION        'c'
  1235.   #define    EDIT_SECTION        'e'
  1236. + #define    VAR_SECTION        'v'
  1237.   #define    END_SECTION        'x'
  1238.   
  1239.   #define    C0_END_LESSKEY_MAGIC    'E'
  1240. diff -cbr orig/lesskey.nro new/lesskey.nro
  1241. *** orig/lesskey.nro    Wed Feb 01 01:55:56 1995
  1242. --- new/lesskey.nro    Thu Nov 09 10:36:46 1995
  1243. ***************
  1244. *** 19,25 ****
  1245.   .I lesskey
  1246.   will overwrite it.
  1247.   .PP
  1248. ! The input file consists of lines of the form:
  1249.   .sp
  1250.       \fIstring\fP <whitespace> \fIaction\fP [extra-string] <newline>
  1251.   .sp
  1252. --- 19,51 ----
  1253.   .I lesskey
  1254.   will overwrite it.
  1255.   .PP
  1256. ! The -V flag causes
  1257. ! .I lesskey
  1258. ! to print its version number and immediately exit.  
  1259. ! If -V is present, other flags and arguments are ignored.
  1260. ! .PP
  1261. ! The input file consists of one or more
  1262. ! .I sections.
  1263. ! Each section starts with a line that identifies the type of section.
  1264. ! Possible sections are:
  1265. ! .IP #command
  1266. ! Defines new command keys.
  1267. ! .IP #line-edit
  1268. ! Defines new line-editing keys.
  1269. ! .IP #env
  1270. ! Defines environment variables.
  1271. ! .PP
  1272. ! Blank lines and lines which start with a pound sign (#) are ignored,
  1273. ! except for the special section header lines.
  1274. ! 
  1275. ! .SH "COMMAND SECTION"
  1276. ! The command section begins with the line
  1277. ! .sp
  1278. ! #command
  1279. ! .sp
  1280. ! If the command section is the first section in the file,
  1281. ! this line may be omitted.
  1282. ! The command section consists of lines of the form:
  1283.   .sp
  1284.       \fIstring\fP <whitespace> \fIaction\fP [extra-string] <newline>
  1285.   .sp
  1286. ***************
  1287. *** 37,43 ****
  1288.   to be taken literally.
  1289.   Characters which must be preceded by backslash include
  1290.   caret, space, tab and the backslash itself.
  1291. - Blank lines and lines which start with a pound sign (#) are ignored.
  1292.   .PP
  1293.   An action may be followed by an "extra" string.
  1294.   When such a command is entered while running
  1295. --- 63,68 ----
  1296. ***************
  1297. *** 48,64 ****
  1298.   This feature can be used in certain cases to extend
  1299.   the functionality of a command.
  1300.   For example, see the "{" and ":t" commands in the example below.
  1301. - .PP
  1302. - The -V flag causes
  1303. - .I lesskey
  1304. - to print its version number and immediately exit.  
  1305. - Other flags and arguments are ignored.
  1306.   
  1307.   .SH EXAMPLE
  1308.   The following input file describes the set of
  1309.   default command keys used by less:
  1310.   .sp
  1311.   .nf
  1312.       \er        forw-line 
  1313.       \en        forw-line 
  1314.       e        forw-line 
  1315. --- 73,85 ----
  1316.   This feature can be used in certain cases to extend
  1317.   the functionality of a command.
  1318.   For example, see the "{" and ":t" commands in the example below.
  1319.   
  1320.   .SH EXAMPLE
  1321.   The following input file describes the set of
  1322.   default command keys used by less:
  1323.   .sp
  1324.   .nf
  1325. +     #command
  1326.       \er        forw-line 
  1327.       \en        forw-line 
  1328.       e        forw-line 
  1329. ***************
  1330. *** 164,170 ****
  1331.   .sp
  1332.   This will cause all default commands to be ignored.
  1333.   The #stop line should be the last line in that section of the file.
  1334. - (Another section, introduced by #line-edit, may follow the #stop line.)
  1335.   .PP
  1336.   Be aware that #stop can be dangerous.  
  1337.   Since all default commands are disabled, 
  1338. --- 185,190 ----
  1339. ***************
  1340. *** 172,186 ****
  1341.   to enable all necessary actions.
  1342.   For example, failure to provide a "quit" command can lead to frustration.
  1343.   
  1344. ! .SH "LINE EDITING"
  1345. ! New key bindings may be specified for the line editing commands,
  1346. ! in a manner similar to the way key bindings for 
  1347. ! ordinary commands are specified.
  1348. ! This control line marks the beginning of a section of line-editing commands:
  1349.   .sp
  1350.   #line-edit
  1351.   .sp
  1352. ! Following this line is a list of keys and actions,
  1353.   one per line as in the example below.
  1354.   
  1355.   .SH EXAMPLE
  1356. --- 192,206 ----
  1357.   to enable all necessary actions.
  1358.   For example, failure to provide a "quit" command can lead to frustration.
  1359.   
  1360. ! .SH "LINE EDITING SECTION"
  1361. ! The line-editing section begins with the line:
  1362.   .sp
  1363.   #line-edit
  1364.   .sp
  1365. ! This section specifies new key bindings for the line editing commands,
  1366. ! in a manner similar to the way key bindings for 
  1367. ! ordinary commands are specified in the #command section.
  1368. ! The line-editing section consists of a list of keys and actions,
  1369.   one per line as in the example below.
  1370.   
  1371.   .SH EXAMPLE
  1372. ***************
  1373. *** 209,216 ****
  1374. --- 229,273 ----
  1375.   .fi
  1376.   .sp
  1377.   
  1378. + .SH "LESS ENVIRONMENT VARIABLES"
  1379. + The environment variable section begins with the line
  1380. + .sp
  1381. + #env
  1382. + .sp
  1383. + Following this line is a list of environment variable assignments.
  1384. + Each line consists of an environment variable name, an equals sign (=)
  1385. + and the value to be assigned to the environment variable.
  1386. + White space before and after the equals sign is ignored.
  1387. + Variables assigned in this way are visible only to
  1388. + .I less.
  1389. + If a variable is specified in the system environment and also in a
  1390. + lesskey file, the value in the lesskey file takes precedence.
  1391. + Although the lesskey file can be used to override variables set in the
  1392. + environment, the main purpose of assigning variables in the lesskey file
  1393. + is simply to have all 
  1394. + .I less
  1395. + configuration information stored in one file.
  1396. + 
  1397. + .SH EXAMPLE
  1398. + The following input file sets the -i flag whenever 
  1399. + .I less
  1400. + is run, and specifies the character set to be "latin1":
  1401. + .sp
  1402. + .nf
  1403. +     #env
  1404. +     LESS = -i
  1405. +     LESSCHARSET = latin1
  1406. + .fi
  1407. + .sp
  1408. + 
  1409.   .SH "SEE ALSO"
  1410.   less(1)
  1411. + 
  1412. + .SH WARNINGS
  1413. + It is not possible to specify special keys, such as uparrow, 
  1414. + in a keyboard-independent manner.
  1415. + The only way to specify such keys is to specify the escape sequence
  1416. + which a particular keyboard sends when such a keys is pressed.
  1417.   
  1418.   .SH COPYRIGHT
  1419.   Copyright (c) 1984,1985,1989,1994,1995  Mark Nudelman
  1420. diff -cbr orig/lsystem.c new/lsystem.c
  1421. *** orig/lsystem.c    Wed Feb 01 01:55:58 1995
  1422. --- new/lsystem.c    Thu Nov 09 10:36:46 1995
  1423. ***************
  1424. *** 110,116 ****
  1425.        */
  1426.   #if HAVE_SHELL
  1427.       p = NULL;
  1428. !     if ((shell = getenv("SHELL")) != NULL && *shell != '\0')
  1429.       {
  1430.           if (*cmd == '\0')
  1431.               p = save(shell);
  1432. --- 110,116 ----
  1433.        */
  1434.   #if HAVE_SHELL
  1435.       p = NULL;
  1436. !     if ((shell = lgetenv("SHELL")) != NULL && *shell != '\0')
  1437.       {
  1438.           if (*cmd == '\0')
  1439.               p = save(shell);
  1440. diff -cbr orig/main.c new/main.c
  1441. *** orig/main.c    Thu Nov 09 10:35:28 1995
  1442. --- new/main.c    Thu Nov 09 10:27:08 1995
  1443. ***************
  1444. *** 78,86 ****
  1445. --- 78,98 ----
  1446.   {
  1447.       IFILE ifile;
  1448.   
  1449. + #if OS2
  1450.   #ifdef __EMX__
  1451.       _response(&argc, &argv);
  1452.       _wildcard(&argc, &argv);
  1453. + #endif
  1454. +     if (isatty(0) && argc == 1)
  1455. +     {
  1456. +       extern char version[];
  1457. +       printf("\nless  version %s.\n", version);
  1458. +       printf("\nUsage: less [-[+]aABcCdeEfgimMnNqQruUsw] [-bN] [-hN] [-xN] [-[z]N]"
  1459. +              "\n            [-P[mM=]string] [-[lL]logfile] [-kkeyfile]"
  1460. +              "\n            [+cmd] [-ttag] [filename]...\n"
  1461. +              "\n   or: less -?\n", progname);
  1462. +       exit(1);
  1463. +     }
  1464.   #endif
  1465.   
  1466.       progname = *argv++;
  1467. diff -cbr orig/Makefile.dos new/makefile.dos
  1468. *** orig/Makefile.dos    Wed Feb 01 01:55:16 1995
  1469. --- new/makefile.dos    Thu Nov 09 10:36:46 1995
  1470. ***************
  1471. *** 6,21 ****
  1472.   CC = cl
  1473.   LIBDIR = \msc6.0\lib
  1474.   
  1475. ! CFLAGS = -O /Alfw
  1476.   LDFLAGS = -O
  1477. ! LIBS = ${LIBDIR}\llibce.lib ${LIBDIR}\graphics.lib
  1478.   
  1479.   #### End of system configuration section. ####
  1480.   
  1481.   # This rule allows us to supply the necessary -D options
  1482.   # in addition to whatever the user asks for.
  1483.   .c.obj:
  1484. !     ${CC} -c -I. ${CPPFLAGS} ${CFLAGS} $<
  1485.   
  1486.   SRC =    main.c doscreen.c brac.c ch.c charset.c cmdbuf.c command.c \
  1487.       decode.c edit.c filename.c forwback.c help.c ifile.c \
  1488. --- 6,21 ----
  1489.   CC = cl
  1490.   LIBDIR = \msc6.0\lib
  1491.   
  1492. ! CFLAGS = -O -Alfw
  1493.   LDFLAGS = -O
  1494. ! LIBS = $(LIBDIR)\llibce.lib $(LIBDIR)\graphics.lib
  1495.   
  1496.   #### End of system configuration section. ####
  1497.   
  1498.   # This rule allows us to supply the necessary -D options
  1499.   # in addition to whatever the user asks for.
  1500.   .c.obj:
  1501. !     $(CC) -c -I. $(CPPFLAGS) $(CFLAGS) $<
  1502.   
  1503.   SRC =    main.c doscreen.c brac.c ch.c charset.c cmdbuf.c command.c \
  1504.       decode.c edit.c filename.c forwback.c help.c ifile.c \
  1505. ***************
  1506. *** 30,48 ****
  1507.       position.obj prompt.obj search.obj signal.obj tags.obj \
  1508.       ttyin.obj version.obj
  1509.   
  1510. ! all: less lesskey
  1511.   
  1512.   # This is really horrible, but the command line is too long for 
  1513.   # MS-DOS if we try to link $(OBJ).
  1514. ! less: $(OBJ)
  1515. !     -del lesskey.obj
  1516.       $(CC) $(LDFLAGS) -o $@ *.obj $(LIBS)
  1517.   
  1518. ! lesskey: lesskey.obj version.obj
  1519.       $(CC) $(LDFLAGS) -o $@ lesskey.obj version.obj $(LIBS)
  1520.   
  1521.   defines.h: defines.dos
  1522. -     -del defines.h
  1523.       -copy defines.dos defines.h
  1524.   
  1525.   $(OBJ): less.h defines.h
  1526. --- 30,48 ----
  1527.       position.obj prompt.obj search.obj signal.obj tags.obj \
  1528.       ttyin.obj version.obj
  1529.   
  1530. ! all: less.exe lesskey.exe
  1531.   
  1532.   # This is really horrible, but the command line is too long for 
  1533.   # MS-DOS if we try to link $(OBJ).
  1534. ! less.exe: $(OBJ)
  1535. !     -ren lesskey.obj lesskey.obo
  1536.       $(CC) $(LDFLAGS) -o $@ *.obj $(LIBS)
  1537. +     -ren lesskey.obo lesskey.obj
  1538.   
  1539. ! lesskey.exe: lesskey.obj version.obj
  1540.       $(CC) $(LDFLAGS) -o $@ lesskey.obj version.obj $(LIBS)
  1541.   
  1542.   defines.h: defines.dos
  1543.       -copy defines.dos defines.h
  1544.   
  1545.   $(OBJ): less.h defines.h
  1546. diff -cbr orig/Makefile.in new/makefile.in
  1547. *** orig/Makefile.in    Mon Mar 13 23:41:54 1995
  1548. --- new/makefile.in    Thu Nov 09 10:36:46 1995
  1549. ***************
  1550. *** 116,123 ****
  1551.   lint:
  1552.       lint -I. ${CPPFLAGS} ${SRC}
  1553.   newfuncs:
  1554. !     mv -f funcs.h funcs.h.old
  1555. !     awk -f mkfuncs.awk ${SRC} >funcs.h
  1556.   clean:
  1557.       rm -f *.${O} core less lesskey
  1558.   
  1559. --- 116,123 ----
  1560.   lint:
  1561.       lint -I. ${CPPFLAGS} ${SRC}
  1562.   newfuncs:
  1563. !     mv -f ${srcdir}/funcs.h ${srcdir}/funcs.h.old
  1564. !     awk -f ${srcdir}/mkfuncs.awk ${SRC:%=${srcdir}/%} >${srcdir}/funcs.h
  1565.   clean:
  1566.       rm -f *.${O} core less lesskey
  1567.   
  1568. diff -cbr orig/Makefile.os2 new/makefile.os2
  1569. *** orig/Makefile.os2    Thu Nov 09 10:35:28 1995
  1570. --- new/makefile.os2    Thu Nov 09 10:36:46 1995
  1571. ***************
  1572. *** 11,20 ****
  1573.   
  1574.   #### End of system configuration section. ####
  1575.   
  1576. - .SUFFIXES: .c .$(O)
  1577. - 
  1578.   # This rule allows us to supply the necessary -D options
  1579.   # in addition to whatever the user asks for.
  1580.   .c.$(O):
  1581.       ${CC} -c ${CPPFLAGS} ${CFLAGS} $<
  1582.   
  1583. --- 11,20 ----
  1584.   
  1585.   #### End of system configuration section. ####
  1586.   
  1587.   # This rule allows us to supply the necessary -D options
  1588.   # in addition to whatever the user asks for.
  1589. + 
  1590. + .SUFFIXES: .c .$(O)
  1591.   .c.$(O):
  1592.       ${CC} -c ${CPPFLAGS} ${CFLAGS} $<
  1593.   
  1594. ***************
  1595. *** 23,29 ****
  1596.       help.$(O) ifile.$(O) input.$(O) jump.$(O) line.$(O) linenum.$(O) \
  1597.       lsystem.$(O) mark.$(O) optfunc.$(O) option.$(O) opttbl.$(O) os.$(O) \
  1598.       output.$(O) position.$(O) prompt.$(O) search.$(O) signal.$(O) \
  1599. !     tags.$(O) ttyin.$(O) version.$(O)  regexp.$(O)
  1600.   
  1601.   all:    less.exe lesskey.exe
  1602.   
  1603. --- 23,29 ----
  1604.       help.$(O) ifile.$(O) input.$(O) jump.$(O) line.$(O) linenum.$(O) \
  1605.       lsystem.$(O) mark.$(O) optfunc.$(O) option.$(O) opttbl.$(O) os.$(O) \
  1606.       output.$(O) position.$(O) prompt.$(O) search.$(O) signal.$(O) \
  1607. !     tags.$(O) ttyin.$(O) version.$(O) regexp.$(O) zfiles.$(O)
  1608.   
  1609.   all:    less.exe lesskey.exe
  1610.   
  1611. ***************
  1612. *** 31,37 ****
  1613.       $(CC) $(OBJ) -o $@ $(LDFLAGS) $(LIBS)
  1614.   
  1615.   lesskey.exe: lesskey.$(O) version.$(O)
  1616. !     $(CC) $(CFLAGS) lesskey.$(O) version.$(O) -o $@ $(LDFLAGS)
  1617.   
  1618.   $(OBJ): defines.h less.h
  1619.   
  1620. --- 31,37 ----
  1621.       $(CC) $(OBJ) -o $@ $(LDFLAGS) $(LIBS)
  1622.   
  1623.   lesskey.exe: lesskey.$(O) version.$(O)
  1624. !     $(CC) lesskey.$(O) version.$(O) -o $@ $(LDFLAGS)
  1625.   
  1626.   $(OBJ): defines.h less.h
  1627.   
  1628. diff -cbr orig/NEWS new/news
  1629. *** orig/NEWS    Sat Mar 11 03:46:58 1995
  1630. --- new/news    Thu Nov 09 10:36:48 1995
  1631. ***************
  1632. *** 1,3 ****
  1633. --- 1,12 ----
  1634. +     Major changes between "less" versions 290 and 291
  1635. + 
  1636. + * Less environment variables can be specified in lesskey files.
  1637. + 
  1638. + * Fixed MS-DOS build.
  1639. + 
  1640. + ======================================================================
  1641. + 
  1642. + 
  1643.       Major changes between "less" versions 278 and 290
  1644.   
  1645.   * Accepts GNU-style options "--help" and "--version".
  1646. diff -cbr orig/os.c new/os.c
  1647. *** orig/os.c    Wed Feb 01 01:56:06 1995
  1648. --- new/os.c    Thu Nov 09 10:36:48 1995
  1649. ***************
  1650. *** 177,183 ****
  1651. --- 177,187 ----
  1652.       register char *p;
  1653.       register char *m;
  1654.   #if HAVE_ERRNO
  1655. + #if MSOFTC
  1656. +     /* errno is declared in errno.h */
  1657. + #else
  1658.       extern int errno;
  1659. + #endif
  1660.       p = strerror(errno);
  1661.   #else
  1662.       p = "cannot open";
  1663. diff -cbr orig/README new/readme
  1664. *** orig/README    Tue Apr 18 09:34:36 1995
  1665. --- new/readme    Thu Nov 09 10:37:20 1995
  1666. ***************
  1667. *** 1,5 ****
  1668.   =======================================================================
  1669. ! ===        NOTE: THIS IS A DISTRIBUTION OF less (version 290)       ===
  1670.   ===    PLEASE REPORT ANY PROBLEMS TO THE AUTHOR AT markn@3do.com.   ===
  1671.   =======================================================================
  1672.   
  1673. --- 1,5 ----
  1674.   =======================================================================
  1675. ! ===        NOTE: THIS IS A DISTRIBUTION OF less (version 291)       ===
  1676.   ===    PLEASE REPORT ANY PROBLEMS TO THE AUTHOR AT markn@3do.com.   ===
  1677.   =======================================================================
  1678.   
  1679. ***************
  1680. *** 125,127 ****
  1681. --- 125,132 ----
  1682.      lesskey.exe and less.hlp in a directory which is included in 
  1683.      your PATH.
  1684.   
  1685. + 9. Make sure, you have the emx runtime installed. You need the emx DLL's
  1686. +    emx.dll and emxlibcs.dll an also the termcap database, termcap.dat.
  1687. +    Make sure you have termcap.dat either in the default location or
  1688. +    or somewhere in a directory listed in the PATH or INIT environment 
  1689. +    variables.
  1690. diff -cbr orig/screen.c new/screen.c
  1691. *** orig/screen.c    Thu Nov 09 10:35:44 1995
  1692. --- new/screen.c    Thu Nov 09 10:46:12 1995
  1693. ***************
  1694. *** 133,139 ****
  1695.   
  1696.   extern int quiet;        /* If VERY_QUIET, use visual bell for bell */
  1697.   extern int know_dumb;        /* Don't complain about a dumb terminal */
  1698. ! extern int back_scroll;
  1699.   extern int swindow;
  1700.   extern int no_init;
  1701.   #if HILITE_SEARCH
  1702. --- 133,139 ----
  1703.   
  1704.   extern int quiet;        /* If VERY_QUIET, use visual bell for bell */
  1705.   extern int know_dumb;        /* Don't complain about a dumb terminal */
  1706. ! extern int no_back_scroll;
  1707.   extern int swindow;
  1708.   extern int no_init;
  1709.   #if HILITE_SEARCH
  1710. ***************
  1711. *** 461,467 ****
  1712.       else
  1713.   #endif
  1714.   #endif
  1715. !     if ((s = getenv("LINES")) != NULL)
  1716.           sc_height = atoi(s);
  1717.       else
  1718.            sc_height = tgetnum("li");
  1719. --- 461,467 ----
  1720.       else
  1721.   #endif
  1722.   #endif
  1723. !     if ((s = lgetenv("LINES")) != NULL)
  1724.           sc_height = atoi(s);
  1725.       else
  1726.            sc_height = tgetnum("li");
  1727. ***************
  1728. *** 479,485 ****
  1729.       else
  1730.   #endif
  1731.   #endif
  1732. !     if ((s = getenv("COLUMNS")) != NULL)
  1733.           sc_width = atoi(s);
  1734.       else
  1735.            sc_width = tgetnum("co");
  1736. --- 479,485 ----
  1737.       else
  1738.   #endif
  1739.   #endif
  1740. !     if ((s = lgetenv("COLUMNS")) != NULL)
  1741.           sc_width = atoi(s);
  1742.       else
  1743.            sc_width = tgetnum("co");
  1744. ***************
  1745. *** 575,580 ****
  1746. --- 575,581 ----
  1747.       sp = tbuf;
  1748.       if ((s = tgetstr("kh", &sp)) != NULL) 
  1749.       {
  1750. +         put_fcmd(s, A_GOLINE);
  1751.           put_ecmd(s, EC_HOME);
  1752.       }
  1753.   
  1754. ***************
  1755. *** 582,587 ****
  1756. --- 583,589 ----
  1757.       sp = tbuf;
  1758.       if ((s = tgetstr("@7", &sp)) != NULL) 
  1759.       {
  1760. +         put_fcmd(s, A_GOEND);
  1761.           put_ecmd(s, EC_END);
  1762.       }
  1763.   
  1764. ***************
  1765. *** 613,620 ****
  1766.       /*
  1767.        * Register the two tables.
  1768.        */
  1769. !     add_fcmd_table(kfcmdtable, sz_kfcmdtable);
  1770. !     add_ecmd_table(kecmdtable, sz_kecmdtable);
  1771.   }
  1772.   
  1773.   #if DEBUG
  1774. --- 615,622 ----
  1775.       /*
  1776.        * Register the two tables.
  1777.        */
  1778. !     insert_fcmd_table(kfcmdtable, sz_kfcmdtable);
  1779. !     insert_ecmd_table(kecmdtable, sz_kecmdtable);
  1780.   }
  1781.   
  1782.   #if DEBUG
  1783. ***************
  1784. *** 664,675 ****
  1785.       char termbuf[2048];
  1786.   
  1787.       static char sbuf[1024];
  1788.   
  1789.   #ifdef OS2
  1790.       /*
  1791.        * Make sure the termcap database is available.
  1792.        */
  1793. !     sp = getenv("TERMCAP");
  1794.       if (sp == NULL || *sp == '\0')
  1795.       {
  1796.           char *termcap;
  1797. --- 666,678 ----
  1798.       char termbuf[2048];
  1799.   
  1800.       static char sbuf[1024];
  1801. +     PARG parg;
  1802.   
  1803.   #ifdef OS2
  1804.       /*
  1805.        * Make sure the termcap database is available.
  1806.        */
  1807. !     sp = lgetenv("TERMCAP");
  1808.       if (sp == NULL || *sp == '\0')
  1809.       {
  1810.           char *termcap;
  1811. ***************
  1812. *** 685,695 ****
  1813.       /*
  1814.        * Find out what kind of terminal this is.
  1815.        */
  1816. !      if ((term = getenv("TERM")) == NULL)
  1817.            term = DEFAULT_TERM;
  1818. !      if (tgetent(termbuf, term) <= 0)
  1819.            strcpy(termbuf, "dumb:hc:");
  1820.   
  1821.        hard = tgetflag("hc");
  1822.   
  1823.       /*
  1824. --- 688,708 ----
  1825.       /*
  1826.        * Find out what kind of terminal this is.
  1827.        */
  1828. !      if ((term = lgetenv("TERM")) == NULL)
  1829.            term = DEFAULT_TERM;
  1830. !     /*Borrow "hard" here to output error messages */
  1831. !      if ((hard = tgetent(termbuf, term)) <= 0)
  1832.            strcpy(termbuf, "dumb:hc:");
  1833.   
  1834. +     if (hard == 0 && !know_dumb)
  1835. +     {
  1836. +       parg.p_string = term;      
  1837. +       error("WARNING: terminal \"%s\" not found in termcap database.",&parg);
  1838. +     }
  1839. +     else if (hard == -1 && !know_dumb)
  1840. +       error("WARNING: The termcap database was not found.",NULL_PARG);
  1841. +          
  1842. +     /* hard now goes back to its original purpose.... */
  1843.        hard = tgetflag("hc");
  1844.   
  1845.       /*
  1846. ***************
  1847. *** 910,916 ****
  1848.           /*
  1849.            * Force repaint on any backward movement.
  1850.            */
  1851. !         back_scroll = 0;
  1852.       }
  1853.   }
  1854.   
  1855. --- 923,929 ----
  1856.           /*
  1857.            * Force repaint on any backward movement.
  1858.            */
  1859. !               no_back_scroll = 1;
  1860.       }
  1861.   }
  1862.   
  1863. diff -cbr orig/ttyin.c new/ttyin.c
  1864. *** orig/ttyin.c    Thu Nov 09 10:35:44 1995
  1865. --- new/ttyin.c    Mon Apr 10 10:06:00 1995
  1866. ***************
  1867. *** 83,93 ****
  1868.               return (READ_INTR);
  1869.   #else
  1870.   #if OS2
  1871.           flush();
  1872. !         while (_read_kbd(0, 0, 0) != -1)
  1873. !             continue;
  1874.           if ((c = _read_kbd(0, 1, 0)) == -1)
  1875. !             return (READ_INTR);
  1876.           result = 1;
  1877.   #else
  1878.           result = iread(tty, &c, sizeof(char));
  1879. --- 83,104 ----
  1880.               return (READ_INTR);
  1881.   #else
  1882.   #if OS2
  1883. +           static int scan = -1;
  1884.           flush();
  1885. !         if (scan != -1)
  1886. !         {
  1887. !             c = scan;
  1888. !             scan = -1;
  1889. !         }
  1890. !         else
  1891. !         {
  1892. !               /* while ( _read_kbd(0, 0, 0) != -1)
  1893. !                    continue; */
  1894.           if ((c = _read_kbd(0, 1, 0)) == -1)
  1895. !                   return READ_INTR;
  1896. !             if (c == 0 && (scan = _read_kbd(0, 0, 0)) != -1)
  1897. !                   c = 0xE0;
  1898. !         }
  1899.           result = 1;
  1900.   #else
  1901.           result = iread(tty, &c, sizeof(char));
  1902. diff -cbr orig/version.c new/version.c
  1903. *** orig/version.c    Tue Mar 14 00:07:06 1995
  1904. --- new/version.c    Thu Nov 09 10:36:50 1995
  1905. ***************
  1906. *** 507,513 ****
  1907.           hilite_line more than once.
  1908.   v290   3/9/95    Make configure automatically.  Fix Sequent problem
  1909.           with incompatible sigsetmask().
  1910.   
  1911.   */
  1912.   
  1913. ! char version[] = "290";
  1914. --- 507,516 ----
  1915.           hilite_line more than once.
  1916.   v290   3/9/95    Make configure automatically.  Fix Sequent problem
  1917.           with incompatible sigsetmask().
  1918. +         Posted to prep.ai.mit.edu
  1919. + -----------------------------------------------------------------
  1920. + v291   3/21/95    Add #env to lesskey.  Fix MS-DOS build.
  1921.   
  1922.   */
  1923.   
  1924. ! char version[] = "291";
  1925.