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,
  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   print_the_buffer();
  90   cprintf("\r\nEinzahlung durchgefuehrt, druecke RETURN...\r\n");
  91   input = get_input();
  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, "
 101             "druecke RETURN...\r\n");
 102     input = get_input();
 103     return;
 104   }
 105
 106   clrscr();
 107   cprintf("\rNickname (max. 10 Zeichen):\r\n");
 108   if ((input = get_input()) == NULL || *input == '\0')
 109     return;
 110   name = strdup(input);
 111   cprintf("\r\nGuthaben in Cents:\r\n");
 112   if ((input = get_input()) == NULL || *input == '\0' ||
 113       (credit = atoi(input)) == 0)
 114     return;
 115   strncpy(credits.credits[credits.num_items].nickname, name, NICKNAME_MAX_LEN);
 116   credits.credits[credits.num_items].credit = credit;
 117
 118   time = get_time();
 119   sprintf(print_buffer, "%c%s - Guthaben mit %d Cent fuer %s angelegt\r", 17,
 120           time, credit, name);
 121   print_the_buffer();
 122
 123   credits.num_items++;
 124   free(name);
 125 }
 126
 127 static void _delete_credit(BYTE num) {
 128   memset(credits.credits[num].nickname, '\0', 11);
 129   credits.credits[num].credit = 0;
 130 }
 131
 132 static void delete_credit(void) {
 133   char *input;
 134   BYTE num, last;
 135
 136   cprintf("\r Welcher Eintrag soll geloescht werden?\r\n");
 137   if ((input = get_input()) == NULL || *input == '\0')
 138     return;
 139   num = atoi(input);
 140   if (credits.num_items > 1) {
 141     /* Swap last item with this one and delete the last one to avoid holes */
 142     last = (credits.num_items - 1);
 143     strcpy(credits.credits[num].nickname, credits.credits[last].nickname);
 144     credits.credits[num].credit = credits.credits[last].credit;
 145     _delete_credit(last);
 146   } else {
 147     /* Just delete it */
 148     _delete_credit(num);
 149   }
 150   credits.num_items--;
 151 }
 152
 153 void credit_manager() {
 154   char *c;
 155   while (1) {
 156     credit_print_screen();
 157     c = get_input();
 158     switch (*c) {
 159     case 'n':
 160       new_credit();
 161       break;
 162     case 'd':
 163       delete_credit();
 164       break;
 165     case 's':
 166       save_credits();
 167       break;
 168     case 'f':
 169       if (current_credits_page < (credits.num_items / CREDITS_PER_PAGE))
 170         current_credits_page++;
 171       break;
 172     case 'b':
 173       if (current_credits_page > 0)
 174         current_credits_page--;
 175       break;
 176     case 'p':
 177       deposit_credit(NULL);
 178       break;
 179     case 'g':
 180       cprintf("Filter eingeben:\r\n");
 181       filter = get_input();
 182       if (filter == NULL || *filter == 32 || (filter_len = strlen(filter)) == 0)
 183         filter = NULL;
 184       break;
 185     case 'z':
 186       save_credits();
 187       return;
 188     default:
 189       cprintf("Unbekannter Befehl, druecke RETURN...\r\n");
 190       get_input();
 191     }
 192   }
 193 }