Restore the accidently deleted doors.c :(
This commit is contained in:
Andrew Pamment
parent
0a837a6806
commit
b2185e87ae
267
doors.c
Normal file
267
doors.c
Normal file
@ -0,0 +1,267 @@
|
||||
#include <stdio.h>
|
||||
#include <sys/stat.h>
|
||||
#include <ctype.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
#include <unistd.h>
|
||||
#include <libgen.h>
|
||||
#include <signal.h>
|
||||
#include <sys/wait.h>
|
||||
#include <sys/ioctl.h>
|
||||
#if defined(linux)
|
||||
# include <pty.h>
|
||||
#elif defined(__OpenBSD__) || defined(__NetBSD__)
|
||||
# include <util.h>
|
||||
#else
|
||||
# include <libutil.h>
|
||||
#endif
|
||||
#include "bbs.h"
|
||||
|
||||
extern struct bbs_config conf;
|
||||
extern int mynode;
|
||||
|
||||
int running_door_pid = 0;
|
||||
int running_door = 0;
|
||||
|
||||
void doorchld_handler(int s)
|
||||
{
|
||||
// waitpid() might overwrite errno, so we save and restore it:
|
||||
while(waitpid(-1, NULL, WNOHANG) > 0);
|
||||
|
||||
running_door = 0;
|
||||
}
|
||||
|
||||
int write_door32sys(int socket, struct user_record *user) {
|
||||
struct stat s;
|
||||
char buffer[256];
|
||||
FILE *fptr;
|
||||
char *ptr;
|
||||
int i;
|
||||
|
||||
sprintf(buffer, "%s/node%d", conf.bbs_path, mynode);
|
||||
|
||||
if (stat(buffer, &s) != 0) {
|
||||
mkdir(buffer, 0755);
|
||||
}
|
||||
|
||||
sprintf(buffer, "%s/node%d/door32.sys", conf.bbs_path, mynode);
|
||||
|
||||
fptr = fopen(buffer, "w");
|
||||
|
||||
if (!fptr) {
|
||||
printf("Unable to open %s for writing!\n", buffer);
|
||||
return 1;
|
||||
}
|
||||
|
||||
fprintf(fptr, "2\n"); // telnet type
|
||||
fprintf(fptr, "%d\n", socket); // socket
|
||||
fprintf(fptr, "38400\n"); // baudrate
|
||||
fprintf(fptr, "Magicka %d.%d\n", VERSION_MAJOR, VERSION_MINOR);
|
||||
fprintf(fptr, "%d\n", user->id);
|
||||
fprintf(fptr, "%s %s\n", user->firstname, user->lastname);
|
||||
fprintf(fptr, "%s\n", user->loginname);
|
||||
fprintf(fptr, "%d\n", user->sec_level);
|
||||
fprintf(fptr, "%d\n", user->timeleft);
|
||||
fprintf(fptr, "1\n"); // ansi emulation = 1
|
||||
fprintf(fptr, "%d\n", mynode);
|
||||
|
||||
fclose(fptr);
|
||||
|
||||
// create dorinfo1.def
|
||||
|
||||
sprintf(buffer, "%s/node%d", conf.bbs_path, mynode);
|
||||
|
||||
if (stat(buffer, &s) != 0) {
|
||||
mkdir(buffer, 0755);
|
||||
}
|
||||
|
||||
sprintf(buffer, "%s/node%d/dorinfo1.def", conf.bbs_path, mynode);
|
||||
|
||||
fptr = fopen(buffer, "w");
|
||||
|
||||
if (!fptr) {
|
||||
printf("Unable to open %s for writing!\n", buffer);
|
||||
return 1;
|
||||
}
|
||||
|
||||
strcpy(buffer, conf.sysop_name);
|
||||
|
||||
ptr = NULL;
|
||||
|
||||
for (i=0;i<strlen(buffer);i++) {
|
||||
if (buffer[i] == ' ') {
|
||||
ptr = &buffer[i+1];
|
||||
buffer[i] = '\0';
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
fprintf(fptr, "%s\n", conf.bbs_name); // telnet type
|
||||
fprintf(fptr, "%s\n", buffer);
|
||||
if (ptr != NULL) {
|
||||
fprintf(fptr, "%s\n", ptr);
|
||||
} else {
|
||||
fprintf(fptr, "\n");
|
||||
}
|
||||
fprintf(fptr, "COM1\n"); // com port
|
||||
fprintf(fptr, "38400 BAUD,N,8,1\n");
|
||||
fprintf(fptr, "0\n");
|
||||
fprintf(fptr, "%s\n", user->firstname);
|
||||
fprintf(fptr, "%s\n", user->lastname);
|
||||
fprintf(fptr, "%s\n", user->location);
|
||||
fprintf(fptr, "1\n");
|
||||
fprintf(fptr, "30\n");
|
||||
fprintf(fptr, "%d\n", user->timeleft);
|
||||
fprintf(fptr, "-1\n");
|
||||
|
||||
|
||||
fclose(fptr);
|
||||
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
void rundoor(int socket, struct user_record *user, char *cmd, int stdio) {
|
||||
char buffer[256];
|
||||
int pid;
|
||||
char *arguments[4];
|
||||
int ret;
|
||||
char c;
|
||||
int len;
|
||||
int status;
|
||||
int master;
|
||||
int slave;
|
||||
fd_set fdset;
|
||||
int t;
|
||||
struct winsize ws;
|
||||
struct sigaction sa;
|
||||
|
||||
if (write_door32sys(socket, user) != 0) {
|
||||
return;
|
||||
}
|
||||
|
||||
if (stdio) {
|
||||
|
||||
arguments[0] = strdup(cmd);
|
||||
sprintf(buffer, "%d", mynode);
|
||||
arguments[1] = strdup(buffer);
|
||||
sprintf(buffer, "%d", socket);
|
||||
arguments[2] = strdup(buffer);
|
||||
arguments[3] = NULL;
|
||||
|
||||
ws.ws_row = 24;
|
||||
ws.ws_col = 80;
|
||||
|
||||
running_door = 1;
|
||||
|
||||
if (openpty(&master, &slave, NULL, NULL, &ws) == 0) {
|
||||
sa.sa_handler = doorchld_handler;
|
||||
sigemptyset(&sa.sa_mask);
|
||||
sa.sa_flags = SA_RESTART;
|
||||
if (sigaction(SIGCHLD, &sa, NULL) == -1) {
|
||||
perror("sigaction");
|
||||
exit(1);
|
||||
}
|
||||
|
||||
pid = fork();
|
||||
if (pid < 0) {
|
||||
return;
|
||||
} else if (pid == 0) {
|
||||
|
||||
close(master);
|
||||
dup2(slave, 0);
|
||||
dup2(slave, 1);
|
||||
|
||||
close(slave);
|
||||
|
||||
setsid();
|
||||
|
||||
ioctl(0, TIOCSCTTY, 1);
|
||||
|
||||
execvp(cmd, arguments);
|
||||
} else {
|
||||
running_door_pid = pid;
|
||||
|
||||
while(running_door != 0) {
|
||||
FD_ZERO(&fdset);
|
||||
FD_SET(master, &fdset);
|
||||
FD_SET(socket, &fdset);
|
||||
if (master > socket) {
|
||||
t = master + 1;
|
||||
} else {
|
||||
t = socket + 1;
|
||||
}
|
||||
ret = select(t, &fdset, NULL, NULL, NULL);
|
||||
if (ret > 0) {
|
||||
if (FD_ISSET(socket, &fdset)) {
|
||||
len = read(socket, &c, 1);
|
||||
if (len == 0) {
|
||||
close(master);
|
||||
disconnect(socket);
|
||||
return;
|
||||
}
|
||||
write(master, &c, 1);
|
||||
} else if (FD_ISSET(master, &fdset)) {
|
||||
len = read(master, &c, 1);
|
||||
if (len == 0) {
|
||||
close(master);
|
||||
break;
|
||||
}
|
||||
write(socket, &c, 1);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
free(arguments[0]);
|
||||
free(arguments[1]);
|
||||
free(arguments[2]);
|
||||
} else {
|
||||
sprintf(buffer, "%s %d %d", cmd, mynode, socket);
|
||||
system(buffer);
|
||||
}
|
||||
}
|
||||
|
||||
int door_menu(int socket, struct user_record *user) {
|
||||
int doquit = 0;
|
||||
int dodoors = 0;
|
||||
char prompt[128];
|
||||
int i;
|
||||
char c;
|
||||
while (!dodoors) {
|
||||
s_displayansi(socket, "doors");
|
||||
|
||||
sprintf(prompt, "\e[0m\r\nTL: %dm :> ", user->timeleft);
|
||||
s_putstring(socket, prompt);
|
||||
|
||||
c = s_getc(socket);
|
||||
|
||||
switch(tolower(c)) {
|
||||
case 'q':
|
||||
dodoors = 1;
|
||||
break;
|
||||
case 'g':
|
||||
{
|
||||
s_putstring(socket, "\r\nAre you sure you want to log off? (Y/N)");
|
||||
c = s_getc(socket);
|
||||
if (tolower(c) == 'y') {
|
||||
doquit = 1;
|
||||
dodoors = 1;
|
||||
}
|
||||
}
|
||||
break;
|
||||
default:
|
||||
{
|
||||
for (i=0;i<conf.door_count;i++) {
|
||||
if (tolower(c) == tolower(conf.doors[i]->key)) {
|
||||
rundoor(socket, user, conf.doors[i]->command, conf.doors[i]->stdio);
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
return doquit;
|
||||
}
|
||||
Reference in New Issue
Block a user