contrib/less/less.h

   1 /*
   2  * Copyright (C) 1984-2022  Mark Nudelman
   3  *
   4  * You may distribute under the terms of either the GNU General Public
   5  * License or the Less License, as specified in the README file.
   6  *
   7  * For more information, see the README file.
   8  */
   9
  10 #define NEWBOT 1
  11
  12 /*
  13  * Standard include file for "less".
  14  */
  15
  16 /*
  17  * Defines for MSDOS_COMPILER.
  18  */
  19 #define MSOFTC          1   /* Microsoft C */
  20 #define BORLANDC        2   /* Borland C */
  21 #define WIN32C          3   /* Windows (Borland C or Microsoft C) */
  22 #define DJGPPC          4   /* DJGPP C */
  23
  24 /*
  25  * Include the file of compile-time options.
  26  * The <> make cc search for it in -I., not srcdir.
  27  */
  28 #include <defines.h>
  29
  30 #ifdef _SEQUENT_
  31 /*
  32  * Kludge for Sequent Dynix systems that have sigsetmask, but
  33  * it's not compatible with the way less calls it.
  34  * {{ Do other systems need this? }}
  35  */
  36 #undef HAVE_SIGSETMASK
  37 #endif
  38
  39 /*
  40  * Language details.
  41  */
  42 #if HAVE_ANSI_PROTOS
  43 #define LESSPARAMS(a) a
  44 #else
  45 #define LESSPARAMS(a) ()
  46 #endif
  47 #if HAVE_VOID
  48 #define VOID_POINTER    void *
  49 #define VOID_PARAM      void
  50 #else
  51 #define VOID_POINTER    char *
  52 #define VOID_PARAM
  53 #define void  int
  54 #endif
  55 #if HAVE_CONST
  56 #define constant        const
  57 #else
  58 #define constant
  59 #endif
  60
  61 #define public          /* PUBLIC FUNCTION */
  62
  63 /* Library function declarations */
  64
  65 #if HAVE_SYS_TYPES_H
  66 #include <sys/types.h>
  67 #endif
  68 #if HAVE_STDIO_H
  69 #include <stdio.h>
  70 #endif
  71 #if HAVE_FCNTL_H
  72 #include <fcntl.h>
  73 #endif
  74 #if HAVE_UNISTD_H
  75 #include <unistd.h>
  76 #endif
  77 #if HAVE_CTYPE_H
  78 #include <ctype.h>
  79 #endif
  80 #if HAVE_WCTYPE_H
  81 #include <wctype.h>
  82 #endif
  83 #if HAVE_LIMITS_H
  84 #include <limits.h>
  85 #endif
  86 #if HAVE_STDLIB_H
  87 #include <stdlib.h>
  88 #endif
  89 #if HAVE_STRING_H
  90 #include <string.h>
  91 #endif
  92
  93 /* OS-specific includes */
  94 #ifdef _OSK
  95 #include <modes.h>
  96 #include <strings.h>
  97 #endif
  98
  99 #ifdef __TANDEM
 100 #include <floss.h>
 101 #endif
 102
 103 #if MSDOS_COMPILER==WIN32C || OS2
 104 #include <io.h>
 105 #endif
 106
 107 #if MSDOS_COMPILER==DJGPPC
 108 #include <io.h>
 109 #include <sys/exceptn.h>
 110 #include <conio.h>
 111 #include <pc.h>
 112 #endif
 113
 114 #if !HAVE_STDLIB_H
 115 char *getenv();
 116 off_t lseek();
 117 VOID_POINTER calloc();
 118 void free();
 119 #endif
 120
 121 /*
 122  * Simple lowercase test which can be used during option processing
 123  * (before options are parsed which might tell us what charset to use).
 124  */
 125 #define ASCII_IS_UPPER(c)       ((c) >= 'A' && (c) <= 'Z')
 126 #define ASCII_IS_LOWER(c)       ((c) >= 'a' && (c) <= 'z')
 127 #define ASCII_TO_UPPER(c)       ((c) - 'a' + 'A')
 128 #define ASCII_TO_LOWER(c)       ((c) - 'A' + 'a')
 129
 130 #undef IS_UPPER
 131 #undef IS_LOWER
 132 #undef TO_UPPER
 133 #undef TO_LOWER
 134 #undef IS_SPACE
 135 #undef IS_DIGIT
 136
 137 #if HAVE_WCTYPE
 138 #define IS_UPPER(c)     iswupper(c)
 139 #define IS_LOWER(c)     iswlower(c)
 140 #define TO_UPPER(c)     towupper(c)
 141 #define TO_LOWER(c)     towlower(c)
 142 #else
 143 #if HAVE_UPPER_LOWER
 144 #define IS_UPPER(c)     isupper((unsigned char) (c))
 145 #define IS_LOWER(c)     islower((unsigned char) (c))
 146 #define TO_UPPER(c)     toupper((unsigned char) (c))
 147 #define TO_LOWER(c)     tolower((unsigned char) (c))
 148 #else
 149 #define IS_UPPER(c)     ASCII_IS_UPPER(c)
 150 #define IS_LOWER(c)     ASCII_IS_LOWER(c)
 151 #define TO_UPPER(c)     ASCII_TO_UPPER(c)
 152 #define TO_LOWER(c)     ASCII_TO_LOWER(c)
 153 #endif
 154 #endif
 155
 156 #ifdef isspace
 157 #define IS_SPACE(c)     isspace((unsigned char)(c))
 158 #else
 159 #define IS_SPACE(c)     ((c) == ' ' || (c) == '\t' || (c) == '\n' || (c) == '\r' || (c) == '\f')
 160 #endif
 161
 162 #ifdef isdigit
 163 #define IS_DIGIT(c)     isdigit((unsigned char)(c))
 164 #else
 165 #define IS_DIGIT(c)     ((c) >= '0' && (c) <= '9')
 166 #endif
 167
 168 #define IS_CSI_START(c) (((LWCHAR)(c)) == ESC || (((LWCHAR)(c)) == CSI))
 169
 170 #ifndef NULL
 171 #define NULL    0
 172 #endif
 173
 174 #ifndef TRUE
 175 #define TRUE            1
 176 #endif
 177 #ifndef FALSE
 178 #define FALSE           0
 179 #endif
 180
 181 #define OPT_OFF         0
 182 #define OPT_ON          1
 183 #define OPT_ONPLUS      2
 184
 185 #if !HAVE_MEMCPY
 186 #ifndef memcpy
 187 #define memcpy(to,from,len)     bcopy((from),(to),(len))
 188 #endif
 189 #endif
 190
 191 #if HAVE_SNPRINTF
 192 #define SNPRINTF1(str, size, fmt, v1)             snprintf((str), (size), (fmt), (v1))
 193 #define SNPRINTF2(str, size, fmt, v1, v2)         snprintf((str), (size), (fmt), (v1), (v2))
 194 #define SNPRINTF3(str, size, fmt, v1, v2, v3)     snprintf((str), (size), (fmt), (v1), (v2), (v3))
 195 #define SNPRINTF4(str, size, fmt, v1, v2, v3, v4) snprintf((str), (size), (fmt), (v1), (v2), (v3), (v4))
 196 #else
 197 /* Use unsafe sprintf if we don't have snprintf. */
 198 #define SNPRINTF1(str, size, fmt, v1)             sprintf((str), (fmt), (v1))
 199 #define SNPRINTF2(str, size, fmt, v1, v2)         sprintf((str), (fmt), (v1), (v2))
 200 #define SNPRINTF3(str, size, fmt, v1, v2, v3)     sprintf((str), (fmt), (v1), (v2), (v3))
 201 #define SNPRINTF4(str, size, fmt, v1, v2, v3, v4) sprintf((str), (fmt), (v1), (v2), (v3), (v4))
 202 #endif
 203
 204 #define BAD_LSEEK       ((off_t)-1)
 205
 206 #ifndef SEEK_SET
 207 #define SEEK_SET 0
 208 #endif
 209 #ifndef SEEK_END
 210 #define SEEK_END 2
 211 #endif
 212
 213 #ifndef CHAR_BIT
 214 #define CHAR_BIT 8
 215 #endif
 216
 217 /*
 218  * Upper bound on the string length of an integer converted to string.
 219  * 302 / 1000 is ceil (log10 (2.0)).  Subtract 1 for the sign bit;
 220  * add 1 for integer division truncation; add 1 more for a minus sign.
 221  */
 222 #define INT_STRLEN_BOUND(t) ((sizeof(t) * CHAR_BIT - 1) * 302 / 1000 + 1 + 1)
 223
 224 /*
 225  * Special types and constants.
 226  */
 227 typedef unsigned long LWCHAR;
 228 typedef off_t           POSITION;
 229 typedef off_t           LINENUM;
 230 #define MIN_LINENUM_WIDTH   7   /* Default min printing width of a line number */
 231 #define MAX_LINENUM_WIDTH   16  /* Max width of a line number */
 232 #define MAX_STATUSCOL_WIDTH 4   /* Max width of the status column */
 233 #define MAX_UTF_CHAR_LEN    6   /* Max bytes in one UTF-8 char */
 234 #define MAX_PRCHAR_LEN      31  /* Max chars in prchar() result */
 235
 236 #define NULL_POSITION   ((POSITION)(-1))
 237
 238 /*
 239  * Flags for open()
 240  */
 241 #if MSDOS_COMPILER || OS2
 242 #define OPEN_READ       (O_RDONLY|O_BINARY)
 243 #else
 244 #ifdef _OSK
 245 #define OPEN_READ       (S_IREAD)
 246 #else
 247 #ifdef O_RDONLY
 248 #define OPEN_READ       (O_RDONLY)
 249 #else
 250 #define OPEN_READ       (0)
 251 #endif
 252 #endif
 253 #endif
 254
 255 #if defined(O_WRONLY) && defined(O_APPEND)
 256 #define OPEN_APPEND     (O_APPEND|O_WRONLY)
 257 #else
 258 #ifdef _OSK
 259 #define OPEN_APPEND     (S_IWRITE)
 260 #else
 261 #define OPEN_APPEND     (1)
 262 #endif
 263 #endif
 264
 265 /*
 266  * Set a file descriptor to binary mode.
 267  */
 268 #if MSDOS_COMPILER==MSOFTC
 269 #define SET_BINARY(f)   _setmode(f, _O_BINARY);
 270 #else
 271 #if MSDOS_COMPILER || OS2
 272 #define SET_BINARY(f)   setmode(f, O_BINARY)
 273 #else
 274 #define SET_BINARY(f)
 275 #endif
 276 #endif
 277
 278 /*
 279  * Does the shell treat "?" as a metacharacter?
 280  */
 281 #if MSDOS_COMPILER || OS2 || _OSK
 282 #define SHELL_META_QUEST 0
 283 #else
 284 #define SHELL_META_QUEST 1
 285 #endif
 286
 287 #define SPACES_IN_FILENAMES 1
 288
 289 /*
 290  * An IFILE represents an input file.
 291  */
 292 #define IFILE           VOID_POINTER
 293 #define NULL_IFILE      ((IFILE)NULL)
 294
 295 /*
 296  * The structure used to represent a "screen position".
 297  * This consists of a file position, and a screen line number.
 298  * The meaning is that the line starting at the given file
 299  * position is displayed on the ln-th line of the screen.
 300  * (Screen lines before ln are empty.)
 301  */
 302 struct scrpos
 303 {
 304         POSITION pos;
 305         int ln;
 306 };
 307
 308 typedef union parg
 309 {
 310         char *p_string;
 311         int p_int;
 312         LINENUM p_linenum;
 313         char p_char;
 314 } PARG;
 315
 316 #define NULL_PARG       ((PARG *)NULL)
 317
 318 struct textlist
 319 {
 320         char *string;
 321         char *endstring;
 322 };
 323
 324 struct wchar_range
 325 {
 326         LWCHAR first, last;
 327 };
 328
 329 struct wchar_range_table
 330 {
 331         struct wchar_range *table;
 332         int count;
 333 };
 334
 335 #define EOI             (-1)
 336
 337 #define READ_INTR       (-2)
 338
 339 /* A fraction is represented by an int n; the fraction is n/NUM_FRAC_DENOM */
 340 #define NUM_FRAC_DENOM                  1000000
 341 #define NUM_LOG_FRAC_DENOM              6
 342
 343 /* How quiet should we be? */
 344 #define NOT_QUIET       0       /* Ring bell at eof and for errors */
 345 #define LITTLE_QUIET    1       /* Ring bell only for errors */
 346 #define VERY_QUIET      2       /* Never ring bell */
 347
 348 /* How should we prompt? */
 349 #define PR_SHORT        0       /* Prompt with colon */
 350 #define PR_MEDIUM       1       /* Prompt with message */
 351 #define PR_LONG         2       /* Prompt with longer message */
 352
 353 /* How should we handle backspaces? */
 354 #define BS_SPECIAL      0       /* Do special things for underlining and bold */
 355 #define BS_NORMAL       1       /* \b treated as normal char; actually output */
 356 #define BS_CONTROL      2       /* \b treated as control char; prints as ^H */
 357
 358 /* How should we search? */
 359 #define SRCH_FORW       (1 << 0)  /* Search forward from current position */
 360 #define SRCH_BACK       (1 << 1)  /* Search backward from current position */
 361 #define SRCH_NO_MOVE    (1 << 2)  /* Highlight, but don't move */
 362 #define SRCH_INCR       (1 << 3)  /* Incremental search */
 363 #define SRCH_FIND_ALL   (1 << 4)  /* Find and highlight all matches */
 364 #define SRCH_NO_MATCH   (1 << 8)  /* Search for non-matching lines */
 365 #define SRCH_PAST_EOF   (1 << 9)  /* Search past end-of-file, into next file */
 366 #define SRCH_FIRST_FILE (1 << 10) /* Search starting at the first file */
 367 #define SRCH_NO_REGEX   (1 << 12) /* Don't use regular expressions */
 368 #define SRCH_FILTER     (1 << 13) /* Search is for '&' (filter) command */
 369 #define SRCH_AFTER_TARGET (1 << 14) /* Start search after the target line */
 370 #define SRCH_WRAP       (1 << 15) /* Wrap-around search (continue at BOF/EOF) */
 371
 372 #define SRCH_REVERSE(t) (((t) & SRCH_FORW) ? \
 373                                 (((t) & ~SRCH_FORW) | SRCH_BACK) : \
 374                                 (((t) & ~SRCH_BACK) | SRCH_FORW))
 375
 376 /* */
 377 #define NO_MCA          0
 378 #define MCA_DONE        1
 379 #define MCA_MORE        2
 380
 381 #define CC_OK           0       /* Char was accepted & processed */
 382 #define CC_QUIT         1       /* Char was a request to abort current cmd */
 383 #define CC_ERROR        2       /* Char could not be accepted due to error */
 384 #define CC_PASS         3       /* Char was rejected (internal) */
 385
 386 #define CF_QUIT_ON_ERASE 0001   /* Abort cmd if its entirely erased */
 387
 388 /* Special char bit-flags used to tell put_line() to do something special */
 389 #define AT_NORMAL       (0)
 390 #define AT_UNDERLINE    (1 << 0)
 391 #define AT_BOLD         (1 << 1)
 392 #define AT_BLINK        (1 << 2)
 393 #define AT_STANDOUT     (1 << 3)
 394 #define AT_ANSI         (1 << 4)  /* Content-supplied "ANSI" escape sequence */
 395 #define AT_BINARY       (1 << 5)  /* LESS*BINFMT representation */
 396 #define AT_HILITE       (1 << 6)  /* Internal highlights (e.g., for search) */
 397
 398 #define AT_COLOR_SHIFT    8
 399 #define AT_NUM_COLORS     16
 400 #define AT_COLOR          ((AT_NUM_COLORS-1) << AT_COLOR_SHIFT)
 401 #define AT_COLOR_ATTN     (1 << AT_COLOR_SHIFT)
 402 #define AT_COLOR_BIN      (2 << AT_COLOR_SHIFT)
 403 #define AT_COLOR_CTRL     (3 << AT_COLOR_SHIFT)
 404 #define AT_COLOR_ERROR    (4 << AT_COLOR_SHIFT)
 405 #define AT_COLOR_LINENUM  (5 << AT_COLOR_SHIFT)
 406 #define AT_COLOR_MARK     (6 << AT_COLOR_SHIFT)
 407 #define AT_COLOR_PROMPT   (7 << AT_COLOR_SHIFT)
 408 #define AT_COLOR_RSCROLL  (8 << AT_COLOR_SHIFT)
 409 #define AT_COLOR_SEARCH   (9 << AT_COLOR_SHIFT)
 410 #define AT_COLOR_HEADER   (11 << AT_COLOR_SHIFT)
 411
 412 typedef enum { CT_NULL, CT_4BIT, CT_6BIT } COLOR_TYPE;
 413
 414 typedef enum {
 415         CV_BLUE     = 1,
 416         CV_GREEN    = 2,
 417         CV_RED      = 4,
 418         CV_BRIGHT   = 8,
 419         CV_NOCHANGE = -2,
 420         CV_ERROR    = -1
 421 } COLOR_VALUE;
 422
 423 /* ANSI states */
 424 #define ANSI_MID    1
 425 #define ANSI_ERR    2
 426 #define ANSI_END    3
 427
 428 #if '0' == 240
 429 #define IS_EBCDIC_HOST 1
 430 #endif
 431
 432 #if IS_EBCDIC_HOST
 433 /*
 434  * Long definition for EBCDIC.
 435  * Since the argument is usually a constant, this macro normally compiles
 436  * into a constant.
 437  */
 438 #define CONTROL(c) ( \
 439         (c)=='[' ? '\047' : \
 440         (c)=='a' ? '\001' : \
 441         (c)=='b' ? '\002' : \
 442         (c)=='c' ? '\003' : \
 443         (c)=='d' ? '\067' : \
 444         (c)=='e' ? '\055' : \
 445         (c)=='f' ? '\056' : \
 446         (c)=='g' ? '\057' : \
 447         (c)=='h' ? '\026' : \
 448         (c)=='i' ? '\005' : \
 449         (c)=='j' ? '\025' : \
 450         (c)=='k' ? '\013' : \
 451         (c)=='l' ? '\014' : \
 452         (c)=='m' ? '\015' : \
 453         (c)=='n' ? '\016' : \
 454         (c)=='o' ? '\017' : \
 455         (c)=='p' ? '\020' : \
 456         (c)=='q' ? '\021' : \
 457         (c)=='r' ? '\022' : \
 458         (c)=='s' ? '\023' : \
 459         (c)=='t' ? '\074' : \
 460         (c)=='u' ? '\075' : \
 461         (c)=='v' ? '\062' : \
 462         (c)=='w' ? '\046' : \
 463         (c)=='x' ? '\030' : \
 464         (c)=='y' ? '\031' : \
 465         (c)=='z' ? '\077' : \
 466         (c)=='A' ? '\001' : \
 467         (c)=='B' ? '\002' : \
 468         (c)=='C' ? '\003' : \
 469         (c)=='D' ? '\067' : \
 470         (c)=='E' ? '\055' : \
 471         (c)=='F' ? '\056' : \
 472         (c)=='G' ? '\057' : \
 473         (c)=='H' ? '\026' : \
 474         (c)=='I' ? '\005' : \
 475         (c)=='J' ? '\025' : \
 476         (c)=='K' ? '\013' : \
 477         (c)=='L' ? '\014' : \
 478         (c)=='M' ? '\015' : \
 479         (c)=='N' ? '\016' : \
 480         (c)=='O' ? '\017' : \
 481         (c)=='P' ? '\020' : \
 482         (c)=='Q' ? '\021' : \
 483         (c)=='R' ? '\022' : \
 484         (c)=='S' ? '\023' : \
 485         (c)=='T' ? '\074' : \
 486         (c)=='U' ? '\075' : \
 487         (c)=='V' ? '\062' : \
 488         (c)=='W' ? '\046' : \
 489         (c)=='X' ? '\030' : \
 490         (c)=='Y' ? '\031' : \
 491         (c)=='Z' ? '\077' : \
 492         (c)=='|' ? '\031' : \
 493         (c)=='\\' ? '\034' : \
 494         (c)=='^' ? '\036' : \
 495         (c)&077)
 496 #else
 497 #define CONTROL(c)      ((c)&037)
 498 #endif /* IS_EBCDIC_HOST */
 499
 500 #define ESC             CONTROL('[')
 501 #define ESCS            "\33"
 502 #define CSI             ((unsigned char)'\233')
 503 #define CHAR_END_COMMAND 0x40000000
 504
 505 #if _OSK_MWC32
 506 #define LSIGNAL(sig,func)       os9_signal(sig,func)
 507 #else
 508 #define LSIGNAL(sig,func)       signal(sig,func)
 509 #endif
 510
 511 #if HAVE_SIGPROCMASK
 512 #if HAVE_SIGSET_T
 513 #else
 514 #undef HAVE_SIGPROCMASK
 515 #endif
 516 #endif
 517 #if HAVE_SIGPROCMASK
 518 #if HAVE_SIGEMPTYSET
 519 #else
 520 #undef  sigemptyset
 521 #define sigemptyset(mp) *(mp) = 0
 522 #endif
 523 #endif
 524
 525 #define S_INTERRUPT     01
 526 #define S_STOP          02
 527 #define S_WINCH         04
 528 #define ABORT_SIGS()    (sigs & (S_INTERRUPT|S_STOP))
 529
 530 #define QUIT_OK         0
 531 #define QUIT_ERROR      1
 532 #define QUIT_INTERRUPT  2
 533 #define QUIT_SAVED_STATUS (-1)
 534
 535 #define FOLLOW_DESC     0
 536 #define FOLLOW_NAME     1
 537
 538 /* filestate flags */
 539 #define CH_CANSEEK      001
 540 #define CH_KEEPOPEN     002
 541 #define CH_POPENED      004
 542 #define CH_HELPFILE     010
 543 #define CH_NODATA       020     /* Special case for zero length files */
 544
 545 #define ch_zero()       ((POSITION)0)
 546
 547 #define FAKE_HELPFILE   "@/\\less/\\help/\\file/\\@"
 548 #define FAKE_EMPTYFILE  "@/\\less/\\empty/\\file/\\@"
 549
 550 /* Flags for cvt_text */
 551 #define CVT_TO_LC       01      /* Convert upper-case to lower-case */
 552 #define CVT_BS          02      /* Do backspace processing */
 553 #define CVT_CRLF        04      /* Remove CR after LF */
 554 #define CVT_ANSI        010     /* Remove ANSI escape sequences */
 555
 556 #if HAVE_TIME_T
 557 #define time_type       time_t
 558 #else
 559 #define time_type       long
 560 #endif
 561
 562 /* X11 mouse reporting definitions */
 563 #define X11MOUSE_BUTTON1    0 /* Left button press */
 564 #define X11MOUSE_BUTTON2    1 /* Middle button press */
 565 #define X11MOUSE_BUTTON3    2 /* Right button press */
 566 #define X11MOUSE_BUTTON_REL 3 /* Button release */
 567 #define X11MOUSE_WHEEL_UP   0x40 /* Wheel scroll up */
 568 #define X11MOUSE_WHEEL_DOWN 0x41 /* Wheel scroll down */
 569 #define X11MOUSE_OFFSET     0x20 /* Added to button & pos bytes to create a char */
 570
 571 struct mlist;
 572 struct loption;
 573 struct hilite_tree;
 574 struct ansi_state;
 575 #include "pattern.h"
 576 #include "xbuf.h"
 577 #include "funcs.h"
 578
 579 /* Functions not included in funcs.h */
 580 void postoa LESSPARAMS ((POSITION, char*));
 581 void linenumtoa LESSPARAMS ((LINENUM, char*));
 582 void inttoa LESSPARAMS ((int, char*));
 583 int lstrtoi LESSPARAMS ((char*, char**));
 584 POSITION lstrtopos LESSPARAMS ((char*, char**));
 585 #if MSDOS_COMPILER==WIN32C
 586 int pclose LESSPARAMS ((FILE*));
 587 #endif