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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
/* Loading routines for 680 project.
*
* Includes splash screen, choose-an-image, etc.
*
* Copyright 2010, Astrid Smith
* GPL
*/
#include <tigcclib.h>
#include "asm_vars.h"
#include "global.h"
HANDLE page_handles[256];
char infloop[16] = { 0xC3, 0x40, // JP 4000h
0, 0, 0, 0 };
char writestr[16] = { 0x3E, 0x41, // LD A,'A'
0xD3, 0x00, // OUT 00h,A
0xC3, 0x40, 0x00 // JP 4000h
};
#include "testbenches/mine.h"
void init_load(void);
void unload(void);
void *deref_page(int);
void close_pages(void);
void init_load(void)
{
int i;
pages = malloc(256 * sizeof(void*));
/* Page layout:
* 0x40 RAM
* 0x41 RAM
*
* 0x00 ROM
* ... all the way to ...
* 0x1f ROM
*/
for (i = 0 ; i <= 255; i++)
page_handles[i] = 0;
i = 0;
// RAM pages
pages[0x40] = deref_page(0x40);
pages[0x41] = deref_page(0x41);
if (pages[0x40] == NULL)
pages[0x40] = malloc(PAGE_SIZE * sizeof(char));
if (pages[0x41] == NULL)
pages[0x41] = malloc(PAGE_SIZE * sizeof(char));
// ROM pages
for (i = 0; i <= 0x1f; i++) {
pages[i] = deref_page(i);
if (pages[i] == NULL)
pages[i] = pages[0x40];
}
mem_page_0 = pages[0];
mem_page_loc_0 = 0;
// mem_page_1 = pages[0x1f];
mem_page_1 = zexdoc;
mem_page_loc_1 = 0x1f;
mem_page_2 = pages[0];
mem_page_loc_2 = 0;
mem_page_3 = pages[0x40];
mem_page_loc_3 = 0x40;
return;
}
void unload(void)
{
return;
}
/* Turns a page number into a pointer to a page. Returns NULL if not
* found, throws an error in other cases.
*/
void *deref_page(int number)
{
/* Bits of code here stolen from MulTI */
char page_name[8];
HSYM hsym;
HANDLE fhandle;
char *fdata;
int fsize;
sprintf(page_name, "pg_%02x", number);
hsym = SymFind(SYMSTR(page_name));
if(hsym.folder == 0)
return NULL;
fhandle = DerefSym(hsym)->handle;
fdata = HLock(fhandle);
if(fdata == NULL)
throw_error("Couldn't lock page");
page_handles[number] = fhandle;
/* read size */
fsize = *(WORD *)fdata;
fdata += 2;
/* check type */
if((fdata[fsize - 1] != OTH_TAG) || strcmp(&fdata[fsize - 6], "83p")) {
close_pages();
throw_error("Not a 680 file");
}
return fdata;
}
void close_pages(void)
{
int i;
for (i = 0; i < 256; i++)
if (page_handles[i] != 0)
HeapUnlock(page_handles[i]);
}
|
