1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
/*
axgetmail
(c) 1999 by Radek Burget OK2JBG
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version
2 of the license, or (at your option) any later version.
auth: execute the authorization script
*/
#include <stdio.h>
#include <unistd.h>
#include <signal.h>
#include <errno.h>
#include <sys/fcntl.h>
#include <stdlib.h>
#include "common.h"
#include "auth.h"
#define BUFSIZE 1024
/* run the authorization agent and wait until it exits */
void exec_auth_agent(FILE *bbs_stream, char *mycall, char *bbscall)
{
int pid;
int pipe_in[2], pipe_out[2];
signal(SIGPIPE, SIG_IGN);
if (pipe(pipe_in) != 0)
{
perror("auth.c:exec_auth_agent() failed to open pipe_in");
}
if (pipe(pipe_out) != 0)
{
perror("auth.c:exec_auth_agent() failed to open pipe_out");
}
pid = fork();
if (pid == -1) perror("auth.c:exec_auth_agent() Cannot fork()");
if (pid == 0) /* child process */
{
close(pipe_in[0]);
dup2(pipe_in[1], 1); //stdout
close(pipe_out[1]);
dup2(pipe_out[0], 0); //stdin;
execlp(AUTH_AGENT, AUTH_AGENT, bbscall, mycall, NULL);
perror("auth.c:exec_auth_agent() execlp");
exit(1);
}
else /* parent process */
{
char buf[BUFSIZE];
int r1, r2, i;
int descin, descout;
message(MSG_DEBUG, "redirecting authorization data\n");
close(pipe_in[1]);
close(pipe_out[0]);
fcntl(pipe_in[0], F_SETFL, O_NONBLOCK);
descin = descout = fileno(bbs_stream);
while (1)
{
r1 = read(pipe_in[0], buf, BUFSIZE);
for (i = 0; i < r1; i++) if (buf[i] == '\n') buf[i] = '\r';
if (r1 > 0)
{
if (write(descout, buf, r1) < 0)
{
perror("auth.c:exec_auth_agent() write(descout) failed");
}
}
else if (r1 == 0 || errno != EAGAIN) break;
if (r1 != -1) //don't read data from BBS until we're sure we'll do
//some authorization
{
r2 = read(descin, buf, BUFSIZE);
for (i = 0; i < r2; i++) if (buf[i] == '\r') buf[i] = '\n';
if (r2 > 0)
{
if (write(pipe_out[1], buf, r2) < 0)
{
perror("auth.c:exec_auth_agent() write(pipe_out) failed");
}
}
else if (r2 == 0 || errno != EAGAIN) break;
}
}
kill(pid, SIGTERM);
}
}
|
