1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
|
#define E15
#define AV
#define MC68K
#define IEEEFLOAT
#define UNIX
#define VSSIZE 8152
#define ADDITIONAL_FEATURES \
ADD_FEATURE("E15") ;\
ADD_FEATURE("MC68K"); \
ADD_FEATURE("UNIPLUS-SYSTEM-V")
#define MEM_SAVE_LOCALS struct exec header
#define COPY_TO_SAVE filecpy(save, original, header.a_syms+header.a_trsize+header.a_drsize);
#define READ_HEADER fread(&header, sizeof(header), 1, original); \
if (header.fmagic != NMAGIC) \
data_begin \
= (char *)(TXTRELOC+header.a_text); \
else \
data_begin \
= (char *)((TXTRELOC+header.a_text+(SEGSIZ-1)) & ~(SEGSIZ-1)); \
data_end = core_end; \
original_data = header.a_data; \
header.a_data = data_end - data_begin; \
header.a_bss = sbrk(0) - core_end; \
fwrite(&header, sizeof(header), 1, save);
#define FILECPY_HEADER filecpy(save, original, header.a_text);
#define COPY_TO_SAVE filecpy(save, original, header.a_syms+header.a_trsize+header.a_drsize)
#define exec bhdr
#define a_text tsize
#define a_data dsize
#define a_bss bsize
#define a_syms ssize
#define a_trsize rtsize
#define a_drsize rdsize
#define SEGSIZ (128*1024)
#define TXTRELOC (1024*1024)
#define NUMBER_OPEN_FILES _NFILE
#define ADDITIONAL_FEATURES \
ADD_FEATURE("E15");\
ADD_FEATURE("MC68K"); \
ADD_FEATURE("UNIPLUS-SYSTEM-V")
#define SET_REAL_MAXPAGE real_maxpage = MAXPAGE
#define HOLEPAGE 32
#define INIT_ALLOC \
if (brk(pagetochar(MAXPAGE)) < 0) \
error("Can't allocate. Good-bye!.");
#define IF_ALLOCATE_ERR \
if (PAGESIZE*(n - m) > pagetochar(MAXPAGE) - core_end)
/* have the getcwd command */
#define GETCWD
|
