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