2 * RGB2R-C128-Kassenprogramm
3 * (c) 2007-2009 phil_fry, sECuRE, sur5r
4 * See LICENSE for license information
19 /* NOTE: undocumented function which scratches files
20 We need to use this function because linking unistd.h
21 makes our program break at runtime.
23 unsigned char __fastcall__ _sysremove(const char *name);
25 unsigned long int money = 0;
26 unsigned long int items_sold = 0;
27 BYTE printer_port = 4;
28 static bool items_exists = false;
29 static bool credits_exists = false;
30 struct status_array_t status;
31 struct credits_array_t credits;
34 * Checks if items/credits-files are existing to avoid having to recover
35 * the error state of the drive (we'd have to if we would just access the
39 static void lookup_needed_files() {
41 struct cbm_dirent dirent;
42 char *buffer = malloc(sizeof(char) * 64 * 100);
48 cprintf("Not enough memory available\r\n");
52 if (cbm_opendir(lfn, (BYTE)8) != 0) {
53 cprintf("could not open directory\r\n");
56 while (cbm_readdir(lfn, &dirent) == 0) {
57 /* NOTE: You MUST NOT delete any logfiles. This does only work
58 * under the assumption that logfiles are named continuously */
59 if (strncmp(dirent.name, "log", 3) == 0)
61 if (strcasecmp(dirent.name, "items") == 0)
63 if (strcasecmp(dirent.name, "credits") == 0)
64 credits_exists = true;
68 /* Try to find out how many lines the last logfile got to seamlessly
69 * append to it, if we got more than one logfile. */
73 sprintf(filename, "log-%d", log_num);
74 if ((c = cbm_open(lfn, (BYTE)8, (BYTE)CBM_READ, filename)) != 0) {
75 c128_perror(c, "cbm_open(log) for reading");
78 n = cbm_read(lfn, buffer, sizeof(char) * 64 * 100);
80 cprintf("error while cbm_read()ing the logfile\r\n");
84 for (walk = buffer; (walk - buffer) < n; walk++) {
85 if (*walk == '\r' || *walk == '\n')
99 cbm_load("items", (BYTE)8, &status);
100 for (c = 0; c < status.num_items; c++)
101 items_sold += status.status[c].times_sold;
103 memset(&status, 0, sizeof(struct status_array_t));
106 void load_credits() {
108 cbm_load("credits", (BYTE)8, &credits);
110 memset(&credits, 0, sizeof(struct credits_array_t));
116 cbm_save("items", (BYTE)8, &status, sizeof(struct status_array_t));
120 void save_credits() {
122 _sysremove("credits");
123 cbm_save("credits", (BYTE)8, &credits, sizeof(struct credits_array_t));
124 credits_exists = true;
128 lookup_needed_files();