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