2 * RGB2R-C128-Kassenprogramm
3 * © 2007-2009 phil_fry, sECuRE, sur5r
4 * See LICENSE for license information
20 /* NOTE: undocumented function which scratches files
21 We need to use this function because linking unistd.h
22 makes our program break at runtime.
24 unsigned char __fastcall__ _sysremove(const char *name);
26 unsigned long int money = 0;
27 unsigned long int items_sold = 0;
28 BYTE printer_port = 4;
29 static bool items_exists = false;
30 static bool credits_exists = false;
31 struct status_array_t status;
32 struct credits_array_t credits;
35 * Checks if items/credits-files are existing to avoid having to recover
36 * the error state of the drive (we'd have to if we would just access the
40 static void lookup_needed_files(void) {
42 struct cbm_dirent dirent;
45 if (cbm_opendir(lfn, (BYTE)8) != 0) {
46 cprintf("could not open directory\r\n");
49 while (cbm_readdir(lfn, &dirent) == 0) {
50 /* NOTE: You MUST NOT delete any logfiles. This does only work
51 * under the assumption that logfiles are named continuously */
52 if (strncmp(dirent.name, "log", 3) == 0)
54 if (strcasecmp(dirent.name, "items") == 0)
56 if (strcasecmp(dirent.name, "credits") == 0)
57 credits_exists = true;
61 /* Try to find out how many lines the last logfile got to seamlessly
62 * append to it, if we got more than one logfile. */
66 sprintf(filename, "log-%u", log_num);
67 if ((c = cbm_open(lfn, (BYTE)8, (BYTE)CBM_READ, filename)) != 0) {
68 c128_perror(c, "cbm_open(log) for reading");
71 log_heap_offset = cbm_read(lfn, log_heap_buf, LOG_SIZE);
72 if (log_heap_offset < 0) {
73 cprintf("error while cbm_read()ing the logfile\r\n");
76 log_heap_flushed = log_heap_offset;
77 log_heap_buf[log_heap_offset] = '\0';
82 void load_items(void) {
88 cbm_load("items", (BYTE)8, &status);
89 for (c = 0; c < status.num_items; c++) {
90 items_sold += status.status[c].times_sold;
91 money += (status.status[c].price * status.status[c].times_sold);
94 memset(&status, 0, sizeof(struct status_array_t));
97 void load_credits(void) {
99 cbm_load("credits", (BYTE)8, &credits);
101 memset(&credits, 0, sizeof(struct credits_array_t));
104 void save_items(void) {
107 cbm_save("items", (BYTE)8, &status, sizeof(struct status_array_t));
111 void save_credits(void) {
113 _sysremove("credits");
114 cbm_save("credits", (BYTE)8, &credits, sizeof(struct credits_array_t));
115 credits_exists = true;
118 void load_config(void) { lookup_needed_files(); }