Usenet 1994 October

home *** CD-ROM | disk | FTP | other *** search

/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume12 / ecu2.80 / part15 < prev next >

Wrap

Text File | 1990-05-11 | 43.1 KB | 1,360 lines

Newsgroups: comp.sources.misc subject: v12i068: ECU 2.80 part 15/29 from: wht%n4hgf@gatech.edu (Warren Tucker) Sender: allbery@uunet.UU.NET (Brandon S. Allbery - comp.sources.misc) Posting-number: Volume 12, Issue 68 Submitted-by: wht%n4hgf@gatech.edu (Warren Tucker) Archive-name: ecu2.80/part15 ---- Cut Here and unpack ---- #!/bin/sh # This is part 15 of ecu280 if touch 2>&1 | fgrep '[-amc]' > /dev/null then TOUCH=touch else TOUCH=true fi # ============= dialer.h ============== echo "x - extracting dialer.h (Text)" sed 's/^X//' << 'SHAR_EOF' > dialer.h && X/* CHK=0xB0D5 */ X/*+------------------------------------------------------------------------- X dialer.h - HDB UUCP dialer program return code error codes X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:07-01-1989-21:56-wht-creation */ X X#define RC_FAIL 0x80 /* 1 = failed to connect */ X#define RCE_NULL 0 /* general purpose or unknown error code */ X#define RCE_INUSE 1 /* line in use */ X#define RCE_SIG 2 /* signal aborted dialer */ X#define RCE_ARGS 3 /* invalid arguments */ X#define RCE_PHNO 4 /* invalid phone number */ X#define RCE_SPEED 5 /* invalid baud rate -or- bad connect baud */ X#define RCE_OPEN 6 /* can't open line */ X#define RCE_IOCTL 7 /* ioctl error */ X#define RCE_TIMOUT 8 /* timeout */ X#define RCE_NOTONE 9 /* no dial tone */ X#define RCE_BUSY 13 /* phone is busy */ X#define RCE_NOCARR 14 /* no carrier */ X#define RCE_ANSWER 15 /* no answer */ X X/* code writing aid */ X#ifdef NEVER X case RCE_NULL: /* general purpose or unknown error code */ X case RCE_INUSE: /* line in use */ X case RCE_SIG: /* signal aborted dialer */ X case RCE_ARGS: /* invalid arguments */ X case RCE_PHNO: /* invalid phone number */ X case RCE_SPEED: /* invalid baud rate -or- bad connect baud */ X case RCE_OPEN: /* can't open line */ X case RCE_IOCTL: /* ioctl error */ X case RCE_TIMOUT: /* timeout */ X case RCE_NOTONE: /* no dial tone */ X case RCE_BUSY: /* phone is busy */ X case RCE_NOCARR: /* no carrier */ X case RCE_ANSWER: /* no answer */ X#endif X X/* vi: set tabstop=4 shiftwidth=4: */ X/* end of dialer.h */ SHAR_EOF $TOUCH -am 0507233390 dialer.h && chmod 0644 dialer.h || echo "restore of dialer.h failed" set `wc -c dialer.h`;Wc_c=$1 if test "$Wc_c" != "1742"; then echo original size 1742, current size $Wc_c fi # ============= dlent.h ============== echo "x - extracting dlent.h (Text)" sed 's/^X//' << 'SHAR_EOF' > dlent.h && X/* CHK=0xF9A0 */ X/*+------------------------------------------------------------------------- X dlent.h - HDB UUCP Dialers file entry (a la pwent.h) X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:04-02-1990-02:17-wht@n4hgf-Dialers support appears to work */ X/*:04-01-1990-21:01-wht@n4hgf-creation */ X Xstruct dlent X{ X char *name; /* Dialer name */ X char *tlate; /* translate string */ X char *script; /* expect-respond script */ X}; X Xstruct dlent *getdlent(); Xvoid enddlent(); X X/* vi: set tabstop=4 shiftwidth=4: */ X/* end of dlent.h */ SHAR_EOF $TOUCH -am 0507233390 dlent.h && chmod 0644 dlent.h || echo "restore of dlent.h failed" set `wc -c dlent.h`;Wc_c=$1 if test "$Wc_c" != "648"; then echo original size 648, current size $Wc_c fi # ============= dvent.h ============== echo "x - extracting dvent.h (Text)" sed 's/^X//' << 'SHAR_EOF' > dvent.h && X/* CHK=0xEFED */ X/*+------------------------------------------------------------------------- X dvent.h - HDB UUCP Devices file entry (a la pwent.h) X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:07-01-1989-14:50-wht-creation */ X Xstruct dvent X{ X char *type; /* ACU or Direct */ X char *line; /* tty name "ttyxx"-style */ X char *dialer; /* "801" dialer line */ X uint low_baud; /* lowest baud rate */ X uint high_baud; /* highest baud rate */ X char *dialprog; /* dialer program */ X}; X Xstruct dvent *getdvent(); Xstruct dvent *getdvbaud(); Xstruct dvent *getdvline(); Xvoid enddvent(); X X/* vi: set tabstop=4 shiftwidth=4: */ X/* end of dvent.h */ SHAR_EOF $TOUCH -am 0507233390 dvent.h && chmod 0644 dvent.h || echo "restore of dvent.h failed" set `wc -c dvent.h`;Wc_c=$1 if test "$Wc_c" != "852"; then echo original size 852, current size $Wc_c fi # ============= ecu.h ============== echo "x - extracting ecu.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecu.h && X/* CHK=0xE5D6 */ X/*+----------------------------------------------------------------------- X ecu.h -- TuckerWare Extended Calling Unit X wht%n4hgf@gatech.edu X------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:03-16-1990-04:28-wht@n4hgf-add sys/timeb.h */ X/*:03-12-1990-04:35-wht@n4hgf-get rid of obsolete LINEVARS */ X/*:01-03-1990-16:19-wht-indulge deviant "progressive" __STDC__ m/c/realloc */ X/*:11-23-1989-03:11-wht-conditional compile for M_XENIX or M_UNIX */ X/*:10-14-1989-21:08-wht-add setcolor variables */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X#if defined(__STDC__) /* sigh ... malloc and such types */ X#define VTYPE void X#else X#define VTYPE char X#endif X X#if defined(M_UNIX) X#undef M_XENIX /* we don't want this defined in UNIX world */ X#undef NO_SELECT /* UNIX select(S) works */ X#endif X X#if defined(M_I286) && !defined(NO_SELECT) X#define NO_SELECT /* the last 286 XENIX I saw (2.2.1) had no select */ X#endif X X#if !defined(STDIO_H_INCLUDED) X#include <stdio.h> X#endif X#include <signal.h> X#include <ctype.h> X#include <sys/types.h> X#include <sys/errno.h> X#include <sys/timeb.h> X X#if defined(M_XENIX) || defined(M_UNIX) X#include <memory.h> X#include <sys/stat.h> X#include <string.h> X#include <fcntl.h> X#if !defined(OMIT_TERMIO_REFERENCES) X#include <sys/ioctl.h> X#include <termio.h> X#endif X#endif X X#if defined(pyr) X#include <sys/stat.h> X#include <sys/file.h> X#if !defined(OMIT_TERMIO_REFERENCES) X#include <sys/termio.h> X#endif X#include <strings.h> X#define strchr index X#define strrchr rindex X#define memcpy(to,from,length) bcopy(from,to,length) X#endif X X#include "ecuhangup.h" X#include "ecushm.h" X X/* already in ecushm.h */ X/* #if !defined(ushort) */ X/* #define ushort unsigned short */ X/* #endif */ X/* #if !defined(uchar) */ X/* #define uchar unsigned char */ X/* #endif */ X/* #if !defined(uint) */ X/* #define uint unsigned int */ X/* #endif */ X/* #if !defined(ulong) */ X/* #define ulong unsigned long */ X/* #endif */ X X#define MALLOC_3X X#if defined(MALLOC_3X) X#include <malloc.h> X#endif X X/* for better source line utilization, frequent use of 'fprintf' and 'stderr' X warrants the following */ X#define pf printf X#define ff fprintf X#define se stderr X#define so stdout X X#define DEFAULT_BAUD_RATE 2400 X#define TTYIN 0 X#define TTYOUT 1 /* ditto tty output */ X#define TTYERR 2 /* ditty tty output error channel */ X X/* xbell codes */ X#if defined(M_XENIX) || defined(M_UNIX) X#define XBELL_DONE 1 /* octaves or morse 'd' */ X#define XBELL_ATTENTION 2 /* morse .-.-.- ATTENTION */ X#define XBELL_C 3 /* morse -.-. C */ X#define XBELL_3T 4 /* --- really 'o' */ X#endif X X/* lopen() and related routines error codes */ X#define LOPEN_INVALID -1 /* for invalid tty name */ X#define LOPEN_UNKPID -2 /* unknown pid using line */ X#define LOPEN_LCKERR -3 /* lock file open error */ X#define LOPEN_NODEV -4 /* device does not exist */ X#define LOPEN_OPNFAIL -5 /* could not open line */ X#define LOPEN_ALREADY -6 /* line already open */ X#define LOPEN_ENABLED -7 /* line enabled for login */ X#define LOPEN_ENABLED_IN_USE -8 /* line in use by incoming login */ X#define LOPEN_DIALOUT_IN_USE -9 /* line in use by another dial out */ X X#if defined(DECLARE_LINEVARS_PUBLIC) X Xchar LLCKname[128]; /* lock file name */ Xstruct termio Ltermio; /* attributes for the line to remote */ Xuchar Lmodem_sreg[20]; /* allow for more later */ X#else X#if !defined(OMIT_TERMIO_REFERENCES) Xextern char LLCKname[]; Xextern struct termio Ltermio; X#endif Xextern uchar Lmodem_sreg[]; X#endif X/* setcolor variables - see setcolor() */ Xextern ulong colors_current; Xextern ulong colors_normal; Xextern ulong colors_success; Xextern ulong colors_alert; Xextern ulong colors_error; Xextern ulong colors_notify; X Xtypedef struct lrwt /* param to lgets_timeout in eculine.c */ X{ X ulong to1; /* timeout for 1st character (granularity 20) */ X ulong to2; /* timeout for each next char (granularity 20) */ X int raw_flag; /* !=0, rtn full buffer, ==0, rtn filtered hayes result */ X char *buffer; /* buffer to fill */ X int bufsize; /* size of buffer */ X int count; /* from proc, count rcvd */ X char *delim; /* ending string for lgets_timeout_or_delim */ X int echo; /* echo incdoming chars to screen */ X} LRWT; X X#include "stdio_lint.h" X#include "lint_args.h" X/* vi: set tabstop=4 shiftwidth=4: */ SHAR_EOF $TOUCH -am 0509094990 ecu.h && chmod 0644 ecu.h || echo "restore of ecu.h failed" set `wc -c ecu.h`;Wc_c=$1 if test "$Wc_c" != "4474"; then echo original size 4474, current size $Wc_c fi # ============= ecucmd.h ============== echo "x - extracting ecucmd.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecucmd.h && X/* CHK=0xBB62 */ X/*+------------------------------------------------------------------------- X ecucmd.h -- command definitions X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:04-05-1990-14:29-wht@n4hgf-sort/renumber CT tokens */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:03-18-1990-15:33-wht@n4hgf-add popen and pclose */ X/*:03-12-1990-04:44-wht@n4hgf-add rname */ X/*:12-21-1989-21:49-wht-add 'rtscts' */ X/*:11-20-1989-16:05-wht-add 'getf' and 'putf' */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X/* interactive command tokens */ X X#define CTax 1 X#define CTbaud 2 X#define CTbn 3 X#define CTbreak 4 X#define CTcd 5 X#define CTclrx 6 X#define CTda 7 X#define CTdial 8 X#define CTdo 9 X#define CTduplex 10 X#define CTexit 11 X#define CTfi 12 X#define CTfkey 13 X#define CTgetf 14 X#define CThangup 15 X#define CThelp 16 X#define CTllp 17 X#define CTloff 18 X#define CTlog 19 X#define CTmdump 20 X#define CTnl 21 X#define CTnlin 22 X#define CTnlout 23 X#define CToa 24 X#define CTparity 25 X#define CTpcmd 26 X#define CTpid 27 X#define CTplog 28 X#define CTptrace 29 X#define CTputf 30 X#define CTpwd 31 X#define CTredial 32 X#define CTrev 33 X#define CTrk 34 X#define CTrs 35 X#define CTrtscts 36 X#define CTrx 37 X#define CTry 38 X#define CTrz 39 X#define CTsdname 40 X#define CTsgr 41 X#define CTshell 42 X#define CTsk 43 X#define CTss 44 X#define CTstat 45 X#define CTsx 46 X#define CTsy 47 X#define CTsz 48 X#define CTte 49 X#define CTtime 50 X#define CTts 51 X#define CTtty 52 X#define CTxa 53 X#define CTxlog 54 X X#define TOKEN_QUAN 128 /* for help package */ X Xtypedef int (*PFI)(); X X#if defined(HELPGEN) X#define Z {;} X#else X#define Z ; X#endif X Xint cmd_baud() Z Xint cmd_break() Z Xint cmd_cd() Z Xint cmd_clrx() Z Xint cmd_cls() Z Xint cmd_color() Z Xint cmd_continue() Z Xint cmd_cursor() Z Xint cmd_delline() Z Xint cmd_dial() Z Xint cmd_do() Z Xint cmd_duplex() Z Xint cmd_echo() Z Xint cmd_eeol() Z Xint cmd_else() Z Xint cmd_exit() Z Xint cmd_expresp() Z Xint cmd_getf() Z Xint cmd_fchmod() Z Xint cmd_fclose() Z Xint cmd_fgetc() Z Xint cmd_fgets() Z Xint cmd_fkey() Z Xint cmd_flush() Z Xint cmd_fopen() Z Xint cmd_fputc() Z Xint cmd_fputs() Z Xint cmd_fread() Z Xint cmd_fseek() Z Xint cmd_fdel() Z Xint cmd_fwrite() Z Xint cmd_goto() Z Xint cmd_gotob() Z Xint cmd_hangup() Z Xint cmd_hexdump() Z Xint cmd_home() Z Xint cmd_icolor() Z Xint cmd_insline() Z Xint cmd_ifi() Z Xint cmd_ifs() Z Xint cmd_lbreak() Z Xint cmd_lgets() Z Xint cmd_logevent() Z Xint cmd_lookfor() Z X/* int cmd_mkdir() Z */ Xint cmd_mkvar() Z Xint cmd_nap() Z Xint cmd_parity() Z Xint cmd_pclose() Z Xint cmd_plog() Z Xint cmd_popen() Z Xint cmd_prompt() Z Xint cmd_ptrace() Z Xint cmd_putf() Z Xint cmd_return() Z Xint cmd_rk() Z Xint cmd_rname() Z Xint cmd_rs() Z Xint cmd_rx() Z Xint cmd_ry() Z Xint cmd_rz() Z Xint cmd_scrdump() Z Xint cmd_send() Z Xint cmd_set() Z Xint cmd_sk() Z Xint cmd_ss() Z Xint cmd_sx() Z Xint cmd_sy() Z Xint cmd_system() Z Xint cmd_sz() Z Xint cmd_vidcolor() Z Xint cmd_vidnorm() Z Xint cmd_vidrev() Z Xint cmd_whilei() Z Xint cmd_whiles() Z X Xtypedef struct p_cmd X{ X char *cmd; /* command string */ X int min; /* min chars required for match */ X int token; /* command number */ X char *descr; /* command description */ X PFI proc; /* do cmd handler */ X} P_CMD; X X#if !defined(DECLARE_P_CMD) X#if defined(NEED_P_CMD) Xextern P_CMD icmd_cmds[]; X#endif X#else XP_CMD icmd_cmds[] = X{ X { "ax", 2,CTax, "ascii char to hex/oct/dec", 0 }, X { "baud", 2,CTbaud, "set/display line baud rate", cmd_baud }, X { "bn", 2,CTbn, "all console event alarm", 0 }, X { "break", 2,CTbreak, "send break to remote", cmd_break }, X { "cd", 2,CTcd, "change current directory", cmd_cd }, X { "clrx", 2,CTclrx, "simulate XON from remote", cmd_clrx }, X { "cls", 0,0, "", cmd_cls }, X { "color", 0,0, "", cmd_color }, X { "continue",0,0, "", cmd_continue }, X { "cursor", 0,0, "", cmd_cursor }, X { "da", 2,CTda, "decimal to ascii char", 0 }, X { "dial", 1,CTdial, "dial remote destination", cmd_dial }, X { "delline",0,0, "", cmd_delline }, X { "do", 2,CTdo, "perform procedure", cmd_do }, X { "duplex", 2,CTduplex, "set/display duplex", cmd_duplex }, X { "echo", 0,0, "", cmd_echo }, X { "eeol", 0,0, "", cmd_eeol }, X { "else", 0,0, "", cmd_else }, X { "esc", 2,CTte, "set command escape", 0 }, X { "exit", 2,CTexit, "drop carrier, exit program", cmd_exit }, X { "expresp",0,0, "", cmd_expresp }, X { "fchmod", 0,0, "", cmd_fchmod }, X { "fclose", 0,0, "", cmd_fclose }, X { "fdel", 0,0, "", cmd_fdel }, X { "fgetc", 0,0, "", cmd_fgetc }, X { "fgets", 0,0, "", cmd_fgets }, X { "fi", 2,CTfi, "send text file to line", 0 }, X { "fkey", 2,CTfkey, "function key definition", cmd_fkey }, X { "flush", 0,0, "", cmd_flush }, X { "fopen", 0,0, "", cmd_fopen }, X { "fputc", 0,0, "", cmd_fputc }, X { "fputs", 0,0, "", cmd_fputs }, X { "fread", 0,0, "", cmd_fread }, X { "fseek", 0,0, "", cmd_fseek }, X { "fwrite", 0,0, "", cmd_fwrite }, X { "getf", 0,0, "", cmd_getf }, X { "goto", 0,0, "", cmd_goto }, X { "gotob", 0,0, "", cmd_gotob }, X { "hangup", 2,CThangup, "hang up modem", cmd_hangup }, X { "help", 2,CThelp, "invoke help", 0 }, X { "hexdump",0,0, "", cmd_hexdump }, X { "home", 0,0, "", cmd_home }, X { "icolor", 0,0, "", cmd_icolor }, X { "ifi", 0,0, "", cmd_ifi }, X { "ifs", 0,0, "", cmd_ifs }, X { "insline",0,0, "", cmd_insline }, X { "lbreak", 0,0, "", cmd_lbreak }, X { "llp", 2,CTllp, "set session log to /dev/lp", 0 }, X { "lgets", 0,0, "", cmd_lgets }, X { "loff", 3,CTloff, "turn off session logging", 0 }, X { "log", 3,CTlog, "session logging control", 0 }, X { "logevent",0,0, "", cmd_logevent }, X { "lookfor",0,0, "", cmd_lookfor }, X { "mdump", 5,CTmdump, "", 0 }, X/* { "mkdir", 3,CTmkdir, "mkdir <dirname>", cmd_mkdir }, */ X { "mkvar", 0,0, "", cmd_mkvar }, X { "nap", 0,0, "", cmd_nap }, X { "nl", 2,CTnl, "display CR/LF mapping", 0 }, X { "nlin", 3,CTnlin, "set receive CR/LF mapping", 0 }, X { "nlout", 3,CTnlout, "set transmit CR/LF mapping", 0 }, X { "oa", 2,CToa, "octal to ascii char", 0 }, X { "parity", 3,CTparity, "set/display line parity", cmd_parity }, X { "pclose", 0,0, "", cmd_pclose }, X { "pcmd", 2,CTpcmd, "execute a procedure command", 0 }, X { "pid", 2,CTpid, "display process ids", 0 }, X { "plog", 2,CTplog, "control procedure logging", cmd_plog }, X { "popen", 0,0, "", cmd_popen }, X { "prompt", 0,0, "", cmd_prompt }, X { "ptrace", 2,CTptrace, "control procedure trace", cmd_ptrace }, X { "putf", 0,0, "", cmd_putf }, X { "pwd", 2,CTpwd, "print working directory", 0 }, X { "redial", 3,CTredial, "redial last number", 0 }, X { "return", 0,0, "", cmd_return }, X { "rev", 3,CTrev, "ecu revision/make date", 0 }, X { "rk", 2,CTrk, "receive via C-Kermit", cmd_rk }, X { "rname", 2,0, "", cmd_rname }, X { "rs", 2,CTrs, "receive via SEAlink", cmd_rs }, X { "rtscts", 3,CTrtscts, "control RTS/CTS flow control", 0 }, X { "rx", 2,CTrx, "receive via XMODEM/CRC", cmd_rx }, X { "ry", 2,CTry, "receive via YMODEM Batch", cmd_ry }, X { "rz", 2,CTrz, "receive via ZMODEM/CRC32", cmd_rz }, X { "scrdump",0,0, "", cmd_scrdump }, X { "sdname", 3,CTsdname, "select screen dump name", 0 }, X { "send", 0,0, "", cmd_send }, X { "set", 0,0, "", cmd_set }, X { "sgr", 2,CTsgr, "", 0 }, X { "sk", 2,CTsk, "send via C-Kermit", cmd_sk }, X { "ss", 2,CTss, "send via SEAlink", cmd_ss }, X { "stat", 2,CTstat, "connection status", 0 }, X { "sx", 2,CTsx, "send via XMODEM/CRC", cmd_sx }, X { "sy", 2,CTsy, "send via YMODEM Batch", cmd_sy }, X { "system", 0,CTsy, "", cmd_system }, X { "sz", 2,CTsz, "send via ZMODEM/CRC32", cmd_sz }, X { "time", 2,CTtime, "time of day", 0 }, X { "ts", 2,CTts, "termio display", 0 }, X { "tty", 2,CTtty, "console tty name", 0 }, X { "vidcolor",0,0, "", cmd_vidcolor }, X { "vidnorm",0,0, "", cmd_vidnorm }, X { "vidrev", 0,0, "", cmd_vidrev }, X { "whilei", 0,0, "", cmd_whilei }, X { "whiles", 0,0, "", cmd_whiles }, X { "xa", 2,CTxa, "hex to ascii char", 0 }, X { "xlog", 2,CTxlog, "", 0 }, X { "!", 1,CTshell, "execute shell", 0 }, X { "", 0,-1,"", 0 }, /* list ends with token value of -1 */ X}; X#endif X X/* end of ecucmd.h */ X/* vi: set tabstop=4 shiftwidth=4: */ SHAR_EOF $TOUCH -am 0507233390 ecucmd.h && chmod 0644 ecucmd.h || echo "restore of ecucmd.h failed" set `wc -c ecucmd.h`;Wc_c=$1 if test "$Wc_c" != "9132"; then echo original size 9132, current size $Wc_c fi # ============= ecuerror.h ============== echo "x - extracting ecuerror.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecuerror.h && X/* CHK=0x47D9 */ X/*+------------------------------------------------------------------------- X ecuerror.h X wht%n4hgf@gatech.edu X Xe_... values must not be changed without careful looking through code Xerror numbers should be <= 0x7FFF to avoid problems with M_I286 versions X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X#define e_USER 0x1000 /* user error differentiation */ X X/* warning errors - do not stop proc execution */ X#define e_WARNING 0x3000 X#define eProcEmpty 0x3001 /* empty procedure */ X#define eWARNING_ALREADY 0x3002 /* warning already printed */ X#define eConnectFailed 0x3003 /* failed to connect */ X#define eNoSwitches 0x3004 /* no switch(es) to command */ X X/* fatal errors - stop proc execution */ X#define e_FATAL 0x4000 X#define eIllegalCommand 0x4003 /* invalid command */ X#define eNoMemory 0x4004 /* no more memory available */ X#define eSyntaxError 0x4005 /* syntax error */ X#define eIllegalVarNumber 0x4006 /* variable number is invalid or out of range */ X#define eIllegalVarType 0x4007 /* unrecognized variable type */ X#define eNotInteger 0x4008 /* integer expected and not found */ X#define eFATAL_ALREADY 0x4011 /* fatal to proc, info already printed */ X#define eCONINT 0x4012 /* abort due to interrupt */ X#define eInvalidFunction 0x4013 /* invalid function name */ X#define eMissingLeftParen 0x4014 /* did not find expected left paren */ X#define eMissingRightParen 0x4015 /* did not find expected right paren */ X#define eCommaExpected 0x4016 /* expected comma not found */ X#define eProcStackTooDeep 0x4017 /* procedure stack depth exceeded */ X#define eInvalidRelOp 0x4018 /* invalid relational operator */ X#define eInvalidIntOp 0x4019 /* invalid integer operator */ X#define eInvalidStrOp 0x4020 /* invalid string operator */ X#define eNotExecutingProc 0x4022 /* not executing DO at this time */ X#define eInvalidLabel 0x4023 /* invalid label */ X#define eInternalLogicError 0x4025 /* internal logic error ... whoops */ X#define eEOF 0x4026 /* end of file or read error */ X#define eBufferTooSmall 0x4027 /* string too long */ X#define eNoParameter 0x4028 /* expected parameter not found */ X#define eBadParameter 0x4029 /* bad parameter */ X#define eInvalidHexNumber 0x402A /* invalid hexadecimal digit */ X#define eInvalidDecNumber 0x402B /* invalid decimal digit */ X#define eInvalidOctNumber 0x402C /* invalid octal digit */ X#define eInteractiveCmd 0x402E /* interactive command */ X#define eNoLineAttached 0x402F /* no line (modem) attached */ X#define eBadFileNumber 0x4030 /* file number out of range */ X#define eNotImplemented 0x4031 /* not implemented */ X#define eDuplicateMatch 0x4032 /* more than one condition matches */ X#define eColonExpected 0x4033 /* expected colon not found */ X#define eLabelInvalidHere 0x4034 /* label not allowed on this statement */ X#define eNoCloseFrame 0x4035 /* missing '}' for '{' */ X#define eNoFrame 0x4036 /* missing command or command group after 'while' or 'if' */ X#define eMissingCommand 0x4037 /* expected command not found */ X#define eBreakCommand 0x4038 /* 'break' outside 'while' */ X#define eContinueCommand 0x4039 /* 'continue' outside 'while' */ X#define eElseCommand 0x403A /* 'else' without matching 'if' */ X#define eInvalidVarName 0x403B /* invalid variable name */ X#define eNoSuchVariable 0x403C /* variable by this name not defined */ X#define eInvalidLogicOp 0x403D /* invalid logical operator */ X#define eExpectRespondFail 0x403E /* expect-respond failed */ X X/* DO attention getter */ X#define e_ProcAttn 0x7000 X#define eProcAttn_GOTO 0x7000 /* GOTO detected */ X#define eProcAttn_GOTOB 0x7001 /* GOTOB detected */ X#define eProcAttn_RETURN 0x7002 /* RETURN detected */ X#define eProcAttn_ESCAPE 0x7003 /* ESCAPE detected */ X#define eProcAttn_Interrupt 0x7004 /* procedure interrupted */ X SHAR_EOF $TOUCH -am 0508023190 ecuerror.h && chmod 0644 ecuerror.h || echo "restore of ecuerror.h failed" set `wc -c ecuerror.h`;Wc_c=$1 if test "$Wc_c" != "4085"; then echo original size 4085, current size $Wc_c fi # ============= ecufkey.h ============== echo "x - extracting ecufkey.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecufkey.h && X/* CHK=0xC2D0 */ X/*+------------------------------------------------------------------------- X ecufkey.h -- AT XENIX/UNIX function key phrases X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:03-23-1990-14:19-wht@n4hgf-add KACT_REDISPLAY */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X#define KDE_F1 0 X#define KDE_F2 1 X#define KDE_F3 2 X#define KDE_F4 3 X#define KDE_F5 4 X#define KDE_F6 5 X#define KDE_F7 6 X#define KDE_F8 7 X#define KDE_F9 8 X#define KDE_F10 9 X#define KDE_F11 10 X#define KDE_F12 11 X#define KDE_CUU 12 X#define KDE_CUD 13 X#define KDE_CUL 14 X#define KDE_CUR 15 X#define KDE_CU5 16 X#define KDE_PGUP 17 X#define KDE_PGDN 18 X#define KDE_END 19 X#define KDE_INS 20 X#define KDE_BKTAB 21 X#define KDE_HOME 22 X X#define KDE_COUNT 23 X X#define KDE_LOGICAL_MAX 12 X#define KDE_OUTSTR_MAX 10 X Xtypedef struct kde X{ X char logical[KDE_LOGICAL_MAX]; X uchar keyid; X char outcount; X char outstr[KDE_OUTSTR_MAX]; X} KDE; X X/* when an outcount is not a count but an action: */ X#define KACT_COMMAND -1 X#define KACT_LOCAL_SHELL -2 X#define KACT_REDISPLAY -3 X Xtypedef struct XF_KDE_NAME X{ X uchar xf; X char kde; X char *name; X} XF_KDE_NAME; X X/* vi: set tabstop=4 shiftwidth=4: */ X/* end of ecufkey.h */ SHAR_EOF $TOUCH -am 0507233390 ecufkey.h && chmod 0644 ecufkey.h || echo "restore of ecufkey.h failed" set `wc -c ecufkey.h`;Wc_c=$1 if test "$Wc_c" != "1424"; then echo original size 1424, current size $Wc_c fi # ============= ecufork.h ============== echo "x - extracting ecufork.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecufork.h && X/* CHK=0xC0A0 */ X/*+------------------------------------------------------------------------- X ecufork.h X wht%n4hgf@gatech.edu X Xfor now just vehicle for deciding whether or not to debug fork/waits X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X/* #define FORK_DEBUG */ X/* vi: set tabstop=4 shiftwidth=4: */ SHAR_EOF $TOUCH -am 0507233390 ecufork.h && chmod 0644 ecufork.h || echo "restore of ecufork.h failed" set `wc -c ecufork.h`;Wc_c=$1 if test "$Wc_c" != "548"; then echo original size 548, current size $Wc_c fi # ============= ecuhangup.h ============== echo "x - extracting ecuhangup.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecuhangup.h && X/* CHK=0xF6EC */ X/*+------------------------------------------------------------------------- X ecuhangup.h -- hangup codes X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:02-15-1990-16:03-wht-add HANGUP_SIG{1,N} */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X/* HANGUP codes for supplying to hangup(): 1 - 64 reserved for signals */ X#define HANGUP_OK 0 X#define HANGUP_SIG1 1 X#define HANGUP_SIGN 64 X#define HANGUP_LINE_READ_ERROR 129 X#define HANGUP_XMTR_WRITE_ERROR 130 X#define HANGUP_XMTR_LOGIC_ERROR 131 X#define HANGUP_BSD4_IOCTL 132 X#define HANGUP_SHM_ABL 133 X#define HANGUP_SHM_RTL 134 X#define HANGUP_NO_FORK_FOR_RCVR 135 X#define HANGUP_TTYIN_READ_ERROR 136 X#define HANGUP_LINE_OPEN_ERROR 137 X#define HANGUP_PWENT_ERROR 138 X#define HANGUP_USAGE 139 X#define HANGUP_INIT_PROC_ERROR 192 X/* 193 - 224 reserved for procedure 'exit' codes */ X X/* vi: set tabstop=4 shiftwidth=4: */ SHAR_EOF $TOUCH -am 0507233390 ecuhangup.h && chmod 0644 ecuhangup.h || echo "restore of ecuhangup.h failed" set `wc -c ecuhangup.h`;Wc_c=$1 if test "$Wc_c" != "1130"; then echo original size 1130, current size $Wc_c fi # ============= ecukey.h ============== echo "x - extracting ecukey.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecukey.h && X/* CHK=0x1906 */ X/*+------------------------------------------------------------------------- X ecukey.h -- single key (ASCII) defines X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X#define CTL_B 0x02 X#define CTL_C 0x03 X#define CTL_D 0x04 X#define BS 0x08 X#define NL 0x0A X#define TAB 0x09 X#define CTL_L 0x0C X#define CR 0x0D X#define XON 0x11 X#define CTL_R 0x12 X#define XOFF 0x13 X#define CTL_U 0x15 X#define ESC 0x1B X#define CTL_BSLASH 0x1C X#define CTL_Z 0x1A X#define SPACE 0x20 X#define DEL 0x7F X/* vi: set tabstop=4 shiftwidth=4: */ SHAR_EOF $TOUCH -am 0507233390 ecukey.h && chmod 0644 ecukey.h || echo "restore of ecukey.h failed" set `wc -c ecukey.h`;Wc_c=$1 if test "$Wc_c" != "814"; then echo original size 814, current size $Wc_c fi # ============= ecupde.h ============== echo "x - extracting ecupde.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecupde.h && X/* CHK=0xEC49 */ X/*+----------------------------------------------------------------------- X ecupde.h X wht%n4hgf@gatech.edu X------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X Xtypedef struct phone_directory_entry X{ X struct phone_directory_entry *next; X struct phone_directory_entry *prev; X char descr[64]; /* description of remote */ X char logical[64]; /* logical name of remote */ X char telno[20]; /* telephone number for remote or null */ X char tty[4]; /* ttyname for access */ X int parity; /* 0,'e','o', maybe 'm','s' */ X uint baud; X} PDE; X X/* vi: set tabstop=4 shiftwidth=4: */ SHAR_EOF $TOUCH -am 0507233390 ecupde.h && chmod 0644 ecupde.h || echo "restore of ecupde.h failed" set `wc -c ecupde.h`;Wc_c=$1 if test "$Wc_c" != "825"; then echo original size 825, current size $Wc_c fi # ============= ecushm.h ============== echo "x - extracting ecushm.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecushm.h && X/* CHK=0x4F27 */ X#define SHM_REV 0x0CDEF0005L /* high 16-bits unique, low=revision */ X/*+------------------------------------------------------------------------- X ecushm.h -- ecu XENIX shared data segment X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:03-12-1990-04:22-wht@n4hgf-add Lrname */ X/*:11-17-1989-15:12-wht-add friend space */ X/*:11-05-1989-16:48-wht-rename ansi_y to cursor_y, ansi_x to cursor_x */ X/*:11-05-1989-16:08-wht-keep screen in shared memory */ X/*:11-04-1989-07:00-wht-keep ansi cursor position in shm */ X/*:11-04-1989-06:55-wht-externalize shm addr */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X#if defined(M_I386) X#define FAR X#else X#define FAR far X#endif X X/* for header users which do not include ecu.h */ X#if !defined(ushort) X#define ushort unsigned short X#endif X#if !defined(uchar) X#define uchar unsigned char X#endif X#if !defined(uint) X#define uint unsigned int X#endif X#if !defined(ulong) X#define ulong unsigned long X#endif X X#define SHM_STRLEN 256 Xtypedef struct ecu_sds X{ X uchar screen[43][80]; X ulong shm_revision; X int xcmd; /* signal from xmtr to rcvr SIGUSR2 */ X int xi1; X int xi2; X int xi3; X char xs1[SHM_STRLEN]; X int rcmd; /* signal from rcvr to xmtr SIGUSR2 */ X int ri1; X int ri2; X char rs1[SHM_STRLEN]; X ulong rcvd_chars; /* rcvr char count */ X ulong rcvd_chars_this_connect; /* count since last connect */ X ulong xmit_chars; /* xmit char count */ X ulong xmit_chars_this_connect; /* count since last connect */ X int cursor_y; /* program-maintained receive cursor */ X int cursor_x; /* program-maintained receive cursor */ X int Ladd_nl_incoming; /* when in ksr mode, add nl to cr on receive */ X int Ladd_nl_outgoing; /* when in ksr mode, add nl to cr on xmit */ X int Lfull_duplex; /* if non-zero, full duplex else half */ X int Liofd; /* file descriptor for line */ X int Lmodem_already_init;/* true if modem already initialized */ X int Lmodem_off_hook; /* we try to keep accurate */ X int Lparity; /* 0==NONE, 'e' == even, 'o' == odd */ X uint Lbaud; /* baud rate */ X char Ldescr[64]; /* description of remote */ X char Lline[64]; /* /dev/ttyname for outgoing line */ X char Llogical[64]; /* logical name of remote (from dial dir) */ X char Lrname[64]; /* logical name of remote (settable) */ X long Loff_hook_time; /* time() at connect */ X char Ltelno[20]; /* telephone number for remote or null */ X int xmtr_pid; /* transmitter process pid */ X int xmtr_ppid; /* transmitter process' parent's pid */ X int xmtr_pgrp; /* transmitter process group */ X char tty_name[64]; X ulong friend_space[128];/* space for friend programs */ X} ECU_SDS; X Xextern ECU_SDS FAR *shm; /* shared segment pointer */ X X/* vi: set tabstop=4 shiftwidth=4: */ X/* end of ecushm.h */ SHAR_EOF $TOUCH -am 0507233390 ecushm.h && chmod 0644 ecushm.h || echo "restore of ecushm.h failed" set `wc -c ecushm.h`;Wc_c=$1 if test "$Wc_c" != "2934"; then echo original size 2934, current size $Wc_c fi # ============= ecutty.h ============== echo "x - extracting ecutty.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecutty.h && X/* CHK=0xBFDE */ X/*+------------------------------------------------------------------------- X ecutty.h X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X Xtypedef struct color_type X{ X char *name; X int num; X} COLOR; X X#ifdef DEFINE_TTY_DATA XCOLOR colors[] = X{ X { "black", 0 }, X { "blue", 1 }, X { "brown", 6 }, X { "cyan", 3 }, X { "gray", 8 }, X { "green", 2 }, X { "hi_white", 15 }, X { "lt_blue", 9 }, X { "lt_cyan", 11 }, X { "lt_green", 10 }, X { "lt_magenta", 13 }, X { "lt_red", 12 }, X { "magenta", 5 }, X { "red", 4 }, X { "white", 7 }, X { "yellow", 14 }, X {(char *)0, -1} X}; X#else Xextern COLOR colors[]; X#endif X X/* color words are ulong: X MSB: reverse video foreground X reverse video background X normal video foreground X LSB: normal video background X*/ X X/* vi: set tabstop=4 shiftwidth=4: */ X/* end of ecutty.h */ SHAR_EOF $TOUCH -am 0507233390 ecutty.h && chmod 0644 ecutty.h || echo "restore of ecutty.h failed" set `wc -c ecutty.h`;Wc_c=$1 if test "$Wc_c" != "1101"; then echo original size 1101, current size $Wc_c fi # ============= ecuungetty.h ============== echo "x - extracting ecuungetty.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecuungetty.h && X/* CHK=0xFFA8 */ X/*+------------------------------------------------------------------------- X ecuungetty.h X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-29-1989-18:00-wht-creation */ X X/* ungetty definitions */ X#define UG_NOTENAB 0 /* on no-switch exec, line not enabled */ X#define UG_ENAB 1 /* on no-switch exec, -r needed */ X#define UG_RESTART 1 /* on -t exec, restart needed */ X#define UG_FAIL 2 /* on no switch exec, line in use */ X X/* extended ecuungetty codes */ X#define UGE_BADSWITCH 240 /* usage: bad switch */ X#define UGE_BADARGC 241 /* usage: bad arg count */ X#define UGE_NOTROOT 242 /* ecuungetty found it had no root privileges */ X#define UGE_CALLER 243 /* caller is not ecu or root */ X#define UGE_T_LOGIN 230 /* -t found utmp status US_LOGIN */ X#define UGE_T_LOGGEDIN 231 /* -t found utmp status US_LOGGGEDIN */ X#define UGE_T_NOTFOUND 232 /* -t found utmp status US_NOTFOUND */ X X/* vi: set tabstop=4 shiftwidth=4: */ X/* end of ecuungetty.h */ SHAR_EOF $TOUCH -am 0507233390 ecuungetty.h && chmod 0644 ecuungetty.h || echo "restore of ecuungetty.h failed" set `wc -c ecuungetty.h`;Wc_c=$1 if test "$Wc_c" != "1182"; then echo original size 1182, current size $Wc_c fi # ============= ecuvmin.h ============== echo "x - extracting ecuvmin.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecuvmin.h && X/* CHK=0xB0D4 */ X/*+------------------------------------------------------------------------- X xenixvmin.h -- set line default VMIN X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:11-23-1989-03:11-wht-conditional compile for M_XENIX or M_UNIX */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X#if defined(M_XENIX) || defined(M_UNIX) X#if defined(BUILDING_LINT_ARGS /* if building lint_args.h ... */) X#define XENIX_VMIN 2 /* ... include vmin handling routines */ X#else X#define XENIX_VMIN 1 /* this is the real value for vmin */ X#endif X#endif X/* vi: set tabstop=4 shiftwidth=4: */ SHAR_EOF $TOUCH -am 0507233390 ecuvmin.h && chmod 0644 ecuvmin.h || echo "restore of ecuvmin.h failed" set `wc -c ecuvmin.h`;Wc_c=$1 if test "$Wc_c" != "799"; then echo original size 799, current size $Wc_c fi # ============= ecuxkey.h ============== echo "x - extracting ecuxkey.h (Text)" sed 's/^X//' << 'SHAR_EOF' > ecuxkey.h && X/* CHK=0x30E8 */ X/*+------------------------------------------------------------------------- X ecuxkey.h -- XENIX function key single char value mapping X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:11-04-1989-03:22-wht-alt-a thru alt-z */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X#define XF_ALTA 0x80 /* depends on /usr/lib/keyboard keys ... */ X#define XF_ALTZ (0x80+'z'-'a') /* ... mapping ALT-a to 0x80, etc */ X X#define XFcurup (0x80 | 'A') /* 0xC1 */ X#define XFcurdn (0x80 | 'B') /* 0xC2 */ X#define XFcurrt (0x80 | 'C') /* 0xC3 */ X#define XFcurlf (0x80 | 'D') /* 0xC4 */ X#define XFcur5 (0x80 | 'E') /* 0xC5 */ X#define XFend (0x80 | 'F') /* 0xC6 */ X#define XFpgdn (0x80 | 'G') /* 0xC7 */ X#define XFhome (0x80 | 'H') /* 0xC8 */ X#define XFpgup (0x80 | 'I') /* 0xC9 */ X#define XFins (0x80 | 'L') /* 0xCA */ X#define XF1 (0x80 | 'M') /* 0xCB */ X#define XF2 (0x80 | 'N') /* 0xCC */ X#define XF3 (0x80 | 'O') /* 0xCD */ X#define XF4 (0x80 | 'P') /* 0xCE */ X#define XF5 (0x80 | 'Q') /* 0xCF */ X#define XF6 (0x80 | 'R') /* 0xD0 */ X#define XF7 (0x80 | 'S') /* 0xD1 */ X#define XF8 (0x80 | 'T') /* 0xD2 */ X#define XF9 (0x80 | 'U') /* 0xD3 */ X#define XF10 (0x80 | 'V') /* 0xD4 */ X#define XF11 (0x80 | 'W') /* 0xD5 */ X#define XF12 (0x80 | 'X') /* 0xD6 */ X#define XFbktab (0x80 | 'Z') /* 0xD7 */ X X/* vi: set tabstop=4 shiftwidth=4: */ X/* end of ecuxkey.h */ SHAR_EOF $TOUCH -am 0507233390 ecuxkey.h && chmod 0644 ecuxkey.h || echo "restore of ecuxkey.h failed" set `wc -c ecuxkey.h`;Wc_c=$1 if test "$Wc_c" != "1580"; then echo original size 1580, current size $Wc_c fi # ============= esd.h ============== echo "x - extracting esd.h (Text)" sed 's/^X//' << 'SHAR_EOF' > esd.h && X/* CHK=0xA11F */ X/*+----------------------------------------------------------------------- X esd.h -- support header for users of esdutil.c X ...!gatech!emory!tridom!wht X------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X Xtypedef struct esd X{ X char *pb; /* full pointer to esd strings */ X short cb; /* count of bytes */ X short maxcb; /* maximum bytes allowed */ X short index; /* next character of significance */ X short old_index; /* last token (backup or error reporting) */ X} ESD; X Xtypedef struct keyword_table_type /* table terminated with null key_word */ X{ X char *key_word; /* 12 char max key word */ X int key_token; /* token returned on match */ X} KEYTAB; X XESD *make_esd(); X X/* vi: set tabstop=4 shiftwidth=4: */ X/* end of esd.h */ SHAR_EOF $TOUCH -am 0507232890 esd.h && chmod 0644 esd.h || echo "restore of esd.h failed" set `wc -c esd.h`;Wc_c=$1 if test "$Wc_c" != "1006"; then echo original size 1006, current size $Wc_c fi # ============= feval.h ============== echo "x - extracting feval.h (Text)" sed 's/^X//' << 'SHAR_EOF' > feval.h && X/* CHK=0x95B2 */ X/*+------------------------------------------------------------------------- X feval.h X wht%n4hgf@gatech.edu X--------------------------------------------------------------------------*/ X/*+:EDITS:*/ X/*:05-07-1990-21:24-wht@n4hgf---- 2.80 --- */ X/*:03-25-1990-14:11-wht@n4hgf------ x2.70 ------- */ X/*:07-03-1989-22:57-wht------ x2.00 ----- */ X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */ X X#define FIinstr 1 X#define FIlen 2 X#define FIstoi 3 X#define FIctoi 4 X#define FIbaud 5 X#define FIconn 6 X#define FIcsec 7 X#define FIpid 8 X#define FIrchr 9 X#define FIrchrc 10 X#define FIxchr 11 X#define FIxchrc 12 X#define FIlgetc 13 X#define FIargc 14 X#define FIftell 15 X#define FIfmode 16 X#define FIisdir 17 X#define FIisreg 18 X#define FIischr 19 X#define FIfatime 20 X#define FIfmtime 21 X#define FIfsize 22 X#define FIcolors 23 X X XKEYTAB feval_int_tbl[] = X{ X {"argc",FIargc}, X {"baud",FIbaud}, X {"colors",FIcolors}, X {"conn",FIconn}, X {"csec",FIcsec}, X {"ctoi",FIctoi}, X {"fatime",FIfatime}, X {"fmode",FIfmode}, X {"fmtime",FIfmtime}, X {"fsize",FIfsize}, X {"ftell",FIftell}, X {"instr",FIinstr}, X {"ischr",FIischr}, X {"isdir",FIisdir}, X {"isreg",FIisreg}, X {"len",FIlen}, X {"lgetc",FIlgetc}, X {"pid",FIpid}, X {"rchr",FIrchr}, X {"rchrc",FIrchrc}, X {"stoi",FIstoi}, X {"xchr",FIxchr}, X {"xchrc",FIxchrc}, X {(char *)0,0} X}; X X#define FSleft 2 X#define FSright 3 X#define FSmid 4 X#define FSdate 5 X#define FSmonth 6 X#define FSday 7 X#define FScgets 9 X#define FScgetc 10 X#define FSitos 11 X#define FSchr 12 X#define FSdir 13 X#define FStty 14 X#define FSrdesc 15 X#define FSrname 16 X#define FSline 17 X#define FSrtel 18 X#define FSargv 19 X#define FStime 20 X#define FStimes 21 X#define FSedate 22 X#define FSetime 23 X#define FSgetenv 24 X#define FSgetlogin 25 X X XKEYTAB feval_str_tbl[] = X{ X {"argv",FSargv}, X {"cgetc",FScgetc}, X {"cgets",FScgets}, X {"chr",FSchr}, X {"date",FSdate}, X {"day",FSday}, X {"dir",FSdir}, X {"edate",FSedate}, X {"etime",FSetime}, X {"getenv",FSgetenv}, X {"getlogin",FSgetlogin}, X {"itos",FSitos}, X {"left",FSleft}, X {"line",FSline}, X {"mid",FSmid}, X {"month",FSmonth}, X {"rdesc",FSrdesc}, X {"right",FSright}, X {"rname",FSrname}, X {"rtelno",FSrtel}, X {"time",FStime}, X {"times",FStimes}, X {"tty",FStty}, X {(char *)0,0} X}; X X/* vi: set tabstop=4 shiftwidth=4: */ X/* end of feval.h */ SHAR_EOF $TOUCH -am 0507233390 feval.h && chmod 0644 feval.h || echo "restore of feval.h failed" set `wc -c feval.h`;Wc_c=$1 if test "$Wc_c" != "2322"; then echo original size 2322, current size $Wc_c fi echo "End of part 15, continue with part 16" exit 0