* OpenDispense 2
* UCC (University [of WA] Computer Club) Electronic Accounting System
*
- * handler_doror.c - Door Relay code
+ * handler_door.c - Door Relay code
*
* This file is licenced under the 3-clause BSD Licence. See the file
* COPYING for full details.
#include <fcntl.h>
#include <signal.h>
#include <unistd.h>
-#include <sys/wait.h>
#include <pty.h>
#define DOOR_UNLOCKED_DELAY 5 // Time in seconds before the door re-locks
int Door_InitHandler();
int Door_CanDispense(int User, int Item);
int Door_DoDispense(int User, int Item);
+ int writes(int fd, const char *str);
+char *ReadStatus(int FD);
// === GLOBALS ===
tHandler gDoor_Handler = {
Door_CanDispense,
Door_DoDispense
};
-char *gsDoor_Password = "";
-volatile int giDoor_ChildStatus;
+char *gsDoor_SerialPort; // Set from config in main.c
// == CODE ===
-void Door_SIGCHLDHandler(int signum)
-{
- signum = 0;
- giDoor_ChildStatus ++;
- printf("SIGCHLD: giDoor_ChildStatus = %i \n", giDoor_ChildStatus);
-}
-
int Door_InitHandler(void)
{
- signal(SIGCHLD, Door_SIGCHLDHandler);
return 0;
}
*/
int Door_DoDispense(int User, int Item)
{
- FILE *child_stdin;
- #if 0
- int stdin_pair[2];
- int stdout_pair[2];
- #else
- int child_stdin_fd;
- #endif
- pid_t childPid;
- pid_t parentPid;
+ int door_serial_handle;
#if DEBUG
printf("Door_DoDispense: (User=%i,Item=%i)\n", User, Item);
return 1;
}
- giDoor_ChildStatus = 0; // Set child status to zero
- parentPid = getpid();
- childPid = forkpty(&child_stdin_fd, NULL, NULL, NULL);
-
- if( childPid < 0 )
- {
- perror("fork");
+ door_serial_handle = InitSerial(gsDoor_SerialPort, 115200);
+ if(door_serial_handle < 0) {
+ fprintf(stderr, "Unable to open door serial '%s'\n", gsDoor_SerialPort);
+ perror("Opening door port");
return -1;
}
-
- // Child process
- if( childPid == 0 )
- {
- execl("/usr/bin/llogin", "llogin", "door", "-w-", NULL);
- perror("execl");
- exit(-1);
- }
-
- child_stdin = fdopen(child_stdin_fd, "w");
- int read_child_output()
+ // Disable local echo
{
- char buf[1024];
- int len;
- if( giDoor_ChildStatus || (len = read(child_stdin_fd, buf, sizeof buf)) < 0)
- {
- #if DEBUG
- printf("Door_DoDispense: fread fail\n");
- #endif
- return -1;
- }
- buf[len] = '\0';
-
- #if DEBUG > 1
- printf("Door_DoDispense: buf = %i '%s'\n", len, buf);
- #endif
- return 0;
+ struct termios info;
+ tcgetattr(door_serial_handle, &info);
+ info.c_cflag &= ~CLOCAL;
+ tcsetattr(door_serial_handle, TCSANOW, &info);
}
- if( read_child_output() ) return -1;
-
- // Send password
- if( giDoor_ChildStatus || fputs(gsDoor_Password, child_stdin) <= 0 ) {
- printf("Door_DoDispense: fputs password fail\n");
- return -1;
- }
- fputs("\n", child_stdin);
- fflush(child_stdin);
-
- if( read_child_output() ) return -1;
-
- #if DEBUG
- printf("Door_DoDispense: Door unlock\n");
- #endif
- // ATH1 - Unlock door
- if( giDoor_ChildStatus || fputs("ATH1\n", child_stdin) == 0) {
- #if DEBUG
- printf("Door_DoDispense: fputs unlock failed (or child terminated)\n");
- #endif
- return -1;
- }
- fflush(child_stdin);
-
- // Wait before re-locking
- sleep(DOOR_UNLOCKED_DELAY);
+// flush(door_serial_handle);
- #if DEBUG
- printf("Door_DoDispense: Door re-lock\n");
- #endif
- // Re-lock the door (and quit llogin)
- if( giDoor_ChildStatus || fputs("ATH0\n", child_stdin) == 0 ) {
- fprintf(stderr, "Oh F**k, the door may be stuck unlocked, someone use llogin!\n");
+ writes(door_serial_handle, "4;");
+
+#if 0
+ char *status = ReadStatus(door_serial_handle);
+ if( !status ) return -1;
+ if( strcmp(status, "Opening door") != 0 ) {
+ fprintf(stderr, "Unknown/unexpected door status '%s'\n", status);
return -1;
}
- fflush(child_stdin);
- fputs("\x1D", child_stdin);
+#endif
- // Wait a little so llogin can send the lock message
- sleep(1);
-
- fclose(child_stdin);
- close(child_stdin_fd);
+ close(door_serial_handle);
#if DEBUG
printf("Door_DoDispense: User %i opened door\n", User);
#endif
- kill(childPid, SIGKILL);
+ return 0;
+}
+int writes(int fd, const char *str)
+{
+ int len = strlen(str);
+
+ if( len != write(fd, str, len) )
+ {
+ return 1;
+ }
return 0;
}
+char *ReadStatus(int FD)
+{
+ char tmpbuf[32];
+ int len;
+ len = read(FD, tmpbuf, sizeof(tmpbuf)-1);
+ tmpbuf[len] = 0;
+ char *msg = strchr(tmpbuf, ',');
+ if( !msg ) {
+ fprintf(stderr, "Door returned malformed data (no ',')\n");
+ return NULL;
+ }
+ msg ++;
+ char *end = strchr(tmpbuf, ';');
+ if( !end ) {
+ fprintf(stderr, "Door returned malformed data (no ';')\n");
+ return NULL;
+ }
+ *end = '\0';
+
+ return strdup(msg);
+}