+ // 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()
+ {
+ 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;
+ }
+
+ 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);
+
+ #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");
+ return -1;
+ }
+ fflush(child_stdin);
+ fputs("\x1D", child_stdin);
+
+ // Wait a little so llogin can send the lock message
+ sleep(1);
+
+ fclose(child_stdin);
+ close(child_stdin_fd);
+
+ #if DEBUG
+ printf("Door_DoDispense: User %i opened door\n", User);
+ #endif
+
+ kill(childPid, SIGKILL);