diff options
Diffstat (limited to 'v4.0/src/H/COMSUB.H')
| -rw-r--r-- | v4.0/src/H/COMSUB.H | 166 |
1 files changed, 166 insertions, 0 deletions
diff --git a/v4.0/src/H/COMSUB.H b/v4.0/src/H/COMSUB.H new file mode 100644 index 0000000..bf5d643 --- /dev/null +++ b/v4.0/src/H/COMSUB.H | |||
| @@ -0,0 +1,166 @@ | |||
| 1 | /*static char *SCCSID = "@(#)comsub.h 8.2 87/02/13";*/ | ||
| 2 | /******************** START OF SPECIFICATIONS ************************/ | ||
| 3 | /* */ | ||
| 4 | /* SOURCE FILE NAME: COMSUB.H */ | ||
| 5 | /* */ | ||
| 6 | /* DESCRIPTIVE NAME: COMMON SUBROUTINE INCLUDE FILE */ | ||
| 7 | /* */ | ||
| 8 | /* FUNCTION: */ | ||
| 9 | /* */ | ||
| 10 | /* */ | ||
| 11 | /* NOTES: */ | ||
| 12 | /* */ | ||
| 13 | /* ENTRY POINTS: NONE */ | ||
| 14 | /* */ | ||
| 15 | /* EXTERNAL REFERENCE: NONE */ | ||
| 16 | /* */ | ||
| 17 | /* RELEASE: */ | ||
| 18 | /* */ | ||
| 19 | /* VERSION DATE REASON */ | ||
| 20 | /* */ | ||
| 21 | /* 1.00 03/10/1986 initial version */ | ||
| 22 | /* 1.01 03/11/1986 define external pointer to invalid */ | ||
| 23 | /* argument string (CORA's request) */ | ||
| 24 | /* 1.02 03/18/1986 external declaration of "computmsg" */ | ||
| 25 | /* parm 1 : char far * -> char far ** */ | ||
| 26 | /* 1.03 03/24/1986 delete "comverflnm" related decralation */ | ||
| 27 | /* change "int" to "unsigned" */ | ||
| 28 | /* 1.04 03/25/1986 - add function external declaration of */ | ||
| 29 | /* "comcheckdosver" */ | ||
| 30 | /* - delete "far" declaration. */ | ||
| 31 | /* 2.00 04/15/1986 the first intigration version */ | ||
| 32 | /* 2.01 05/21/1986 - add "extern rctomid()" */ | ||
| 33 | /* 2.02 05/22/1986 - add DBCS common routines */ | ||
| 34 | /* 2.03 06/17/1986 - add "com_toupper" and "com_tolower" */ | ||
| 35 | /* 2.04 06/18/1986 - comment out SCCSID tag */ | ||
| 36 | /* 2.05 06/25/1986 - add filehandle enabling switch */ | ||
| 37 | /* 2.06 08/07/1986 - add new routine "realopen" */ | ||
| 38 | /* 2.07 02/13/1987 - add "cm_trace_cmd_flg". */ | ||
| 39 | /*********************************************************************/ | ||
| 40 | |||
| 41 | /************************************* | ||
| 42 | * * | ||
| 43 | * external function declaration * | ||
| 44 | * * | ||
| 45 | *************************************/ | ||
| 46 | |||
| 47 | extern unsigned comgetarg ( | ||
| 48 | unsigned *, /* number of arguments */ | ||
| 49 | char **, /* pointer array of original arguments */ | ||
| 50 | char **, /* pointer of argument unit character */ | ||
| 51 | /* storage */ | ||
| 52 | unsigned, /* depth of new argument pointer array */ | ||
| 53 | char *, /* broken down argument character buffer */ | ||
| 54 | unsigned, /* size of argument character buffer */ | ||
| 55 | char *, /* current defualt drive name */ | ||
| 56 | char *); /* switching character */ | ||
| 57 | /* | ||
| 58 | * print a message and get a response | ||
| 59 | */ | ||
| 60 | extern unsigned computmsg ( | ||
| 61 | char **, /* table of variables to insert */ | ||
| 62 | unsigned, /* number of variables to insert */ | ||
| 63 | unsigned, /* message id */ | ||
| 64 | char *, /* message file name */ | ||
| 65 | unsigned, /* output device type */ | ||
| 66 | unsigned, /* response type */ | ||
| 67 | char *, /* response data area */ | ||
| 68 | unsigned); /* size of response data area */ | ||
| 69 | /* | ||
| 70 | * verify correct DOS version | ||
| 71 | */ | ||
| 72 | extern unsigned comcheckdosver(); | ||
| 73 | |||
| 74 | /* | ||
| 75 | * return code conversion to message id | ||
| 76 | */ | ||
| 77 | extern unsigned rctomid( | ||
| 78 | unsigned); /* return code to converted to msg id */ | ||
| 79 | |||
| 80 | /* | ||
| 81 | * open drive in real mode | ||
| 82 | */ | ||
| 83 | extern unsigned far pascal REALOPEN( | ||
| 84 | char far *, /* pointer to drive name */ | ||
| 85 | unsigned far *, /* pointer to drive handle */ | ||
| 86 | unsigned); /* open mode */ | ||
| 87 | |||
| 88 | /*****************************************/ | ||
| 89 | /* */ | ||
| 90 | /* DBCS common subroutine */ | ||
| 91 | /* */ | ||
| 92 | /*****************************************/ | ||
| 93 | /* | ||
| 94 | * search the first substring occurrence in a string | ||
| 95 | */ | ||
| 96 | extern unsigned char | ||
| 97 | *com_substr( | ||
| 98 | unsigned char *, /* source string */ | ||
| 99 | unsigned char *); /* target string */ | ||
| 100 | |||
| 101 | /* | ||
| 102 | * search the last charater occurrence in a string | ||
| 103 | */ | ||
| 104 | extern unsigned char | ||
| 105 | *com_strrchr( | ||
| 106 | unsigned char *, /* source string */ | ||
| 107 | unsigned char ); /* target string */ | ||
| 108 | |||
| 109 | /* | ||
| 110 | * compare two strings with regard to case | ||
| 111 | */ | ||
| 112 | extern int | ||
| 113 | com_strcmpi( | ||
| 114 | unsigned char *, /* source string */ | ||
| 115 | unsigned char *); /* string to be compared */ | ||
| 116 | |||
| 117 | /* | ||
| 118 | * convert a string to uppercase | ||
| 119 | */ | ||
| 120 | extern unsigned char | ||
| 121 | *com_strupr( | ||
| 122 | unsigned char *); /* string to be converted */ | ||
| 123 | |||
| 124 | /* | ||
| 125 | * convert a string to lowercase | ||
| 126 | */ | ||
| 127 | extern unsigned char | ||
| 128 | *com_strlwr( | ||
| 129 | unsigned char *); /* string to be converted */ | ||
| 130 | |||
| 131 | /* | ||
| 132 | * search the first occurrence of a character in a string | ||
| 133 | */ | ||
| 134 | extern char *com_strchr( | ||
| 135 | unsigned char *, /* a source string */ | ||
| 136 | unsigned char ); /* a character to be searched */ | ||
| 137 | |||
| 138 | /* | ||
| 139 | * convert character to uppercase | ||
| 140 | */ | ||
| 141 | extern int com_toupper( | ||
| 142 | unsigned char ); /* character to be converted to uppercase */ | ||
| 143 | |||
| 144 | /* | ||
| 145 | * convert character to lowercase | ||
| 146 | */ | ||
| 147 | extern int com_tolower( | ||
| 148 | unsigned char ); /* character to be converted to lowercase */ | ||
| 149 | |||
| 150 | /************************************* | ||
| 151 | * * | ||
| 152 | * external variable declaration * | ||
| 153 | * * | ||
| 154 | *************************************/ | ||
| 155 | extern unsigned cm_invalid_parm_pointer; /* points to first detected */ | ||
| 156 | /* invalid argument string */ | ||
| 157 | |||
| 158 | extern char cm_flhandle_enable_sw; /* enable filehandle input for */ | ||
| 159 | /* computmsg routine */ | ||
| 160 | /* */ | ||
| 161 | /* if this switch is on (non-zero), */ | ||
| 162 | /* filehandle can be set in devicetype.*/ | ||
| 163 | |||
| 164 | extern char cm_trace_cmd_flg; /* ignore drive validity check. */ | ||
| 165 | /* if it set to 1, COMGETARG does */ | ||
| 166 | /* not check drive validity. */ | ||