Subversion Repositories SvarDOS

Rev

Rev 1041 | Rev 1597 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1041 Rev 1178
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 */
28
#include "helpers.h" /* struct DTA definition */
29
 
29
 
30
#define FLAG_EXEC_AND_QUIT    1
30
#define FLAG_EXEC_AND_QUIT    1
31
#define FLAG_PERMANENT        2
31
#define FLAG_PERMANENT        2
32
#define FLAG_ECHOFLAG         4
32
#define FLAG_ECHOFLAG         4
33
#define FLAG_ECHO_BEFORE_BAT  8
33
#define FLAG_ECHO_BEFORE_BAT  8
34
#define FLAG_SKIP_AUTOEXEC   16
34
#define FLAG_SKIP_AUTOEXEC   16
35
#define FLAG_STEPBYSTEP      32
35
#define FLAG_STEPBYSTEP      32
36
 
36
 
37
 
37
 
38
/* 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,
39
 * 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... */
40
struct batctx {
40
struct batctx {
41
  char fname[130];            /* truename of batch file being processed */
41
  char fname[130];            /* truename of batch file being processed */
42
  char argv[130];             /* args of the batch call (0-separated) */
42
  char argv[130];             /* args of the batch call (0-separated) */
43
  unsigned char flags;        /* used for step-by-step execution */
43
  unsigned char flags;        /* used for step-by-step execution */
44
  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 */
45
  struct batctx far *parent;  /* parent context if this batch was CALLed */
45
  struct batctx far *parent;  /* parent context if this batch was CALLed */
46
};
46
};
47
 
47
 
48
/* for context structure used to track the execution of the ongoing FOR loop */
48
/* for context structure used to track the execution of the ongoing FOR loop */
49
struct forctx {
49
struct forctx {
50
  char cmd[130];              /* copy of the original FOR command */
50
  char cmd[130];              /* copy of the original FOR command */
51
  struct DTA dta;             /* DTA for FindNext on current pattern */
51
  struct DTA dta;             /* DTA for FindNext on current pattern */
52
  unsigned short curpat;      /* cmd offset of currently processed pattern */
52
  unsigned short curpat;      /* cmd offset of currently processed pattern */
53
  unsigned short nextpat;     /* cmd offset of next pattern to be processed */
53
  unsigned short nextpat;     /* cmd offset of next pattern to be processed */
54
  unsigned short exec;        /* cmd offset of the command to be executed */
54
  unsigned short exec;        /* cmd offset of the command to be executed */
55
  char varname;               /* single char of variable name */
55
  char varname;               /* single char of variable name */
56
  unsigned char dta_inited;   /* 0=requires FindFirst 1=FindNext */
56
  unsigned char dta_inited;   /* 0=requires FindFirst 1=FindNext */
57
};
57
};
58
 
58
 
59
struct rmod_props {
59
struct rmod_props {
60
  unsigned short rmodseg;     /* segment where rmod is loaded */
60
  unsigned short rmodseg;     /* segment where rmod is loaded */
61
  unsigned long origparent;   /* original parent (far ptr) of the shell */
61
  unsigned long origparent;   /* original parent (far ptr) of the shell */
62
  unsigned short origenvseg;  /* original environment segment */
62
  unsigned short origenvseg;  /* original environment segment */
63
  unsigned char flags;        /* command line parameters */
63
  unsigned char flags;        /* command line parameters */
64
  unsigned char version;      /* used to detect mismatch between rmod and SvarCOM */
64
  unsigned char version;      /* used to detect mismatch between rmod and SvarCOM */
65
  char awaitingcmd[130];      /* command to exec next time (if any) */
65
  char awaitingcmd[130];      /* command to exec next time (if any) */
66
  struct batctx far *bat;     /* linked list of bat contexts, if BAT ongoing */
66
  struct batctx far *bat;     /* linked list of bat contexts, if BAT ongoing */
67
  struct forctx far *forloop; /* a single FOR loop structure, if FOR ongoing */
67
  struct forctx far *forloop; /* a single FOR loop structure, if FOR ongoing */
68
};
68
};
69
 
69
 
70
#define RMOD_OFFSET_ENVSEG     0x2C   /* stored in rmod's PSP */
70
#define RMOD_OFFSET_ENVSEG     0x2C   /* stored in rmod's PSP */
71
#define RMOD_OFFSET_INPUTBUF   (0x100 + 0x08)
71
#define RMOD_OFFSET_INPUTBUF   (0x100 + 0x08)
72
#define RMOD_OFFSET_COMSPECPTR (0x100 + 0xCE)
72
#define RMOD_OFFSET_COMSPECPTR (0x100 + 0xCE)
73
#define RMOD_OFFSET_BOOTDRIVE  (0x100 + 0xD0)
73
#define RMOD_OFFSET_BOOTDRIVE  (0x100 + 0xD0)
74
#define RMOD_OFFSET_LEXITCODE  (0x100 + 0xDF)
74
#define RMOD_OFFSET_LEXITCODE  (0x100 + 0xDF)
75
#define RMOD_OFFSET_EXECPARAM  (0x100 + 0xE0)
75
#define RMOD_OFFSET_EXECPARAM  (0x100 + 0xE0)
76
#define RMOD_OFFSET_EXECPROG   (0x100 + 0xEE)
76
#define RMOD_OFFSET_EXECPROG   (0x100 + 0xEE)
77
#define RMOD_OFFSET_STDINFILE  (0x100 + 0x16E)
77
#define RMOD_OFFSET_STDINFILE  (0x100 + 0x16E)
78
#define RMOD_OFFSET_STDOUTFILE (0x100 + 0x1EE)
78
#define RMOD_OFFSET_STDOUTFILE (0x100 + 0x1EE)
79
#define RMOD_OFFSET_STDOUTAPP  (0x100 + 0x26E)
79
#define RMOD_OFFSET_STDOUTAPP  (0x100 + 0x26E)
80
#define RMOD_OFFSET_STDIN_DEL  (0x100 + 0x270)
80
#define RMOD_OFFSET_STDIN_DEL  (0x100 + 0x270)
81
#define RMOD_OFFSET_BRKHANDLER (0x100 + 0x271)
81
#define RMOD_OFFSET_BRKHANDLER (0x100 + 0x271)
82
#define RMOD_OFFSET_ROUTINE    (0x100 + 0x273)
82
#define RMOD_OFFSET_ROUTINE    (0x100 + 0x276)
83
 
83
 
84
struct rmod_props far *rmod_install(unsigned short envsize, unsigned char *rmodcore, unsigned short rmodcore_len);
84
struct rmod_props far *rmod_install(unsigned short envsize, unsigned char *rmodcore, unsigned short rmodcore_len);
85
struct rmod_props far *rmod_find(unsigned short rmodcore_len);
85
struct rmod_props far *rmod_find(unsigned short rmodcore_len);
86
void rmod_updatecomspecptr(unsigned short rmod_seg, unsigned short env_seg);
86
void rmod_updatecomspecptr(unsigned short rmod_seg, unsigned short env_seg);
87
 
87
 
88
/* allocates bytes of far memory, flags it as belonging to rmod
88
/* allocates bytes of far memory, flags it as belonging to rmod
89
 * the new block can be optionally flagged as 'ident' (if not null) and zero
89
 * the new block can be optionally flagged as 'ident' (if not null) and zero
90
 * out the newly allocated memory.
90
 * out the newly allocated memory.
91
 * returns a far ptr to the allocated block, or NULL on error */
91
 * returns a far ptr to the allocated block, or NULL on error */
92
void far *rmod_fcalloc(unsigned short bytes, unsigned short rmod_seg, char *ident);
92
void far *rmod_fcalloc(unsigned short bytes, unsigned short rmod_seg, char *ident);
93
 
93
 
94
/* free memory previously allocated by rmod_fcalloc() */
94
/* free memory previously allocated by rmod_fcalloc() */
95
void rmod_ffree(void far *ptr);
95
void rmod_ffree(void far *ptr);
96
 
96
 
97
/* free the entire linked list of bat ctx nodes (and set its rmod ptr to NULL) */
97
/* free the entire linked list of bat ctx nodes (and set its rmod ptr to NULL) */
98
void rmod_free_bat_llist(struct rmod_props far *rmod);
98
void rmod_free_bat_llist(struct rmod_props far *rmod);
99
 
99
 
100
#endif
100
#endif
101
 
101