#include <signal.h>
#include <unistd.h>
#include <sys/wait.h>
+#include <pty.h>
-#define DOOR_UNLOCKED_DELAY 10 // 10 seconds before it re-locks
+#define DOOR_UNLOCKED_DELAY 5 // Time in seconds before the door re-locks
// === IMPORTS ===
int Door_InitHandler();
int Door_CanDispense(int User, int Item);
int Door_DoDispense(int User, int Item);
+ int writes(int fd, const char *str);
// === GLOBALS ===
tHandler gDoor_Handler = {
Door_CanDispense,
Door_DoDispense
};
-char *gsDoor_Password = "";
-volatile int giDoor_ChildStatus;
+char *gsDoor_SerialPort = "/dev/ttyS3";
// == 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;
- char buf[512];
- int stdin_pair[2];
- int stdout_pair[2];
- pid_t childPid;
- pid_t parentPid;
+ int door_serial_handle;
#if DEBUG
printf("Door_DoDispense: (User=%i,Item=%i)\n", User, Item);
return 1;
}
- // Create stdin/stdout
- if( pipe(stdin_pair) || pipe(stdout_pair) )
- {
- perror("pipe");
- return -1;
- }
-
- giDoor_ChildStatus = 0; // Set child status to zero
- parentPid = getpid();
- childPid = fork();
-
- if( childPid < 0 )
- {
- perror("fork");
+ door_serial_handle = InitSerial(gsDoor_SerialPort, 1200);
+ 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 )
- {
- // Close write end of stdin, and set it to #0
- close(stdin_pair[1]); dup2(stdin_pair[0], 0);
- // Close read end of stdout, and set it to #1
- close(stdout_pair[0]); dup2(stdout_pair[1], 1);
-
- //execl("/bin/sh", "sh", "-c", "llogin door -w-", NULL);
- execl("/usr/bin/llogin", "llogin" "door" "-w-", NULL);
- perror("execl");
- exit(-1);
- }
-
- child_stdin = fdopen(stdin_pair[1], "w");
- close(stdin_pair[0]); // child stdin read
- close(stdout_pair[1]); // child stdout write
-
+
{
- int len;
- if( giDoor_ChildStatus || (len = read(stdout_pair[0], buf, 512)) < 0)
- {
- #if DEBUG
- int child_exit;
- waitpid(childPid, &child_exit, 0);
- printf("Door_DoDispense: fread fail (child status %i)\n", child_exit);
- #endif
- return -1;
- }
- buf[len] = '\0';
-
- #if DEBUG
- printf("Door_DoDispense: buf = %i '%s'\n", len, buf);
- #endif
+ struct termios info;
+ tcgetattr(door_serial_handle, &info);
+// info.c_iflag &= ~IGNCR; // Ignore \r
+ info.c_cflag &= ~CLOCAL;
+ tcsetattr(door_serial_handle, TCSANOW, &info);
}
-
- // Send password
- if( giDoor_ChildStatus || fputs(gsDoor_Password, child_stdin) <= 0 ) {
- #if DEBUG
- int child_exit;
- waitpid(childPid, &child_exit, 0);
- printf("Door_DoDispense: fputs password fail (child status %i)\n", child_exit);
- #endif
- return -1;
- }
- fputs("\n", child_stdin);
-
-
- #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\n");
- #endif
+
+ writes(door_serial_handle, "\r\r");
+ sleep(1);
+
+ if( writes(door_serial_handle, "ATH1\r") ) {
+ fprintf(stderr, "Unable to open door (sending ATH1)\n");
+ perror("Sending ATH1");
return -1;
}
// Wait before re-locking
sleep(DOOR_UNLOCKED_DELAY);
-
- #if DEBUG
- printf("Door_DoDispense: Door re-lock\n");
- #endif
-
- // Re-lock the door (and quit llogin)
- if( giDoor_ChildStatus || fputs("ATH0\n\x1D", child_stdin) == 0 ) {
- #if DEBUG
- printf("Door_DoDispense: fputs lock\n");
- #endif
+ if( writes(door_serial_handle, "ATH0\r") ) {
+ fprintf(stderr, "Oh, hell! Door not re-locking, big error (sending ATH0 failed)\n");
+ perror("Sending ATH0");
return -1;
}
-
- fclose(child_stdin);
- close(stdin_pair[1]); // child stdin write
- close(stdout_pair[0]); // child stdout read
+
+ 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;
}