]> git.sur5r.net Git - c128-kasse/blob - src/credit_manager.c
Format code using clang-format-3.9 (“make format”)
[c128-kasse] / src / credit_manager.c
1 /*
2  * RGB2R-C128-Kassenprogramm
3  * © 2007-2009 phil_fry, sECuRE, sur5r
4  * See LICENSE for license information
5  *
6  */
7 #include <conio.h>
8 #include <stdio.h>
9 #include <stdlib.h>
10 #include <string.h>
11
12 #include "config.h"
13 #include "general.h"
14 #include "kasse.h"
15 #include "c128time.h"
16 #include "print.h"
17 #include "version.h"
18
19 static char *filter = NULL;
20 static BYTE filter_len;
21
22 static BYTE current_credits_page = 0;
23
24 static void credit_print_screen(void) {
25   BYTE i, pages;
26   char buffer[10];
27
28   clrscr();
29   cprintf("credit_manager (phil_fry, sECuRE, sur5r) v:" GV "\r\n\r\n");
30   pages = (credits.num_items / CREDITS_PER_PAGE);
31   if (current_credits_page > pages)
32     current_credits_page = pages;
33   cprintf("Datei: CREDITS (Seite %d von %d)\r\n\r\n", current_credits_page,
34           pages);
35   for (i = (current_credits_page * CREDITS_PER_PAGE);
36        i < credits.num_items &&
37        i < ((current_credits_page + 1) * CREDITS_PER_PAGE);
38        i++) {
39     if (filter == NULL ||
40         strncmp(credits.credits[i].nickname, filter, filter_len) == 0) {
41       if (format_euro(buffer, 10, credits.credits[i].credit) != buffer) {
42         cprintf("Error: Could not format credit %d\r\n",
43                 credits.credits[i].credit);
44         exit(1);
45       }
46
47       cprintf("%d: %s: %s\r\n", i, credits.credits[i].nickname, buffer);
48     }
49   }
50   cprintf("\r\nn) Neu d) Loeschen p) Einzahlen b) Seite hoch f) Seite "
51           "runter\r\ng) Filtern e) Aendern s) Speichern z) Zurueck\r\n");
52 }
53
54 struct credits_t *find_credit(char *name) {
55   int i;
56   for (i = 0; i < credits.num_items; i++)
57     if (strncmp(name, credits.credits[i].nickname, NICKNAME_MAX_LEN + 1) == 0)
58       return &credits.credits[i];
59   return NULL;
60 }
61
62 /*
63  * Deposits credit for a user. Called in the credit manager (with input ==
64  * NULL) or interactively when the user does not have enough money for his
65  * intended purchase (with input == nickname).
66  *
67  */
68 void deposit_credit(char *input) {
69   char *time = get_time();
70   struct credits_t *credit;
71   unsigned int deposit;
72
73   if (input == NULL) {
74     cprintf("\r\nName:\r\n");
75     if ((input = get_input()) == NULL || *input == '\0')
76       return; // no name given
77   }
78
79   if ((credit = find_credit(input)) == NULL)
80     return; // cannot find named credit
81
82   cprintf("\r\nEinzahlung in Cent:\r\n");
83   if ((input = get_input()) == NULL || *input == '\0' ||
84       (deposit = atoi(input)) == 0)
85     return;
86
87   credit->credit += deposit;
88
89   toggle_videomode();
90   cprintf("%d Cent eingezahlt fuer %s.\r\nRestguthaben: %d\r\n", deposit,
91           credit->nickname, credit->credit);
92   sprintf(print_buffer,
93           "%c%s - %d Cent eingezahlt fuer %s. Restguthaben: %d Cent\r", 17,
94           time, deposit, credit->nickname, credit->credit);
95   cprintf("%s", print_buffer);
96   toggle_videomode();
97   print_the_buffer();
98   cprintf("\r\nEinzahlung durchgefuehrt, druecke RETURN...\r\n");
99   input = get_input();
100   toggle_videomode();
101   clrscr();
102   toggle_videomode();
103 }
104
105 static void new_credit(void) {
106   char *input, *name;
107   char *time;
108   int credit;
109
110   if (credits.num_items == 75) {
111     cprintf("\rEs ist bereits die maximale Anzahl an Eintraegen erreicht, "
112             "druecke RETURN...\r\n");
113     input = get_input();
114     return;
115   }
116
117   clrscr();
118   cprintf("\rNickname (max. 10 Zeichen):\r\n");
119   if ((input = get_input()) == NULL || *input == '\0')
120     return;
121   name = strdup(input);
122   cprintf("\r\nGuthaben in Cents:\r\n");
123   if ((input = get_input()) == NULL || *input == '\0' ||
124       (credit = atoi(input)) == 0)
125     return;
126   strncpy(credits.credits[credits.num_items].nickname, name, NICKNAME_MAX_LEN);
127   credits.credits[credits.num_items].credit = credit;
128
129   time = get_time();
130   sprintf(print_buffer, "%c%s - Guthaben mit %d Cent fuer %s angelegt\r", 17,
131           time, credit, name);
132   print_the_buffer();
133
134   credits.num_items++;
135   free(name);
136 }
137
138 static void _delete_credit(BYTE num) {
139   memset(credits.credits[num].nickname, '\0', 11);
140   credits.credits[num].credit = 0;
141 }
142
143 static void delete_credit(void) {
144   char *input;
145   BYTE num, last;
146
147   cprintf("\r Welcher Eintrag soll geloescht werden?\r\n");
148   if ((input = get_input()) == NULL || *input == '\0')
149     return;
150   num = atoi(input);
151   if (credits.num_items > 1) {
152     /* Swap last item with this one and delete the last one to avoid holes */
153     last = (credits.num_items - 1);
154     strcpy(credits.credits[num].nickname, credits.credits[last].nickname);
155     credits.credits[num].credit = credits.credits[last].credit;
156     _delete_credit(last);
157   } else {
158     /* Just delete it */
159     _delete_credit(num);
160   }
161   credits.num_items--;
162 }
163
164 void credit_manager() {
165   char *c;
166   while (1) {
167     credit_print_screen();
168     c = get_input();
169     switch (*c) {
170     case 'n':
171       new_credit();
172       break;
173     case 'd':
174       delete_credit();
175       break;
176     case 's':
177       save_credits();
178       break;
179     case 'f':
180       if (current_credits_page < (credits.num_items / CREDITS_PER_PAGE))
181         current_credits_page++;
182       break;
183     case 'b':
184       if (current_credits_page > 0)
185         current_credits_page--;
186       break;
187     case 'p':
188       deposit_credit(NULL);
189       break;
190     case 'g':
191       cprintf("Filter eingeben:\r\n");
192       filter = get_input();
193       if (filter == NULL || *filter == 32 || (filter_len = strlen(filter)) == 0)
194         filter = NULL;
195       break;
196     case 'z':
197       save_credits();
198       return;
199     default:
200       cprintf("Unbekannter Befehl, druecke RETURN...\r\n");
201       get_input();
202     }
203   }
204 }