14 #define RLOGIN_MAX_BACKLOG 4096
16 typedef struct rlogin_tag {
17 const struct plug_function_table *fn;
18 /* the above field _must_ be first in the structure */
23 int term_width, term_height;
27 static void rlogin_size(void *handle, int width, int height);
29 static void c_write(Rlogin rlogin, char *buf, int len)
31 int backlog = from_backend(rlogin->frontend, 0, buf, len);
32 sk_set_frozen(rlogin->s, backlog > RLOGIN_MAX_BACKLOG);
35 static int rlogin_closing(Plug plug, char *error_msg, int error_code,
38 Rlogin rlogin = (Rlogin) plug;
44 /* A socket error has occurred. */
45 logevent(rlogin->frontend, error_msg);
46 connection_fatal("%s", error_msg);
47 } /* Otherwise, the remote side closed the connection normally. */
51 static int rlogin_receive(Plug plug, int urgent, char *data, int len)
53 Rlogin rlogin = (Rlogin) plug;
60 rlogin_size(rlogin, rlogin->term_width, rlogin->term_height);
62 * We should flush everything (aka Telnet SYNCH) if we see
63 * 0x02, and we should turn off and on _local_ flow control
64 * on 0x10 and 0x20 respectively. I'm not convinced it's
69 * Main rlogin protocol. This is really simple: the first
70 * byte is expected to be NULL and is ignored, and the rest
73 if (rlogin->firstbyte) {
74 if (data[0] == '\0') {
78 rlogin->firstbyte = 0;
81 c_write(rlogin, data, len);
86 static void rlogin_sent(Plug plug, int bufsize)
88 Rlogin rlogin = (Rlogin) plug;
89 rlogin->bufsize = bufsize;
93 * Called to set up the rlogin connection.
95 * Returns an error message, or NULL on success.
97 * Also places the canonical host name into `realhost'. It must be
98 * freed by the caller.
100 static char *rlogin_init(void *frontend_handle, void **backend_handle,
102 char *host, int port, char **realhost, int nodelay)
104 static const struct plug_function_table fn_table = {
113 rlogin = snew(struct rlogin_tag);
114 rlogin->fn = &fn_table;
116 rlogin->frontend = frontend_handle;
117 rlogin->term_width = cfg->width;
118 rlogin->term_height = cfg->height;
119 rlogin->firstbyte = 1;
120 *backend_handle = rlogin;
127 buf = dupprintf("Looking up host \"%s\"", host);
128 logevent(rlogin->frontend, buf);
131 addr = name_lookup(host, port, realhost, cfg);
132 if ((err = sk_addr_error(addr)) != NULL)
136 port = 513; /* default rlogin port */
142 char *buf, addrbuf[100];
143 sk_getaddr(addr, addrbuf, 100);
144 buf = dupprintf("Connecting to %s port %d", addrbuf, port);
145 logevent(rlogin->frontend, buf);
148 rlogin->s = new_connection(addr, *realhost, port, 1, 0,
149 nodelay, (Plug) rlogin, cfg);
150 if ((err = sk_socket_error(rlogin->s)) != NULL)
156 * Send local username, remote username, terminal/speed
162 sk_write(rlogin->s, &z, 1);
163 sk_write(rlogin->s, cfg->localusername,
164 strlen(cfg->localusername));
165 sk_write(rlogin->s, &z, 1);
166 sk_write(rlogin->s, cfg->username,
167 strlen(cfg->username));
168 sk_write(rlogin->s, &z, 1);
169 sk_write(rlogin->s, cfg->termtype,
170 strlen(cfg->termtype));
171 sk_write(rlogin->s, "/", 1);
172 for (p = cfg->termspeed; isdigit((unsigned char)*p); p++) continue;
173 sk_write(rlogin->s, cfg->termspeed, p - cfg->termspeed);
174 rlogin->bufsize = sk_write(rlogin->s, &z, 1);
180 static void rlogin_free(void *handle)
182 Rlogin rlogin = (Rlogin) handle;
190 * Stub routine (we don't have any need to reconfigure this backend).
192 static void rlogin_reconfig(void *handle, Config *cfg)
197 * Called to send data down the rlogin connection.
199 static int rlogin_send(void *handle, char *buf, int len)
201 Rlogin rlogin = (Rlogin) handle;
203 if (rlogin->s == NULL)
206 rlogin->bufsize = sk_write(rlogin->s, buf, len);
208 return rlogin->bufsize;
212 * Called to query the current socket sendability status.
214 static int rlogin_sendbuffer(void *handle)
216 Rlogin rlogin = (Rlogin) handle;
217 return rlogin->bufsize;
221 * Called to set the size of the window
223 static void rlogin_size(void *handle, int width, int height)
225 Rlogin rlogin = (Rlogin) handle;
226 char b[12] = { '\xFF', '\xFF', 0x73, 0x73, 0, 0, 0, 0, 0, 0, 0, 0 };
228 rlogin->term_width = width;
229 rlogin->term_height = height;
231 if (rlogin->s == NULL)
234 b[6] = rlogin->term_width >> 8;
235 b[7] = rlogin->term_width & 0xFF;
236 b[4] = rlogin->term_height >> 8;
237 b[5] = rlogin->term_height & 0xFF;
238 rlogin->bufsize = sk_write(rlogin->s, b, 12);
243 * Send rlogin special codes.
245 static void rlogin_special(void *handle, Telnet_Special code)
251 static Socket rlogin_socket(void *handle)
253 Rlogin rlogin = (Rlogin) handle;
257 static int rlogin_sendok(void *handle)
259 /* Rlogin rlogin = (Rlogin) handle; */
263 static void rlogin_unthrottle(void *handle, int backlog)
265 Rlogin rlogin = (Rlogin) handle;
266 sk_set_frozen(rlogin->s, backlog > RLOGIN_MAX_BACKLOG);
269 static int rlogin_ldisc(void *handle, int option)
271 /* Rlogin rlogin = (Rlogin) handle; */
275 static void rlogin_provide_ldisc(void *handle, void *ldisc)
277 /* This is a stub. */
280 static void rlogin_provide_logctx(void *handle, void *logctx)
282 /* This is a stub. */
285 static int rlogin_exitcode(void *handle)
287 Rlogin rlogin = (Rlogin) handle;
288 if (rlogin->s != NULL)
289 return -1; /* still connected */
291 /* If we ever implement RSH, we'll probably need to do this properly */
295 Backend rlogin_backend = {
307 rlogin_provide_ldisc,
308 rlogin_provide_logctx,