3 * UCC (University [of WA] Computer Club) Electronic Accounting System
6 * main.c - Core and Initialisation
8 * This file is licenced under the 3-clause BSD Licence. See the file
9 * COPYING for full details.
14 #include <ctype.h> // isspace
15 #include <unistd.h> // close
16 #include <limits.h> // INT_MIN/INT_MAX
19 #define USE_NCURSES_INTERFACE 0
20 #define DEBUG_TRACE_SERVER 0
21 #define USE_AUTOAUTH 1
23 #define MAX_TXT_ARGS 5 // Maximum number of textual arguments (including command)
24 #define DISPENSE_MULTIPLE_MAX 20 // Maximum argument to -c
30 int main(int argc, char *argv[]);
31 // --- Coke Server Communication ---
33 char *trim(char *string);
34 int RunRegex(regex_t *regex, const char *string, int nMatches, regmatch_t *matches, const char *errorMessage);
35 void CompileRegex(regex_t *regex, const char *pattern, int flags);
38 char *gsDispenseServer = "merlo.ucc.gu.uwa.edu.au";
39 int giDispensePort = 11020;
43 regex_t gArrayRegex, gItemRegex, gSaltRegex, gUserInfoRegex, gUserItemIdentRegex;
44 int gbIsAuthenticated = 0;
46 char *gsItemPattern; //!< Item pattern
47 char *gsEffectiveUser; //!< '-u' Dispense as another user
49 enum eUI_Modes giUIMode = UI_MODE_STANDARD;
50 int gbDryRun = 0; //!< '-n' Read-only
51 int gbDisallowSelectWithoutBalance = 1; //!< Don't allow items to be hilighted if not affordable
53 int giMinimumBalance = INT_MIN; //!< '-m' Minumum balance for `dispense acct`
54 int giMaximumBalance = INT_MAX; //!< '-M' Maximum balance for `dispense acct`
56 char *gsUserName; //!< User that dispense will happen as
57 char *gsUserFlags; //!< User's flag set
58 int giUserBalance = -1; //!< User balance (set by Authenticate)
59 int giDispenseCount = 1; //!< Number of dispenses to do
61 char *gsTextArgs[MAX_TXT_ARGS];
72 " Show interactive list\n"
73 " dispense <name>|<index>|<itemid>\n"
74 " Dispense named item (<name> matches if it is a unique prefix)\n"
76 " Show the finger output\n"
78 if( giTextArgc == 0 || strcmp(gsTextArgs[0], "give") == 0 )
80 " dispense give <user> <amount> \"<reason>\"\n"
81 " Give money to another user\n"
84 if( giTextArgc == 0 || strcmp(gsTextArgs[0], "donate") == 0 )
86 " dispense donate <amount> \"<reason>\"\n"
87 " Donate to the club\n"
89 if( giTextArgc == 0 || strcmp(gsTextArgs[0], "iteminfo") == 0 )
91 " dispense iteminfo <itemid>\n"
92 " Get the name and price for an item\n"
94 // if( giTextArgc == 0 || strcmp(gsTextArgs[0], "enumitems") == 0 )
96 // " dispense enumitems\n"
97 // " List avaliable items\n"
100 printf(" == Coke members == \n");
101 if( giTextArgc == 0 || strcmp(gsTextArgs[0], "acct") == 0 )
103 " dispense acct [<user>]\n"
104 " Show user balances\n"
105 " dispense acct <user> [+-]<amount> \"<reason>\"\n"
106 " Alter a account value\n"
107 " dispense acct <user> =<amount> \"<reason>\"\n"
108 " Set an account balance\n"
110 if( giTextArgc == 0 || strcmp(gsTextArgs[0], "refund") == 0 )
112 " dispense refund <user> <itemid> [<price>]\n"
113 " Refund an item to a user (with optional price override)\n"
114 " Item IDs can be seen in the cokelog (in the brackets after the item name)\n"
115 " e.g. coke:6 for a coke, snack:33 for slot 33 of the snack machine\n"
117 if( giTextArgc == 0 || strcmp(gsTextArgs[0], "slot") == 0 )
119 " dispense slot <itemid> <price> <name>\n"
120 " Rename/Re-price a slot\n"
122 if( giTextArgc == 0 )
123 printf(" == Dispense administrators ==\n");
124 if( giTextArgc == 0 || strcmp(gsTextArgs[0], "user") == 0 )
126 " dispense user add <user>\n"
127 " Create new account\n"
128 " dispense user type <user> <flags> <reason>\n"
129 " Alter a user's flags\n"
130 " <flags> is a comma-separated list of user, coke, admin, internal or disabled\n"
131 " Flags are removed by preceding the name with '-' or '!'\n"
133 if( giTextArgc == 0 )
137 " Dispense multiple times\n"
139 " Set a different user (Coke members only)\n"
143 " Use simple textual interface (instead of ncurses)\n"
145 " Dry run - Do not actually do dispenses\n"
146 " -m <min balance>\n"
147 " -M <max balance>\n"
148 " Set the Maximum/Minimum balances shown in `dispense acct`\n"
151 " Item ID of the form <type>:<num> where <type> is a non-empty string of alpha-numeric characters, and <num> is a non-negative integer\n"
157 int main(int argc, char *argv[])
165 // -- Create regular expressions
166 // > Code Type Count ...
167 CompileRegex(&gArrayRegex, "^([0-9]{3})\\s+([A-Za-z]+)\\s+([0-9]+)", REG_EXTENDED); //
168 // > Code Type Ident Status Price Desc
169 CompileRegex(&gItemRegex, "^([0-9]{3})\\s+([A-Za-z]+)\\s+([A-Za-z]+):([0-9]+)\\s+(avail|sold|error)\\s+([0-9]+)\\s+(.+)$", REG_EXTENDED);
170 // > Code 'SALT' salt
171 CompileRegex(&gSaltRegex, "^([0-9]{3})\\s+([A-Za-z]+)\\s+(.+)$", REG_EXTENDED);
172 // > Code 'User' Username Balance Flags
173 CompileRegex(&gUserInfoRegex, "^([0-9]{3})\\s+([A-Za-z]+)\\s+([^ ]+)\\s+(-?[0-9]+)\\s+(.+)$", REG_EXTENDED);
175 CompileRegex(&gUserItemIdentRegex, "^([A-Za-z]+):([0-9]+)$", REG_EXTENDED);
178 for( i = 1; i < argc; i ++ )
192 if( i > 2 && strcmp(argv[i-1], "type") == 0 )
194 if( i + 1 >= argc ) {
195 fprintf(stderr, "%s: -c takes an argument\n", argv[0]);
199 giDispenseCount = atoi(argv[++i]);
200 if( giDispenseCount < 1 || giDispenseCount > DISPENSE_MULTIPLE_MAX ) {
201 fprintf(stderr, "Sorry, only 1-20 can be passed to -c (safety)\n");
207 case 'm': // Minimum balance
208 if( i + 1 >= argc ) {
209 fprintf(stderr, "%s: -m takes an argument\n", argv[0]);
213 giMinimumBalance = atoi(argv[++i]);
215 case 'M': // Maximum balance
216 if( i + 1 >= argc ) {
217 fprintf(stderr, "%s: -M takes an argument\n", argv[0]);
221 giMaximumBalance = atoi(argv[++i]);
224 case 'u': // Override User
225 if( i + 1 >= argc ) {
226 fprintf(stderr, "%s: -u takes an argument\n", argv[0]);
230 gsEffectiveUser = argv[++i];
233 case 'H': // Override remote host
234 if( i + 1 >= argc ) {
235 fprintf(stderr, "%s: -H takes an argument\n", argv[0]);
239 gsDispenseServer = argv[++i];
241 case 'P': // Override remote port
242 if( i + 1 >= argc ) {
243 fprintf(stderr, "%s: -P takes an argument\n", argv[0]);
247 giDispensePort = atoi(argv[++i]);
250 // Set slot name/price
252 if( giTextArgc != 0 ) {
253 fprintf(stderr, "%s: -s must appear before other arguments\n", argv[0]);
257 gsTextArgs[0] = "slot"; // HACK!!
261 case 'G': // Don't use GUI
262 giUIMode = UI_MODE_BASIC;
264 case 'D': // Drinks only
265 giUIMode = UI_MODE_DRINKSONLY;
267 case 'n': // Dry Run / read-only
271 if( strcmp(argv[i], "--help") == 0 ) {
275 else if( strcmp(argv[i], "--dry-run") == 0 ) {
278 else if( strcmp(argv[i], "--drinks-only") == 0 ) {
279 giUIMode = UI_MODE_DRINKSONLY;
281 else if( strcmp(argv[i], "--can-select-all") == 0 ) {
282 gbDisallowSelectWithoutBalance = 0;
285 fprintf(stderr, "%s: Unknown switch '%s'\n", argv[0], argv[i]);
291 // The first argument is not allowed to begin with 'i'
292 // (catches most bad flags)
293 if( giTextArgc == 0 ) {
294 fprintf(stderr, "%s: Unknown switch '%s'\n", argv[0], argv[i]);
298 if( giTextArgc == MAX_TXT_ARGS )
300 fprintf(stderr, "ERROR: Too many arguments\n");
303 gsTextArgs[giTextArgc++] = argv[i];
310 if( giTextArgc == MAX_TXT_ARGS )
312 fprintf(stderr, "ERROR: Too many arguments\n");
316 gsTextArgs[giTextArgc++] = argv[i];
323 if( strcmp(gsTextArgs[0], "finger") == 0 )
326 sock = OpenConnection(gsDispenseServer, giDispensePort);
327 if( sock < 0 ) return RV_SOCKET_ERROR;
330 PopulateItemList(sock);
332 printf("The UCC Coke machine.\n\n");
334 // Only get coke slot statuses
335 for( i = 0; i <= 6; i ++ )
338 switch(gaItems[i].Status)
340 case 0: status = "Avail"; break;
341 case 1: status = "Sold "; break;
346 printf("%i - %s %3i %s\n", gaItems[i].ID, status, gaItems[i].Price, gaItems[i].Desc);
350 printf("\nMay your pink fish bing into the distance.\n");
358 if( strcmp(gsTextArgs[0], "acct") == 0 )
361 sock = OpenConnection(gsDispenseServer, giDispensePort);
362 if( sock < 0 ) return RV_SOCKET_ERROR;
364 if( giTextArgc == 1 ) {
365 ret = Dispense_EnumUsers(sock);
370 // gsTextArgs[1]: Username
373 if( giTextArgc != 2 )
375 if( giTextArgc != 4 ) {
376 fprintf(stderr, "`dispense acct` requires a reason\n");
381 // Authentication required
382 ret = Authenticate(sock);
385 // gsTextArgs[1]: Username
386 // gsTextArgs[2]: Ammount
387 // gsTextArgs[3]: Reason
389 if( gsTextArgs[2][0] == '=' ) {
391 if( gsTextArgs[2][1] != '0' && atoi(gsTextArgs[2]+1) == 0 ) {
392 fprintf(stderr, "Error: Invalid balance to be set\n");
396 ret = Dispense_SetBalance(sock, gsTextArgs[1], atoi(gsTextArgs[2]+1), gsTextArgs[3]);
400 ret = Dispense_AlterBalance(sock, gsTextArgs[1], atoi(gsTextArgs[2]), gsTextArgs[3]);
409 // Show user information
410 ret = Dispense_ShowUser(sock, gsTextArgs[1]);
417 // - "Here, have some money."
418 else if( strcmp(gsTextArgs[0], "give") == 0 )
420 if( giTextArgc != 4 ) {
421 fprintf(stderr, "`dispense give` takes three arguments\n");
426 // gsTextArgs[1]: Destination
427 // gsTextArgs[2]: Ammount
428 // gsTextArgs[3]: Reason
431 sock = OpenConnection(gsDispenseServer, giDispensePort);
432 if( sock < 0 ) return RV_SOCKET_ERROR;
435 ret = Authenticate(sock);
438 ret = Dispense_Give(sock, gsTextArgs[1], atoi(gsTextArgs[2]), gsTextArgs[3]);
446 // - User administration (Admin Only)
447 if( strcmp(gsTextArgs[0], "user") == 0 )
449 // Check argument count
450 if( giTextArgc == 1 ) {
451 fprintf(stderr, "Error: `dispense user` requires arguments\n");
457 sock = OpenConnection(gsDispenseServer, giDispensePort);
458 if( sock < 0 ) return RV_SOCKET_ERROR;
460 // Attempt authentication
461 ret = Authenticate(sock);
465 if( strcmp(gsTextArgs[1], "add") == 0 )
467 if( giTextArgc != 3 ) {
468 fprintf(stderr, "Error: `dispense user add` requires an argument\n");
473 ret = Dispense_AddUser(sock, gsTextArgs[2]);
476 else if( strcmp(gsTextArgs[1], "type") == 0 || strcmp(gsTextArgs[1], "flags") == 0 )
478 if( giTextArgc < 4 || giTextArgc > 5 ) {
479 fprintf(stderr, "Error: `dispense user type` requires two arguments\n");
484 if( giTextArgc == 4 )
485 ret = Dispense_SetUserType(sock, gsTextArgs[2], gsTextArgs[3], "");
487 ret = Dispense_SetUserType(sock, gsTextArgs[2], gsTextArgs[3], gsTextArgs[4]);
491 fprintf(stderr, "Error: Unknown sub-command for `dispense user`\n");
499 else if( strcmp(gsTextArgs[0], "donate") == 0 )
501 // Check argument count
502 if( giTextArgc != 3 ) {
503 fprintf(stderr, "Error: `dispense donate` requires two arguments\n");
509 sock = OpenConnection(gsDispenseServer, giDispensePort);
510 if( sock < 0 ) return RV_SOCKET_ERROR;
512 // Attempt authentication
513 ret = Authenticate(sock);
517 ret = Dispense_Donate(sock, atoi(gsTextArgs[1]), gsTextArgs[2]);
524 else if( strcmp(gsTextArgs[0], "refund") == 0 )
527 // Check argument count
528 if( giTextArgc != 3 && giTextArgc != 4 ) {
529 fprintf(stderr, "Error: `dispense refund` takes 2 or 3 arguments\n");
535 sock = OpenConnection(gsDispenseServer, giDispensePort);
536 if(sock < 0) return RV_SOCKET_ERROR;
538 // Attempt authentication
539 ret = Authenticate(sock);
542 if( giTextArgc == 4 ) {
543 price = atoi(gsTextArgs[3]);
545 fprintf(stderr, "Error: Override price is invalid (should be > 0)\n");
550 // Username, Item, cost
551 ret = Dispense_Refund(sock, gsTextArgs[1], gsTextArgs[2], price);
557 // Query an item price
558 else if( strcmp(gsTextArgs[0], "iteminfo") == 0 )
560 regmatch_t matches[3];
563 // Check argument count
564 if( giTextArgc != 2 ) {
565 fprintf(stderr, "Error: `dispense iteminfo` requires an argument\n");
570 if( RunRegex(&gUserItemIdentRegex, gsTextArgs[1], 3, matches, NULL) != 0 ) {
571 fprintf(stderr, "Error: Invalid item ID passed (<type>:<id> expected)\n");
574 type = gsTextArgs[1] + matches[1].rm_so;
575 gsTextArgs[1][ matches[1].rm_eo ] = '\0';
576 id = atoi( gsTextArgs[1] + matches[2].rm_so );
578 sock = OpenConnection(gsDispenseServer, giDispensePort);
579 if( sock < 0 ) return RV_SOCKET_ERROR;
581 ret = Dispense_ItemInfo(sock, type, id);
586 else if( strcmp(gsTextArgs[0], "slot") == 0 )
588 regmatch_t matches[3];
589 char *item_type, *newname;
593 if( giTextArgc != 4 ) {
594 fprintf(stderr, "Error: `dispense slot` takes three arguments\n");
600 if( RunRegex(&gUserItemIdentRegex, gsTextArgs[1], 3, matches, NULL) != 0 ) {
601 fprintf(stderr, "Error: Invalid item ID passed (<type>:<id> expected)\n");
604 item_type = gsTextArgs[1] + matches[1].rm_so;
605 gsTextArgs[1][ matches[1].rm_eo ] = '\0';
606 item_id = atoi( gsTextArgs[1] + matches[2].rm_so );
609 price = atoi( gsTextArgs[2] );
610 if( price <= 0 && gsTextArgs[2][0] != '0' ) {
611 fprintf(stderr, "Error: Invalid price passed (must be >= 0)\n");
616 newname = gsTextArgs[3];
620 for( pos = newname; *pos; pos ++ )
622 if( !isalnum(*pos) && *pos != ' ' ) {
623 fprintf(stderr, "Error: You should only have letters, numbers and spaces in an item name\n");
629 // Connect & Authenticate
630 sock = OpenConnection(gsDispenseServer, giDispensePort);
631 if( sock < 0 ) return RV_SOCKET_ERROR;
632 ret = Authenticate(sock);
635 ret = Dispense_SetItem(sock, item_type, item_id, price, newname);
640 // Item name / pattern
643 gsItemPattern = gsTextArgs[0];
647 sock = OpenConnection(gsDispenseServer, giDispensePort);
648 if( sock < 0 ) return RV_SOCKET_ERROR;
650 // Get the user's balance
651 ret = GetUserBalance(sock);
655 PopulateItemList(sock);
657 // Disconnect from server
660 if( gsItemPattern && gsItemPattern[0] )
662 regmatch_t matches[3];
664 if( strcmp(gsItemPattern, "door") == 0 )
666 // Connect, Authenticate, dispense and close
667 sock = OpenConnection(gsDispenseServer, giDispensePort);
668 if( sock < 0 ) return RV_SOCKET_ERROR;
669 ret = Authenticate(sock);
671 ret = DispenseItem(sock, "door", 0);
675 // Item id (<type>:<num>)
676 else if( RunRegex(&gUserItemIdentRegex, gsItemPattern, 3, matches, NULL) == 0 )
681 // Get and finish ident
682 ident = gsItemPattern + matches[1].rm_so;
683 gsItemPattern[matches[1].rm_eo] = '\0';
685 id = atoi( gsItemPattern + matches[2].rm_so );
687 // Connect, Authenticate, dispense and close
688 sock = OpenConnection(gsDispenseServer, giDispensePort);
689 if( sock < 0 ) return RV_SOCKET_ERROR;
691 Dispense_ItemInfo(sock, ident, id);
693 ret = Authenticate(sock);
695 ret = DispenseItem(sock, ident, id);
699 // Item number (6 = coke)
700 else if( strcmp(gsItemPattern, "0") == 0 || atoi(gsItemPattern) > 0 )
702 i = atoi(gsItemPattern);
709 for( i = 0; i < giNumItems; i ++ )
711 // Prefix match (with case-insensitive match)
712 for( j = 0; gsItemPattern[j]; j ++ )
714 if( gaItems[i].Desc[j] == gsItemPattern[j] )
716 if( tolower(gaItems[i].Desc[j]) == tolower(gsItemPattern[j]) )
720 // Check if the prefix matched
721 if( gsItemPattern[j] != '\0' )
725 if( gaItems[i].Desc[j] == '\0' ) {
730 // Only one match allowed
735 // TODO: Allow ambiguous matches?
736 // or just print a wanrning
737 printf("Warning - Ambiguous pattern, stopping\n");
742 // Was a match found?
745 fprintf(stderr, "No item matches the passed string\n");
752 else if( giUIMode != UI_MODE_BASIC )
758 // Very basic dispense interface
759 for( i = 0; i < giNumItems; i ++ ) {
761 if( i && strcmp(gaItems[i].Type, gaItems[i-1].Type) != 0 )
764 printf("%2i %s:%i\t%3i %s\n", i, gaItems[i].Type, gaItems[i].ID,
765 gaItems[i].Price, gaItems[i].Desc);
774 fgets(buffer, BUFSIZ, stdin);
778 if( buf[0] == 'q' ) break;
782 if( i != 0 || buf[0] == '0' )
784 if( i < 0 || i >= giNumItems ) {
785 printf("Bad item %i (should be between 0 and %i)\n", i, giNumItems);
794 // Check for a valid item ID
798 // Connect, Authenticate, dispense and close
799 sock = OpenConnection(gsDispenseServer, giDispensePort);
800 if( sock < 0 ) return RV_SOCKET_ERROR;
802 ret = Dispense_ItemInfo(sock, gaItems[i].Type, gaItems[i].ID);
805 ret = Authenticate(sock);
808 for( j = 0; j < giDispenseCount; j ++ ) {
809 ret = DispenseItem(sock, gaItems[i].Type, gaItems[i].ID);
813 printf("%i items dispensed\n", j);
815 Dispense_ShowUser(sock, gsUserName);
826 char *trim(char *string)
830 while( isspace(*string) )
833 for( i = strlen(string); i--; )
835 if( isspace(string[i]) )
844 int RunRegex(regex_t *regex, const char *string, int nMatches, regmatch_t *matches, const char *errorMessage)
848 ret = regexec(regex, string, nMatches, matches, 0);
849 if( ret && errorMessage ) {
850 size_t len = regerror(ret, regex, NULL, 0);
852 regerror(ret, regex, errorStr, len);
853 printf("string = '%s'\n", string);
854 fprintf(stderr, "%s\n%s", errorMessage, errorStr);
861 void CompileRegex(regex_t *regex, const char *pattern, int flags)
863 int ret = regcomp(regex, pattern, flags);
865 size_t len = regerror(ret, regex, NULL, 0);
867 regerror(ret, regex, errorStr, len);
868 fprintf(stderr, "Regex compilation failed - %s\n", errorStr);