OSDN Git Service

Add PuTTY 0.61 to contrib directory.
[ffftp/ffftp.git] / contrib / putty / RAW.C
diff --git a/contrib/putty/RAW.C b/contrib/putty/RAW.C
new file mode 100644 (file)
index 0000000..ea51d74
--- /dev/null
@@ -0,0 +1,300 @@
+/*\r
+ * "Raw" backend.\r
+ */\r
+\r
+#include <stdio.h>\r
+#include <stdlib.h>\r
+\r
+#include "putty.h"\r
+\r
+#ifndef FALSE\r
+#define FALSE 0\r
+#endif\r
+#ifndef TRUE\r
+#define TRUE 1\r
+#endif\r
+\r
+#define RAW_MAX_BACKLOG 4096\r
+\r
+typedef struct raw_backend_data {\r
+    const struct plug_function_table *fn;\r
+    /* the above field _must_ be first in the structure */\r
+\r
+    Socket s;\r
+    int bufsize;\r
+    void *frontend;\r
+} *Raw;\r
+\r
+static void raw_size(void *handle, int width, int height);\r
+\r
+static void c_write(Raw raw, char *buf, int len)\r
+{\r
+    int backlog = from_backend(raw->frontend, 0, buf, len);\r
+    sk_set_frozen(raw->s, backlog > RAW_MAX_BACKLOG);\r
+}\r
+\r
+static void raw_log(Plug plug, int type, SockAddr addr, int port,\r
+                   const char *error_msg, int error_code)\r
+{\r
+    Raw raw = (Raw) plug;\r
+    char addrbuf[256], *msg;\r
+\r
+    sk_getaddr(addr, addrbuf, lenof(addrbuf));\r
+\r
+    if (type == 0)\r
+       msg = dupprintf("Connecting to %s port %d", addrbuf, port);\r
+    else\r
+       msg = dupprintf("Failed to connect to %s: %s", addrbuf, error_msg);\r
+\r
+    logevent(raw->frontend, msg);\r
+}\r
+\r
+static int raw_closing(Plug plug, const char *error_msg, int error_code,\r
+                      int calling_back)\r
+{\r
+    Raw raw = (Raw) plug;\r
+\r
+    if (raw->s) {\r
+        sk_close(raw->s);\r
+        raw->s = NULL;\r
+       notify_remote_exit(raw->frontend);\r
+    }\r
+    if (error_msg) {\r
+       /* A socket error has occurred. */\r
+       logevent(raw->frontend, error_msg);\r
+       connection_fatal(raw->frontend, "%s", error_msg);\r
+    }                                 /* Otherwise, the remote side closed the connection normally. */\r
+    return 0;\r
+}\r
+\r
+static int raw_receive(Plug plug, int urgent, char *data, int len)\r
+{\r
+    Raw raw = (Raw) plug;\r
+    c_write(raw, data, len);\r
+    return 1;\r
+}\r
+\r
+static void raw_sent(Plug plug, int bufsize)\r
+{\r
+    Raw raw = (Raw) plug;\r
+    raw->bufsize = bufsize;\r
+}\r
+\r
+/*\r
+ * Called to set up the raw connection.\r
+ * \r
+ * Returns an error message, or NULL on success.\r
+ *\r
+ * Also places the canonical host name into `realhost'. It must be\r
+ * freed by the caller.\r
+ */\r
+static const char *raw_init(void *frontend_handle, void **backend_handle,\r
+                           Config *cfg,\r
+                           char *host, int port, char **realhost, int nodelay,\r
+                           int keepalive)\r
+{\r
+    static const struct plug_function_table fn_table = {\r
+       raw_log,\r
+       raw_closing,\r
+       raw_receive,\r
+       raw_sent\r
+    };\r
+    SockAddr addr;\r
+    const char *err;\r
+    Raw raw;\r
+\r
+    raw = snew(struct raw_backend_data);\r
+    raw->fn = &fn_table;\r
+    raw->s = NULL;\r
+    *backend_handle = raw;\r
+\r
+    raw->frontend = frontend_handle;\r
+\r
+    /*\r
+     * Try to find host.\r
+     */\r
+    {\r
+       char *buf;\r
+       buf = dupprintf("Looking up host \"%s\"%s", host,\r
+                       (cfg->addressfamily == ADDRTYPE_IPV4 ? " (IPv4)" :\r
+                        (cfg->addressfamily == ADDRTYPE_IPV6 ? " (IPv6)" :\r
+                         "")));\r
+       logevent(raw->frontend, buf);\r
+       sfree(buf);\r
+    }\r
+    addr = name_lookup(host, port, realhost, cfg, cfg->addressfamily);\r
+    if ((err = sk_addr_error(addr)) != NULL) {\r
+       sk_addr_free(addr);\r
+       return err;\r
+    }\r
+\r
+    if (port < 0)\r
+       port = 23;                     /* default telnet port */\r
+\r
+    /*\r
+     * Open socket.\r
+     */\r
+    raw->s = new_connection(addr, *realhost, port, 0, 1, nodelay, keepalive,\r
+                           (Plug) raw, cfg);\r
+    if ((err = sk_socket_error(raw->s)) != NULL)\r
+       return err;\r
+\r
+    if (*cfg->loghost) {\r
+       char *colon;\r
+\r
+       sfree(*realhost);\r
+       *realhost = dupstr(cfg->loghost);\r
+       colon = strrchr(*realhost, ':');\r
+       if (colon) {\r
+           /*\r
+            * FIXME: if we ever update this aspect of ssh.c for\r
+            * IPv6 literal management, this should change in line\r
+            * with it.\r
+            */\r
+           *colon++ = '\0';\r
+       }\r
+    }\r
+\r
+    return NULL;\r
+}\r
+\r
+static void raw_free(void *handle)\r
+{\r
+    Raw raw = (Raw) handle;\r
+\r
+    if (raw->s)\r
+       sk_close(raw->s);\r
+    sfree(raw);\r
+}\r
+\r
+/*\r
+ * Stub routine (we don't have any need to reconfigure this backend).\r
+ */\r
+static void raw_reconfig(void *handle, Config *cfg)\r
+{\r
+}\r
+\r
+/*\r
+ * Called to send data down the raw connection.\r
+ */\r
+static int raw_send(void *handle, char *buf, int len)\r
+{\r
+    Raw raw = (Raw) handle;\r
+\r
+    if (raw->s == NULL)\r
+       return 0;\r
+\r
+    raw->bufsize = sk_write(raw->s, buf, len);\r
+\r
+    return raw->bufsize;\r
+}\r
+\r
+/*\r
+ * Called to query the current socket sendability status.\r
+ */\r
+static int raw_sendbuffer(void *handle)\r
+{\r
+    Raw raw = (Raw) handle;\r
+    return raw->bufsize;\r
+}\r
+\r
+/*\r
+ * Called to set the size of the window\r
+ */\r
+static void raw_size(void *handle, int width, int height)\r
+{\r
+    /* Do nothing! */\r
+    return;\r
+}\r
+\r
+/*\r
+ * Send raw special codes.\r
+ */\r
+static void raw_special(void *handle, Telnet_Special code)\r
+{\r
+    /* Do nothing! */\r
+    return;\r
+}\r
+\r
+/*\r
+ * Return a list of the special codes that make sense in this\r
+ * protocol.\r
+ */\r
+static const struct telnet_special *raw_get_specials(void *handle)\r
+{\r
+    return NULL;\r
+}\r
+\r
+static int raw_connected(void *handle)\r
+{\r
+    Raw raw = (Raw) handle;\r
+    return raw->s != NULL;\r
+}\r
+\r
+static int raw_sendok(void *handle)\r
+{\r
+    return 1;\r
+}\r
+\r
+static void raw_unthrottle(void *handle, int backlog)\r
+{\r
+    Raw raw = (Raw) handle;\r
+    sk_set_frozen(raw->s, backlog > RAW_MAX_BACKLOG);\r
+}\r
+\r
+static int raw_ldisc(void *handle, int option)\r
+{\r
+    if (option == LD_EDIT || option == LD_ECHO)\r
+       return 1;\r
+    return 0;\r
+}\r
+\r
+static void raw_provide_ldisc(void *handle, void *ldisc)\r
+{\r
+    /* This is a stub. */\r
+}\r
+\r
+static void raw_provide_logctx(void *handle, void *logctx)\r
+{\r
+    /* This is a stub. */\r
+}\r
+\r
+static int raw_exitcode(void *handle)\r
+{\r
+    Raw raw = (Raw) handle;\r
+    if (raw->s != NULL)\r
+        return -1;                     /* still connected */\r
+    else\r
+        /* Exit codes are a meaningless concept in the Raw protocol */\r
+        return 0;\r
+}\r
+\r
+/*\r
+ * cfg_info for Raw does nothing at all.\r
+ */\r
+static int raw_cfg_info(void *handle)\r
+{\r
+    return 0;\r
+}\r
+\r
+Backend raw_backend = {\r
+    raw_init,\r
+    raw_free,\r
+    raw_reconfig,\r
+    raw_send,\r
+    raw_sendbuffer,\r
+    raw_size,\r
+    raw_special,\r
+    raw_get_specials,\r
+    raw_connected,\r
+    raw_exitcode,\r
+    raw_sendok,\r
+    raw_ldisc,\r
+    raw_provide_ldisc,\r
+    raw_provide_logctx,\r
+    raw_unthrottle,\r
+    raw_cfg_info,\r
+    "raw",\r
+    PROT_RAW,\r
+    0\r
+};\r