ecu - SCO XENIX V/{2,3}86 Extended CU part 21/47
Warren Tucker
wht at tridom.uucp
Tue Oct 10 09:36:17 AEST 1989
---- Cut Here and unpack ----
#!/bin/sh
# this is part 21 of a multipart archive
# do not concatenate these parts, unpack them in order with /bin/sh
# file ecu.h continued
#
CurArch=21
if test ! -r s2_seq_.tmp
then echo "Please unpack part 1 first!"
exit 1; fi
( read Scheck
if test "$Scheck" != $CurArch
then echo "Please unpack part $Scheck next!"
exit 1;
else exit 0; fi
) < s2_seq_.tmp || exit 1
echo "x - Continuing file ecu.h"
sed 's/^X//' << 'SHAR_EOF' >> ecu.h
Xint Lparity; /* 0==NONE, 'e' == even, 'o' == odd */
Xchar LLCKname[128]; /* lock file name */
Xuint Lbaud; /* baud rate */
Xchar Ldescr[64]; /* description of remote */
Xchar Lline[64]; /* /dev/ttyname for outgoing line */
Xchar Llogical[64]; /* logical name of remote */
Xstruct termio Ltermio; /* attributes for the line to remote */
Xuchar Lmodem_sreg[20]; /* allow for more later */
Xlong Loff_hook_time; /* time() at connect */
Xchar Ltelno[20]; /* telephone number for remote or null */
X#else
Xextern char LLCKname[];
Xextern int Ladd_nl_incoming;
Xextern int Ladd_nl_outgoing;
Xextern uint Lbaud;
Xextern char Ldescr[];
Xextern int Lfull_duplex;
Xextern int Liofd;
Xextern char Lline[];
Xextern char Llogical[];
X#if !defined(OMIT_TERMIO_REFERENCES)
Xextern struct termio Ltermio;
X#endif
Xextern int Lmodem_already_init;
Xextern int Lmodem_off_hook;
Xextern uchar Lmodem_sreg[];
Xextern long Loff_hook_time;
Xextern int Lparity;
Xextern char Ltelno[];
X#endif
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#include "smap.h"
X/* vi: set tabstop=4 shiftwidth=4: */
SHAR_EOF
echo "File ecu.h is complete"
chmod 0644 ecu.h || echo "restore of ecu.h fails"
echo "x - extracting ecucmd.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecucmd.h &&
X/* CHK=0x40DB */
X/*+-------------------------------------------------------------------------
X ecucmd.h -- command definitions
X Copyright 1986,1989 Warren H. Tucker, III. All Rights Reserved
X--------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.00 ---------------- */
X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */
X
X/* interactive command tokens */
X
X#define CTansi 1
X#define CTax 2
X#define CTbaud 3
X#define CTbn 4
X#define CTbreak 5
X#define CTcd 6
X#define CTclrx 7
X#define CTda 8
X#define CTdial 9
X#define CTdo 10
X#define CTduplex 11
X#define CTexit 12
X#define CTfi 13
X#define CTfkey 14
X#define CThangup 15
X#define CThelp 16
X#define CTllp 17
X#define CTloff 18
X#define CTlog 19
X#define CTnl 20
X#define CTnlin 21
X#define CTnlout 22
X#define CToa 23
X#define CTparity 24
X#define CTpcmd 25
X#define CTpid 26
X#define CTplog 27
X#define CTptrace 28
X#define CTpwd 29
X#define CTredial 30
X#define CTrev 31
X#define CTrk 32
X#define CTrs 33
X#define CTrx 34
X#define CTry 35
X#define CTrz 36
X#define CTsgr 37
X#define CTshell 38
X#define CTsk 39
X#define CTss 40
X#define CTstat 41
X#define CTsx 42
X#define CTsy 43
X#define CTsz 44
X#define CTte 45
X#define CTtime 46
X#define CTts 47
X#define CTtty 48
X#define CTxa 49
X#define CTxlog 50
X/* #define CTmkdir 51 */
X#define CTmdump 52 /* _malloc_dump */
X#define CTsdname 53
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_dial() Z
Xint cmd_do() Z
Xint cmd_duplex() Z
Xint cmd_echo() Z
Xint cmd_else() Z
Xint cmd_exit() 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_icolor() 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_plog() Z
Xint cmd_prompt() Z
Xint cmd_ptrace() Z
Xint cmd_return() Z
Xint cmd_rk() 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_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 { "ansi", 2,CTansi, "", 0 },
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 { "do", 2,CTdo, "perform procedure", cmd_do },
X { "duplex", 2,CTduplex, "set/display duplex", cmd_duplex },
X { "echo", 0,0, "", cmd_echo },
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 { "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 { "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 { "icolor", 0,0, "", cmd_icolor },
X { "ifi", 0,0, "", cmd_ifi },
X { "ifs", 0,0, "", cmd_ifs },
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 { "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 { "prompt", 0,0, "", cmd_prompt },
X { "ptrace", 2,CTptrace, "control procedure trace", cmd_ptrace },
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 { "rs", 2,CTrs, "receive via SEAlink", cmd_rs },
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 { "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
chmod 0644 ecucmd.h || echo "restore of ecucmd.h fails"
echo "x - extracting ecuerror.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecuerror.h &&
X/* CHK=0xD955 */
X/*+-------------------------------------------------------------------------
X ecuerror.h
X Copyright 1989 Warren H. Tucker, III. All Rights Reserved
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/*:07-03-1989-22:57-wht------------- ecu 2.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 switches 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 /* inappropriate 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
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
chmod 0644 ecuerror.h || echo "restore of ecuerror.h fails"
echo "x - extracting ecufkey.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecufkey.h &&
X/* CHK=0x2E0D */
X/*+-------------------------------------------------------------------------
X ecufkey.h -- XENIX function key phrases
X Copyright 1986,1989 Warren H. Tucker, III. All Rights Reserved
X--------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.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
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
chmod 0644 ecufkey.h || echo "restore of ecufkey.h fails"
echo "x - extracting ecufork.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecufork.h &&
X/* CHK=0x1250 */
X/*+-------------------------------------------------------------------------
X ecufork.h
X Copyright 1986,1989 Warren H. Tucker, III. All Rights Reserved
X
Xfor now just vehicle for deciding whether or not to debug fork/waits
X--------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.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
chmod 0644 ecufork.h || echo "restore of ecufork.h fails"
echo "x - extracting ecuhangup.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecuhangup.h &&
X/* CHK=0x556D */
X/*+-------------------------------------------------------------------------
X ecuhangup.h -- hangup codes
X Copyright 1986,1989 Warren H. Tucker, III. All Rights Reserved
X--------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.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_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_INIT_PROC_ERROR 192
X/* 193 - 224 reserved for procedure 'exit' codes */
X
X/* vi: set tabstop=4 shiftwidth=4: */
SHAR_EOF
chmod 0644 ecuhangup.h || echo "restore of ecuhangup.h fails"
echo "x - extracting ecukey.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecukey.h &&
X/* CHK=0xC7DE */
X/*+-------------------------------------------------------------------------
X ecukey.h -- single key (ASCII) defines
X Copyright 1986,1989 Warren H. Tucker, III. All Rights Reserved
X--------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.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
chmod 0644 ecukey.h || echo "restore of ecukey.h fails"
echo "x - extracting ecupde.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecupde.h &&
X/* CHK=0xC069 */
X/*+-----------------------------------------------------------------------
X ecupde.h
X Copyright 1986,1989 Warren H. Tucker, III. All Rights Reserved
X------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.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
chmod 0644 ecupde.h || echo "restore of ecupde.h fails"
echo "x - extracting ecushm.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecushm.h &&
X/* CHK=0x9DAA */
X/*+-------------------------------------------------------------------------
X ecushm.h -- ecu XENIX shared data segment
X Copyright 1986,1989 Warren H. Tucker, III. All Rights Reserved
X--------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.00 ---------------- */
X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */
X
X#define SHM_STRLEN 256
Xtypedef struct ecu_sds
X{
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} ECU_SDS;
X
X/* vi: set tabstop=4 shiftwidth=4: */
SHAR_EOF
chmod 0644 ecushm.h || echo "restore of ecushm.h fails"
echo "x - extracting ecuungetty.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecuungetty.h &&
X/* CHK=0x1231 */
X/*+-------------------------------------------------------------------------
X ecuungetty.h
X Copyright 1989 Warren H. Tucker, III. All Rights Reserved
X--------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.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
X#define UGE_BADARGC 241
X#define UGE_NOTROOT 242
X#define UGE_CALLER 243 /* caller is not ecu or root */
X
X/* vi: set tabstop=4 shiftwidth=4: */
X/* end of ecuungetty.h */
SHAR_EOF
chmod 0644 ecuungetty.h || echo "restore of ecuungetty.h fails"
echo "x - extracting ecuvmin.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecuvmin.h &&
X/* CHK=0x3DD7 */
X/*+-------------------------------------------------------------------------
X xenixvmin.h -- set line default VMIN
X Copyright 1986,1989 Warren H. Tucker, III. All Rights Reserved
X--------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.00 ---------------- */
X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */
X
X#if defined(M_XENIX)
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
chmod 0644 ecuvmin.h || echo "restore of ecuvmin.h fails"
echo "x - extracting ecuxkey.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > ecuxkey.h &&
X/* CHK=0x5655 */
X/*+-------------------------------------------------------------------------
X ecuxkey.h -- XENIX function key single char value mapping
X Copyright 1986,1989 Warren H. Tucker, III. All Rights Reserved
X--------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.00 ---------------- */
X/*:06-24-1989-16:53-wht-flush edits --- ecu 1.95 */
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
chmod 0644 ecuxkey.h || echo "restore of ecuxkey.h fails"
echo "x - extracting esd.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > esd.h &&
X/* CHK=0x51D3 */
X/*+-----------------------------------------------------------------------
X esd.h -- support header for users of esdutil.c
X ...!gatech!emory!tridom!wht
X------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.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
chmod 0644 esd.h || echo "restore of esd.h fails"
echo "x - extracting feval.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > feval.h &&
X/* CHK=0x2CEB */
X/*+-------------------------------------------------------------------------
X feval.h
X Copyright 1989 Warren H. Tucker, III. All Rights Reserved
X--------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:07-03-1989-22:57-wht------------- ecu 2.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
chmod 0644 feval.h || echo "restore of feval.h fails"
echo "x - extracting lint_args.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > lint_args.h &&
X/* CHK=0xCAD2 */
X/*+-----------------------------------------------------------------------
X lint_args.h
X------------------------------------------------------------------------*/
X/*+:EDITS:*/
X/*:10-07-1989-17:21-afterlint-creation */
X
X#ifndef BUILDING_LINT_ARGS
X#ifdef LINT_ARGS
X
X/* bamboozle.c */
Xchar *bamboozle(int );
X/* cmdtbl.c */
X/* ecu.c */
Xint main(int ,char * *,char * *);
Xint xmtr(void);
X/* ecuLCK.c */
Xchar *other_lock_name(char *);
Xint check_utmp(void);
Xint create_lock_file(char *);
Xint line_locked(char *);
Xint lock_tty(void);
Xint make_lock_name(char *,char *);
Xvoid unlock_tty(void);
X/* ecuchdir.c */
Xint cd_array_delete(char * *,int );
Xint cd_array_init(void);
Xint change_directory(char *,int );
Xint expand_dirname(char *,int );
Xvoid cd_array_delete_usage(void);
Xvoid cd_array_read(char * *,int );
Xvoid cd_array_save(char * *,int );
X/* ecudump.c */
Xvoid hex_dump(char *,int ,char *,int );
Xvoid hex_dump16(unsigned short );
Xvoid hex_dump32(unsigned long );
Xvoid hex_dump4(unsigned char );
Xvoid hex_dump8(unsigned char );
Xvoid hex_dump_fp(struct _iobuf *,char *,int ,char *,int );
X/* ecufinsert.c */
Xint expand_filename(char *,int );
Xint file_insert_to_line(int ,char * *);
X/* ecufkey.c */
Xchar *keyset_idstr(int );
Xint keyset_define_key(char *);
Xint keyset_idnum(char *);
Xint keyset_read(char *);
Xint xf_to_keyid(unsigned char );
Xvoid ffso(char *);
Xvoid keyset_display(void);
Xvoid keyset_init(void);
X/* ecufork.c */
Xchar *find_executable(char *);
Xint exec_cmd(char *);
Xint expand_cmd_with_wildlist(char *,char * *);
Xint is_executable(char *);
SHAR_EOF
echo "End of part 21"
echo "File lint_args.h is continued in part 22"
echo "22" > s2_seq_.tmp
exit 0
--
-------------------------------------------------------------------
Warren Tucker, Tridom Corporation ...!gatech!emory!tridom!wht
Ker-au'-lo-phon. An 8-foot partial flue-stop, having metal pipes
surmounted by adjustable rings, and with a hole bored near the top
of each pipe, producing a soft and "reedy" tone.
More information about the Alt.sources
mailing list