| | 1 | #include <windows.h> |
| | 2 | #include <stdio.h> |
| | 3 | #include <stdlib.h> |
| | 4 | #include <ctype.h> |
| | 5 | |
| | 6 | #include "putty.h" |
| | 7 | |
| | 8 | #ifndef FALSE |
| | 9 | #define FALSE 0 |
| | 10 | #endif |
| | 11 | #ifndef TRUE |
| | 12 | #define TRUE 1 |
| | 13 | #endif |
| | 14 | |
| | 15 | static Socket s = NULL; |
| | 16 | |
| | 17 | static void rlogin_size(void); |
| | 18 | |
| | 19 | static void c_write(char *buf, int len) |
| | 20 | { |
| | 21 | from_backend(0, buf, len); |
| | 22 | } |
| | 23 | |
| | 24 | static int rlogin_closing(Plug plug, char *error_msg, int error_code, |
| | 25 | int calling_back) |
| | 26 | { |
| | 27 | if (s) { |
| | 28 | sk_close(s); |
| | 29 | s = NULL; |
| | 30 | } |
| | 31 | if (error_msg) { |
| | 32 | /* A socket error has occurred. */ |
| | 33 | connection_fatal(error_msg); |
| | 34 | } /* Otherwise, the remote side closed the connection normally. */ |
| | 35 | return 0; |
| | 36 | } |
| | 37 | |
| | 38 | static int rlogin_receive(Plug plug, int urgent, char *data, int len) |
| | 39 | { |
| | 40 | if (urgent == 2) { |
| | 41 | char c; |
| | 42 | |
| | 43 | c = *data++; |
| | 44 | len--; |
| | 45 | if (c == '\x80') |
| | 46 | rlogin_size(); |
| | 47 | /* |
| | 48 | * We should flush everything (aka Telnet SYNCH) if we see |
| | 49 | * 0x02, and we should turn off and on _local_ flow control |
| | 50 | * on 0x10 and 0x20 respectively. I'm not convinced it's |
| | 51 | * worth it... |
| | 52 | */ |
| | 53 | } else { |
| | 54 | /* |
| | 55 | * Main rlogin protocol. This is really simple: the first |
| | 56 | * byte is expected to be NULL and is ignored, and the rest |
| | 57 | * is printed. |
| | 58 | */ |
| | 59 | static int firstbyte = 1; |
| | 60 | if (firstbyte) { |
| | 61 | if (data[0] == '\0') { |
| | 62 | data++; |
| | 63 | len--; |
| | 64 | } |
| | 65 | firstbyte = 0; |
| | 66 | } |
| | 67 | c_write(data, len); |
| | 68 | } |
| | 69 | return 1; |
| | 70 | } |
| | 71 | |
| | 72 | /* |
| | 73 | * Called to set up the rlogin connection. |
| | 74 | * |
| | 75 | * Returns an error message, or NULL on success. |
| | 76 | * |
| | 77 | * Also places the canonical host name into `realhost'. It must be |
| | 78 | * freed by the caller. |
| | 79 | */ |
| | 80 | static char *rlogin_init(char *host, int port, char **realhost) |
| | 81 | { |
| | 82 | static struct plug_function_table fn_table = { |
| | 83 | rlogin_closing, |
| | 84 | rlogin_receive |
| | 85 | }, *fn_table_ptr = &fn_table; |
| | 86 | |
| | 87 | SockAddr addr; |
| | 88 | char *err; |
| | 89 | |
| | 90 | /* |
| | 91 | * Try to find host. |
| | 92 | */ |
| | 93 | addr = sk_namelookup(host, realhost); |
| | 94 | if ((err = sk_addr_error(addr))) |
| | 95 | return err; |
| | 96 | |
| | 97 | if (port < 0) |
| | 98 | port = 513; /* default rlogin port */ |
| | 99 | |
| | 100 | /* |
| | 101 | * Open socket. |
| | 102 | */ |
| | 103 | s = sk_new(addr, port, 1, 0, &fn_table_ptr); |
| | 104 | if ((err = sk_socket_error(s))) |
| | 105 | return err; |
| | 106 | |
| | 107 | sk_addr_free(addr); |
| | 108 | |
| | 109 | /* |
| | 110 | * Send local username, remote username, terminal/speed |
| | 111 | */ |
| | 112 | |
| | 113 | { |
| | 114 | char z = 0; |
| | 115 | char *p; |
| | 116 | sk_write(s, &z, 1); |
| | 117 | sk_write(s, cfg.localusername, strlen(cfg.localusername)); |
| | 118 | sk_write(s, &z, 1); |
| | 119 | sk_write(s, cfg.username, strlen(cfg.username)); |
| | 120 | sk_write(s, &z, 1); |
| | 121 | sk_write(s, cfg.termtype, strlen(cfg.termtype)); |
| | 122 | sk_write(s, "/", 1); |
| | 123 | for (p = cfg.termspeed; isdigit(*p); p++); |
| | 124 | sk_write(s, cfg.termspeed, p - cfg.termspeed); |
| | 125 | sk_write(s, &z, 1); |
| | 126 | } |
| | 127 | |
| | 128 | return NULL; |
| | 129 | } |
| | 130 | |
| | 131 | /* |
| | 132 | * Called to send data down the rlogin connection. |
| | 133 | */ |
| | 134 | static void rlogin_send(char *buf, int len) |
| | 135 | { |
| | 136 | |
| | 137 | if (s == NULL) |
| | 138 | return; |
| | 139 | |
| | 140 | sk_write(s, buf, len); |
| | 141 | } |
| | 142 | |
| | 143 | /* |
| | 144 | * Called to set the size of the window |
| | 145 | */ |
| | 146 | static void rlogin_size(void) |
| | 147 | { |
| | 148 | char b[12] = { '\xFF', '\xFF', 0x73, 0x73, 0, 0, 0, 0, 0, 0, 0, 0 }; |
| | 149 | |
| | 150 | b[6] = cols >> 8; |
| | 151 | b[7] = cols & 0xFF; |
| | 152 | b[4] = rows >> 8; |
| | 153 | b[5] = rows & 0xFF; |
| | 154 | sk_write(s, b, 12); |
| | 155 | return; |
| | 156 | } |
| | 157 | |
| | 158 | /* |
| | 159 | * Send rlogin special codes. |
| | 160 | */ |
| | 161 | static void rlogin_special(Telnet_Special code) |
| | 162 | { |
| | 163 | /* Do nothing! */ |
| | 164 | return; |
| | 165 | } |
| | 166 | |
| | 167 | static Socket rlogin_socket(void) |
| | 168 | { |
| | 169 | return s; |
| | 170 | } |
| | 171 | |
| | 172 | static int rlogin_sendok(void) |
| | 173 | { |
| | 174 | return 1; |
| | 175 | } |
| | 176 | |
| | 177 | static int rlogin_ldisc(int option) |
| | 178 | { |
| | 179 | return 0; |
| | 180 | } |
| | 181 | |
| | 182 | Backend rlogin_backend = { |
| | 183 | rlogin_init, |
| | 184 | rlogin_send, |
| | 185 | rlogin_size, |
| | 186 | rlogin_special, |
| | 187 | rlogin_socket, |
| | 188 | rlogin_sendok, |
| | 189 | rlogin_ldisc, |
| | 190 | 1 |
| | 191 | }; |
~mdw / sgt / putty / blame_incremental