ncurses/tinfo/read_entry.c

   1 /****************************************************************************
   2  * Copyright (c) 1998-2016,2017 Free Software Foundation, Inc.              *
   3  *                                                                          *
   4  * Permission is hereby granted, free of charge, to any person obtaining a  *
   5  * copy of this software and associated documentation files (the            *
   6  * "Software"), to deal in the Software without restriction, including      *
   7  * without limitation the rights to use, copy, modify, merge, publish,      *
   8  * distribute, distribute with modifications, sublicense, and/or sell       *
   9  * copies of the Software, and to permit persons to whom the Software is    *
  10  * furnished to do so, subject to the following conditions:                 *
  11  *                                                                          *
  12  * The above copyright notice and this permission notice shall be included  *
  13  * in all copies or substantial portions of the Software.                   *
  14  *                                                                          *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
  16  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
  17  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
  18  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
  19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
  20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
  21  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
  22  *                                                                          *
  23  * Except as contained in this notice, the name(s) of the above copyright   *
  24  * holders shall not be used in advertising or otherwise to promote the     *
  25  * sale, use or other dealings in this Software without prior written       *
  26  * authorization.                                                           *
  27  ****************************************************************************/
  28
  29 /****************************************************************************
  30  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
  31  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
  32  *     and: Thomas E. Dickey                        1996-on                 *
  33  ****************************************************************************/
  34
  35 /*
  36  *      read_entry.c -- Routine for reading in a compiled terminfo file
  37  */
  38
  39 #include <curses.priv.h>
  40 #include <hashed_db.h>
  41
  42 #include <tic.h>
  43
  44 MODULE_ID("$Id: read_entry.c,v 1.140 2017/02/05 01:49:55 tom Exp $")
  45
  46 #define TYPE_CALLOC(type,elts) typeCalloc(type, (unsigned)(elts))
  47
  48 #define MyNumber(n) (short) LOW_MSB(n)
  49
  50 #if NCURSES_USE_DATABASE
  51 static void
  52 convert_shorts(char *buf, short *Numbers, int count)
  53 {
  54     int i;
  55     for (i = 0; i < count; i++) {
  56         if (IS_NEG1(buf + 2 * i))
  57             Numbers[i] = ABSENT_NUMERIC;
  58         else if (IS_NEG2(buf + 2 * i))
  59             Numbers[i] = CANCELLED_NUMERIC;
  60         else
  61             Numbers[i] = MyNumber(buf + 2 * i);
  62         TR(TRACE_DATABASE, ("get Numbers[%d]=%d", i, Numbers[i]));
  63     }
  64 }
  65
  66 static void
  67 convert_strings(char *buf, char **Strings, int count, int size, char *table)
  68 {
  69     int i;
  70     char *p;
  71
  72     for (i = 0; i < count; i++) {
  73         if (IS_NEG1(buf + 2 * i)) {
  74             Strings[i] = ABSENT_STRING;
  75         } else if (IS_NEG2(buf + 2 * i)) {
  76             Strings[i] = CANCELLED_STRING;
  77         } else if (MyNumber(buf + 2 * i) > size) {
  78             Strings[i] = ABSENT_STRING;
  79         } else {
  80             Strings[i] = (MyNumber(buf + 2 * i) + table);
  81             TR(TRACE_DATABASE, ("Strings[%d] = %s", i, _nc_visbuf(Strings[i])));
  82         }
  83
  84         /* make sure all strings are NUL terminated */
  85         if (VALID_STRING(Strings[i])) {
  86             for (p = Strings[i]; p <= table + size; p++)
  87                 if (*p == '\0')
  88                     break;
  89             /* if there is no NUL, ignore the string */
  90             if (p > table + size)
  91                 Strings[i] = ABSENT_STRING;
  92         }
  93     }
  94 }
  95
  96 static int
  97 fake_read(char *src, int *offset, int limit, char *dst, unsigned want)
  98 {
  99     int have = (limit - *offset);
 100
 101     if (have > 0) {
 102         if ((int) want > have)
 103             want = (unsigned) have;
 104         memcpy(dst, src + *offset, (size_t) want);
 105         *offset += (int) want;
 106     } else {
 107         want = 0;
 108     }
 109     return (int) want;
 110 }
 111
 112 #define Read(buf, count) fake_read(buffer, &offset, limit, (char *) buf, (unsigned) count)
 113
 114 #define read_shorts(buf, count) \
 115         (Read(buf, (count)*2) == (int) (count)*2)
 116
 117 #define even_boundary(value) \
 118     if ((value) % 2 != 0) Read(buf, 1)
 119 #endif
 120
 121 NCURSES_EXPORT(void)
 122 _nc_init_termtype(TERMTYPE *const tp)
 123 {
 124     unsigned i;
 125
 126 #if NCURSES_XNAMES
 127     tp->num_Booleans = BOOLCOUNT;
 128     tp->num_Numbers = NUMCOUNT;
 129     tp->num_Strings = STRCOUNT;
 130     tp->ext_Booleans = 0;
 131     tp->ext_Numbers = 0;
 132     tp->ext_Strings = 0;
 133 #endif
 134     if (tp->Booleans == 0)
 135         TYPE_MALLOC(NCURSES_SBOOL, BOOLCOUNT, tp->Booleans);
 136     if (tp->Numbers == 0)
 137         TYPE_MALLOC(short, NUMCOUNT, tp->Numbers);
 138     if (tp->Strings == 0)
 139         TYPE_MALLOC(char *, STRCOUNT, tp->Strings);
 140
 141     for_each_boolean(i, tp)
 142         tp->Booleans[i] = FALSE;
 143
 144     for_each_number(i, tp)
 145         tp->Numbers[i] = ABSENT_NUMERIC;
 146
 147     for_each_string(i, tp)
 148         tp->Strings[i] = ABSENT_STRING;
 149 }
 150
 151 #if NCURSES_USE_DATABASE
 152 #if NCURSES_XNAMES
 153 static bool
 154 valid_shorts(char *buffer, int limit)
 155 {
 156     bool result = FALSE;
 157     int n;
 158     for (n = 0; n < limit; ++n) {
 159         if (MyNumber(buffer + (n * 2)) > 0) {
 160             result = TRUE;
 161             break;
 162         }
 163     }
 164     return result;
 165 }
 166 #endif
 167
 168 /*
 169  * Return TGETENT_YES if read, TGETENT_NO if not found or garbled.
 170  */
 171 NCURSES_EXPORT(int)
 172 _nc_read_termtype(TERMTYPE *ptr, char *buffer, int limit)
 173 {
 174     int offset = 0;
 175     int name_size, bool_count, num_count, str_count, str_size;
 176     int i;
 177     char buf[MAX_ENTRY_SIZE + 2];
 178     char *string_table;
 179     unsigned want, have;
 180
 181     TR(TRACE_DATABASE,
 182        (T_CALLED("_nc_read_termtype(ptr=%p, buffer=%p, limit=%d)"),
 183         ptr, buffer, limit));
 184
 185     TR(TRACE_DATABASE, ("READ termtype header @%d", offset));
 186
 187     memset(ptr, 0, sizeof(*ptr));
 188
 189     /* grab the header */
 190     if (!read_shorts(buf, 6)
 191         || !IS_TIC_MAGIC(buf)) {
 192         returnDB(TGETENT_NO);
 193     }
 194
 195     /* *INDENT-EQLS* */
 196     name_size  = MyNumber(buf + 2);
 197     bool_count = MyNumber(buf + 4);
 198     num_count  = MyNumber(buf + 6);
 199     str_count  = MyNumber(buf + 8);
 200     str_size   = MyNumber(buf + 10);
 201
 202     TR(TRACE_DATABASE,
 203        ("TERMTYPE name_size=%d, bool=%d/%d, num=%d/%d str=%d/%d(%d)",
 204         name_size, bool_count, BOOLCOUNT, num_count, NUMCOUNT,
 205         str_count, STRCOUNT, str_size));
 206     if (name_size < 0
 207         || bool_count < 0
 208         || num_count < 0
 209         || str_count < 0
 210         || str_size < 0) {
 211         returnDB(TGETENT_NO);
 212     }
 213
 214     want = (unsigned) (str_size + name_size + 1);
 215     if (str_size) {
 216         /* try to allocate space for the string table */
 217         if (str_count * 2 >= MAX_ENTRY_SIZE
 218             || (string_table = typeMalloc(char, want)) == 0) {
 219             returnDB(TGETENT_NO);
 220         }
 221     } else {
 222         str_count = 0;
 223         if ((string_table = typeMalloc(char, want)) == 0) {
 224             returnDB(TGETENT_NO);
 225         }
 226     }
 227
 228     /* grab the name (a null-terminated string) */
 229     want = min(MAX_NAME_SIZE, (unsigned) name_size);
 230     ptr->str_table = string_table;
 231     ptr->term_names = string_table;
 232     if ((have = (unsigned) Read(ptr->term_names, want)) != want) {
 233         memset(ptr->term_names + have, 0, (size_t) (want - have));
 234     }
 235     ptr->term_names[want] = '\0';
 236     string_table += (want + 1);
 237
 238     if (have > MAX_NAME_SIZE)
 239         offset = (int) (have - MAX_NAME_SIZE);
 240
 241     /* grab the booleans */
 242     if ((ptr->Booleans = TYPE_CALLOC(NCURSES_SBOOL,
 243                                      max(BOOLCOUNT, bool_count))) == 0
 244         || Read(ptr->Booleans, (unsigned) bool_count) < bool_count) {
 245         returnDB(TGETENT_NO);
 246     }
 247
 248     /*
 249      * If booleans end on an odd byte, skip it.  The machine they
 250      * originally wrote terminfo on must have been a 16-bit
 251      * word-oriented machine that would trap out if you tried a
 252      * word access off a 2-byte boundary.
 253      */
 254     even_boundary(name_size + bool_count);
 255
 256     /* grab the numbers */
 257     if ((ptr->Numbers = TYPE_CALLOC(short, max(NUMCOUNT, num_count))) == 0
 258         || !read_shorts(buf, num_count)) {
 259         returnDB(TGETENT_NO);
 260     }
 261     convert_shorts(buf, ptr->Numbers, num_count);
 262
 263     if ((ptr->Strings = TYPE_CALLOC(char *, max(STRCOUNT, str_count))) == 0) {
 264         returnDB(TGETENT_NO);
 265     }
 266
 267     if (str_count) {
 268         /* grab the string offsets */
 269         if (!read_shorts(buf, str_count)) {
 270             returnDB(TGETENT_NO);
 271         }
 272         /* finally, grab the string table itself */
 273         if (Read(string_table, (unsigned) str_size) != str_size) {
 274             returnDB(TGETENT_NO);
 275         }
 276         convert_strings(buf, ptr->Strings, str_count, str_size, string_table);
 277     }
 278 #if NCURSES_XNAMES
 279
 280     ptr->num_Booleans = BOOLCOUNT;
 281     ptr->num_Numbers = NUMCOUNT;
 282     ptr->num_Strings = STRCOUNT;
 283
 284     /*
 285      * Read extended entries, if any, after the normal end of terminfo data.
 286      */
 287     even_boundary(str_size);
 288     TR(TRACE_DATABASE, ("READ extended_header @%d", offset));
 289     if (_nc_user_definable && read_shorts(buf, 5) && valid_shorts(buf, 5)) {
 290         int ext_bool_count = MyNumber(buf + 0);
 291         int ext_num_count = MyNumber(buf + 2);
 292         int ext_str_count = MyNumber(buf + 4);
 293         int ext_str_size = MyNumber(buf + 6);
 294         int ext_str_limit = MyNumber(buf + 8);
 295         unsigned need = (unsigned) (ext_bool_count + ext_num_count + ext_str_count);
 296         int base = 0;
 297
 298         if (need >= (MAX_ENTRY_SIZE / 2)
 299             || ext_str_size >= MAX_ENTRY_SIZE
 300             || ext_str_limit >= MAX_ENTRY_SIZE
 301             || ext_bool_count < 0
 302             || ext_num_count < 0
 303             || ext_str_count < 0
 304             || ext_str_size < 0
 305             || ext_str_limit < 0) {
 306             returnDB(TGETENT_NO);
 307         }
 308
 309         ptr->num_Booleans = UShort(BOOLCOUNT + ext_bool_count);
 310         ptr->num_Numbers = UShort(NUMCOUNT + ext_num_count);
 311         ptr->num_Strings = UShort(STRCOUNT + ext_str_count);
 312
 313         TYPE_REALLOC(NCURSES_SBOOL, ptr->num_Booleans, ptr->Booleans);
 314         TYPE_REALLOC(short, ptr->num_Numbers, ptr->Numbers);
 315         TYPE_REALLOC(char *, ptr->num_Strings, ptr->Strings);
 316
 317         TR(TRACE_DATABASE, ("extended header is %d/%d/%d(%d:%d)",
 318                             ext_bool_count, ext_num_count, ext_str_count,
 319                             ext_str_size, ext_str_limit));
 320
 321         TR(TRACE_DATABASE, ("READ %d extended-booleans @%d",
 322                             ext_bool_count, offset));
 323         if ((ptr->ext_Booleans = UShort(ext_bool_count)) != 0) {
 324             if (Read(ptr->Booleans + BOOLCOUNT, (unsigned)
 325                      ext_bool_count) != ext_bool_count) {
 326                 returnDB(TGETENT_NO);
 327             }
 328         }
 329         even_boundary(ext_bool_count);
 330
 331         TR(TRACE_DATABASE, ("READ %d extended-numbers @%d",
 332                             ext_num_count, offset));
 333         if ((ptr->ext_Numbers = UShort(ext_num_count)) != 0) {
 334             if (!read_shorts(buf, ext_num_count)) {
 335                 returnDB(TGETENT_NO);
 336             }
 337             TR(TRACE_DATABASE, ("Before converting extended-numbers"));
 338             convert_shorts(buf, ptr->Numbers + NUMCOUNT, ext_num_count);
 339         }
 340
 341         TR(TRACE_DATABASE, ("READ extended-offsets @%d", offset));
 342         if ((unsigned) (ext_str_count + (int) need) >= (MAX_ENTRY_SIZE / 2)) {
 343             returnDB(TGETENT_NO);
 344         }
 345         if ((ext_str_count || need)
 346             && !read_shorts(buf, ext_str_count + (int) need)) {
 347             returnDB(TGETENT_NO);
 348         }
 349
 350         TR(TRACE_DATABASE, ("READ %d bytes of extended-strings @%d",
 351                             ext_str_limit, offset));
 352
 353         if (ext_str_limit) {
 354             ptr->ext_str_table = typeMalloc(char, (size_t) ext_str_limit);
 355             if (ptr->ext_str_table == 0) {
 356                 returnDB(TGETENT_NO);
 357             }
 358             if (Read(ptr->ext_str_table, (unsigned) ext_str_limit) != ext_str_limit) {
 359                 returnDB(TGETENT_NO);
 360             }
 361             TR(TRACE_DATABASE, ("first extended-string is %s", _nc_visbuf(ptr->ext_str_table)));
 362         }
 363
 364         if ((ptr->ext_Strings = UShort(ext_str_count)) != 0) {
 365             TR(TRACE_DATABASE,
 366                ("Before computing extended-string capabilities str_count=%d, ext_str_count=%d",
 367                 str_count, ext_str_count));
 368             convert_strings(buf, ptr->Strings + str_count, ext_str_count,
 369                             ext_str_limit, ptr->ext_str_table);
 370             for (i = ext_str_count - 1; i >= 0; i--) {
 371                 TR(TRACE_DATABASE, ("MOVE from [%d:%d] %s",
 372                                     i, i + str_count,
 373                                     _nc_visbuf(ptr->Strings[i + str_count])));
 374                 ptr->Strings[i + STRCOUNT] = ptr->Strings[i + str_count];
 375                 if (VALID_STRING(ptr->Strings[i + STRCOUNT]))
 376                     base += (int) (strlen(ptr->Strings[i + STRCOUNT]) + 1);
 377                 TR(TRACE_DATABASE, ("... to    [%d] %s",
 378                                     i + STRCOUNT,
 379                                     _nc_visbuf(ptr->Strings[i + STRCOUNT])));
 380             }
 381         }
 382
 383         if (need) {
 384             if (ext_str_count >= (MAX_ENTRY_SIZE / 2)) {
 385                 returnDB(TGETENT_NO);
 386             }
 387             if ((ptr->ext_Names = TYPE_CALLOC(char *, need)) == 0) {
 388                 returnDB(TGETENT_NO);
 389             }
 390             TR(TRACE_DATABASE,
 391                ("ext_NAMES starting @%d in extended_strings, first = %s",
 392                 base, _nc_visbuf(ptr->ext_str_table + base)));
 393             convert_strings(buf + (2 * ext_str_count),
 394                             ptr->ext_Names,
 395                             (int) need,
 396                             ext_str_limit, ptr->ext_str_table + base);
 397         }
 398
 399         TR(TRACE_DATABASE,
 400            ("...done reading terminfo bool %d(%d) num %d(%d) str %d(%d)",
 401             ptr->num_Booleans, ptr->ext_Booleans,
 402             ptr->num_Numbers, ptr->ext_Numbers,
 403             ptr->num_Strings, ptr->ext_Strings));
 404
 405         TR(TRACE_DATABASE, ("extend: num_Booleans:%d", ptr->num_Booleans));
 406     } else
 407 #endif /* NCURSES_XNAMES */
 408     {
 409         TR(TRACE_DATABASE, ("...done reading terminfo bool %d num %d str %d",
 410                             bool_count, num_count, str_count));
 411 #if NCURSES_XNAMES
 412         TR(TRACE_DATABASE, ("normal: num_Booleans:%d", ptr->num_Booleans));
 413 #endif
 414     }
 415
 416     for (i = bool_count; i < BOOLCOUNT; i++)
 417         ptr->Booleans[i] = FALSE;
 418     for (i = num_count; i < NUMCOUNT; i++)
 419         ptr->Numbers[i] = ABSENT_NUMERIC;
 420     for (i = str_count; i < STRCOUNT; i++)
 421         ptr->Strings[i] = ABSENT_STRING;
 422
 423     returnDB(TGETENT_YES);
 424 }
 425
 426 /*
 427  *      int
 428  *      _nc_read_file_entry(filename, ptr)
 429  *
 430  *      Read the compiled terminfo entry in the given file into the
 431  *      structure pointed to by ptr, allocating space for the string
 432  *      table.
 433  */
 434 NCURSES_EXPORT(int)
 435 _nc_read_file_entry(const char *const filename, TERMTYPE *ptr)
 436 /* return 1 if read, 0 if not found or garbled */
 437 {
 438     FILE *fp = 0;
 439     int code;
 440
 441     if (_nc_access(filename, R_OK) < 0
 442         || (fp = fopen(filename, "rb")) == 0) {
 443         TR(TRACE_DATABASE, ("cannot open terminfo %s (errno=%d)", filename, errno));
 444         code = TGETENT_NO;
 445     } else {
 446         int limit;
 447         char buffer[MAX_ENTRY_SIZE + 1];
 448
 449         if ((limit = (int) fread(buffer, sizeof(char), sizeof(buffer), fp))
 450             > 0) {
 451
 452             TR(TRACE_DATABASE, ("read terminfo %s", filename));
 453             if ((code = _nc_read_termtype(ptr, buffer, limit)) == TGETENT_NO) {
 454                 _nc_free_termtype(ptr);
 455             }
 456         } else {
 457             code = TGETENT_NO;
 458         }
 459         fclose(fp);
 460     }
 461
 462     return (code);
 463 }
 464
 465 #if USE_HASHED_DB
 466 /*
 467  * Return if if we can build the filename of a ".db" file.
 468  */
 469 static bool
 470 make_db_filename(char *filename, unsigned limit, const char *const path)
 471 {
 472     static const char suffix[] = DBM_SUFFIX;
 473
 474     size_t lens = sizeof(suffix) - 1;
 475     size_t size = strlen(path);
 476     size_t test = lens + size;
 477     bool result = FALSE;
 478
 479     if (test < limit) {
 480         if (size >= lens
 481             && !strcmp(path + size - lens, suffix))
 482             _nc_STRCPY(filename, path, limit);
 483         else
 484             _nc_SPRINTF(filename, _nc_SLIMIT(limit) "%s%s", path, suffix);
 485         result = TRUE;
 486     }
 487     return result;
 488 }
 489 #endif
 490
 491 /*
 492  * Return true if we can build the name of a filesystem entry.
 493  */
 494 static bool
 495 make_dir_filename(char *filename,
 496                   unsigned limit,
 497                   const char *const path,
 498                   const char *name)
 499 {
 500     bool result = FALSE;
 501
 502 #if NCURSES_USE_TERMCAP
 503     if (_nc_is_dir_path(path))
 504 #endif
 505     {
 506         unsigned need = (unsigned) (LEAF_LEN + 3 + strlen(path) + strlen(name));
 507
 508         if (need <= limit) {
 509             _nc_SPRINTF(filename, _nc_SLIMIT(limit)
 510                         "%s/" LEAF_FMT "/%s", path, *name, name);
 511             result = TRUE;
 512         }
 513     }
 514     return result;
 515 }
 516
 517 static int
 518 lookup_b64(int *target, const char **source)
 519 {
 520     int result = 3;
 521     int j;
 522     /*
 523      * ncurses' quickdump writes only RFC 4648 "url/filename-safe" encoding,
 524      * but accepts RFC-3548
 525      */
 526     for (j = 0; j < 4; ++j) {
 527         int ch = UChar(**source);
 528         *source += 1;
 529         if (ch >= 'A' && ch <= 'Z') {
 530             target[j] = (ch - 'A');
 531         } else if (ch >= 'a' && ch <= 'z') {
 532             target[j] = 26 + (ch - 'a');
 533         } else if (ch >= '0' && ch <= '9') {
 534             target[j] = 52 + (ch - '0');
 535         } else if (ch == '-' || ch == '+') {
 536             target[j] = 62;
 537         } else if (ch == '_' || ch == '/') {
 538             target[j] = 63;
 539         } else if (ch == '=') {
 540             target[j] = 64;
 541             result--;
 542         } else {
 543             result = -1;
 544             break;
 545         }
 546     }
 547     return result;
 548 }
 549
 550 static int
 551 decode_hex(const char **source)
 552 {
 553     int result = 0;
 554     int nibble;
 555     int ch;
 556
 557     for (nibble = 0; nibble < 2; ++nibble) {
 558         result <<= 4;
 559         ch = UChar(**source);
 560         *source += 1;
 561         if (ch >= '0' && ch <= '9') {
 562             ch -= '0';
 563         } else if (ch >= 'A' && ch <= 'F') {
 564             ch -= 'A';
 565             ch += 10;
 566         } else if (ch >= 'a' && ch <= 'f') {
 567             ch -= 'a';
 568             ch += 10;
 569         } else {
 570             result = -1;
 571             break;
 572         }
 573         result |= ch;
 574     }
 575     return result;
 576 }
 577
 578 static int
 579 decode_quickdump(char *target, const char *source)
 580 {
 581     char *base = target;
 582     int result = 0;
 583
 584     if (!strncmp(source, "b64:", 4)) {
 585         source += 4;
 586         while (*source != '\0') {
 587             int bits[4];
 588             int ch = lookup_b64(bits, &source);
 589             if (ch < 0 || (ch + target - base) >= MAX_ENTRY_SIZE) {
 590                 result = 0;
 591                 break;
 592             }
 593             result += ch;
 594             *target++ = (char) ((bits[0] << 2) | (bits[1] >> 4));
 595             if (bits[2] < 64) {
 596                 *target++ = (char) ((bits[1] << 4) | (bits[2] >> 2));
 597                 if (bits[3] < 64) {
 598                     *target++ = (char) ((bits[2] << 6) | bits[3]);
 599                 }
 600             }
 601         }
 602     } else if (!strncmp(source, "hex:", 4)) {
 603         source += 4;
 604         while (*source != '\0') {
 605             int ch = decode_hex(&source);
 606             if (ch < 0 || (target - base) >= MAX_ENTRY_SIZE) {
 607                 result = 0;
 608                 break;
 609             }
 610             *target++ = (char) ch;
 611             ++result;
 612         }
 613     }
 614     return result;
 615 }
 616
 617 /*
 618  * Build a terminfo pathname and try to read the data.  Returns TGETENT_YES on
 619  * success, TGETENT_NO on failure.
 620  */
 621 static int
 622 _nc_read_tic_entry(char *filename,
 623                    unsigned limit,
 624                    const char *const path,
 625                    const char *name,
 626                    TERMTYPE *const tp)
 627 {
 628     int code = TGETENT_NO;
 629 #if USE_HASHED_DB
 630     DB *capdbp;
 631 #endif
 632     char buffer[MAX_ENTRY_SIZE + 1];
 633     int used;
 634
 635     TR(TRACE_DATABASE,
 636        (T_CALLED("_nc_read_tic_entry(file=%p, path=%s, name=%s)"),
 637         filename, path, name));
 638
 639     if ((used = decode_quickdump(buffer, path)) != 0
 640         && (code = _nc_read_termtype(tp, buffer, used)) == TGETENT_YES
 641         && _nc_name_match(tp->term_names, name, "|")) {
 642         TR(TRACE_DATABASE, ("loaded quick-dump for %s", name));
 643     } else
 644 #if USE_HASHED_DB
 645         if (make_db_filename(filename, limit, path)
 646             && (capdbp = _nc_db_open(filename, FALSE)) != 0) {
 647
 648         DBT key, data;
 649         int reccnt = 0;
 650         char *save = strdup(name);
 651
 652         memset(&key, 0, sizeof(key));
 653         key.data = save;
 654         key.size = strlen(save);
 655
 656         /*
 657          * This lookup could return termcap data, which we do not want.  We are
 658          * looking for compiled (binary) terminfo data.
 659          *
 660          * cgetent uses a two-level lookup.  On the first it uses the given
 661          * name to return a record containing only the aliases for an entry.
 662          * On the second (using that list of aliases as a key), it returns the
 663          * content of the terminal description.  We expect second lookup to
 664          * return data beginning with the same set of aliases.
 665          *
 666          * For compiled terminfo, the list of aliases in the second case will
 667          * be null-terminated.  A termcap entry will not be, and will run on
 668          * into the description.  So we can easily distinguish between the two
 669          * (source/binary) by checking the lengths.
 670          */
 671         while (_nc_db_get(capdbp, &key, &data) == 0) {
 672             char *have = (char *) data.data;
 673             used = (int) data.size - 1;
 674
 675             if (*have++ == 0) {
 676                 if (data.size > key.size
 677                     && IS_TIC_MAGIC(have)) {
 678                     code = _nc_read_termtype(tp, have, used);
 679                     if (code == TGETENT_NO) {
 680                         _nc_free_termtype(tp);
 681                     }
 682                 }
 683                 break;
 684             }
 685
 686             /*
 687              * Just in case we have a corrupt database, do not waste time with
 688              * it.
 689              */
 690             if (++reccnt >= 3)
 691                 break;
 692
 693             /*
 694              * Prepare for the second level.
 695              */
 696             key.data = have;
 697             key.size = used;
 698         }
 699
 700         free(save);
 701     } else                      /* may be either filesystem or flat file */
 702 #endif
 703     if (make_dir_filename(filename, limit, path, name)) {
 704         code = _nc_read_file_entry(filename, tp);
 705     }
 706 #if NCURSES_USE_TERMCAP
 707     else if (code != TGETENT_YES) {
 708         code = _nc_read_termcap_entry(name, tp);
 709         _nc_SPRINTF(filename, _nc_SLIMIT(PATH_MAX)
 710                     "%.*s", PATH_MAX - 1, _nc_get_source());
 711     }
 712 #endif
 713     returnDB(code);
 714 }
 715 #endif /* NCURSES_USE_DATABASE */
 716
 717 /*
 718  *      _nc_read_entry(char *name, char *filename, TERMTYPE *tp)
 719  *
 720  *      Find and read the compiled entry for a given terminal type,
 721  *      if it exists.  We take pains here to make sure no combination
 722  *      of environment variables and terminal type name can be used to
 723  *      overrun the file buffer.
 724  */
 725
 726 NCURSES_EXPORT(int)
 727 _nc_read_entry(const char *const name, char *const filename, TERMTYPE *const tp)
 728 {
 729     int code = TGETENT_NO;
 730
 731     _nc_SPRINTF(filename, _nc_SLIMIT(PATH_MAX)
 732                 "%.*s", PATH_MAX - 1, name);
 733
 734     if (strlen(name) == 0
 735         || strcmp(name, ".") == 0
 736         || strcmp(name, "..") == 0
 737         || _nc_pathlast(name) != 0
 738         || strchr(name, NCURSES_PATHSEP) != 0) {
 739         TR(TRACE_DATABASE, ("illegal or missing entry name '%s'", name));
 740     } else {
 741 #if NCURSES_USE_DATABASE
 742         DBDIRS state;
 743         int offset;
 744         const char *path;
 745
 746         _nc_first_db(&state, &offset);
 747         code = TGETENT_ERR;
 748         while ((path = _nc_next_db(&state, &offset)) != 0) {
 749             code = _nc_read_tic_entry(filename, PATH_MAX, path, name, tp);
 750             if (code == TGETENT_YES) {
 751                 _nc_last_db();
 752                 break;
 753             }
 754         }
 755 #elif NCURSES_USE_TERMCAP
 756         if (code != TGETENT_YES) {
 757             code = _nc_read_termcap_entry(name, tp);
 758             _nc_SPRINTF(filename, _nc_SLIMIT(PATH_MAX)
 759                         "%.*s", PATH_MAX - 1, _nc_get_source());
 760         }
 761 #endif
 762     }
 763     return code;
 764 }