Support username/password authentication in SOCKS 5.
[u/mdw/putty] / proxy.c
diff --git a/proxy.c b/proxy.c
index b773f25..408552a 100644 (file)
--- a/proxy.c
+++ b/proxy.c
@@ -21,21 +21,12 @@ void proxy_activate (Proxy_Socket p)
     void *data;
     int len;
 
-    p->lock_close =
-       p->lock_write =
-       p->lock_write_oob =
-       p->lock_receive =
-       p->lock_flush =
-       p->lock_closing =
-       p->lock_sent =
-       p->lock_accepting =
-       p->lock_freeze = 1;
-
     p->state = PROXY_STATE_ACTIVE;
 
     /* let's try to keep extra receive events from coming through */
     sk_set_frozen(p->sub_socket, 1);
 
+    /* send buffered OOB writes */
     while (bufchain_size(&p->pending_oob_output_data) > 0) {
        bufchain_prefix(&p->pending_oob_output_data, &data, &len);
        sk_write_oob(p->sub_socket, data, len);
@@ -43,6 +34,7 @@ void proxy_activate (Proxy_Socket p)
     }
     bufchain_clear(&p->pending_oob_output_data);
 
+    /* send buffered normal writes */
     while (bufchain_size(&p->pending_output_data) > 0) {
        bufchain_prefix(&p->pending_output_data, &data, &len);
        sk_write(p->sub_socket, data, len);
@@ -50,28 +42,21 @@ void proxy_activate (Proxy_Socket p)
     }
     bufchain_clear(&p->pending_output_data);
 
-    p->lock_write_oob = 0;
-    p->lock_write = 0;
-
+    /* if we were asked to flush the output during
+     * the proxy negotiation process, do so now.
+     */
     if (p->pending_flush) sk_flush(p->sub_socket);
-    p->lock_flush = 0;
 
+    /* forward buffered recv data to the backend */
     while (bufchain_size(&p->pending_input_data) > 0) {
        bufchain_prefix(&p->pending_input_data, &data, &len);
        plug_receive(p->plug, 0, data, len);
        bufchain_consume(&p->pending_input_data, len);
     }
     bufchain_clear(&p->pending_input_data);
-    p->lock_receive = 0;
 
     /* now set the underlying socket to whatever freeze state they wanted */
     sk_set_frozen(p->sub_socket, p->freeze);
-    p->lock_freeze = 0;
-
-    p->lock_sent = 0;
-    p->lock_accepting = 0;
-    p->lock_closing = 0;
-    p->lock_close = 0;
 }
 
 /* basic proxy socket functions */
@@ -89,7 +74,6 @@ static void sk_proxy_close (Socket s)
 {
     Proxy_Socket ps = (Proxy_Socket) s;
 
-    while (ps->lock_close) ;
     sk_close(ps->sub_socket);
     sfree(ps);
 }
@@ -98,7 +82,6 @@ static int sk_proxy_write (Socket s, char *data, int len)
 {
     Proxy_Socket ps = (Proxy_Socket) s;
 
-    while (ps->lock_write) ;
     if (ps->state != PROXY_STATE_ACTIVE) {
        bufchain_add(&ps->pending_output_data, data, len);
        return bufchain_size(&ps->pending_output_data);
@@ -110,7 +93,6 @@ static int sk_proxy_write_oob (Socket s, char *data, int len)
 {
     Proxy_Socket ps = (Proxy_Socket) s;
 
-    while (ps->lock_write_oob) ;
     if (ps->state != PROXY_STATE_ACTIVE) {
        bufchain_clear(&ps->pending_output_data);
        bufchain_clear(&ps->pending_oob_output_data);
@@ -124,7 +106,6 @@ static void sk_proxy_flush (Socket s)
 {
     Proxy_Socket ps = (Proxy_Socket) s;
 
-    while (ps->lock_flush) ;
     if (ps->state != PROXY_STATE_ACTIVE) {
        ps->pending_flush = 1;
        return;
@@ -148,7 +129,6 @@ static void sk_proxy_set_frozen (Socket s, int is_frozen)
 {
     Proxy_Socket ps = (Proxy_Socket) s;
 
-    while (ps->lock_freeze) ;
     if (ps->state != PROXY_STATE_ACTIVE) {
        ps->freeze = is_frozen;
        return;
@@ -173,7 +153,6 @@ static int plug_proxy_closing (Plug p, char *error_msg,
     Proxy_Plug pp = (Proxy_Plug) p;
     Proxy_Socket ps = pp->proxy_socket;
 
-    while (ps->lock_closing) ;
     if (ps->state != PROXY_STATE_ACTIVE) {
        ps->closing_error_msg = error_msg;
        ps->closing_error_code = error_code;
@@ -189,7 +168,6 @@ static int plug_proxy_receive (Plug p, int urgent, char *data, int len)
     Proxy_Plug pp = (Proxy_Plug) p;
     Proxy_Socket ps = pp->proxy_socket;
 
-    while (ps->lock_receive) ;
     if (ps->state != PROXY_STATE_ACTIVE) {
        /* we will lose the urgentness of this data, but since most,
         * if not all, of this data will be consumed by the negotiation
@@ -209,7 +187,6 @@ static void plug_proxy_sent (Plug p, int bufsize)
     Proxy_Plug pp = (Proxy_Plug) p;
     Proxy_Socket ps = pp->proxy_socket;
 
-    while (ps->lock_sent) ;
     if (ps->state != PROXY_STATE_ACTIVE) {
        ps->sent_bufsize = bufsize;
        ps->negotiate(ps, PROXY_CHANGE_SENT);
@@ -223,7 +200,6 @@ static int plug_proxy_accepting (Plug p, void *sock)
     Proxy_Plug pp = (Proxy_Plug) p;
     Proxy_Socket ps = pp->proxy_socket;
 
-    while (ps->lock_accepting) ;
     if (ps->state != PROXY_STATE_ACTIVE) {
        ps->accepting_sock = sock;
        return ps->negotiate(ps, PROXY_CHANGE_ACCEPTING);
@@ -340,22 +316,16 @@ Socket new_connection(SockAddr addr, char *hostname,
        bufchain_init(&ret->pending_output_data);
        bufchain_init(&ret->pending_oob_output_data);
 
-       ret->lock_close =
-           ret->lock_write =
-           ret->lock_write_oob =
-           ret->lock_receive =
-           ret->lock_flush =
-           ret->lock_closing =
-           ret->lock_sent =
-           ret->lock_accepting = 0;
-
        ret->sub_socket = NULL;
        ret->state = PROXY_STATE_NEW;
 
        if (cfg.proxy_type == PROXY_HTTP) {
            ret->negotiate = proxy_http_negotiate;
        } else if (cfg.proxy_type == PROXY_SOCKS) {
-           ret->negotiate = proxy_socks_negotiate;
+           if (cfg.proxy_socks_version == 4)
+               ret->negotiate = proxy_socks4_negotiate;
+           else
+               ret->negotiate = proxy_socks5_negotiate;
        } else if (cfg.proxy_type == PROXY_TELNET) {
            ret->negotiate = proxy_telnet_negotiate;
        } else {
@@ -451,16 +421,31 @@ int proxy_http_negotiate (Proxy_Socket p, int change)
         * for this proxy method, it's just a simple HTTP
         * request
         */
-       char buf[1024], dest[21];
+       char buf[256], dest[64];
 
-       sk_getaddr(p->remote_addr, dest, 20);
+       sk_getaddr(p->remote_addr, dest, 64);
 
-       sprintf(buf, "CONNECT %s:%i HTTP/1.1\r\nHost: %s:%i\r\n\r\n",
+       sprintf(buf, "CONNECT %s:%i HTTP/1.1\r\nHost: %s:%i\r\n",
                dest, p->remote_port, dest, p->remote_port);
        sk_write(p->sub_socket, buf, strlen(buf));
 
-       p->state = 1;
+       if (cfg.proxy_username[0] || cfg.proxy_password[0]) {
+           char buf[sizeof(cfg.proxy_username)+sizeof(cfg.proxy_password)];
+           char buf2[sizeof(buf)*4/3 + 100];
+           int i, j, len;
+           sprintf(buf, "%s:%s", cfg.proxy_username, cfg.proxy_password);
+           len = strlen(buf);
+           sprintf(buf2, "Proxy-Authorization: basic ");
+           for (i = 0, j = strlen(buf2); i < len; i += 3, j += 4)
+               base64_encode_atom(buf+i, (len-i > 3 ? 3 : len-i), buf2+j);
+           strcpy(buf2+j, "\r\n");
+           sk_write(p->sub_socket, buf2, strlen(buf2));
+       }
+
+       sprintf(buf, "\r\n");
+       sk_write(p->sub_socket, buf, strlen(buf));
 
+       p->state = 1;
        return 0;
     }
 
@@ -565,21 +550,443 @@ int proxy_http_negotiate (Proxy_Socket p, int change)
 
     plug_closing(p->plug, "Network error: Unexpected proxy error",
                 PROXY_ERROR_UNEXPECTED, 0);
-    return 0;
+    return 1;
 }
 
 /* ----------------------------------------------------------------------
- * SOCKS proxy type (as yet unimplemented).
+ * SOCKS proxy type.
  */
 
-int proxy_socks_negotiate (Proxy_Socket p, int change)
+/* SOCKS version 4 */
+int proxy_socks4_negotiate (Proxy_Socket p, int change)
 {
-    p->error = "Network error: SOCKS proxy implementation is incomplete";
-    return 0;
+    if (p->state == PROXY_CHANGE_NEW) {
+
+       /* request format:
+        *  version number (1 byte) = 4
+        *  command code (1 byte)
+        *    1 = CONNECT
+        *    2 = BIND
+        *  dest. port (2 bytes) [network order]
+        *  dest. address (4 bytes)
+        *  user ID (variable length, null terminated string)
+        */
+
+       int length;
+       char * command;
+
+       if (sk_addrtype(p->remote_addr) != AF_INET) {
+           plug_closing(p->plug, "Network error: SOCKS version 4 does not support IPv6",
+                        PROXY_ERROR_GENERAL, 0);
+           return 1;
+       }
+
+       length = strlen(cfg.proxy_username) + 9;
+       command = (char*) malloc(length);
+       strcpy(command + 8, cfg.proxy_username);
+
+       command[0] = 4; /* version 4 */
+       command[1] = 1; /* CONNECT command */
+
+       /* port */
+       command[2] = (char) (p->remote_port >> 8) & 0xff;
+       command[3] = (char) p->remote_port & 0xff;
+
+       /* address */
+       sk_addrcopy(p->remote_addr, command + 4);
+
+       sk_write(p->sub_socket, command, length);
+       free(command);
+
+       p->state = 1;
+       return 0;
+    }
+
+    if (change == PROXY_CHANGE_CLOSING) {
+       /* if our proxy negotiation process involves closing and opening
+        * new sockets, then we would want to intercept this closing
+        * callback when we were expecting it. if we aren't anticipating
+        * a socket close, then some error must have occurred. we'll
+        * just pass those errors up to the backend.
+        */
+       return plug_closing(p->plug, p->closing_error_msg,
+                           p->closing_error_code,
+                           p->closing_calling_back);
+    }
+
+    if (change == PROXY_CHANGE_SENT) {
+       /* some (or all) of what we wrote to the proxy was sent.
+        * we don't do anything new, however, until we receive the
+        * proxy's response. we might want to set a timer so we can
+        * timeout the proxy negotiation after a while...
+        */
+       return 0;
+    }
+
+    if (change == PROXY_CHANGE_ACCEPTING) {
+       /* we should _never_ see this, as we are using our socket to
+        * connect to a proxy, not accepting inbound connections.
+        * what should we do? close the socket with an appropriate
+        * error message?
+        */
+       return plug_accepting(p->plug, p->accepting_sock);
+    }
+
+    if (change == PROXY_CHANGE_RECEIVE) {
+       /* we have received data from the underlying socket, which
+        * we'll need to parse, process, and respond to appropriately.
+        */
+
+       if (p->state == 1) {
+           /* response format:
+            *  version number (1 byte) = 4
+            *  reply code (1 byte)
+            *    90 = request granted
+            *    91 = request rejected or failed
+            *    92 = request rejected due to lack of IDENTD on client
+            *    93 = request rejected due to difference in user ID 
+            *         (what we sent vs. what IDENTD said)
+            *  dest. port (2 bytes)
+            *  dest. address (4 bytes)
+            */
+
+           char *data;
+           int len;
+
+           /* get the response */
+           bufchain_prefix(&p->pending_input_data, &data, &len);
+
+           if (data[0] != 0) {
+               plug_closing(p->plug, "Network error: SOCKS proxy responded with "
+                                     "unexpected reply code version",
+                            PROXY_ERROR_GENERAL, 0);
+               return 1;
+           }
+
+           if (data[1] != 90) {
+
+               switch (data[1]) {
+                 case 92:
+                   plug_closing(p->plug, "Network error: SOCKS server wanted IDENTD on client",
+                                PROXY_ERROR_GENERAL, 0);
+                   break;
+                 case 93:
+                   plug_closing(p->plug, "Network error: Username and IDENTD on client don't agree",
+                                PROXY_ERROR_GENERAL, 0);
+                   break;
+                 case 91:
+                 default:
+                   plug_closing(p->plug, "Network error: Error while communicating with proxy",
+                                PROXY_ERROR_GENERAL, 0);
+                   break;
+               }
+
+               return 1;
+           }
+           bufchain_consume(&p->pending_input_data, 2);
+
+           /* we're done */
+           proxy_activate(p);
+           /* proxy activate will have dealt with
+            * whatever is left of the buffer */
+           return 1;
+       }
+    }
+
+    plug_closing(p->plug, "Network error: Unexpected proxy error",
+                PROXY_ERROR_UNEXPECTED, 0);
+    return 1;
+}
+
+/* SOCKS version 5 */
+int proxy_socks5_negotiate (Proxy_Socket p, int change)
+{
+    if (p->state == PROXY_CHANGE_NEW) {
+
+       /* initial command:
+        *  version number (1 byte) = 5
+        *  number of available authentication methods (1 byte)
+        *  available authentication methods (1 byte * previous value)
+        *    authentication methods:
+        *     0x00 = no authentication
+        *     0x01 = GSSAPI
+        *     0x02 = username/password
+        *     0x03 = CHAP
+        */
+
+       char command[4];
+       int len;
+
+       command[0] = 5; /* version 5 */
+       if (cfg.proxy_username[0] || cfg.proxy_password[0]) {
+           command[1] = 2;            /* two methods supported: */
+           command[2] = 0x00;         /* no authentication */
+           command[3] = 0x02;         /* username/password */
+           len = 4;
+       } else {
+           command[1] = 1;            /* one methods supported: */
+           command[2] = 0x00;         /* no authentication */
+           len = 3;
+       }
+
+       sk_write(p->sub_socket, command, len);
+
+       p->state = 1;
+       return 0;
+    }
+
+    if (change == PROXY_CHANGE_CLOSING) {
+       /* if our proxy negotiation process involves closing and opening
+        * new sockets, then we would want to intercept this closing
+        * callback when we were expecting it. if we aren't anticipating
+        * a socket close, then some error must have occurred. we'll
+        * just pass those errors up to the backend.
+        */
+       return plug_closing(p->plug, p->closing_error_msg,
+                           p->closing_error_code,
+                           p->closing_calling_back);
+    }
+
+    if (change == PROXY_CHANGE_SENT) {
+       /* some (or all) of what we wrote to the proxy was sent.
+        * we don't do anything new, however, until we receive the
+        * proxy's response. we might want to set a timer so we can
+        * timeout the proxy negotiation after a while...
+        */
+       return 0;
+    }
+
+    if (change == PROXY_CHANGE_ACCEPTING) {
+       /* we should _never_ see this, as we are using our socket to
+        * connect to a proxy, not accepting inbound connections.
+        * what should we do? close the socket with an appropriate
+        * error message?
+        */
+       return plug_accepting(p->plug, p->accepting_sock);
+    }
+
+    if (change == PROXY_CHANGE_RECEIVE) {
+       /* we have received data from the underlying socket, which
+        * we'll need to parse, process, and respond to appropriately.
+        */
+
+       char *data;
+       int len;
+
+       if (p->state == 1) {
+
+           /* initial response:
+            *  version number (1 byte) = 5
+            *  authentication method (1 byte)
+            *    authentication methods:
+            *     0x00 = no authentication
+            *     0x01 = GSSAPI
+            *     0x02 = username/password 
+            *     0x03 = CHAP
+            *     0xff = no acceptable methods
+            */
+
+           /* get the response */
+           bufchain_prefix(&p->pending_input_data, &data, &len);
+
+           if (data[0] != 5) {
+               plug_closing(p->plug, "Network error: Error while communicating with proxy",
+                            PROXY_ERROR_GENERAL, 0);
+               return 1;
+           }
+
+           if (data[1] == 0x00) p->state = 2; /* no authentication needed */
+           else if (data[1] == 0x01) p->state = 4; /* GSSAPI authentication */
+           else if (data[1] == 0x02) p->state = 5; /* username/password authentication */
+           else if (data[1] == 0x03) p->state = 6; /* CHAP authentication */
+           else {
+               plug_closing(p->plug, "Network error: We don't support any of the SOCKS "
+                                     "server's authentication methods",
+                            PROXY_ERROR_GENERAL, 0);
+               return 1;
+           }
+           bufchain_consume(&p->pending_input_data, 2);
+       }
+
+       if (p->state == 7) {
+
+           /* password authentication reply format:
+            *  version number (1 bytes) = 1
+            *  reply code (1 byte)
+            *    0 = succeeded
+            *    >0 = failed
+            */
+
+           /* get the response */
+           bufchain_prefix(&p->pending_input_data, &data, &len);
+
+           if (data[0] != 1) {
+               plug_closing(p->plug, "Network error: Error while communicating with proxy",
+                            PROXY_ERROR_GENERAL, 0);
+               return 1;
+           }
+
+           if (data[1] != 0) {
+
+               plug_closing(p->plug, "Network error: Proxy refused authentication",
+                            PROXY_ERROR_GENERAL, 0);
+               return 1;
+           }
+
+           bufchain_consume(&p->pending_input_data, 2);
+           p->state = 2;              /* now proceed as authenticated */
+       }
+
+       if (p->state == 2) {
+
+           /* request format:
+            *  version number (1 byte) = 5
+            *  command code (1 byte)
+            *    1 = CONNECT
+            *    2 = BIND
+            *    3 = UDP ASSOCIATE
+            *  reserved (1 byte) = 0x00
+            *  address type (1 byte)
+            *    1 = IPv4
+            *    3 = domainname (first byte has length, no terminating null)
+            *    4 = IPv6
+            *  dest. address (variable)
+            *  dest. port (2 bytes) [network order]
+            */
+
+           char command[22];
+           int len;
+
+           if (sk_addrtype(p->remote_addr) == AF_INET) {
+               len = 10;
+               command[3] = 1; /* IPv4 */
+           } else {
+               len = 22;
+               command[3] = 4; /* IPv6 */
+           }
+
+           command[0] = 5; /* version 5 */
+           command[1] = 1; /* CONNECT command */
+           command[2] = 0x00;
+
+           /* address */
+           sk_addrcopy(p->remote_addr, command+4);
+
+           /* port */
+           command[len-2] = (char) (p->remote_port >> 8) & 0xff;
+           command[len-1] = (char) p->remote_port & 0xff;
+
+           sk_write(p->sub_socket, command, len);
+
+           p->state = 3;
+           return 1;
+       }
+
+       if (p->state == 3) {
+
+           /* reply format:
+            *  version number (1 bytes) = 5
+            *  reply code (1 byte)
+            *    0 = succeeded
+            *    1 = general SOCKS server failure
+            *    2 = connection not allowed by ruleset
+            *    3 = network unreachable
+            *    4 = host unreachable
+            *    5 = connection refused
+            *    6 = TTL expired
+            *    7 = command not supported
+            *    8 = address type not supported
+            * reserved (1 byte) = x00
+            * address type (1 byte)
+            *    1 = IPv4
+            *    3 = domainname (first byte has length, no terminating null)
+            *    4 = IPv6
+            * server bound address (variable)
+            * server bound port (2 bytes) [network order]
+            */
+
+           /* get the response */
+           bufchain_prefix(&p->pending_input_data, &data, &len);
+
+           if (data[0] != 5) {
+               plug_closing(p->plug, "Network error: Error while communicating with proxy",
+                            PROXY_ERROR_GENERAL, 0);
+               return 1;
+           }
+
+           if (data[1] != 0) {
+
+               switch (data[1]) {
+                 case 1:
+                 case 2:
+                 case 3:
+                 case 4:
+                 case 5:
+                 case 6:
+                 case 7:
+                 case 8:
+                 default:
+                   plug_closing(p->plug, "Network error: Error while communicating with proxy",
+                                PROXY_ERROR_GENERAL, 0);
+                   break;
+               }
+
+               return 1;
+           }
+
+           /* we're done */
+           proxy_activate(p);
+           /* proxy activate will have dealt with
+            * whatever is left of the buffer */
+           return 1;
+       }
+
+       if (p->state == 4) {
+           /* TODO: Handle GSSAPI authentication */
+           plug_closing(p->plug, "Network error: We don't support GSSAPI authentication",
+                        PROXY_ERROR_GENERAL, 0);
+           return 1;
+       }
+
+       if (p->state == 5) {
+           if (cfg.proxy_username[0] || cfg.proxy_password[0]) {
+               char userpwbuf[514];
+               int ulen, plen;
+               ulen = strlen(cfg.proxy_username);
+               if (ulen > 255) ulen = 255; if (ulen < 1) ulen = 1;
+               plen = strlen(cfg.proxy_password);
+               if (plen > 255) plen = 255; if (plen < 1) plen = 1;
+               userpwbuf[0] = 1;      /* version number of subnegotiation */
+               userpwbuf[1] = ulen;
+               memcpy(userpwbuf+2, cfg.proxy_username, ulen);
+               userpwbuf[ulen+2] = plen;
+               memcpy(userpwbuf+ulen+3, cfg.proxy_password, plen);
+               sk_write(p->sub_socket, userpwbuf, ulen + plen + 3);
+               p->state = 7;
+           } else 
+               plug_closing(p->plug, "Network error: Server chose "
+                            "username/password authentication but we "
+                            "didn't offer it!",
+                        PROXY_ERROR_GENERAL, 0);
+           return 1;
+       }
+
+       if (p->state == 6) {
+           /* TODO: Handle CHAP authentication */
+           plug_closing(p->plug, "Network error: We don't support CHAP authentication",
+                        PROXY_ERROR_GENERAL, 0);
+           return 1;
+       }
+
+    }
+
+    plug_closing(p->plug, "Network error: Unexpected proxy error",
+                PROXY_ERROR_UNEXPECTED, 0);
+    return 1;
 }
 
 /* ----------------------------------------------------------------------
- * `Telnet' proxy type (as yet unimplemented).
+ * `Telnet' proxy type.
  *
  * (This is for ad-hoc proxies where you connect to the proxy's
  * telnet port and send a command such as `connect host port'. The
@@ -589,6 +996,205 @@ int proxy_socks_negotiate (Proxy_Socket p, int change)
 
 int proxy_telnet_negotiate (Proxy_Socket p, int change)
 {
-    p->error = "Network error: Telnet proxy implementation is incomplete";
-    return 0;
+    if (p->state == PROXY_CHANGE_NEW) {
+
+       int so = 0, eo = 0;
+
+       /* we need to escape \\, \%, \r, \n, \t, \x??, \0???, 
+        * %%, %host, and %port 
+        */
+
+       while (cfg.proxy_telnet_command[eo] != 0) {
+
+           /* scan forward until we hit end-of-line, 
+            * or an escape character (\ or %) */
+           while (cfg.proxy_telnet_command[eo] != 0 &&
+                  cfg.proxy_telnet_command[eo] != '%' &&
+                  cfg.proxy_telnet_command[eo] != '\\') eo++;
+
+           /* if we hit eol, break out of our escaping loop */
+           if (cfg.proxy_telnet_command[eo] == 0) break;
+
+           /* if there was any unescaped text before the escape
+            * character, send that now */
+           if (eo != so) {
+               sk_write(p->sub_socket, 
+                        cfg.proxy_telnet_command + so, eo - so);
+           }
+
+           so = eo++;
+
+           /* if the escape character was the last character of
+            * the line, we'll just stop and send it. */
+           if (cfg.proxy_telnet_command[eo] == 0) break;
+
+           if (cfg.proxy_telnet_command[so] == '\\') {
+
+               /* we recognize \\, \%, \r, \n, \t, \x??. 
+                * anything else, we just send unescaped (including the \). 
+                */
+
+               switch (cfg.proxy_telnet_command[eo]) {
+
+                 case '\\':
+                   sk_write(p->sub_socket, "\\", 1);
+                   eo++;
+                   break;
+
+                 case '%':
+                   sk_write(p->sub_socket, "%%", 1);
+                   eo++;
+                   break;
+
+                 case 'r':
+                   sk_write(p->sub_socket, "\r", 1);
+                   eo++;
+                   break;
+
+                 case 'n':
+                   sk_write(p->sub_socket, "\n", 1);
+                   eo++;
+                   break;
+
+                 case 't':
+                   sk_write(p->sub_socket, "\t", 1);
+                   eo++;
+                   break;
+
+                 case 'x':
+                 case 'X':
+                   {
+                   /* escaped hexadecimal value (ie. \xff) */
+                   unsigned char v = 0;
+                   int i = 0;
+
+                   for (;;) {
+                       eo++;
+                       if (cfg.proxy_telnet_command[eo] >= '0' &&
+                           cfg.proxy_telnet_command[eo] <= '9')
+                           v += cfg.proxy_telnet_command[eo] - '0';
+                       else if (cfg.proxy_telnet_command[eo] >= 'a' &&
+                                cfg.proxy_telnet_command[eo] <= 'f')
+                           v += cfg.proxy_telnet_command[eo] - 'a' + 10;
+                       else if (cfg.proxy_telnet_command[eo] >= 'A' &&
+                                cfg.proxy_telnet_command[eo] <= 'F')
+                           v += cfg.proxy_telnet_command[eo] - 'A' + 10;
+                       else {
+                           /* non hex character, so we abort and just
+                            * send the whole thing unescaped (including \x)
+                            */
+                           sk_write(p->sub_socket, "\\", 1);
+                           eo = so + 1;
+                           break;
+                       }
+
+                       /* we only extract two hex characters */
+                       if (i == 1) {
+                           sk_write(p->sub_socket, &v, 1);
+                           eo++;
+                           break;
+                       }
+
+                       i++;
+                       v <<= 4;
+                   }
+                   }
+                   break;
+
+                 default:
+                   sk_write(p->sub_socket, 
+                            cfg.proxy_telnet_command + so, 2);
+                   eo++;
+                   break;
+               }
+           } else {
+
+               /* % escape. we recognize %%, %host, %port. anything else,
+                * we just send unescaped (including the %). */
+
+               if (cfg.proxy_telnet_command[eo] == '%') {
+                   sk_write(p->sub_socket, "%", 1);
+                   eo++;
+               } 
+               else if (strnicmp(cfg.proxy_telnet_command + eo,
+                                 "host", 4) == 0) {
+                   char dest[64];
+                   sk_getaddr(p->remote_addr, dest, 64);
+                   sk_write(p->sub_socket, dest, strlen(dest));
+                   eo += 4;
+               } 
+               else if (strnicmp(cfg.proxy_telnet_command + eo,
+                                 "port", 4) == 0) {
+                   char port[8];
+                   sprintf(port, "%i", p->remote_port);
+                   sk_write(p->sub_socket, port, strlen(port));
+                   eo += 4;
+               } 
+               else {
+                   /* we don't escape this, so send the % now, and
+                    * don't advance eo, so that we'll consider the
+                    * text immediately following the % as unescaped.
+                    */
+                   sk_write(p->sub_socket, "%", 1);
+               }
+           }
+
+           /* resume scanning for additional escapes after this one. */
+           so = eo;
+       }
+
+       /* if there is any unescaped text at the end of the line, send it */
+       if (eo != so) {
+           sk_write(p->sub_socket, cfg.proxy_telnet_command + so, eo - so);
+       }
+
+       p->state = 1;
+       return 0;
+    }
+
+    if (change == PROXY_CHANGE_CLOSING) {
+       /* if our proxy negotiation process involves closing and opening
+        * new sockets, then we would want to intercept this closing
+        * callback when we were expecting it. if we aren't anticipating
+        * a socket close, then some error must have occurred. we'll
+        * just pass those errors up to the backend.
+        */
+       return plug_closing(p->plug, p->closing_error_msg,
+                           p->closing_error_code,
+                           p->closing_calling_back);
+    }
+
+    if (change == PROXY_CHANGE_SENT) {
+       /* some (or all) of what we wrote to the proxy was sent.
+        * we don't do anything new, however, until we receive the
+        * proxy's response. we might want to set a timer so we can
+        * timeout the proxy negotiation after a while...
+        */
+       return 0;
+    }
+
+    if (change == PROXY_CHANGE_ACCEPTING) {
+       /* we should _never_ see this, as we are using our socket to
+        * connect to a proxy, not accepting inbound connections.
+        * what should we do? close the socket with an appropriate
+        * error message?
+        */
+       return plug_accepting(p->plug, p->accepting_sock);
+    }
+
+    if (change == PROXY_CHANGE_RECEIVE) {
+       /* we have received data from the underlying socket, which
+        * we'll need to parse, process, and respond to appropriately.
+        */
+
+       /* we're done */
+       proxy_activate(p);
+       /* proxy activate will have dealt with
+        * whatever is left of the buffer */
+       return 1;
+    }
+
+    plug_closing(p->plug, "Network error: Unexpected proxy error",
+                PROXY_ERROR_UNEXPECTED, 0);
+    return 1;
 }