1 |
/* This file is part of the SvarCOM project and is published under the terms
|
1 |
/* This file is part of the SvarCOM project and is published under the terms
|
2 |
* of the MIT license.
|
2 |
* of the MIT license.
|
3 |
*
|
3 |
*
|
4 |
* Copyright (C) 2021-2022 Mateusz Viste
|
4 |
* Copyright (C) 2021-2022 Mateusz Viste
|
5 |
*
|
5 |
*
|
6 |
* Permission is hereby granted, free of charge, to any person obtaining a
|
6 |
* Permission is hereby granted, free of charge, to any person obtaining a
|
7 |
* copy of this software and associated documentation files (the "Software"),
|
7 |
* copy of this software and associated documentation files (the "Software"),
|
8 |
* to deal in the Software without restriction, including without limitation
|
8 |
* to deal in the Software without restriction, including without limitation
|
9 |
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
9 |
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
10 |
* and/or sell copies of the Software, and to permit persons to whom the
|
10 |
* and/or sell copies of the Software, and to permit persons to whom the
|
11 |
* Software is furnished to do so, subject to the following conditions:
|
11 |
* Software is furnished to do so, subject to the following conditions:
|
12 |
*
|
12 |
*
|
13 |
* The above copyright notice and this permission notice shall be included in
|
13 |
* The above copyright notice and this permission notice shall be included in
|
14 |
* all copies or substantial portions of the Software.
|
14 |
* all copies or substantial portions of the Software.
|
15 |
*
|
15 |
*
|
16 |
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
16 |
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
17 |
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
17 |
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
18 |
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
18 |
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
19 |
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
19 |
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
20 |
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
20 |
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
21 |
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
|
21 |
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
|
22 |
* DEALINGS IN THE SOFTWARE.
|
22 |
* DEALINGS IN THE SOFTWARE.
|
23 |
*/
|
23 |
*/
|
24 |
|
24 |
|
25 |
#ifndef RMODINIT_H
|
25 |
#ifndef RMODINIT_H
|
26 |
#define RMODINIT_H
|
26 |
#define RMODINIT_H
|
27 |
|
27 |
|
- |
|
28 |
#include "helpers.h" /* struct DTA definition */
|
- |
|
29 |
|
28 |
#define FLAG_EXEC_AND_QUIT 1
|
30 |
#define FLAG_EXEC_AND_QUIT 1
|
29 |
#define FLAG_PERMANENT 2
|
31 |
#define FLAG_PERMANENT 2
|
30 |
#define FLAG_ECHOFLAG 4
|
32 |
#define FLAG_ECHOFLAG 4
|
31 |
#define FLAG_ECHO_BEFORE_BAT 8
|
33 |
#define FLAG_ECHO_BEFORE_BAT 8
|
32 |
#define FLAG_SKIP_AUTOEXEC 16
|
34 |
#define FLAG_SKIP_AUTOEXEC 16
|
33 |
#define FLAG_STEPBYSTEP 32
|
35 |
#define FLAG_STEPBYSTEP 32
|
34 |
|
36 |
|
35 |
|
37 |
|
36 |
/* batch context structure used to track what batch file is being executed,
|
38 |
/* batch context structure used to track what batch file is being executed,
|
37 |
* at what line, arguments, whether or not it has a parent batch... */
|
39 |
* at what line, arguments, whether or not it has a parent batch... */
|
38 |
struct batctx {
|
40 |
struct batctx {
|
39 |
char fname[130]; /* truename of batch file being processed */
|
41 |
char fname[130]; /* truename of batch file being processed */
|
40 |
char argv[130]; /* args of the batch call (0-separated) */
|
42 |
char argv[130]; /* args of the batch call (0-separated) */
|
41 |
unsigned char flags; /* used for step-by-step execution */
|
43 |
unsigned char flags; /* used for step-by-step execution */
|
42 |
unsigned long nextline; /* offset in file of next bat line to process */
|
44 |
unsigned long nextline; /* offset in file of next bat line to process */
|
43 |
struct batctx far *parent; /* parent context if this batch was CALLed */
|
45 |
struct batctx far *parent; /* parent context if this batch was CALLed */
|
44 |
};
|
46 |
};
|
45 |
|
47 |
|
- |
|
48 |
/* for context structure used to track the execution of the ongoing FOR loop */
|
- |
|
49 |
struct forctx {
|
- |
|
50 |
char cmd[130]; /* copy of the original FOR command */
|
- |
|
51 |
unsigned short varname; /* cmd offset of the replaceable variable name */
|
- |
|
52 |
unsigned short curpat; /* cmd offset of currently processed pattern */
|
- |
|
53 |
unsigned short exec; /* cmd offset of the command to be executed */
|
- |
|
54 |
struct DTA dta; /* DTA for FindNext on current pattern */
|
- |
|
55 |
unsigned char dta_inited; /* 0=requires FindFirst 1=FindNext */
|
- |
|
56 |
};
|
- |
|
57 |
|
46 |
struct rmod_props {
|
58 |
struct rmod_props {
|
47 |
unsigned short rmodseg; /* segment where rmod is loaded */
|
59 |
unsigned short rmodseg; /* segment where rmod is loaded */
|
48 |
unsigned long origparent; /* original parent (far ptr) of the shell */
|
60 |
unsigned long origparent; /* original parent (far ptr) of the shell */
|
49 |
unsigned short origenvseg; /* original environment segment */
|
61 |
unsigned short origenvseg; /* original environment segment */
|
50 |
unsigned char flags; /* command line parameters */
|
62 |
unsigned char flags; /* command line parameters */
|
51 |
unsigned char version; /* used to detect mismatch between rmod and SvarCOM */
|
63 |
unsigned char version; /* used to detect mismatch between rmod and SvarCOM */
|
52 |
char awaitingcmd[130]; /* command to exec next time (if any) */
|
64 |
char awaitingcmd[130]; /* command to exec next time (if any) */
|
53 |
struct batctx far *bat;
|
65 |
struct batctx far *bat; /* linked list of bat contexts, if BAT ongoing */
|
- |
|
66 |
struct forctx far *forloop; /* a single FOR loop structure, if FOR ongoing */
|
54 |
};
|
67 |
};
|
55 |
|
68 |
|
56 |
#define RMOD_OFFSET_ENVSEG 0x2C /* stored in rmod's PSP */
|
69 |
#define RMOD_OFFSET_ENVSEG 0x2C /* stored in rmod's PSP */
|
57 |
#define RMOD_OFFSET_INPUTBUF (0x100 + 0x08)
|
70 |
#define RMOD_OFFSET_INPUTBUF (0x100 + 0x08)
|
58 |
#define RMOD_OFFSET_COMSPECPTR (0x100 + 0xCE)
|
71 |
#define RMOD_OFFSET_COMSPECPTR (0x100 + 0xCE)
|
59 |
#define RMOD_OFFSET_BOOTDRIVE (0x100 + 0xD0)
|
72 |
#define RMOD_OFFSET_BOOTDRIVE (0x100 + 0xD0)
|
60 |
#define RMOD_OFFSET_LEXITCODE (0x100 + 0xDF)
|
73 |
#define RMOD_OFFSET_LEXITCODE (0x100 + 0xDF)
|
61 |
#define RMOD_OFFSET_EXECPARAM (0x100 + 0xE0)
|
74 |
#define RMOD_OFFSET_EXECPARAM (0x100 + 0xE0)
|
62 |
#define RMOD_OFFSET_EXECPROG (0x100 + 0xEE)
|
75 |
#define RMOD_OFFSET_EXECPROG (0x100 + 0xEE)
|
63 |
#define RMOD_OFFSET_STDINFILE (0x100 + 0x16A)
|
76 |
#define RMOD_OFFSET_STDINFILE (0x100 + 0x16A)
|
64 |
#define RMOD_OFFSET_STDOUTFILE (0x100 + 0x1EE)
|
77 |
#define RMOD_OFFSET_STDOUTFILE (0x100 + 0x1EE)
|
65 |
#define RMOD_OFFSET_STDOUTAPP (0x100 + 0x26E)
|
78 |
#define RMOD_OFFSET_STDOUTAPP (0x100 + 0x26E)
|
66 |
#define RMOD_OFFSET_STDIN_DEL (0x100 + 0x270)
|
79 |
#define RMOD_OFFSET_STDIN_DEL (0x100 + 0x270)
|
67 |
#define RMOD_OFFSET_BRKHANDLER (0x100 + 0x271)
|
80 |
#define RMOD_OFFSET_BRKHANDLER (0x100 + 0x271)
|
68 |
#define RMOD_OFFSET_ROUTINE (0x100 + 0x273)
|
81 |
#define RMOD_OFFSET_ROUTINE (0x100 + 0x273)
|
69 |
|
82 |
|
70 |
struct rmod_props far *rmod_install(unsigned short envsize, unsigned char *rmodcore, unsigned short rmodcore_len);
|
83 |
struct rmod_props far *rmod_install(unsigned short envsize, unsigned char *rmodcore, unsigned short rmodcore_len);
|
71 |
struct rmod_props far *rmod_find(unsigned short rmodcore_len);
|
84 |
struct rmod_props far *rmod_find(unsigned short rmodcore_len);
|
72 |
void rmod_updatecomspecptr(unsigned short rmod_seg, unsigned short env_seg);
|
85 |
void rmod_updatecomspecptr(unsigned short rmod_seg, unsigned short env_seg);
|
73 |
|
86 |
|
74 |
/* allocates bytes of far memory, flags it as belonging to rmod
|
87 |
/* allocates bytes of far memory, flags it as belonging to rmod
|
75 |
* the new block can be optionally flagged as 'ident' (if not null) and zero
|
88 |
* the new block can be optionally flagged as 'ident' (if not null) and zero
|
76 |
* out the newly allocated memory.
|
89 |
* out the newly allocated memory.
|
77 |
* returns a far ptr to the allocated block, or NULL on error */
|
90 |
* returns a far ptr to the allocated block, or NULL on error */
|
78 |
void far *rmod_fcalloc(unsigned short bytes, unsigned short rmod_seg, char *ident);
|
91 |
void far *rmod_fcalloc(unsigned short bytes, unsigned short rmod_seg, char *ident);
|
79 |
|
92 |
|
80 |
/* free memory previously allocated by rmod_fcalloc() */
|
93 |
/* free memory previously allocated by rmod_fcalloc() */
|
81 |
void rmod_ffree(void far *ptr);
|
94 |
void rmod_ffree(void far *ptr);
|
82 |
|
95 |
|
83 |
/* free the entire linked list of bat ctx nodes (and set its rmod ptr to NULL) */
|
96 |
/* free the entire linked list of bat ctx nodes (and set its rmod ptr to NULL) */
|
84 |
void rmod_free_bat_llist(struct rmod_props far *rmod);
|
97 |
void rmod_free_bat_llist(struct rmod_props far *rmod);
|
85 |
|
98 |
|
86 |
#endif
|
99 |
#endif
|
87 |
|
100 |
|