summaryrefslogtreecommitdiff
path: root/src/http_proxy_functions.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/http_proxy_functions.c')
-rw-r--r--src/http_proxy_functions.c267
1 files changed, 267 insertions, 0 deletions
diff --git a/src/http_proxy_functions.c b/src/http_proxy_functions.c
new file mode 100644
index 0000000..b8e5849
--- /dev/null
+++ b/src/http_proxy_functions.c
@@ -0,0 +1,267 @@
+/*
+ * active port forwarder - software for secure forwarding
+ * Copyright (C) 2003,2004,2005 jeremian <jeremian [at] poczta.fm>
+ *
+ * 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.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ *
+ */
+
+#include <config.h>
+
+#include "http_proxy_functions.h"
+#include "network.h"
+#include "stats.h"
+#include "logging.h"
+
+static char isseed;
+
+int
+myrand(int down, int up)
+{
+ struct timeval tv;
+ if (!isseed) {
+ gettimeofday(&tv, 0);
+ srand(tv.tv_sec);
+ isseed = 1;
+ }
+ return ( down + ( rand() % (up - down + 1) ) );
+}
+
+void
+mysleep(double time)
+{
+ struct timeval tv;
+ tv.tv_sec = (int) time;
+ tv.tv_usec = (int)(time * 1000000)%1000000;
+ select(0, NULL, NULL, NULL, &tv);
+}
+
+void
+delete_user(connection* cnts, int i, fd_set* allset)
+{
+ aflog(LOG_T_MAIN, LOG_I_DEBUG,
+ "http proxy: delete_user(%d)", i);
+ clear_fd(&(cnts[i].sockfd), allset);
+ if (!(cnts[i].state & C_POST_WAIT)) {
+ clear_fd(&(cnts[i].postfd), allset);
+ }
+ if ((cnts[i].type == 0) && (!(cnts[i].state & C_GET_WAIT))) {
+ clear_fd(&(cnts[i].getfd), allset);
+ }
+ cnts[i].state = C_CLOSED;
+ cnts[i].sent_ptr = cnts[i].ptr = cnts[i].length = 0;
+ cnts[i].type = 0;
+}
+
+int
+parse_header(int fd, char* tab, header* hdr)
+{
+ int n, i, j, state = 0;
+ char tmpt[100];
+ n = read(fd, tab, 9000);
+ hdr->allreaded = n;
+ i = j = 0;
+ memset(tmpt, 0, 100);
+ hdr->ptr = 0;
+ hdr->length = 0;
+ while (i < n) {
+ if (j == 99)
+ return 1;
+ switch (state) {
+ case 0:
+ if ((tab[i] != ' ') && (tab[i] != '\t')) {
+ tmpt[j] = tab[i];
+ ++j;
+ }
+ else {
+ tmpt[j] = 0;
+ if (strcmp(tmpt, "GET") == 0) {
+ hdr->type = H_TYPE_GET;
+ state = 1;
+ break;
+ }
+ if (strcmp(tmpt, "POST") == 0) {
+ hdr->type = H_TYPE_POST;
+ state = 1;
+ break;
+ }
+ if ((strcmp(tmpt, "HTTP/1.0") == 0) || (strcmp(tmpt, "HTTP/1.1") == 0)) {
+ hdr->type = H_TYPE_OK;
+ state = 6;
+ break;
+ }
+ return 1;
+ }
+ break;
+ case 1:
+ if ((tab[i] != ' ') && (tab[i] != '\t')) {
+ tmpt[0] = tab[i];
+ j = 1;
+ state = 2;
+ }
+ break;
+ case 2:
+ if (tab[i] != '=') {
+ tmpt[j] = tab[i];
+ ++j;
+ }
+ else {
+ tmpt[j] = 0;
+ if (strcmp(tmpt, "/yahpt.html?id")) {
+ return 1;
+ }
+ j = 0;
+ state = 3;
+ }
+ break;
+ case 3:
+ if ((tab[i] != ' ') && (tab[i] != '\t')) {
+ if (j == 9) {
+ return 1;
+ }
+ hdr->id[j] = tab[i];
+ ++j;
+ }
+ else {
+ if (j != 9) {
+ return 1;
+ }
+ hdr->id[j] = 0;
+ state = 4;
+ }
+ break;
+ case 4:
+ if (tab[i] == '\n')
+ state = 5;
+ break;
+ case 5:
+ if (tab[i] == '\n') {
+ hdr->ptr = i+1;
+ hdr->length = n - hdr->ptr;
+ return 0;
+ }
+ if (tab[i] != '\r') {
+ state = 4;
+ }
+ break;
+ case 6:
+ if ((tab[i] != ' ') && (tab[i] != '\t')) {
+ tmpt[0] = tab[i];
+ j = 1;
+ state = 7;
+ }
+ break;
+ case 7:
+ if ((tab[i] == ' ') || (tab[i] == '\t')) {
+ tmpt[j] = 0;
+ if (strcmp(tmpt, "200")) {
+ return 1;
+ }
+ state = 4;
+ }
+ else {
+ tmpt[j] = tab[i];
+ ++j;
+ }
+ break;
+ }
+ ++i;
+ }
+ return 1;
+}
+
+void
+set_fd(int fd, int* maxfdp1, fd_set* allset)
+{
+ FD_SET(fd, allset);
+ (*maxfdp1) = ((*maxfdp1) > fd) ? (*maxfdp1) : (fd + 1);
+}
+
+void
+close_fd(int* fd)
+{
+ close(*fd);
+}
+
+void
+clear_fd(int* fd, fd_set* set)
+{
+ FD_CLR(*fd, set);
+ close_fd(fd);
+}
+
+int
+read_message(int fd, int length, connection* client, char* tab, int ptr)
+{
+ int j = 0;
+ int tmp = 0;
+ while (j < length) {
+ if (client->curreceived + length-j > client->toreceive) {
+ writen(fd, (unsigned char*) (tab+ptr+j), client->toreceive - client->curreceived);
+ j += client->toreceive - client->curreceived;
+ client->curreceived += client->toreceive - client->curreceived;
+ if (client->read_state == 0) {
+ switch (tab[ptr + j]) {
+ case 'M': {
+ if (j + 5 <= length) {
+ memcpy(&tmp, &tab[ptr + j + 1], 4);
+ client->toreceive = ntohl(tmp);
+ client->curreceived = 0;
+ j += 5;
+ }
+ else if (j + 1 < length) {
+ memcpy(client->readed_length, &tab[ptr + j + 1], length - j - 1);
+ client->read_state = length - j;
+ j += length - j;
+ }
+ else {
+ ++j;
+ client->read_state = 1;
+ }
+ break;
+ }
+ case 'T': {
+ ++j;
+ break;
+ }
+ default: {
+ return 1;
+ }
+ }
+ }
+ else {
+ if (j + 5 - client->read_state <= length) {
+ memcpy(&client->readed_length[client->read_state-1], &tab[ptr + j], 5 - client->read_state);
+ memcpy(&tmp, client->readed_length, 4);
+ client->toreceive = ntohl(tmp);
+ client->curreceived = 0;
+ j += 5 - client->read_state;
+ client->read_state = 0;
+ }
+ else {
+ memcpy(&client->readed_length[client->read_state-1], &tab[ptr + j], length - j);
+ client->read_state += length - j;
+ j += length -j;
+ }
+ }
+ }
+ else {
+ client->curreceived += length-j;
+ writen(fd, (unsigned char*) (tab+ptr+j), length-j);
+ j += length-j;
+ }
+ }
+ return 0;
+}