2N/AH
2N/A!rm -f tifget.c
2N/A0a
2N/A#pragma ident "%Z%%M% %I% %E% SMI"
2N/A
2N/A/*
2N/A * Routines to retrieve a value based on the short terminfo name.
2N/A * This file is created from tifget.ed. DO NOT EDIT ME!
2N/A */
2N/A
2N/A#include <sys/types.h>
2N/A#include "curses_inc.h"
2N/A
2N/A/* generated by sort on caps */
2N/Astatic short booloffsets[] =
2N/A {
2N/A.
2N/A!sed -e '1,/^--- begin bool/d' -e '/^--- end bool/,$d' -e '/^#/d' < caps | awk '{printf "\t/* \%s */\t\%d,\n", $1, i++}' | sort > ./tmp/tifget.tmp
2N/A.r !cat ./tmp/tifget.tmp
2N/A.a
2N/A };
2N/A
2N/A/* generated by sort on caps */
2N/Astatic short numoffsets[] =
2N/A {
2N/A.
2N/A!sed -e '1,/^--- begin num/d' -e '/^--- end num/,$d' -e '/^#/d' < caps | awk '{printf "\t/* \%s */\t\%d,\n", $1, i++}' | sort > ./tmp/tifget.tmp
2N/A.r !cat ./tmp/tifget.tmp
2N/A.a
2N/A };
2N/A
2N/A/* generated by sort on caps */
2N/Astatic short stroffsets[] =
2N/A {
2N/A.
2N/A!sed -e '1,/^--- begin str/d' -e '/^--- end str/,$d' -e '/^#/d' < caps | awk '{printf "\t/* \%s */\t\%d,\n", $1, i++}' | sort > ./tmp/tifget.tmp
2N/A.r !cat ./tmp/tifget.tmp
2N/A!rm ./tmp/tifget.tmp
2N/A.a
2N/A };
2N/A
2N/A/*
2N/A * Return the value of the long-named boolean capability tistr.
2N/A * Return -1 if the name is not a boolean capability.
2N/A */
2N/A
2N/Aint
2N/Atifgetflag(char *tistr)
2N/A{
2N/A int offset;
2N/A char *bool_array = (char *) cur_bools;
2N/A
2N/A return (((offset = _tcsearch(tistr, booloffsets, boolfnames,
2N/A _NUMELEMENTS(booloffsets), 0)) == -1) ? -1 : bool_array[offset]);
2N/A}
2N/A
2N/A/*
2N/A * Return the value of the long-named numeric capability tistr.
2N/A * Return -2 if the name is not a numeric capability.
2N/A */
2N/A
2N/Aint
2N/Atifgetnum(char *tistr)
2N/A{
2N/A int offset;
2N/A short *num_array = (short *) cur_nums;
2N/A
2N/A return (((offset = _tcsearch(tistr, numoffsets, numfnames,
2N/A _NUMELEMENTS(numoffsets), 0)) == -1) ? -2 : num_array[offset]);
2N/A}
2N/A
2N/A/*
2N/A * Return the value of the long-named string capability tistr.
2N/A * Return (char *) -1 if the name is not a string capability.
2N/A */
2N/A
2N/Achar *
2N/Atifgetstr(char *tistr)
2N/A{
2N/A int offset;
2N/A char **str_array = (char **) cur_strs;
2N/A
2N/A return (((offset = _tcsearch(tistr, stroffsets, strfnames,
2N/A _NUMELEMENTS(stroffsets), 0)) == -1) ? (char *) -1 :
2N/A str_array[offset]);
2N/A}
2N/A.
2N/A0r copyright.h
2N/A1,.g/#pragma ident/d
2N/Aw tifget.c
2N/Aq