Subversion Repositories SvarDOS

Compare Revisions

Ignore whitespace Rev 477 → Rev 478

/svarcom/trunk/rmod.h
File deleted
/svarcom/trunk/makefile
23,14 → 23,14
 
all: command.com
 
command.com: deflang.h rmod.h command.obj cmd.obj doserr.obj env.obj redir.obj rmodinit.obj sayonara.obj helpers.obj
command.com: deflang.h rmodcore.h command.obj cmd.obj doserr.obj env.obj redir.obj rmodinit.obj sayonara.obj helpers.obj
*wcl $(LDFLAGS) command.obj cmd.obj doserr.obj env.obj redir.obj rmodinit.obj sayonara.obj helpers.obj
 
.c.obj:
wcc $(CFLAGS) $<
 
rmod.h: file2c.com rmod.com
file2c /c rmod.com rmod.h rmod
rmodcore.h: file2c.com rmod.com
file2c rmod.com rmodcore.h rmodcore
 
deflang.h: file2c.com tlumacz\default.lng
file2c /l4096 tlumacz\default.lng deflang.h langblock
/svarcom/trunk/rmodcore.h
0,0 → 1,28
char rmodcore[] = {
131, 25,133, 25, 23, 32, 25, 32, 0, 0, 0, 0, 0, 0, 64, 58,
92, 67, 79, 77, 77, 65, 78, 68, 46, 67, 79, 77, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,140,200,142,216,142,
192,142,208,188,145, 2,128, 14, 43, 1, 0,116, 19,184, 0, 75,
186, 43, 1,187, 29, 1,205, 33, 46,198, 6, 43, 1, 0,235,219,
180, 77,205, 33, 48,228,163, 10, 1,176, 0,185, 14, 0,191, 29,
1,252,243,170,186, 14, 1,131, 14, 12, 1, 0,116, 8,142, 6,
44, 0,139, 22, 12, 1,161, 44, 0,163, 29, 1,199, 6, 31, 1,
42, 2,140, 14, 33, 1,184, 0, 75, 6, 31, 14, 7,187, 29, 1,
205, 33,115,151,140,203,142,219, 4, 48,162, 49, 2,180, 9,186,
45, 2,205, 33,180, 8,205, 33,235,129, 1, 10, 13, 69, 82, 82,
32,120, 44, 32, 70, 65, 73, 76, 69, 68, 32, 84, 79, 32, 76, 79,
65, 68, 32, 67, 79, 77, 77, 65, 78, 68, 46, 67, 79, 77, 13, 10,
36, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69,
70, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69,
70, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69,
70, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69,
70,120,120};
#define rmodcore_len 403
/svarcom/trunk/rmodinit.c
28,7 → 28,7
#include "env.h"
#include "helpers.h"
 
#include "rmod.h"
#include "rmodcore.h"
 
#include "rmodinit.h"
 
37,7 → 37,7
struct rmod_props far *rmod_install(unsigned short envsize) {
char far *myptr, far *mcb;
unsigned short far *owner;
const unsigned short sizeof_rmodandprops_paras = (0x100 + rmod_len + sizeof(struct rmod_props) + 15) / 16;
const unsigned short sizeof_rmodandprops_paras = (0x100 + rmodcore_len + sizeof(struct rmod_props) + 15) / 16;
unsigned short rmodseg = 0xffff;
unsigned short envseg, origenvseg;
struct rmod_props far *res;
114,7 → 114,7
for (i = 0; i < 0x100; i++) myptr[i] = mypsp[i];
}
myptr = MK_FP(rmodseg, 0x100);
_fmemcpy(myptr, rmod, rmod_len);
_fmemcpy(myptr, rmodcore, rmodcore_len);
 
/* mark rmod memory as "self owned" */
mcb = MK_FP(rmodseg - 1, 0);
136,7 → 136,7
}
 
/* prepare result (rmod props) */
res = MK_FP(rmodseg, 0x100 + rmod_len);
res = MK_FP(rmodseg, 0x100 + rmodcore_len);
_fmemset(res, 0, sizeof(*res)); /* zero out */
res->rmodseg = rmodseg; /* rmod segment */
res->inputbuf[0] = 128; /* input buffer for INT 0x21, AH=0Ah*/
199,7 → 199,7
cmdtail[0] = 0;
cmdtail[1] = '\r';
/* */
return(MK_FP(*parent, 0x100 + rmod_len));
return(MK_FP(*parent, 0x100 + rmodcore_len));
}