3 * UCC (University [of WA] Computer Club) Electronic Accounting System
5 * SQLite Coke Bank (Accounts Database)
7 * This file is licenced under the 3-clause BSD Licence. See the file
8 * COPYING for full details.
15 #include "../cokebank.h"
20 const char * const csBank_DatabaseSetup =
21 "CREATE TABLE IF NOT EXISTS accounts ("
22 " acct_id INTEGER PRIMARY KEY NOT NULL,"
23 " acct_balance INTEGER NOT NULL DEFAULT 0,"
24 " acct_last_seen DATETIME NOT NULL DEFAULT (datetime('now')),"
25 " acct_name STRING UNIQUE,"
26 " acct_uid INTEGER UNIQUE DEFAULT NULL,"
27 " acct_pin INTEGER DEFAULT NULL," //" acct_pin INTEGER CHECK (acct_pin > 0 AND acct_pin < 10000) DEFAULT NULL,"
28 " acct_is_disabled BOOLEAN NOT NULL DEFAULT false,"
29 " acct_is_coke BOOLEAN NOT NULL DEFAULT false,"
30 " acct_is_admin BOOLEAN NOT NULL DEFAULT false,"
31 " acct_is_door BOOLEAN NOT NULL DEFAULT false,"
32 " acct_is_internal BOOLEAN NOT NULL DEFAULT false"
34 "CREATE TABLE IF NOT EXISTS cards ("
35 " acct_id INTEGER NOT NULL,"
36 " card_name STRING NOT NULL UNIQUE,"
37 " FOREIGN KEY (acct_id) REFERENCES accounts (acct_id) ON DELETE CASCADE"
38 // Deletion of the account frees the card ^ ^ ^
40 "CREATE TABLE IF NOT EXISTS items ("
41 " item_id INTEGER PRIMARY KEY NOT NULL,"
42 " item_handler STRING NOT NULL,"
43 " item_index INTEGER NOT NULL,"
44 " item_name STRING NOT NULL,"
45 " item_price INTEGER NOT NULL,"
46 " item_is_enabled BOOLEAN NOT NULL DEFAULT true"
48 "INSERT INTO accounts (acct_name,acct_is_admin,acct_uid) VALUES ('root',1,0);"
49 "INSERT INTO accounts (acct_name,acct_is_internal,acct_uid) VALUES ('"COKEBANK_SALES_ACCT"',1,-1);"
50 "INSERT INTO accounts (acct_name,acct_is_internal,acct_uid) VALUES ('"COKEBANK_DEBT_ACCT"',1,-2);"
51 "INSERT INTO accounts (acct_name,acct_is_internal,acct_uid) VALUES ('"COKEBANK_FREE_ACCT"',1,-3);"
55 struct sAcctIterator // Unused really, just used as a void type
60 int Bank_Initialise(const char *Argument);
61 int Bank_Transfer(int SourceAcct, int DestAcct, int Ammount, const char *Reason);
62 int Bank_GetFlags(int AcctID);
63 int Bank_SetFlags(int AcctID, int Mask, int Value);
64 int Bank_GetBalance(int AcctID);
65 char *Bank_GetAcctName(int AcctID);
66 sqlite3_stmt *Bank_int_MakeStatemnt(sqlite3 *Database, const char *Query);
67 int Bank_int_QueryNone(sqlite3 *Database, const char *Query, char **ErrorMessage);
68 sqlite3_stmt *Bank_int_QuerySingle(sqlite3 *Database, const char *Query);
69 int Bank_int_IsValidName(const char *Name);
72 sqlite3 *gBank_Database;
75 int Bank_Initialise(const char *Argument)
80 rv = sqlite3_open(Argument, &gBank_Database);
83 fprintf(stderr, "CokeBank: Unable to open database '%s'\n", Argument);
84 fprintf(stderr, "Reason: %s\n", sqlite3_errmsg(gBank_Database));
85 sqlite3_close(gBank_Database);
90 rv = Bank_int_QueryNone(gBank_Database, "SELECT acct_id FROM accounts LIMIT 1", &errmsg);
95 else if( rv == SQLITE_NOTFOUND || rv == SQLITE_ERROR )
99 rv = Bank_int_QueryNone(gBank_Database, csBank_DatabaseSetup, &errmsg);
100 if( rv != SQLITE_OK ) {
101 fprintf(stderr, "Bank_Initialise - SQLite Error: %s\n", errmsg);
102 sqlite3_free(errmsg);
106 Log_Info("SQLite database rebuilt (%s)", Argument);
111 fprintf(stderr, "Bank_Initialise - SQLite Error: %s (rv = %i)\n", errmsg, rv);
112 sqlite3_free(errmsg);
122 int Bank_Transfer(int SourceUser, int DestUser, int Ammount, const char *Reason)
128 Reason = ""; // Shut GCC up
130 // Begin SQL Transaction
131 Bank_int_QueryNone(gBank_Database, "BEGIN TRANSACTION", NULL);
133 // Take from the source
134 query = mkstr("UPDATE accounts SET acct_balance=acct_balance%+i,acct_last_seen=datetime('now') WHERE acct_id=%i", -Ammount, SourceUser);
135 // printf("query = \"%s\"\n", query);
136 rv = Bank_int_QueryNone(gBank_Database, query, &errmsg);
138 if( rv != SQLITE_OK )
140 fprintf(stderr, "Bank_Transfer - SQLite Error: %s\n", errmsg);
141 sqlite3_free(errmsg);
142 Bank_int_QueryNone(gBank_Database, "ROLLBACK", NULL);
146 // Give to the destination
147 query = mkstr("UPDATE accounts SET acct_balance=acct_balance%+i,acct_last_seen=datetime('now') WHERE acct_id=%i", Ammount, DestUser);
148 // printf("query = \"%s\"\n", query);
149 rv = Bank_int_QueryNone(gBank_Database, query, &errmsg);
151 if( rv != SQLITE_OK )
153 fprintf(stderr, "Bank_Transfer - SQLite Error: %s\n", errmsg);
154 sqlite3_free(errmsg);
155 Bank_int_QueryNone(gBank_Database, "ROLLBACK", NULL);
159 // Commit transaction
160 Bank_int_QueryNone(gBank_Database, "COMMIT", NULL);
168 int Bank_GetFlags(int UserID)
170 sqlite3_stmt *statement;
176 "SELECT acct_is_disabled,acct_is_coke,acct_is_admin,acct_is_door,acct_is_internal"
177 " FROM accounts WHERE acct_id=%i LIMIT 1",
180 statement = Bank_int_QuerySingle(gBank_Database, query);
182 if( !statement ) return -1;
187 if( sqlite3_column_int(statement, 0) ) ret |= USER_FLAG_DISABLED;
189 if( sqlite3_column_int(statement, 1) ) ret |= USER_FLAG_COKE;
191 if( sqlite3_column_int(statement, 2) ) ret |= USER_FLAG_ADMIN;
193 if( sqlite3_column_int(statement, 3) ) ret |= USER_FLAG_DOORGROUP;
195 if( sqlite3_column_int(statement, 4) ) ret |= USER_FLAG_INTERNAL;
197 // Destroy and return
198 sqlite3_finalize(statement);
206 int Bank_SetFlags(int UserID, int Mask, int Value)
212 #define MAP_FLAG(name, flag) (Mask&(flag)?(Value&(flag)?","name"=1":","name"=0"):"")
214 "UPDATE accounts SET acct_id=acct_id%s%s%s%s%s WHERE acct_id=%i",// LIMIT 1",
215 MAP_FLAG("acct_is_coke", USER_FLAG_COKE),
216 MAP_FLAG("acct_is_admin", USER_FLAG_ADMIN),
217 MAP_FLAG("acct_is_door", USER_FLAG_DOORGROUP),
218 MAP_FLAG("acct_is_internal", USER_FLAG_INTERNAL),
219 MAP_FLAG("acct_is_disabled", USER_FLAG_DISABLED),
225 printf("Bank_SetFlags: query=\"%s\"\n", query);
229 rv = Bank_int_QueryNone(gBank_Database, query, &errmsg);
230 if( rv != SQLITE_OK )
232 fprintf(stderr, "Bank_SetUserFlags - SQLite Error: %s\n", errmsg);
233 fprintf(stderr, "query = '%s'\n", query);
235 sqlite3_free(errmsg);
246 int Bank_GetBalance(int AcctID)
248 sqlite3_stmt *statement;
252 query = mkstr("SELECT acct_balance FROM accounts WHERE acct_id=%i LIMIT 1", AcctID);
253 statement = Bank_int_QuerySingle(gBank_Database, query);
255 if( !statement ) return INT_MIN;
258 ret = sqlite3_column_int(statement, 0);
260 // Clean up and return
261 sqlite3_finalize(statement);
266 * Get the name of an account
268 char *Bank_GetAcctName(int AcctID)
270 sqlite3_stmt *statement;
274 query = mkstr("SELECT acct_name FROM accounts WHERE acct_id=%i LIMIT 1", AcctID);
275 statement = Bank_int_QuerySingle(gBank_Database, query);
277 if( !statement ) return NULL;
280 ret = strdup( (const char*)sqlite3_column_text(statement, 0) );
282 // Clean up and return
283 sqlite3_finalize(statement);
288 * Get an account ID from a name
290 int Bank_GetAcctByName(const char *Name, int bCreate)
293 sqlite3_stmt *statement;
296 // printf("Bank_GetAcctByName: (Name='%s',bCreate=%i)\n", Name, bCreate);
298 if( !Bank_int_IsValidName(Name) ) {
299 // printf("RETURN: -1 (Bad name)");
303 query = mkstr("SELECT acct_id FROM accounts WHERE acct_name='%s' LIMIT 1", Name);
304 statement = Bank_int_QuerySingle(gBank_Database, query);
307 // printf("User not found\n");
308 if( bCreate ) return Bank_CreateAcct(Name);
312 ret = sqlite3_column_int(statement, 0);
313 sqlite3_finalize(statement);
315 // printf("ret = %i\n", ret);
324 * Create a new named account
326 int Bank_CreateAcct(const char *Name)
334 if( !Bank_int_IsValidName(Name) ) return -1;
335 query = mkstr("INSERT INTO accounts (acct_name) VALUES ('%s')", Name);
339 query = strdup("INSERT INTO accounts (acct_name) VALUES (NULL)");
342 rv = Bank_int_QueryNone(gBank_Database, query, &errmsg);
343 if( rv != SQLITE_OK )
345 fprintf(stderr, "Bank_CreateAcct - SQLite Error: '%s'\n", errmsg);
346 fprintf(stderr, "Query = '%s'\n", query);
347 sqlite3_free(errmsg);
354 return sqlite3_last_insert_rowid(gBank_Database);
358 * Create an iterator for user accounts
360 tAcctIterator *Bank_Iterator(int FlagMask, int FlagValues, int Flags, int MinMaxBalance, time_t LastSeen)
363 const char *balanceClause;
364 const char *lastSeenClause;
365 const char *orderClause;
370 if( Flags & BANK_ITFLAG_MINBALANCE )
371 balanceClause = " AND acct_balance>=";
372 else if( Flags & BANK_ITFLAG_MAXBALANCE )
373 balanceClause = " AND acct_balance<=";
375 balanceClause = " AND 1!=";
379 // Last seen condition
380 if( Flags & BANK_ITFLAG_SEENAFTER )
381 lastSeenClause = " AND acct_last_seen>=";
382 else if( Flags & BANK_ITFLAG_SEENBEFORE )
383 lastSeenClause = " AND acct_last_seen<=";
385 lastSeenClause = " AND datetime(-1,'unixepoch')!=";
389 switch( Flags & BANK_ITFLAG_SORTMASK )
391 case BANK_ITFLAG_SORT_NONE:
395 case BANK_ITFLAG_SORT_NAME:
396 orderClause = "ORDER BY acct_name";
399 case BANK_ITFLAG_SORT_BAL:
400 orderClause = "ORDER BY acct_balance";
403 case BANK_ITFLAG_SORT_LASTSEEN:
404 orderClause = "ORDER BY acct_balance";
408 fprintf(stderr, "BUG: Unknown sort (%x) in SQLite CokeBank\n", Flags & BANK_ITFLAG_SORTMASK);
411 if( !(Flags & BANK_ITFLAG_REVSORT) )
414 #define MAP_FLAG(name, flag) (FlagMask&(flag)?(FlagValues&(flag)?" AND "name"=1":" AND "name"=0"):"")
415 query = mkstr("SELECT acct_id FROM accounts WHERE 1=1"
416 "%s%s%s%s%s" // Flags
418 "%sdatetime(%"PRIu64",'unixepoch')" // Last seen
419 "%s%s" // Sort and direction
421 MAP_FLAG("acct_is_coke", USER_FLAG_COKE),
422 MAP_FLAG("acct_is_admin", USER_FLAG_ADMIN),
423 MAP_FLAG("acct_is_door", USER_FLAG_DOORGROUP),
424 MAP_FLAG("acct_is_internal", USER_FLAG_INTERNAL),
425 MAP_FLAG("acct_is_disabled", USER_FLAG_DISABLED),
426 balanceClause, MinMaxBalance,
427 lastSeenClause, (uint64_t)LastSeen,
430 //printf("query = \"%s\"\n", query);
433 ret = Bank_int_MakeStatemnt(gBank_Database, query);
434 if( !ret ) return NULL;
442 * Get the next account in an iterator
444 int Bank_IteratorNext(tAcctIterator *It)
447 rv = sqlite3_step( (sqlite3_stmt*)It );
449 if( rv == SQLITE_DONE ) return -1;
450 if( rv != SQLITE_ROW ) {
451 fprintf(stderr, "Bank_IteratorNext - SQLite Error: %s\n", sqlite3_errmsg(gBank_Database));
455 return sqlite3_column_int( (sqlite3_stmt*)It, 0 );
461 void Bank_DelIterator(tAcctIterator *It)
463 sqlite3_finalize( (sqlite3_stmt*)It );
467 * Check user authentication token
469 int Bank_GetUserAuth(const char *Salt, const char *Username, const char *Password)
471 Salt = Password = Username; // Shut up GCC
474 return Bank_GetAcctByName(Username);
481 * Get an account number given a card ID
482 * NOTE: Actually ends up just being an alternate authentication token,
483 * as no checking is done on the ID's validity, save for SQL sanity.
485 int Bank_GetAcctByCard(const char *CardID)
488 sqlite3_stmt *statement;
491 if( !Bank_int_IsValidName(CardID) )
494 query = mkstr("SELECT acct_id FROM cards WHERE card_name='%s' LIMIT 1", CardID);
495 statement = Bank_int_QuerySingle(gBank_Database, query);
497 if( !statement ) return -1;
499 ret = sqlite3_column_int(statement, 0);
501 sqlite3_finalize(statement);
507 * Add a card to an account
509 int Bank_AddAcctCard(int AcctID, const char *CardID)
515 if( !Bank_int_IsValidName(CardID) )
518 // TODO: Check the AcctID too
521 query = mkstr("INSERT INTO cards (acct_id,card_name) VALUES (%i,'%s')",
523 rv = Bank_int_QueryNone(gBank_Database, query, &errmsg);
524 if( rv == SQLITE_CONSTRAINT )
526 sqlite3_free(errmsg);
528 return 2; // Card in use
530 if( rv != SQLITE_OK )
532 fprintf(stderr, "Bank_AddAcctCard - SQLite Error: '%s'\n", errmsg);
533 fprintf(stderr, "Query = '%s'\n", query);
534 sqlite3_free(errmsg);
544 * Create a SQLite Statement
546 sqlite3_stmt *Bank_int_MakeStatemnt(sqlite3 *Database, const char *Query)
550 rv = sqlite3_prepare_v2(Database, Query, strlen(Query)+1, &ret, NULL);
551 if( rv != SQLITE_OK ) {
552 fprintf(stderr, "SQLite Error: %s\n", sqlite3_errmsg(Database));
553 fprintf(stderr, "query = \"%s\"\n", Query);
560 int Bank_int_QueryNone(sqlite3 *Database, const char *Query, char **ErrorMessage)
563 printf("Bank_int_QueryNone: (Query='%s')\n", Query);
565 return sqlite3_exec(Database, Query, NULL, NULL, ErrorMessage);
569 * Create a SQLite statement and query it for the first row
570 * Returns NULL if the the set is empty
572 sqlite3_stmt *Bank_int_QuerySingle(sqlite3 *Database, const char *Query)
578 printf("Bank_int_QuerySingle: (Query='%s')\n", Query);
582 ret = Bank_int_MakeStatemnt(Database, Query);
585 printf("Bank_int_QuerySingle: RETURN NULL ret=NULL\n");
591 rv = sqlite3_step(ret);
592 // - Empty result set
593 if( rv == SQLITE_DONE ) {
595 printf("Bank_int_QuerySingle: RETURN NULL (rv == SQLITE_DONE)\n");
600 if( rv != SQLITE_ROW ) {
601 fprintf(stderr, "SQLite Error: %s\n", sqlite3_errmsg(gBank_Database));
602 fprintf(stderr, "query = \"%s\"\n", Query);
607 printf("Bank_int_QuerySingle: RETURN %p\n", ret);
613 * \brief Checks if the passed account name is valid
615 int Bank_int_IsValidName(const char *Name)
617 if( !Name ) return 0;
620 if( *Name == '\'' ) return 0;