Mercurial > pidgin.yaz
view src/proxy.c @ 7740:ddc450689c05
[gaim-migrate @ 8385]
Font sizes wysiwyg. Which is cool.
Now we just need to make POINT_SIZE center around the GTK+ theme font size.
Also, it would be cool if we could handle the ol' point size/font size problem
here.
committer: Tailor Script <tailor@pidgin.im>
author | Sean Egan <seanegan@gmail.com> |
---|---|
date | Thu, 04 Dec 2003 07:53:42 +0000 |
parents | ac6b2b3a9a1f |
children | 99ffabc6ce73 |
line wrap: on
line source
/** * @file proxy.c Proxy API * @ingroup core * * gaim * * Copyright (C) 1998-1999, Mark Spencer <markster@marko.net> * Copyright (C) 2003 Christian Hammond <chipx86@gnupdate.org> * * 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 * */ /* this is a little piece of code to handle proxy connection */ /* it is intended to : 1st handle http proxy, using the CONNECT command , 2nd provide an easy way to add socks support , 3rd draw women to it like flies to honey */ #include "internal.h" #include "debug.h" #include "notify.h" #include "prefs.h" #include "proxy.h" #include "util.h" #define GAIM_READ_COND (G_IO_IN | G_IO_HUP | G_IO_ERR) #define GAIM_WRITE_COND (G_IO_OUT | G_IO_HUP | G_IO_ERR | G_IO_NVAL) static GaimProxyInfo *global_proxy_info = NULL; static int opt_debug = 0; struct PHB { GaimInputFunction func; gpointer data; char *host; int port; gint inpa; GaimProxyInfo *gpi; GaimAccount *account; }; typedef struct _GaimIOClosure { GaimInputFunction function; guint result; gpointer data; } GaimIOClosure; /************************************************************************** * Proxy structure API **************************************************************************/ GaimProxyInfo * gaim_proxy_info_new(void) { return g_new0(GaimProxyInfo, 1); } void gaim_proxy_info_destroy(GaimProxyInfo *info) { g_return_if_fail(info != NULL); if (info->host != NULL) g_free(info->host); if (info->username != NULL) g_free(info->username); if (info->password != NULL) g_free(info->password); g_free(info); } void gaim_proxy_info_set_type(GaimProxyInfo *info, GaimProxyType type) { g_return_if_fail(info != NULL); info->type = type; } void gaim_proxy_info_set_host(GaimProxyInfo *info, const char *host) { g_return_if_fail(info != NULL); if (info->host != NULL) g_free(info->host); info->host = (host == NULL ? NULL : g_strdup(host)); } void gaim_proxy_info_set_port(GaimProxyInfo *info, int port) { g_return_if_fail(info != NULL); info->port = port; } void gaim_proxy_info_set_username(GaimProxyInfo *info, const char *username) { g_return_if_fail(info != NULL); if (info->username != NULL) g_free(info->username); info->username = (username == NULL ? NULL : g_strdup(username)); } void gaim_proxy_info_set_password(GaimProxyInfo *info, const char *password) { g_return_if_fail(info != NULL); if (info->password != NULL) g_free(info->password); info->password = (password == NULL ? NULL : g_strdup(password)); } GaimProxyType gaim_proxy_info_get_type(const GaimProxyInfo *info) { g_return_val_if_fail(info != NULL, GAIM_PROXY_NONE); return info->type; } const char * gaim_proxy_info_get_host(const GaimProxyInfo *info) { g_return_val_if_fail(info != NULL, NULL); return info->host; } int gaim_proxy_info_get_port(const GaimProxyInfo *info) { g_return_val_if_fail(info != NULL, 0); return info->port; } const char * gaim_proxy_info_get_username(const GaimProxyInfo *info) { g_return_val_if_fail(info != NULL, NULL); return info->username; } const char * gaim_proxy_info_get_password(const GaimProxyInfo *info) { g_return_val_if_fail(info != NULL, NULL); return info->password; } /************************************************************************** * Global Proxy API **************************************************************************/ GaimProxyInfo * gaim_global_proxy_get_info(void) { return global_proxy_info; } /************************************************************************** * Proxy API **************************************************************************/ static void gaim_io_destroy(gpointer data) { g_free(data); } static gboolean gaim_io_invoke(GIOChannel *source, GIOCondition condition, gpointer data) { GaimIOClosure *closure = data; GaimInputCondition gaim_cond = 0; if (condition & GAIM_READ_COND) gaim_cond |= GAIM_INPUT_READ; if (condition & GAIM_WRITE_COND) gaim_cond |= GAIM_INPUT_WRITE; /* gaim_debug(GAIM_DEBUG_MISC, "proxy", "CLOSURE: callback for %d, fd is %d\n", closure->result, g_io_channel_unix_get_fd(source)); */ closure->function(closure->data, g_io_channel_unix_get_fd(source), gaim_cond); return TRUE; } gint gaim_input_add(gint source, GaimInputCondition condition, GaimInputFunction function, gpointer data) { GaimIOClosure *closure = g_new0(GaimIOClosure, 1); GIOChannel *channel; GIOCondition cond = 0; closure->function = function; closure->data = data; if (condition & GAIM_INPUT_READ) cond |= GAIM_READ_COND; if (condition & GAIM_INPUT_WRITE) cond |= GAIM_WRITE_COND; channel = g_io_channel_unix_new(source); closure->result = g_io_add_watch_full(channel, G_PRIORITY_DEFAULT, cond, gaim_io_invoke, closure, gaim_io_destroy); /* gaim_debug(GAIM_DEBUG_MISC, "proxy", "CLOSURE: adding input watcher %d for fd %d\n", closure->result, source); */ g_io_channel_unref(channel); return closure->result; } void gaim_input_remove(gint tag) { /* gaim_debug(GAIM_DEBUG_MISC, "proxy", "CLOSURE: removing input watcher %d\n", tag); */ if (tag > 0) g_source_remove(tag); } typedef void (*dns_callback_t)(GSList *hosts, gpointer data, const char *error_message); #ifdef __unix__ /* This structure represents both a pending DNS request and * a free child process. */ typedef struct { char *host; int port; dns_callback_t callback; gpointer data; gint inpa; int fd_in, fd_out; pid_t dns_pid; } pending_dns_request_t; static GSList *free_dns_children = NULL; static GQueue *queued_requests = NULL; static int number_of_dns_children = 0; const int MAX_DNS_CHILDREN = 2; typedef struct { char hostname[512]; int port; } dns_params_t; typedef struct { dns_params_t params; dns_callback_t callback; gpointer data; } queued_dns_request_t; static void req_free(pending_dns_request_t *req) { g_return_if_fail(req != NULL); if(req->host) g_free(req->host); close(req->fd_in); close(req->fd_out); g_free(req); number_of_dns_children--; } static int send_dns_request_to_child(pending_dns_request_t *req, dns_params_t *dns_params) { char ch; int rc; /* Are you alive? */ if(kill(req->dns_pid, 0) != 0) { gaim_debug(GAIM_DEBUG_WARNING, "dns", "DNS child %d no longer exists\n", req->dns_pid); return -1; } /* Let's contact this lost child! */ rc = write(req->fd_in, dns_params, sizeof(*dns_params)); if(rc<0) { gaim_debug(GAIM_DEBUG_ERROR, "dns", "Unable to write to DNS child %d: %d\n", req->dns_pid, strerror(errno)); close(req->fd_in); return -1; } g_return_val_if_fail(rc == sizeof(*dns_params), -1); /* Did you hear me? (This avoids some race conditions) */ rc = read(req->fd_out, &ch, 1); if(rc != 1 || ch!='Y') { gaim_debug(GAIM_DEBUG_WARNING, "dns", "DNS child %d not responding. Killing it!\n", req->dns_pid); kill(req->dns_pid, SIGKILL); return -1; } gaim_debug(GAIM_DEBUG_INFO, "dns", "Successfully sent DNS request to child %d\n", req->dns_pid); return 0; } static void host_resolved(gpointer data, gint source, GaimInputCondition cond); static void release_dns_child(pending_dns_request_t *req) { g_free(req->host); req->host=NULL; if(queued_requests && !g_queue_is_empty(queued_requests)) { queued_dns_request_t *r = g_queue_pop_head(queued_requests); req->host = g_strdup(r->params.hostname); req->port = r->params.port; req->callback = r->callback; req->data = r->data; gaim_debug(GAIM_DEBUG_INFO, "dns", "Processing queued DNS query for '%s' with child %d\n", req->host, req->dns_pid); if(send_dns_request_to_child(req, &(r->params)) != 0) { req_free(req); req = NULL; gaim_debug(GAIM_DEBUG_WARNING, "dns", "Intent of process queued query of '%s' failed, " "requeueing...\n", r->params.hostname); g_queue_push_head(queued_requests, r); } else { req->inpa = gaim_input_add(req->fd_out, GAIM_INPUT_READ, host_resolved, req); g_free(r); } } else { req->host = NULL; req->callback = NULL; req->data = NULL; free_dns_children = g_slist_append(free_dns_children, req); } } static void host_resolved(gpointer data, gint source, GaimInputCondition cond) { pending_dns_request_t *req = (pending_dns_request_t*)data; int rc, err; GSList *hosts = NULL; struct sockaddr *addr = NULL; socklen_t addrlen; gaim_debug(GAIM_DEBUG_INFO, "dns", "Host '%s' resolved\n", req->host); gaim_input_remove(req->inpa); rc=read(req->fd_out, &err, sizeof(err)); if((rc==4) && (err!=0)) { char message[1024]; g_snprintf(message, sizeof(message), "DNS error: %s (pid=%d)", #if HAVE_GETADDRINFO gai_strerror(err), #else hstrerror(err), #endif req->dns_pid); gaim_debug(GAIM_DEBUG_ERROR, "dns", "%s\n", message); req->callback(NULL, req->data, message); release_dns_child(req); return; } if(rc>0) { while(rc > 0) { rc=read(req->fd_out, &addrlen, sizeof(addrlen)); if(rc>0 && addrlen > 0) { addr=g_malloc(addrlen); rc=read(req->fd_out, addr, addrlen); hosts = g_slist_append(hosts, GINT_TO_POINTER(addrlen)); hosts = g_slist_append(hosts, addr); } else { break; } } } else if(rc==-1) { char message[1024]; g_snprintf(message, sizeof(message), "Error reading from DNS child: %s",strerror(errno)); gaim_debug(GAIM_DEBUG_ERROR, "dns", "%s\n", message); req->callback(NULL, req->data, message); req_free(req); return; } else if(rc==0) { char message[1024]; g_snprintf(message, sizeof(message), "EOF reading from DNS child"); close(req->fd_out); gaim_debug(GAIM_DEBUG_ERROR, "dns", "%s\n", message); req->callback(NULL, req->data, message); req_free(req); return; } /* wait4(req->dns_pid, NULL, WNOHANG, NULL); */ req->callback(hosts, req->data, NULL); while(hosts) { hosts = g_slist_remove(hosts, hosts->data); g_free(hosts->data); hosts = g_slist_remove(hosts, hosts->data); } release_dns_child(req); } static void trap_gdb_bug() { const char *message = "Gaim's DNS child got a SIGTRAP signal. \n" "This can be caused by trying to run gaim inside gdb.\n" "There is a known gdb bug which prevents this. Supposedly gaim\n" "should have detected you were using gdb and used an ugly hack,\n" "check cope_with_gdb_brokenness() in proxy.c.\n\n" "For more info about this bug, see http://sources.redhat.com/ml/gdb/2001-07/msg00349.html\n"; fputs("\n* * *\n",stderr); fputs(message,stderr); fputs("* * *\n\n",stderr); execlp("xmessage","xmessage","-center", message, NULL); _exit(1); } static void cope_with_gdb_brokenness() { static gboolean already_done = FALSE; char s[300], e[300]; int n; pid_t ppid; #ifdef __linux__ if(already_done) return; already_done = TRUE; ppid = getppid(); snprintf(s, 300, "/proc/%d/exe", ppid); n = readlink(s, e, sizeof(e)); e[MAX(n,sizeof(e)-1)] = '\0'; if(strstr(e,"gdb")) { gaim_debug(GAIM_DEBUG_INFO, "dns", "Debugger detected, performing useless query...\n"); gethostbyname("x.x.x.x.x"); } #endif } int gaim_gethostbyname_async(const char *hostname, int port, dns_callback_t callback, gpointer data) { pending_dns_request_t *req = NULL; dns_params_t dns_params; strncpy(dns_params.hostname, hostname, sizeof(dns_params.hostname)-1); dns_params.hostname[sizeof(dns_params.hostname)-1] = '\0'; dns_params.port = port; /* Is there a free available child? */ while(free_dns_children && !req) { GSList *l = free_dns_children; free_dns_children = g_slist_remove_link(free_dns_children, l); req = l->data; g_slist_free(l); if(send_dns_request_to_child(req, &dns_params) != 0) { req_free(req); req = NULL; continue; } } if(!req) { int child_out[2], child_in[2]; if(number_of_dns_children >= MAX_DNS_CHILDREN) { queued_dns_request_t *r = g_new(queued_dns_request_t, 1); memcpy(&(r->params), &dns_params, sizeof(dns_params)); r->callback = callback; r->data = data; if(!queued_requests) queued_requests = g_queue_new(); g_queue_push_tail(queued_requests, r); gaim_debug(GAIM_DEBUG_INFO, "dns", "DNS query for '%s' queued\n", hostname); return 0; } if(pipe(child_out) || pipe(child_in)) { gaim_debug(GAIM_DEBUG_ERROR, "dns", "Could not create pipes: %s\n", strerror(errno)); return -1; } /* We need to create a new child. */ req = g_new(pending_dns_request_t,1); cope_with_gdb_brokenness(); req->dns_pid=fork(); if(req->dns_pid==0) { const int zero = 0; int rc; #if HAVE_GETADDRINFO struct addrinfo hints, *res, *tmp; char servname[20]; #else struct sockaddr_in sin; const socklen_t addrlen = sizeof(sin); #endif #ifdef HAVE_SIGNAL_H signal(SIGHUP, SIG_DFL); signal(SIGINT, SIG_DFL); signal(SIGQUIT, SIG_DFL); signal(SIGCHLD, SIG_DFL); signal(SIGTERM, SIG_DFL); signal(SIGTRAP, trap_gdb_bug); #endif close(child_out[0]); close(child_in[1]); while(1) { if(dns_params.hostname[0] == '\0') { const char Y = 'Y'; fd_set fds; struct timeval tv = { .tv_sec = 40 , .tv_usec = 0 }; FD_ZERO(&fds); FD_SET(child_in[0], &fds); rc = select(child_in[0]+1, &fds, NULL, NULL, &tv); if(!rc) { if (opt_debug) fprintf(stderr,"dns[%d]: nobody needs me... =(\n", getpid()); break; } rc = read(child_in[0], &dns_params, sizeof(dns_params)); if(rc < 0) { perror("read()"); break; } if(rc==0) { if(opt_debug) fprintf(stderr,"dns[%d]: Ops, father has gone, wait for me, wait...!\n", getpid()); _exit(0); } if(dns_params.hostname[0] == '\0') { fprintf(stderr, "dns[%d]: hostname = \"\" (port = %d)!!!\n", getpid(), dns_params.port); _exit(1); } write(child_out[1], &Y, 1); } #if HAVE_GETADDRINFO g_snprintf(servname, sizeof(servname), "%d", dns_params.port); memset(&hints,0,sizeof(hints)); /* This is only used to convert a service * name to a port number. As we know we are * passing a number already, we know this * value will not be really used by the C * library. */ hints.ai_socktype = SOCK_STREAM; rc = getaddrinfo(dns_params.hostname, servname, &hints, &res); if(rc) { write(child_out[1], &rc, sizeof(int)); close(child_out[1]); if(opt_debug) fprintf(stderr,"dns[%d] Error: getaddrinfo returned %d\n", getpid(), rc); dns_params.hostname[0] = '\0'; continue; } write(child_out[1], &zero, sizeof(zero)); tmp = res; while(res) { write(child_out[1], &(res->ai_addrlen), sizeof(res->ai_addrlen)); write(child_out[1], res->ai_addr, res->ai_addrlen); res = res->ai_next; } freeaddrinfo(tmp); write(child_out[1], &zero, sizeof(zero)); #else if (!inet_aton(hostname, &sin.sin_addr)) { struct hostent *hp; if(!(hp = gethostbyname(dns_params.hostname))) { write(child_out[1], &h_errno, sizeof(int)); close(child_out[1]); if(opt_debug) fprintf(stderr,"DNS Error: %s\n",hstrerror(h_errno)); _exit(0); } memset(&sin, 0, sizeof(struct sockaddr_in)); memcpy(&sin.sin_addr.s_addr, hp->h_addr, hp->h_length); sin.sin_family = hp->h_addrtype; } else sin.sin_family = AF_INET; sin.sin_port = htons(dns_params.port); write(child_out[1], &zero, sizeof(zero)); write(child_out[1], &addrlen, sizeof(addrlen)); write(child_out[1], &sin, addrlen); write(child_out[1], &zero, sizeof(zero)); #endif dns_params.hostname[0] = '\0'; } close(child_out[1]); close(child_in[0]); _exit(0); } close(child_out[1]); close(child_in[0]); if(req->dns_pid==-1) { gaim_debug(GAIM_DEBUG_ERROR, "dns", "Could not create child process for DNS: %s\n", strerror(errno)); g_free(req); return -1; } req->fd_in = child_in[1]; req->fd_out = child_out[0]; number_of_dns_children++; gaim_debug(GAIM_DEBUG_INFO, "dns", "Created new DNS child %d, there are now %d children.\n", req->dns_pid, number_of_dns_children); } req->host=g_strdup(hostname); req->port=port; req->callback=callback; req->data=data; req->inpa = gaim_input_add(req->fd_out, GAIM_INPUT_READ, host_resolved, req); return 0; } #else typedef struct { gpointer data; size_t addrlen; struct sockaddr *addr; dns_callback_t callback; } pending_dns_request_t; static gboolean host_resolved(gpointer data) { pending_dns_request_t *req = (pending_dns_request_t*)data; GSList *hosts = NULL; hosts = g_slist_append(hosts, GINT_TO_POINTER(req->addrlen)); hosts = g_slist_append(hosts, req->addr); req->callback(hosts, req->data, NULL); g_slist_free(hosts); g_free(req->addr); g_free(req); return FALSE; } int gaim_gethostbyname_async(const char *hostname, int port, dns_callback_t callback, gpointer data) { struct sockaddr_in sin; pending_dns_request_t *req; if (!inet_aton(hostname, &sin.sin_addr)) { struct hostent *hp; if(!(hp = gethostbyname(hostname))) { gaim_debug(GAIM_DEBUG_ERROR, "dns", "gaim_gethostbyname(\"%s\", %d) failed: %s\n", hostname, port, hstrerror(h_errno)); return -1; } memset(&sin, 0, sizeof(struct sockaddr_in)); memcpy(&sin.sin_addr.s_addr, hp->h_addr, hp->h_length); sin.sin_family = hp->h_addrtype; } else sin.sin_family = AF_INET; sin.sin_port = htons(port); req = g_new(pending_dns_request_t, 1); req->addr = (struct sockaddr*) g_memdup(&sin, sizeof(sin)); req->addrlen = sizeof(sin); req->data = data; req->callback = callback; g_timeout_add(10, host_resolved, req); return 0; } #endif static void no_one_calls(gpointer data, gint source, GaimInputCondition cond) { struct PHB *phb = data; unsigned int len; int error=0; gaim_debug(GAIM_DEBUG_INFO, "proxy", "Connected.\n"); len = sizeof(error); if (getsockopt(source, SOL_SOCKET, SO_ERROR, &error, &len) < 0) { /* if (ret < 0 || error != 0) { */ /* The fourth parameter above isn't really "error", is it? */ /* if(ret==0) errno = error; */ close(source); gaim_input_remove(phb->inpa); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); gaim_debug(GAIM_DEBUG_ERROR, "proxy", "getsockopt SO_ERROR check: %s\n", strerror(errno)); return; } fcntl(source, F_SETFL, 0); gaim_input_remove(phb->inpa); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, source, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); } static gboolean clean_connect(gpointer data) { struct PHB *phb = data; if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, phb->port, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return FALSE; } static int proxy_connect_none(struct PHB *phb, struct sockaddr *addr, socklen_t addrlen) { int fd = -1; gaim_debug(GAIM_DEBUG_INFO, "proxy", "Connecting to %s:%d with no proxy\n", phb->host, phb->port); if ((fd = socket(addr->sa_family, SOCK_STREAM, 0)) < 0) { gaim_debug(GAIM_DEBUG_ERROR, "proxy", "Unable to create socket: %s\n", strerror(errno)); return -1; } fcntl(fd, F_SETFL, O_NONBLOCK); if (connect(fd, (struct sockaddr *)addr, addrlen) < 0) { if ((errno == EINPROGRESS) || (errno == EINTR)) { gaim_debug(GAIM_DEBUG_WARNING, "proxy", "Connect would have blocked.\n"); phb->inpa = gaim_input_add(fd, GAIM_INPUT_WRITE, no_one_calls, phb); } else { gaim_debug(GAIM_DEBUG_ERROR, "proxy", "Connect failed (errno %d)\n", errno); close(fd); return -1; } } else { unsigned int len; int error = ETIMEDOUT; gaim_debug(GAIM_DEBUG_MISC, "proxy", "Connect didn't block.\n"); len = sizeof(error); if (getsockopt(fd, SOL_SOCKET, SO_ERROR, &error, &len) < 0) { gaim_debug(GAIM_DEBUG_ERROR, "proxy", "getsockopt failed.\n"); close(fd); return -1; } fcntl(fd, F_SETFL, 0); phb->port = fd; /* bleh */ g_timeout_add(50, clean_connect, phb); /* we do this because we never want to call our callback before we return. */ } return fd; } #define HTTP_GOODSTRING "HTTP/1.0 200" #define HTTP_GOODSTRING2 "HTTP/1.1 200" #if 0 /* QQQ */ static void http_uri_get_host(const char *uri) { GaimProxyInfo *info; char *c, *d; char buffer[2048]; char host[128]; char user[128]; char pass[128]; int port = 0; int len = 0; host[0] = '\0'; user[0] = '\0'; pass[0] = '\0'; gaim_debug(GAIM_DEBUG_MISC, "gaimrc", "gaimrc_parse_proxy_uri(%s)\n", proxy); if ((c = strchr(proxy, ':')) == NULL) { gaim_debug(GAIM_DEBUG_ERROR, "gaimrc", "No URI detected.\n"); /* No URI detected. */ return FALSE; } len = c - proxy; if (strncmp(proxy, "http://", len + 3)) return FALSE; gaim_debug(GAIM_DEBUG_MISC, "gaimrc", "Found HTTP proxy.\n"); /* Get past "://" */ c += 3; gaim_debug(GAIM_DEBUG_MISC, "gaimrc", "Looking at %s\n", c); for (;;) { *buffer = '\0'; d = buffer; while (*c != '\0' && *c != '@' && *c != ':' && *c != '/') *d++ = *c++; *d = '\0'; if (*c == ':') { /* * If there is a '@' in there somewhere, we are in the auth part. * If not, host. */ if (strchr(c, '@') != NULL) strcpy(user, buffer); else strcpy(host, buffer); } else if (*c == '@') { if (user[0] == '\0') strcpy(user, buffer); else strcpy(pass, buffer); } else if (*c == '/' || *c == '\0') { if (host[0] == '\0') strcpy(host, buffer); else port = atoi(buffer); /* Done. */ break; } c++; } /* NOTE: HTTP_PROXY takes precendence. */ info = gaim_global_proxy_get_info(); if (*host) gaim_proxy_info_set_host(info, host); if (*user) gaim_proxy_info_set_username(info, user); if (*pass) gaim_proxy_info_set_password(info, pass); gaim_proxy_info_set_port(info, port); gaim_debug(GAIM_DEBUG_MISC, "gaimrc", "Host: '%s', User: '%s', Password: '%s', Port: %d\n", gaim_proxy_info_get_host(info), gaim_proxy_info_get_username(info), gaim_proxy_info_get_password(info), gaim_proxy_info_get_port(info)); return TRUE; } #endif static void http_canread(gpointer data, gint source, GaimInputCondition cond) { int nlc = 0; int pos = 0; int minor, major, status, error=0; struct PHB *phb = data; char inputline[8192], *p; gaim_input_remove(phb->inpa); while ((nlc != 2) && (read(source, &inputline[pos++], 1) == 1)) { if (inputline[pos - 1] == '\n') nlc++; else if (inputline[pos - 1] != '\r') nlc = 0; } inputline[pos] = '\0'; error = strncmp(inputline, "HTTP/", 5) != 0; if(!error) { p = inputline + 5; major = strtol(p, &p, 10); error = (major==0) || (*p != '.'); if(!error) { p++; minor = strtol(p, &p, 10); error = (*p!=' '); if(!error) { p++; status = strtol(p, &p, 10); error = (*p!=' '); } } } if(error) { gaim_debug(GAIM_DEBUG_ERROR, "proxy", "Unable to parse proxy's response: %s\n", inputline); close(source); source=-1; } else if(status!=200) { gaim_debug(GAIM_DEBUG_ERROR, "proxy", "Proxy server replied: (%s)\n", p); close(source); source=-1; } if(!phb->account || phb->account->gc) phb->func(phb->data, source, GAIM_INPUT_READ); g_free(phb->host); g_free(phb); return; } static void http_canwrite(gpointer data, gint source, GaimInputCondition cond) { char request[8192]; int request_len = 0; struct PHB *phb = data; unsigned int len; int error = ETIMEDOUT; gaim_debug(GAIM_DEBUG_INFO, "http proxy", "Connected.\n"); if (phb->inpa > 0) gaim_input_remove(phb->inpa); len = sizeof(error); if (getsockopt(source, SOL_SOCKET, SO_ERROR, &error, &len) < 0) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } request_len = g_snprintf(request, sizeof(request), "CONNECT %s:%d HTTP/1.1\r\nHost: %s:%d\r\n", phb->host, phb->port, phb->host, phb->port); if (gaim_proxy_info_get_username(phb->gpi) != NULL) { char *t1, *t2; t1 = g_strdup_printf("%s:%s", gaim_proxy_info_get_username(phb->gpi), gaim_proxy_info_get_password(phb->gpi) ? gaim_proxy_info_get_password(phb->gpi) : ""); t2 = gaim_base64_encode(t1, strlen(t1)); g_free(t1); g_return_if_fail(request_len < sizeof(request)); request_len += g_snprintf(request + request_len, sizeof(request) - request_len, "Proxy-Authorization: Basic %s\r\n", t2); g_free(t2); } g_return_if_fail(request_len < sizeof(request)); strcpy(request + request_len, "\r\n"); request_len += 2; if (write(source, request, request_len) < 0) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } phb->inpa = gaim_input_add(source, GAIM_INPUT_READ, http_canread, phb); } static int proxy_connect_http(struct PHB *phb, struct sockaddr *addr, socklen_t addrlen) { int fd = -1; gaim_debug(GAIM_DEBUG_INFO, "http proxy", "Connecting to %s:%d via %s:%d using HTTP\n", phb->host, phb->port, gaim_proxy_info_get_host(phb->gpi), gaim_proxy_info_get_port(phb->gpi)); if ((fd = socket(addr->sa_family, SOCK_STREAM, 0)) < 0) { return -1; } fcntl(fd, F_SETFL, O_NONBLOCK); if (connect(fd, addr, addrlen) < 0) { if ((errno == EINPROGRESS) || (errno == EINTR)) { gaim_debug(GAIM_DEBUG_WARNING, "http proxy", "Connect would have blocked.\n"); phb->inpa = gaim_input_add(fd, GAIM_INPUT_WRITE, http_canwrite, phb); } else { close(fd); return -1; } } else { unsigned int len; int error = ETIMEDOUT; gaim_debug(GAIM_DEBUG_MISC, "http proxy", "Connect didn't block.\n"); len = sizeof(error); if (getsockopt(fd, SOL_SOCKET, SO_ERROR, &error, &len) < 0) { close(fd); return -1; } fcntl(fd, F_SETFL, 0); http_canwrite(phb, fd, GAIM_INPUT_WRITE); } return fd; } static void s4_canread(gpointer data, gint source, GaimInputCondition cond) { unsigned char packet[12]; struct PHB *phb = data; gaim_input_remove(phb->inpa); memset(packet, 0, sizeof(packet)); if (read(source, packet, 9) >= 4 && packet[1] == 90) { if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, source, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); } static void s4_canwrite(gpointer data, gint source, GaimInputCondition cond) { unsigned char packet[12]; struct hostent *hp; struct PHB *phb = data; unsigned int len; int error = ETIMEDOUT; gaim_debug(GAIM_DEBUG_INFO, "s4 proxy", "Connected.\n"); if (phb->inpa > 0) gaim_input_remove(phb->inpa); len = sizeof(error); if (getsockopt(source, SOL_SOCKET, SO_ERROR, &error, &len) < 0) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } fcntl(source, F_SETFL, 0); /* XXX does socks4 not support host name lookups by the proxy? */ if (!(hp = gethostbyname(phb->host))) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } packet[0] = 4; packet[1] = 1; packet[2] = phb->port >> 8; packet[3] = phb->port & 0xff; packet[4] = (unsigned char)(hp->h_addr_list[0])[0]; packet[5] = (unsigned char)(hp->h_addr_list[0])[1]; packet[6] = (unsigned char)(hp->h_addr_list[0])[2]; packet[7] = (unsigned char)(hp->h_addr_list[0])[3]; packet[8] = 0; if (write(source, packet, 9) != 9) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } phb->inpa = gaim_input_add(source, GAIM_INPUT_READ, s4_canread, phb); } static int proxy_connect_socks4(struct PHB *phb, struct sockaddr *addr, socklen_t addrlen) { int fd = -1; gaim_debug(GAIM_DEBUG_INFO, "socks4 proxy", "Connecting to %s:%d via %s:%d using SOCKS4\n", phb->host, phb->port, gaim_proxy_info_get_host(phb->gpi), gaim_proxy_info_get_port(phb->gpi)); if ((fd = socket(addr->sa_family, SOCK_STREAM, 0)) < 0) return -1; fcntl(fd, F_SETFL, O_NONBLOCK); if (connect(fd, addr, addrlen) < 0) { if ((errno == EINPROGRESS) || (errno == EINTR)) { gaim_debug(GAIM_DEBUG_WARNING, "socks4 proxy", "Connect would have blocked.\n"); phb->inpa = gaim_input_add(fd, GAIM_INPUT_WRITE, s4_canwrite, phb); } else { close(fd); return -1; } } else { unsigned int len; int error = ETIMEDOUT; gaim_debug(GAIM_DEBUG_MISC, "socks4 proxy", "Connect didn't block.\n"); len = sizeof(error); if (getsockopt(fd, SOL_SOCKET, SO_ERROR, &error, &len) < 0) { close(fd); return -1; } fcntl(fd, F_SETFL, 0); s4_canwrite(phb, fd, GAIM_INPUT_WRITE); } return fd; } static void s5_canread_again(gpointer data, gint source, GaimInputCondition cond) { unsigned char buf[512]; struct PHB *phb = data; gaim_input_remove(phb->inpa); gaim_debug(GAIM_DEBUG_INFO, "socks5 proxy", "Able to read again.\n"); if (read(source, buf, 10) < 10) { gaim_debug(GAIM_DEBUG_WARNING, "socks5 proxy", "or not...\n"); close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, source, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } if ((buf[0] != 0x05) || (buf[1] != 0x00)) { gaim_debug(GAIM_DEBUG_ERROR, "socks5 proxy", "Bad data.\n"); close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, source, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); } static void s5_sendconnect(gpointer data, gint source) { unsigned char buf[512]; struct PHB *phb = data; int hlen = strlen(phb->host); buf[0] = 0x05; buf[1] = 0x01; /* CONNECT */ buf[2] = 0x00; /* reserved */ buf[3] = 0x03; /* address type -- host name */ buf[4] = hlen; memcpy(buf + 5, phb->host, hlen); buf[5 + strlen(phb->host)] = phb->port >> 8; buf[5 + strlen(phb->host) + 1] = phb->port & 0xff; if (write(source, buf, (5 + strlen(phb->host) + 2)) < (5 + strlen(phb->host) + 2)) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } phb->inpa = gaim_input_add(source, GAIM_INPUT_READ, s5_canread_again, phb); } static void s5_readauth(gpointer data, gint source, GaimInputCondition cond) { unsigned char buf[512]; struct PHB *phb = data; gaim_input_remove(phb->inpa); gaim_debug(GAIM_DEBUG_INFO, "socks5 proxy", "Got auth response.\n"); if (read(source, buf, 2) < 2) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } if ((buf[0] != 0x01) || (buf[1] != 0x00)) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } s5_sendconnect(phb, source); } static void s5_canread(gpointer data, gint source, GaimInputCondition cond) { unsigned char buf[512]; struct PHB *phb = data; gaim_input_remove(phb->inpa); gaim_debug(GAIM_DEBUG_INFO, "socks5 proxy", "Able to read.\n"); if (read(source, buf, 2) < 2) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, source, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } if ((buf[0] != 0x05) || (buf[1] == 0xff)) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } if (buf[1] == 0x02) { unsigned int i, j; i = strlen(gaim_proxy_info_get_username(phb->gpi)); j = strlen(gaim_proxy_info_get_password(phb->gpi)); buf[0] = 0x01; /* version 1 */ buf[1] = i; memcpy(buf + 2, gaim_proxy_info_get_username(phb->gpi), i); buf[2 + i] = j; memcpy(buf + 2 + i + 1, gaim_proxy_info_get_password(phb->gpi), j); if (write(source, buf, 3 + i + j) < 3 + i + j) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } phb->inpa = gaim_input_add(source, GAIM_INPUT_READ, s5_readauth, phb); } else { s5_sendconnect(phb, source); } } static void s5_canwrite(gpointer data, gint source, GaimInputCondition cond) { unsigned char buf[512]; int i; struct PHB *phb = data; unsigned int len; int error = ETIMEDOUT; gaim_debug(GAIM_DEBUG_INFO, "socks5 proxy", "Connected.\n"); if (phb->inpa > 0) gaim_input_remove(phb->inpa); len = sizeof(error); if (getsockopt(source, SOL_SOCKET, SO_ERROR, &error, &len) < 0) { close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } fcntl(source, F_SETFL, 0); i = 0; buf[0] = 0x05; /* SOCKS version 5 */ if (gaim_proxy_info_get_username(phb->gpi) != NULL) { buf[1] = 0x02; /* two methods */ buf[2] = 0x00; /* no authentication */ buf[3] = 0x02; /* username/password authentication */ i = 4; } else { buf[1] = 0x01; buf[2] = 0x00; i = 3; } if (write(source, buf, i) < i) { gaim_debug(GAIM_DEBUG_ERROR, "socks5 proxy", "Unable to write\n"); close(source); if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); return; } phb->inpa = gaim_input_add(source, GAIM_INPUT_READ, s5_canread, phb); } static int proxy_connect_socks5(struct PHB *phb, struct sockaddr *addr, socklen_t addrlen) { int fd = -1; gaim_debug(GAIM_DEBUG_INFO, "socks5 proxy", "Connecting to %s:%d via %s:%d using SOCKS5\n", phb->host, phb->port, gaim_proxy_info_get_host(phb->gpi), gaim_proxy_info_get_port(phb->gpi)); if ((fd = socket(addr->sa_family, SOCK_STREAM, 0)) < 0) return -1; fcntl(fd, F_SETFL, O_NONBLOCK); if (connect(fd, addr, addrlen) < 0) { if ((errno == EINPROGRESS) || (errno == EINTR)) { gaim_debug(GAIM_DEBUG_WARNING, "socks5 proxy", "Connect would have blocked.\n"); phb->inpa = gaim_input_add(fd, GAIM_INPUT_WRITE, s5_canwrite, phb); } else { close(fd); return -1; } } else { unsigned int len; int error = ETIMEDOUT; gaim_debug(GAIM_DEBUG_MISC, "socks5 proxy", "Connect didn't block.\n"); len = sizeof(error); if (getsockopt(fd, SOL_SOCKET, SO_ERROR, &error, &len) < 0) { close(fd); return -1; } fcntl(fd, F_SETFL, 0); s5_canwrite(phb, fd, GAIM_INPUT_WRITE); } return fd; } static void connection_host_resolved(GSList *hosts, gpointer data, const char *error_message) { struct PHB *phb = (struct PHB*)data; size_t addrlen; struct sockaddr *addr; int ret = -1; while (hosts) { addrlen = GPOINTER_TO_INT(hosts->data); hosts = hosts->next; addr = hosts->data; hosts = hosts->next; switch (gaim_proxy_info_get_type(phb->gpi)) { case GAIM_PROXY_NONE: ret = proxy_connect_none(phb, addr, addrlen); break; case GAIM_PROXY_HTTP: ret = proxy_connect_http(phb, addr, addrlen); break; case GAIM_PROXY_SOCKS4: ret = proxy_connect_socks4(phb, addr, addrlen); break; case GAIM_PROXY_SOCKS5: ret = proxy_connect_socks5(phb, addr, addrlen); break; case GAIM_PROXY_USE_ENVVAR: ret = proxy_connect_http(phb, addr, addrlen); break; default: break; } if (ret > 0) break; } if (ret < 0) { if (phb->account == NULL || gaim_account_get_connection(phb->account) != NULL) { phb->func(phb->data, -1, GAIM_INPUT_READ); } g_free(phb->host); g_free(phb); } } int gaim_proxy_connect(GaimAccount *account, const char *host, int port, GaimInputFunction func, gpointer data) { const char *connecthost = host; int connectport = port; struct PHB *phb; const gchar *tmp; g_return_val_if_fail(host != NULL, -1); g_return_val_if_fail(port != 0 && port != -1, -1); g_return_val_if_fail(func != NULL, -1); phb = g_new0(struct PHB, 1); if (account == NULL || gaim_account_get_proxy_info(account) == NULL) phb->gpi = gaim_global_proxy_get_info(); else phb->gpi = gaim_account_get_proxy_info(account); phb->func = func; phb->data = data; phb->host = g_strdup(host); phb->port = port; phb->account = account; if (gaim_proxy_info_get_type(phb->gpi) == GAIM_PROXY_USE_ENVVAR) { if ((tmp = g_getenv("HTTP_PROXY")) != NULL || (tmp = g_getenv("http_proxy")) != NULL || (tmp= g_getenv("HTTPPROXY")) != NULL) { char *proxyhost,*proxypath; int proxyport; /* http_proxy-format: * export http_proxy="http://your.proxy.server:port/" */ if(gaim_url_parse(tmp, &proxyhost, &proxyport, &proxypath)) { gaim_proxy_info_set_host(phb->gpi, proxyhost); g_free(proxyhost); g_free(proxypath); /* only for backward compatibility */ if (proxyport == 80 && ((tmp = g_getenv("HTTP_PROXY_PORT")) != NULL || (tmp = g_getenv("http_proxy_port")) != NULL || (tmp = g_getenv("HTTPPROXYPORT")) != NULL)) proxyport = atoi(tmp); gaim_proxy_info_set_port(phb->gpi, proxyport); } } if ((tmp = g_getenv("HTTP_PROXY_USER")) != NULL || (tmp = g_getenv("http_proxy_user")) != NULL || (tmp = g_getenv("HTTPPROXYUSER")) != NULL) gaim_proxy_info_set_username(phb->gpi, tmp); if ((tmp = g_getenv("HTTP_PROXY_PASS")) != NULL || (tmp = g_getenv("http_proxy_pass")) != NULL || (tmp = g_getenv("HTTPPROXYPASS")) != NULL) gaim_proxy_info_set_password(phb->gpi, tmp); } if ((gaim_proxy_info_get_type(phb->gpi) != GAIM_PROXY_NONE) && (gaim_proxy_info_get_host(phb->gpi) == NULL || gaim_proxy_info_get_port(phb->gpi) <= 0)) { gaim_notify_error(NULL, NULL, _("Invalid proxy settings"), _("Either the host name or port number specified for your given proxy type is invalid.")); g_free(phb->host); g_free(phb); return -1; } switch (gaim_proxy_info_get_type(phb->gpi)) { case GAIM_PROXY_NONE: break; case GAIM_PROXY_HTTP: case GAIM_PROXY_SOCKS4: case GAIM_PROXY_SOCKS5: case GAIM_PROXY_USE_ENVVAR: connecthost = gaim_proxy_info_get_host(phb->gpi); connectport = gaim_proxy_info_get_port(phb->gpi); break; default: g_free(phb->host); g_free(phb); return -1; } return gaim_gethostbyname_async(connecthost, connectport, connection_host_resolved, phb); } static void proxy_pref_cb(const char *name, GaimPrefType type, gpointer value, gpointer data) { GaimProxyInfo *info = gaim_global_proxy_get_info(); if (!strcmp(name, "/core/proxy/type")) { int proxytype; char *type = value; if (!strcmp(type, "none")) proxytype = GAIM_PROXY_NONE; else if (!strcmp(type, "http")) proxytype = GAIM_PROXY_HTTP; else if (!strcmp(type, "socks4")) proxytype = GAIM_PROXY_SOCKS4; else if (!strcmp(type, "socks5")) proxytype = GAIM_PROXY_SOCKS5; else if (!strcmp(type, "envvar")) proxytype = GAIM_PROXY_USE_ENVVAR; else proxytype = -1; gaim_proxy_info_set_type(info, proxytype); } else if (!strcmp(name, "/core/proxy/host")) gaim_proxy_info_set_host(info, value); else if (!strcmp(name, "/core/proxy/port")) gaim_proxy_info_set_port(info, GPOINTER_TO_INT(value)); else if (!strcmp(name, "/core/proxy/username")) gaim_proxy_info_set_username(info, value); else if (!strcmp(name, "/core/proxy/password")) gaim_proxy_info_set_password(info, value); } void gaim_proxy_init(void) { /* Initialize a default proxy info struct. */ global_proxy_info = gaim_proxy_info_new(); /* Proxy */ gaim_prefs_add_none("/core/proxy"); gaim_prefs_add_string("/core/proxy/type", "none"); gaim_prefs_add_string("/core/proxy/host", ""); gaim_prefs_add_int("/core/proxy/port", 0); gaim_prefs_add_string("/core/proxy/username", ""); gaim_prefs_add_string("/core/proxy/password", ""); /* Setup callbacks for the preferences. */ gaim_prefs_connect_callback("/core/proxy/type", proxy_pref_cb, NULL); gaim_prefs_connect_callback("/core/proxy/host", proxy_pref_cb, NULL); gaim_prefs_connect_callback("/core/proxy/port", proxy_pref_cb, NULL); gaim_prefs_connect_callback("/core/proxy/username", proxy_pref_cb, NULL); gaim_prefs_connect_callback("/core/proxy/password", proxy_pref_cb, NULL); }