123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181 |
- /*+-------------------------------------------------------------------------
- proc_error.c - ecu error code handler
- D O N O T E D I T B Y H A N D
- Created automagically by bperr/bperr.c
- Defined functions:
- erc_text(erc)
- proc_error(erc)
- --------------------------------------------------------------------------*/
- /*+:EDITS:*/
- /*:04-26-2000-11:16-wht@bob-RELEASE 4.42 */
- /*:04-14-1999-10:15-auto-creation from ecuerror.h by build_err 1.2 */
- #include "ecu.h"
- #include "ecuerror.h"
- /*+-------------------------------------------------------------------------
- erc_text(erc) - error code to text
- e.*ALREADY and eProcAttn.* excluded because they are never printed
- --------------------------------------------------------------------------*/
- char *
- erc_text(erc)
- int erc;
- {
- static char errant[54];
- switch(erc)
- {
- case eProcEmpty:
- return("empty procedure");
- case eConnectFailed:
- return("failed to connect");
- case eNoSwitches:
- return("no switch(es) to command");
- case eIllegalCommand:
- return("invalid command");
- case eNoMemory:
- return("no more memory available");
- case eSyntaxError:
- return("syntax error");
- case eMissingIpAddress:
- return("missing IP address");
- case eBadIpAddress:
- return("invalid IP address");
- case eIllegalVarNumber:
- return("number is invalid or out of range");
- case eIllegalVarType:
- return("unrecognized variable type");
- case eNotInteger:
- return("integer expected and not found");
- case eCONINT:
- return("abort due to interrupt");
- case eInvalidFunction:
- return("invalid function name");
- case eMissingLeftParen:
- return("did not find expected left paren");
- case eMissingRightParen:
- return("did not find expected right paren");
- case eCommaExpected:
- return("expected comma not found");
- case eProcStackTooDeep:
- return("procedure stack depth exceeded");
- case eInvalidRelOp:
- return("invalid relational operator");
- case eInvalidIntOp:
- return("invalid integer operator");
- case eInvalidStrOp:
- return("invalid string operator");
- case eNotExecutingProc:
- return("not executing a procedure");
- case eInvalidLabel:
- return("invalid label");
- case eInternalLogicError:
- return("internal logic error ... whoops");
- case eEOF:
- return("end of file or read error");
- case eBufferTooSmall:
- return("string too long");
- case eNoParameter:
- return("expected parameter not found");
- case eBadParameter:
- return("bad parameter");
- case eInvalidHexNumber:
- return("invalid hexadecimal digit");
- case eInvalidDecNumber:
- return("invalid decimal digit");
- case eInvalidOctNumber:
- return("invalid octal digit");
- case eInteractiveCmd:
- return("interactive command");
- case eNoLineAttached:
- return("no line (modem) attached");
- case eBadFileNumber:
- return("file number out of range");
- case eNotImplemented:
- return("not implemented");
- case eDuplicateMatch:
- return("more than one condition matches");
- case eColonExpected:
- return("expected colon not found");
- case eLabelInvalidHere:
- return("label not allowed on this statement");
- case eNoCloseFrame:
- return("missing '}' for '{'");
- case eNoFrame:
- return("missing command or command");
- case eMissingCommand:
- return("expected command not found");
- case eBreakCommand:
- return("'break' outside 'while'");
- case eContinueCommand:
- return("'continue' outside 'while'");
- case eElseCommand:
- return("'else' without matching 'if'");
- case eInvalidVarName:
- return("invalid variable name");
- case eNoSuchVariable:
- return("variable by this name not defined");
- case eInvalidLogicOp:
- return("invalid logical operator");
- case eExpectRespondFail:
- return("expect-respond failed");
- case eSwitchesTooLong:
- return("switches too long");
- case eInvalidStringOp:
- return("invalid operator for strings");
- case eNoFreeFile:
- return("no free ECU file number");
- case eRegNoParen:
- return("parenthetical groups not supported");
- case eRegRange:
- return("range endpoint too large");
- case eRegBadNum:
- return("bad number in regular expression");
- case eRegDigit:
- return("\"\\digit\" out of range");
- case eRegDelim:
- return("illegal or missing delimiter");
- case eRegNullRE:
- return("null expression not allowed");
- case eReg2FewOpens:
- return("more \\)'s than \\('s in regexp");
- case eReg2ManyOpens:
- return("more \\('s than \\)'s in regexp");
- case eReg2ManyArgs:
- return("more than 2 numbers in \\{ \\}");
- case eRegBraceExp:
- return("} expected after \\");
- case eRegBraceRange:
- return("first number exceeds second in \\{ \\}");
- case eRegBracketImb:
- return("[] imbalance");
- case eReg2Complex:
- return("regular expression too complex");
- default:
- sprintf(errant,"unknown error %04X",erc);
- return(errant);
- }
- } /* end of erc_text */
- /*+-------------------------------------------------------------------------
- proc_error(erc) - print error text with newline appended
- --------------------------------------------------------------------------*/
- void
- proc_error(erc)
- int erc;
- {
- pputs(erc_text(erc));
- pputs("\n");
- } /* end of proc_error */
- /* vi: set tabstop=4 shiftwidth=4: */
- /* end of proc_error.c */
|