Subversion Repositories SvarDOS

Rev

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

Rev 1001 Rev 1023
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