#include "buffer.h"
#include "common.h"
+#include "epoll.h"
#include "threads.h"
#include "tokens.h"
const char *encryption_cipher;
const char *encryption_keysize;
const char *etrn_domain;
+
+ const char *eoq;
} query_t;
+typedef struct plicyd_t {
+ unsigned listener : 1;
+ int fd;
+ buffer_t ibuf;
+ buffer_t obuf;
+ query_t q;
+} plicyd_t;
+
+
+static plicyd_t *plicyd_new(void)
+{
+ plicyd_t *plicyd = p_new(plicyd_t, 1);
+ plicyd->fd = -1;
+ return plicyd;
+}
+
+static void plicyd_delete(plicyd_t **plicyd)
+{
+ if (*plicyd) {
+ if ((*plicyd)->fd >= 0)
+ close((*plicyd)->fd);
+ buffer_wipe(&(*plicyd)->ibuf);
+ buffer_wipe(&(*plicyd)->obuf);
+ p_delete(plicyd);
+ }
+}
+
static int postfix_parsejob(query_t *query, char *p)
{
#define PARSE_CHECK(expr, error, ...) \
#undef PARSE_CHECK
}
-static void *policy_run(int fd, void *data)
+__attribute__((format(printf,2,0)))
+static void policy_answer(plicyd_t *pcy, const char *fmt, ...)
{
- buffer_t buf;
+ va_list args;
+ va_start(args, fmt);
+ buffer_addvf(&pcy->obuf, fmt, args);
+ va_end(args);
+ buffer_addstr(&pcy->obuf, "\n\n");
+ buffer_consume(&pcy->ibuf, pcy->q.eoq - pcy->ibuf.data);
+ epoll_modify(pcy->fd, EPOLLIN | EPOLLOUT, pcy);
+}
- buffer_init(&buf);
- for (;;) {
- ssize_t search_offs = MAX(0, buf.len - 1);
- int nb = buffer_read(&buf, fd, -1);
- const char *eoq;
- query_t q;
+static void policy_process(plicyd_t *pcy)
+{
+ policy_answer(pcy, "DUNNO");
+}
- if (nb < 0) {
- if (errno == EAGAIN || errno == EINTR)
- continue;
- UNIXERR("read");
- break;
- }
- if (nb == 0) {
- if (buf.len)
- syslog(LOG_ERR, "unexpected end of data");
- break;
- }
+static int policy_run(plicyd_t *pcy)
+{
+ ssize_t search_offs = MAX(0, pcy->ibuf.len - 1);
+ int nb = buffer_read(&pcy->ibuf, pcy->fd, -1);
+ const char *eoq;
+
+ if (nb < 0) {
+ if (errno == EAGAIN || errno == EINTR)
+ return 0;
+ UNIXERR("read");
+ return -1;
+ }
+ if (nb == 0) {
+ if (pcy->ibuf.len)
+ syslog(LOG_ERR, "unexpected end of data");
+ return -1;
+ }
- eoq = strstr(buf.data + search_offs, "\n\n");
- if (!eoq)
- continue;
+ if (!(eoq = strstr(pcy->ibuf.data + search_offs, "\n\n")))
+ return 0;
- if (postfix_parsejob(&q, buf.data) < 0)
- break;
+ if (postfix_parsejob(&pcy->q, pcy->ibuf.data) < 0)
+ return -1;
+ pcy->q.eoq = eoq + strlen("\n\n");
+ epoll_modify(pcy->fd, 0, pcy);
+ policy_process(pcy);
+ return 0;
+}
- buffer_consume(&buf, eoq + strlen("\n\n") - buf.data);
- if (xwrite(fd, "DUNNO\n\n", strlen("DUNNO\n\n"))) {
- UNIXERR("write");
- break;
- }
+int start_listener(int port)
+{
+ struct sockaddr_in addr = {
+ .sin_family = AF_INET,
+ .sin_addr = { htonl(INADDR_LOOPBACK) },
+ };
+ plicyd_t *tmp;
+ int sock;
+
+ addr.sin_port = htons(port);
+ sock = tcp_listen_nonblock((const struct sockaddr *)&addr, sizeof(addr));
+ if (sock < 0) {
+ return -1;
}
- buffer_wipe(&buf);
- close(fd);
- return NULL;
+ tmp = plicyd_new();
+ tmp->fd = sock;
+ tmp->listener = true;
+ epoll_register(sock, EPOLLIN, tmp);
+ return 0;
+}
+
+void start_client(plicyd_t *d)
+{
+ plicyd_t *tmp;
+ int sock;
+
+ sock = accept_nonblock(d->fd);
+ if (sock < 0) {
+ UNIXERR("accept");
+ return;
+ }
+
+ tmp = plicyd_new();
+ tmp->fd = sock;
+ epoll_register(sock, EPOLLIN, tmp);
}
/* administrivia {{{ */
int main(int argc, char *argv[])
{
- struct sockaddr_in addr = {
- .sin_family = AF_INET,
- .sin_addr = { htonl(INADDR_LOOPBACK) },
- };
const char *pidfile = NULL;
bool daemonize = true;
int port = DEFAULT_PORT;
- int sock = -1;
for (int c = 0; (c = getopt(argc, argv, "hf" "l:p:")) >= 0; ) {
switch (c) {
pidfile_refresh();
- addr.sin_port = htons(port);
- sock = tcp_listen_nonblock((struct sockaddr *)&addr, sizeof(addr));
- if (sock < 0)
+ if (start_listener(port) < 0)
return EXIT_FAILURE;
while (!sigint) {
- fd_set rfd;
- struct timeval tv = { 1, 0 };
- int res;
+ struct epoll_event evts[1024];
+ int n;
- FD_SET(sock, &rfd);
- res = select(sock + 1, &rfd, NULL, NULL, &tv);
-
- if (res < 0) {
- if (errno != EINTR && errno != EAGAIN) {
- UNIXERR("select");
+ n = epoll_select(evts, countof(evts), -1);
+ if (n < 0) {
+ if (errno != EAGAIN && errno != EINTR) {
+ UNIXERR("epoll_wait");
return EXIT_FAILURE;
}
+ continue;
}
- if (res > 0) {
- int fd = accept(sock, NULL, 0);
- if (fd < 0) {
- if (errno != EINTR && errno != EAGAIN) {
- UNIXERR("accept");
- return EXIT_FAILURE;
- }
+
+ while (--n >= 0) {
+ plicyd_t *d = evts[n].data.ptr;
+
+ if (d->listener) {
+ start_client(d);
continue;
}
- thread_launch(policy_run, fd, NULL);
+
+ if (evts[n].events & EPOLLIN) {
+ if (policy_run(d) < 0) {
+ plicyd_delete(&d);
+ continue;
+ }
+ }
+
+ if ((evts[n].events & EPOLLOUT) && d->obuf.len) {
+ if (buffer_write(&d->obuf, d->fd) < 0) {
+ plicyd_delete(&d);
+ continue;
+ }
+ if (!d->obuf.len) {
+ epoll_modify(d->fd, EPOLLIN, d);
+ }
+ }
}
- threads_join();
}
- close(sock);
syslog(LOG_INFO, "Stopping...");
return EXIT_SUCCESS;
}