blob: ed76d4aab4a9dd241295463795ce373a7a317833 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001
2/*
3 * DECnet An implementation of the DECnet protocol suite for the LINUX
4 * operating system. DECnet is implemented using the BSD Socket
5 * interface as the means of communication with the user level.
6 *
7 * DECnet Socket Layer Interface
8 *
9 * Authors: Eduardo Marcelo Serrat <emserrat@geocities.com>
10 * Patrick Caulfield <patrick@pandh.demon.co.uk>
11 *
12 * Changes:
13 * Steve Whitehouse: Copied from Eduardo Serrat and Patrick Caulfield's
14 * version of the code. Original copyright preserved
15 * below.
16 * Steve Whitehouse: Some bug fixes, cleaning up some code to make it
17 * compatible with my routing layer.
18 * Steve Whitehouse: Merging changes from Eduardo Serrat and Patrick
19 * Caulfield.
20 * Steve Whitehouse: Further bug fixes, checking module code still works
21 * with new routing layer.
22 * Steve Whitehouse: Additional set/get_sockopt() calls.
23 * Steve Whitehouse: Fixed TIOCINQ ioctl to be same as Eduardo's new
24 * code.
25 * Steve Whitehouse: recvmsg() changed to try and behave in a POSIX like
26 * way. Didn't manage it entirely, but its better.
27 * Steve Whitehouse: ditto for sendmsg().
28 * Steve Whitehouse: A selection of bug fixes to various things.
29 * Steve Whitehouse: Added TIOCOUTQ ioctl.
30 * Steve Whitehouse: Fixes to username2sockaddr & sockaddr2username.
31 * Steve Whitehouse: Fixes to connect() error returns.
32 * Patrick Caulfield: Fixes to delayed acceptance logic.
33 * David S. Miller: New socket locking
34 * Steve Whitehouse: Socket list hashing/locking
35 * Arnaldo C. Melo: use capable, not suser
36 * Steve Whitehouse: Removed unused code. Fix to use sk->allocation
37 * when required.
38 * Patrick Caulfield: /proc/net/decnet now has object name/number
39 * Steve Whitehouse: Fixed local port allocation, hashed sk list
40 * Matthew Wilcox: Fixes for dn_ioctl()
41 * Steve Whitehouse: New connect/accept logic to allow timeouts and
42 * prepare for sendpage etc.
43 */
44
45
46/******************************************************************************
47 (c) 1995-1998 E.M. Serrat emserrat@geocities.com
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +090048
Linus Torvalds1da177e2005-04-16 15:20:36 -070049 This program is free software; you can redistribute it and/or modify
50 it under the terms of the GNU General Public License as published by
51 the Free Software Foundation; either version 2 of the License, or
52 any later version.
53
54 This program is distributed in the hope that it will be useful,
55 but WITHOUT ANY WARRANTY; without even the implied warranty of
56 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
57 GNU General Public License for more details.
58
59HISTORY:
60
61Version Kernel Date Author/Comments
62------- ------ ---- ---------------
63Version 0.0.1 2.0.30 01-dic-97 Eduardo Marcelo Serrat
64 (emserrat@geocities.com)
65
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +090066 First Development of DECnet Socket La-
Linus Torvalds1da177e2005-04-16 15:20:36 -070067 yer for Linux. Only supports outgoing
68 connections.
69
70Version 0.0.2 2.1.105 20-jun-98 Patrick J. Caulfield
71 (patrick@pandh.demon.co.uk)
72
73 Port to new kernel development version.
74
75Version 0.0.3 2.1.106 25-jun-98 Eduardo Marcelo Serrat
76 (emserrat@geocities.com)
77 _
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +090078 Added support for incoming connections
79 so we can start developing server apps
80 on Linux.
Linus Torvalds1da177e2005-04-16 15:20:36 -070081 -
82 Module Support
83Version 0.0.4 2.1.109 21-jul-98 Eduardo Marcelo Serrat
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +090084 (emserrat@geocities.com)
85 _
86 Added support for X11R6.4. Now we can
87 use DECnet transport for X on Linux!!!
88 -
Linus Torvalds1da177e2005-04-16 15:20:36 -070089Version 0.0.5 2.1.110 01-aug-98 Eduardo Marcelo Serrat
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +090090 (emserrat@geocities.com)
91 Removed bugs on flow control
92 Removed bugs on incoming accessdata
93 order
94 -
Linus Torvalds1da177e2005-04-16 15:20:36 -070095Version 0.0.6 2.1.110 07-aug-98 Eduardo Marcelo Serrat
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +090096 dn_recvmsg fixes
Linus Torvalds1da177e2005-04-16 15:20:36 -070097
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +090098 Patrick J. Caulfield
99 dn_bind fixes
Linus Torvalds1da177e2005-04-16 15:20:36 -0700100*******************************************************************************/
101
Linus Torvalds1da177e2005-04-16 15:20:36 -0700102#include <linux/module.h>
103#include <linux/errno.h>
104#include <linux/types.h>
105#include <linux/slab.h>
106#include <linux/socket.h>
107#include <linux/in.h>
108#include <linux/kernel.h>
109#include <linux/sched.h>
110#include <linux/timer.h>
111#include <linux/string.h>
112#include <linux/sockios.h>
113#include <linux/net.h>
114#include <linux/netdevice.h>
115#include <linux/inet.h>
116#include <linux/route.h>
117#include <linux/netfilter.h>
118#include <linux/seq_file.h>
119#include <net/sock.h>
Arnaldo Carvalho de Meloc752f072005-08-09 20:08:28 -0700120#include <net/tcp_states.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -0700121#include <net/flow.h>
122#include <asm/system.h>
123#include <asm/ioctls.h>
Randy Dunlap4fc268d2006-01-11 12:17:47 -0800124#include <linux/capability.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -0700125#include <linux/mm.h>
126#include <linux/interrupt.h>
127#include <linux/proc_fs.h>
128#include <linux/stat.h>
129#include <linux/init.h>
130#include <linux/poll.h>
131#include <net/neighbour.h>
132#include <net/dst.h>
Steven Whitehousea8731cb2006-08-09 15:56:46 -0700133#include <net/fib_rules.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -0700134#include <net/dn.h>
135#include <net/dn_nsp.h>
136#include <net/dn_dev.h>
137#include <net/dn_route.h>
138#include <net/dn_fib.h>
139#include <net/dn_neigh.h>
140
141struct dn_sock {
142 struct sock sk;
143 struct dn_scp scp;
144};
145
146static void dn_keepalive(struct sock *sk);
147
148#define DN_SK_HASH_SHIFT 8
149#define DN_SK_HASH_SIZE (1 << DN_SK_HASH_SHIFT)
150#define DN_SK_HASH_MASK (DN_SK_HASH_SIZE - 1)
151
152
Eric Dumazet90ddc4f2005-12-22 12:49:22 -0800153static const struct proto_ops dn_proto_ops;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700154static DEFINE_RWLOCK(dn_hash_lock);
155static struct hlist_head dn_sk_hash[DN_SK_HASH_SIZE];
156static struct hlist_head dn_wild_sk;
Steven Whitehouse1f12bcc2005-12-05 13:42:06 -0800157static atomic_t decnet_memory_allocated;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700158
159static int __dn_setsockopt(struct socket *sock, int level, int optname, char __user *optval, int optlen, int flags);
160static int __dn_getsockopt(struct socket *sock, int level, int optname, char __user *optval, int __user *optlen, int flags);
161
162static struct hlist_head *dn_find_list(struct sock *sk)
163{
164 struct dn_scp *scp = DN_SK(sk);
165
166 if (scp->addr.sdn_flags & SDF_WILD)
167 return hlist_empty(&dn_wild_sk) ? &dn_wild_sk : NULL;
168
Steven Whitehouse375d9d72006-11-07 15:09:17 -0800169 return &dn_sk_hash[dn_ntohs(scp->addrloc) & DN_SK_HASH_MASK];
Linus Torvalds1da177e2005-04-16 15:20:36 -0700170}
171
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +0900172/*
Linus Torvalds1da177e2005-04-16 15:20:36 -0700173 * Valid ports are those greater than zero and not already in use.
174 */
Steven Whitehousec4ea94a2006-03-20 22:42:39 -0800175static int check_port(__le16 port)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700176{
177 struct sock *sk;
178 struct hlist_node *node;
179
180 if (port == 0)
181 return -1;
182
Steven Whitehouse375d9d72006-11-07 15:09:17 -0800183 sk_for_each(sk, node, &dn_sk_hash[dn_ntohs(port) & DN_SK_HASH_MASK]) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700184 struct dn_scp *scp = DN_SK(sk);
185 if (scp->addrloc == port)
186 return -1;
187 }
188 return 0;
189}
190
191static unsigned short port_alloc(struct sock *sk)
192{
193 struct dn_scp *scp = DN_SK(sk);
194static unsigned short port = 0x2000;
195 unsigned short i_port = port;
196
Steven Whitehouse375d9d72006-11-07 15:09:17 -0800197 while(check_port(dn_htons(++port)) != 0) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700198 if (port == i_port)
199 return 0;
200 }
201
Steven Whitehouse375d9d72006-11-07 15:09:17 -0800202 scp->addrloc = dn_htons(port);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700203
204 return 1;
205}
206
207/*
208 * Since this is only ever called from user
209 * level, we don't need a write_lock() version
210 * of this.
211 */
212static int dn_hash_sock(struct sock *sk)
213{
214 struct dn_scp *scp = DN_SK(sk);
215 struct hlist_head *list;
216 int rv = -EUSERS;
217
218 BUG_ON(sk_hashed(sk));
219
220 write_lock_bh(&dn_hash_lock);
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +0900221
Linus Torvalds1da177e2005-04-16 15:20:36 -0700222 if (!scp->addrloc && !port_alloc(sk))
223 goto out;
224
225 rv = -EADDRINUSE;
226 if ((list = dn_find_list(sk)) == NULL)
227 goto out;
228
229 sk_add_node(sk, list);
230 rv = 0;
231out:
232 write_unlock_bh(&dn_hash_lock);
233 return rv;
234}
235
236static void dn_unhash_sock(struct sock *sk)
237{
238 write_lock(&dn_hash_lock);
239 sk_del_node_init(sk);
240 write_unlock(&dn_hash_lock);
241}
242
243static void dn_unhash_sock_bh(struct sock *sk)
244{
245 write_lock_bh(&dn_hash_lock);
246 sk_del_node_init(sk);
247 write_unlock_bh(&dn_hash_lock);
248}
249
250static struct hlist_head *listen_hash(struct sockaddr_dn *addr)
251{
252 int i;
253 unsigned hash = addr->sdn_objnum;
254
255 if (hash == 0) {
256 hash = addr->sdn_objnamel;
257 for(i = 0; i < dn_ntohs(addr->sdn_objnamel); i++) {
258 hash ^= addr->sdn_objname[i];
259 hash ^= (hash << 3);
260 }
261 }
262
263 return &dn_sk_hash[hash & DN_SK_HASH_MASK];
264}
265
266/*
267 * Called to transform a socket from bound (i.e. with a local address)
268 * into a listening socket (doesn't need a local port number) and rehashes
269 * based upon the object name/number.
270 */
271static void dn_rehash_sock(struct sock *sk)
272{
273 struct hlist_head *list;
274 struct dn_scp *scp = DN_SK(sk);
275
276 if (scp->addr.sdn_flags & SDF_WILD)
277 return;
278
279 write_lock_bh(&dn_hash_lock);
280 sk_del_node_init(sk);
281 DN_SK(sk)->addrloc = 0;
282 list = listen_hash(&DN_SK(sk)->addr);
283 sk_add_node(sk, list);
284 write_unlock_bh(&dn_hash_lock);
285}
286
287int dn_sockaddr2username(struct sockaddr_dn *sdn, unsigned char *buf, unsigned char type)
288{
289 int len = 2;
290
291 *buf++ = type;
292
293 switch(type) {
294 case 0:
295 *buf++ = sdn->sdn_objnum;
296 break;
297 case 1:
298 *buf++ = 0;
299 *buf++ = dn_ntohs(sdn->sdn_objnamel);
300 memcpy(buf, sdn->sdn_objname, dn_ntohs(sdn->sdn_objnamel));
301 len = 3 + dn_ntohs(sdn->sdn_objnamel);
302 break;
303 case 2:
304 memset(buf, 0, 5);
305 buf += 5;
306 *buf++ = dn_ntohs(sdn->sdn_objnamel);
307 memcpy(buf, sdn->sdn_objname, dn_ntohs(sdn->sdn_objnamel));
308 len = 7 + dn_ntohs(sdn->sdn_objnamel);
309 break;
310 }
311
312 return len;
313}
314
315/*
316 * On reception of usernames, we handle types 1 and 0 for destination
317 * addresses only. Types 2 and 4 are used for source addresses, but the
318 * UIC, GIC are ignored and they are both treated the same way. Type 3
319 * is never used as I've no idea what its purpose might be or what its
320 * format is.
321 */
322int dn_username2sockaddr(unsigned char *data, int len, struct sockaddr_dn *sdn, unsigned char *fmt)
323{
324 unsigned char type;
325 int size = len;
326 int namel = 12;
327
328 sdn->sdn_objnum = 0;
329 sdn->sdn_objnamel = dn_htons(0);
330 memset(sdn->sdn_objname, 0, DN_MAXOBJL);
331
332 if (len < 2)
333 return -1;
334
335 len -= 2;
336 *fmt = *data++;
337 type = *data++;
338
339 switch(*fmt) {
340 case 0:
341 sdn->sdn_objnum = type;
342 return 2;
343 case 1:
344 namel = 16;
345 break;
346 case 2:
347 len -= 4;
348 data += 4;
349 break;
350 case 4:
351 len -= 8;
352 data += 8;
353 break;
354 default:
355 return -1;
356 }
357
358 len -= 1;
359
360 if (len < 0)
361 return -1;
362
363 sdn->sdn_objnamel = dn_htons(*data++);
364 len -= dn_ntohs(sdn->sdn_objnamel);
365
366 if ((len < 0) || (dn_ntohs(sdn->sdn_objnamel) > namel))
367 return -1;
368
369 memcpy(sdn->sdn_objname, data, dn_ntohs(sdn->sdn_objnamel));
370
371 return size - len;
372}
373
374struct sock *dn_sklist_find_listener(struct sockaddr_dn *addr)
375{
376 struct hlist_head *list = listen_hash(addr);
377 struct hlist_node *node;
378 struct sock *sk;
379
380 read_lock(&dn_hash_lock);
381 sk_for_each(sk, node, list) {
382 struct dn_scp *scp = DN_SK(sk);
383 if (sk->sk_state != TCP_LISTEN)
384 continue;
385 if (scp->addr.sdn_objnum) {
386 if (scp->addr.sdn_objnum != addr->sdn_objnum)
387 continue;
388 } else {
389 if (addr->sdn_objnum)
390 continue;
391 if (scp->addr.sdn_objnamel != addr->sdn_objnamel)
392 continue;
393 if (memcmp(scp->addr.sdn_objname, addr->sdn_objname, dn_ntohs(addr->sdn_objnamel)) != 0)
394 continue;
395 }
396 sock_hold(sk);
397 read_unlock(&dn_hash_lock);
398 return sk;
399 }
400
401 sk = sk_head(&dn_wild_sk);
402 if (sk) {
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +0900403 if (sk->sk_state == TCP_LISTEN)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700404 sock_hold(sk);
405 else
406 sk = NULL;
407 }
408
409 read_unlock(&dn_hash_lock);
410 return sk;
411}
412
413struct sock *dn_find_by_skb(struct sk_buff *skb)
414{
415 struct dn_skb_cb *cb = DN_SKB_CB(skb);
416 struct sock *sk;
417 struct hlist_node *node;
418 struct dn_scp *scp;
419
420 read_lock(&dn_hash_lock);
Steven Whitehouse375d9d72006-11-07 15:09:17 -0800421 sk_for_each(sk, node, &dn_sk_hash[dn_ntohs(cb->dst_port) & DN_SK_HASH_MASK]) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700422 scp = DN_SK(sk);
423 if (cb->src != dn_saddr2dn(&scp->peer))
424 continue;
425 if (cb->dst_port != scp->addrloc)
426 continue;
427 if (scp->addrrem && (cb->src_port != scp->addrrem))
428 continue;
429 sock_hold(sk);
430 goto found;
431 }
432 sk = NULL;
433found:
434 read_unlock(&dn_hash_lock);
435 return sk;
436}
437
438
439
440static void dn_destruct(struct sock *sk)
441{
442 struct dn_scp *scp = DN_SK(sk);
443
444 skb_queue_purge(&scp->data_xmit_queue);
445 skb_queue_purge(&scp->other_xmit_queue);
446 skb_queue_purge(&scp->other_receive_queue);
447
448 dst_release(xchg(&sk->sk_dst_cache, NULL));
449}
450
Steven Whitehouse1f12bcc2005-12-05 13:42:06 -0800451static int dn_memory_pressure;
452
453static void dn_enter_memory_pressure(void)
454{
455 if (!dn_memory_pressure) {
456 dn_memory_pressure = 1;
457 }
458}
459
Linus Torvalds1da177e2005-04-16 15:20:36 -0700460static struct proto dn_proto = {
Steven Whitehouse1f12bcc2005-12-05 13:42:06 -0800461 .name = "NSP",
462 .owner = THIS_MODULE,
463 .enter_memory_pressure = dn_enter_memory_pressure,
464 .memory_pressure = &dn_memory_pressure,
465 .memory_allocated = &decnet_memory_allocated,
466 .sysctl_mem = sysctl_decnet_mem,
467 .sysctl_wmem = sysctl_decnet_wmem,
468 .sysctl_rmem = sysctl_decnet_rmem,
469 .max_header = DN_MAX_NSP_DATA_HEADER + 64,
470 .obj_size = sizeof(struct dn_sock),
Linus Torvalds1da177e2005-04-16 15:20:36 -0700471};
472
Al Virodd0fc662005-10-07 07:46:04 +0100473static struct sock *dn_alloc_sock(struct socket *sock, gfp_t gfp)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700474{
475 struct dn_scp *scp;
476 struct sock *sk = sk_alloc(PF_DECnet, gfp, &dn_proto, 1);
477
478 if (!sk)
479 goto out;
480
481 if (sock)
482 sock->ops = &dn_proto_ops;
483 sock_init_data(sock, sk);
484
485 sk->sk_backlog_rcv = dn_nsp_backlog_rcv;
486 sk->sk_destruct = dn_destruct;
487 sk->sk_no_check = 1;
488 sk->sk_family = PF_DECnet;
489 sk->sk_protocol = 0;
490 sk->sk_allocation = gfp;
Steven Whitehouse1f12bcc2005-12-05 13:42:06 -0800491 sk->sk_sndbuf = sysctl_decnet_wmem[1];
492 sk->sk_rcvbuf = sysctl_decnet_rmem[1];
Linus Torvalds1da177e2005-04-16 15:20:36 -0700493
494 /* Initialization of DECnet Session Control Port */
495 scp = DN_SK(sk);
496 scp->state = DN_O; /* Open */
497 scp->numdat = 1; /* Next data seg to tx */
498 scp->numoth = 1; /* Next oth data to tx */
499 scp->ackxmt_dat = 0; /* Last data seg ack'ed */
500 scp->ackxmt_oth = 0; /* Last oth data ack'ed */
501 scp->ackrcv_dat = 0; /* Highest data ack recv*/
502 scp->ackrcv_oth = 0; /* Last oth data ack rec*/
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +0900503 scp->flowrem_sw = DN_SEND;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700504 scp->flowloc_sw = DN_SEND;
505 scp->flowrem_dat = 0;
506 scp->flowrem_oth = 1;
507 scp->flowloc_dat = 0;
508 scp->flowloc_oth = 1;
509 scp->services_rem = 0;
510 scp->services_loc = 1 | NSP_FC_NONE;
511 scp->info_rem = 0;
512 scp->info_loc = 0x03; /* NSP version 4.1 */
513 scp->segsize_rem = 230 - DN_MAX_NSP_DATA_HEADER; /* Default: Updated by remote segsize */
514 scp->nonagle = 0;
515 scp->multi_ireq = 1;
516 scp->accept_mode = ACC_IMMED;
517 scp->addr.sdn_family = AF_DECnet;
518 scp->peer.sdn_family = AF_DECnet;
519 scp->accessdata.acc_accl = 5;
520 memcpy(scp->accessdata.acc_acc, "LINUX", 5);
521
522 scp->max_window = NSP_MAX_WINDOW;
523 scp->snd_window = NSP_MIN_WINDOW;
524 scp->nsp_srtt = NSP_INITIAL_SRTT;
525 scp->nsp_rttvar = NSP_INITIAL_RTTVAR;
526 scp->nsp_rxtshift = 0;
527
528 skb_queue_head_init(&scp->data_xmit_queue);
529 skb_queue_head_init(&scp->other_xmit_queue);
530 skb_queue_head_init(&scp->other_receive_queue);
531
532 scp->persist = 0;
533 scp->persist_fxn = NULL;
534 scp->keepalive = 10 * HZ;
535 scp->keepalive_fxn = dn_keepalive;
536
537 init_timer(&scp->delack_timer);
538 scp->delack_pending = 0;
539 scp->delack_fxn = dn_nsp_delayed_ack;
540
541 dn_start_slow_timer(sk);
542out:
543 return sk;
544}
545
546/*
547 * Keepalive timer.
548 * FIXME: Should respond to SO_KEEPALIVE etc.
549 */
550static void dn_keepalive(struct sock *sk)
551{
552 struct dn_scp *scp = DN_SK(sk);
553
554 /*
555 * By checking the other_data transmit queue is empty
556 * we are double checking that we are not sending too
557 * many of these keepalive frames.
558 */
David S. Millerb03efcf2005-07-08 14:57:23 -0700559 if (skb_queue_empty(&scp->other_xmit_queue))
Linus Torvalds1da177e2005-04-16 15:20:36 -0700560 dn_nsp_send_link(sk, DN_NOCHANGE, 0);
561}
562
563
564/*
565 * Timer for shutdown/destroyed sockets.
566 * When socket is dead & no packets have been sent for a
567 * certain amount of time, they are removed by this
568 * routine. Also takes care of sending out DI & DC
569 * frames at correct times.
570 */
571int dn_destroy_timer(struct sock *sk)
572{
573 struct dn_scp *scp = DN_SK(sk);
574
575 scp->persist = dn_nsp_persist(sk);
576
577 switch(scp->state) {
578 case DN_DI:
579 dn_nsp_send_disc(sk, NSP_DISCINIT, 0, GFP_ATOMIC);
580 if (scp->nsp_rxtshift >= decnet_di_count)
581 scp->state = DN_CN;
582 return 0;
583
584 case DN_DR:
585 dn_nsp_send_disc(sk, NSP_DISCINIT, 0, GFP_ATOMIC);
586 if (scp->nsp_rxtshift >= decnet_dr_count)
587 scp->state = DN_DRC;
588 return 0;
589
590 case DN_DN:
591 if (scp->nsp_rxtshift < decnet_dn_count) {
592 /* printk(KERN_DEBUG "dn_destroy_timer: DN\n"); */
593 dn_nsp_send_disc(sk, NSP_DISCCONF, NSP_REASON_DC, GFP_ATOMIC);
594 return 0;
595 }
596 }
597
598 scp->persist = (HZ * decnet_time_wait);
599
600 if (sk->sk_socket)
601 return 0;
602
603 if ((jiffies - scp->stamp) >= (HZ * decnet_time_wait)) {
604 dn_unhash_sock(sk);
605 sock_put(sk);
606 return 1;
607 }
608
609 return 0;
610}
611
612static void dn_destroy_sock(struct sock *sk)
613{
614 struct dn_scp *scp = DN_SK(sk);
615
616 scp->nsp_rxtshift = 0; /* reset back off */
617
618 if (sk->sk_socket) {
619 if (sk->sk_socket->state != SS_UNCONNECTED)
620 sk->sk_socket->state = SS_DISCONNECTING;
621 }
622
623 sk->sk_state = TCP_CLOSE;
624
625 switch(scp->state) {
626 case DN_DN:
627 dn_nsp_send_disc(sk, NSP_DISCCONF, NSP_REASON_DC,
628 sk->sk_allocation);
629 scp->persist_fxn = dn_destroy_timer;
630 scp->persist = dn_nsp_persist(sk);
631 break;
632 case DN_CR:
633 scp->state = DN_DR;
634 goto disc_reject;
635 case DN_RUN:
636 scp->state = DN_DI;
637 case DN_DI:
638 case DN_DR:
639disc_reject:
640 dn_nsp_send_disc(sk, NSP_DISCINIT, 0, sk->sk_allocation);
641 case DN_NC:
642 case DN_NR:
643 case DN_RJ:
644 case DN_DIC:
645 case DN_CN:
646 case DN_DRC:
647 case DN_CI:
648 case DN_CD:
649 scp->persist_fxn = dn_destroy_timer;
650 scp->persist = dn_nsp_persist(sk);
651 break;
652 default:
653 printk(KERN_DEBUG "DECnet: dn_destroy_sock passed socket in invalid state\n");
654 case DN_O:
655 dn_stop_slow_timer(sk);
656
657 dn_unhash_sock_bh(sk);
658 sock_put(sk);
659
660 break;
661 }
662}
663
Steven Whitehousec4ea94a2006-03-20 22:42:39 -0800664char *dn_addr2asc(__u16 addr, char *buf)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700665{
666 unsigned short node, area;
667
668 node = addr & 0x03ff;
669 area = addr >> 10;
670 sprintf(buf, "%hd.%hd", area, node);
671
672 return buf;
673}
674
675
676
677static int dn_create(struct socket *sock, int protocol)
678{
679 struct sock *sk;
680
681 switch(sock->type) {
682 case SOCK_SEQPACKET:
683 if (protocol != DNPROTO_NSP)
684 return -EPROTONOSUPPORT;
685 break;
686 case SOCK_STREAM:
687 break;
688 default:
689 return -ESOCKTNOSUPPORT;
690 }
691
692
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +0900693 if ((sk = dn_alloc_sock(sock, GFP_KERNEL)) == NULL)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700694 return -ENOBUFS;
695
696 sk->sk_protocol = protocol;
697
698 return 0;
699}
700
701
702static int
703dn_release(struct socket *sock)
704{
705 struct sock *sk = sock->sk;
706
707 if (sk) {
708 sock_orphan(sk);
709 sock_hold(sk);
710 lock_sock(sk);
711 dn_destroy_sock(sk);
712 release_sock(sk);
713 sock_put(sk);
714 }
715
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +0900716 return 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700717}
718
719static int dn_bind(struct socket *sock, struct sockaddr *uaddr, int addr_len)
720{
721 struct sock *sk = sock->sk;
722 struct dn_scp *scp = DN_SK(sk);
723 struct sockaddr_dn *saddr = (struct sockaddr_dn *)uaddr;
Pavel Emelianov7562f872007-05-03 15:13:45 -0700724 struct net_device *dev, *ldev;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700725 int rv;
726
727 if (addr_len != sizeof(struct sockaddr_dn))
728 return -EINVAL;
729
730 if (saddr->sdn_family != AF_DECnet)
731 return -EINVAL;
732
733 if (dn_ntohs(saddr->sdn_nodeaddrl) && (dn_ntohs(saddr->sdn_nodeaddrl) != 2))
734 return -EINVAL;
735
736 if (dn_ntohs(saddr->sdn_objnamel) > DN_MAXOBJL)
737 return -EINVAL;
738
739 if (saddr->sdn_flags & ~SDF_WILD)
740 return -EINVAL;
741
Linus Torvalds1da177e2005-04-16 15:20:36 -0700742 if (!capable(CAP_NET_BIND_SERVICE) && (saddr->sdn_objnum ||
743 (saddr->sdn_flags & SDF_WILD)))
744 return -EACCES;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700745
746 if (!(saddr->sdn_flags & SDF_WILD)) {
747 if (dn_ntohs(saddr->sdn_nodeaddrl)) {
748 read_lock(&dev_base_lock);
Pavel Emelianov7562f872007-05-03 15:13:45 -0700749 ldev = NULL;
750 for_each_netdev(dev) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700751 if (!dev->dn_ptr)
752 continue;
Pavel Emelianov7562f872007-05-03 15:13:45 -0700753 if (dn_dev_islocal(dev, dn_saddr2dn(saddr))) {
754 ldev = dev;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700755 break;
Pavel Emelianov7562f872007-05-03 15:13:45 -0700756 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700757 }
758 read_unlock(&dev_base_lock);
Pavel Emelianov7562f872007-05-03 15:13:45 -0700759 if (ldev == NULL)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700760 return -EADDRNOTAVAIL;
761 }
762 }
763
764 rv = -EINVAL;
765 lock_sock(sk);
766 if (sock_flag(sk, SOCK_ZAPPED)) {
767 memcpy(&scp->addr, saddr, addr_len);
768 sock_reset_flag(sk, SOCK_ZAPPED);
769
770 rv = dn_hash_sock(sk);
771 if (rv)
772 sock_set_flag(sk, SOCK_ZAPPED);
773 }
774 release_sock(sk);
775
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +0900776 return rv;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700777}
778
779
780static int dn_auto_bind(struct socket *sock)
781{
782 struct sock *sk = sock->sk;
783 struct dn_scp *scp = DN_SK(sk);
784 int rv;
785
786 sock_reset_flag(sk, SOCK_ZAPPED);
787
788 scp->addr.sdn_flags = 0;
789 scp->addr.sdn_objnum = 0;
790
791 /*
792 * This stuff is to keep compatibility with Eduardo's
793 * patch. I hope I can dispense with it shortly...
794 */
795 if ((scp->accessdata.acc_accl != 0) &&
796 (scp->accessdata.acc_accl <= 12)) {
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +0900797
Linus Torvalds1da177e2005-04-16 15:20:36 -0700798 scp->addr.sdn_objnamel = dn_htons(scp->accessdata.acc_accl);
799 memcpy(scp->addr.sdn_objname, scp->accessdata.acc_acc, dn_ntohs(scp->addr.sdn_objnamel));
800
801 scp->accessdata.acc_accl = 0;
802 memset(scp->accessdata.acc_acc, 0, 40);
803 }
804 /* End of compatibility stuff */
805
806 scp->addr.sdn_add.a_len = dn_htons(2);
Steven Whitehousec4ea94a2006-03-20 22:42:39 -0800807 rv = dn_dev_bind_default((__le16 *)scp->addr.sdn_add.a_addr);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700808 if (rv == 0) {
809 rv = dn_hash_sock(sk);
810 if (rv)
811 sock_set_flag(sk, SOCK_ZAPPED);
812 }
813
814 return rv;
815}
816
Al Virodd0fc662005-10-07 07:46:04 +0100817static int dn_confirm_accept(struct sock *sk, long *timeo, gfp_t allocation)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700818{
819 struct dn_scp *scp = DN_SK(sk);
820 DEFINE_WAIT(wait);
821 int err;
822
823 if (scp->state != DN_CR)
824 return -EINVAL;
825
826 scp->state = DN_CC;
827 scp->segsize_loc = dst_metric(__sk_dst_get(sk), RTAX_ADVMSS);
828 dn_send_conn_conf(sk, allocation);
829
830 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
831 for(;;) {
832 release_sock(sk);
833 if (scp->state == DN_CC)
834 *timeo = schedule_timeout(*timeo);
835 lock_sock(sk);
836 err = 0;
837 if (scp->state == DN_RUN)
838 break;
839 err = sock_error(sk);
840 if (err)
841 break;
842 err = sock_intr_errno(*timeo);
843 if (signal_pending(current))
844 break;
845 err = -EAGAIN;
846 if (!*timeo)
847 break;
848 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
849 }
850 finish_wait(sk->sk_sleep, &wait);
851 if (err == 0) {
852 sk->sk_socket->state = SS_CONNECTED;
853 } else if (scp->state != DN_CC) {
854 sk->sk_socket->state = SS_UNCONNECTED;
855 }
856 return err;
857}
858
859static int dn_wait_run(struct sock *sk, long *timeo)
860{
861 struct dn_scp *scp = DN_SK(sk);
862 DEFINE_WAIT(wait);
863 int err = 0;
864
865 if (scp->state == DN_RUN)
866 goto out;
867
868 if (!*timeo)
869 return -EALREADY;
870
871 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
872 for(;;) {
873 release_sock(sk);
874 if (scp->state == DN_CI || scp->state == DN_CC)
875 *timeo = schedule_timeout(*timeo);
876 lock_sock(sk);
877 err = 0;
878 if (scp->state == DN_RUN)
879 break;
880 err = sock_error(sk);
881 if (err)
882 break;
883 err = sock_intr_errno(*timeo);
884 if (signal_pending(current))
885 break;
886 err = -ETIMEDOUT;
887 if (!*timeo)
888 break;
889 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
890 }
891 finish_wait(sk->sk_sleep, &wait);
892out:
893 if (err == 0) {
894 sk->sk_socket->state = SS_CONNECTED;
895 } else if (scp->state != DN_CI && scp->state != DN_CC) {
896 sk->sk_socket->state = SS_UNCONNECTED;
897 }
898 return err;
899}
900
901static int __dn_connect(struct sock *sk, struct sockaddr_dn *addr, int addrlen, long *timeo, int flags)
902{
903 struct socket *sock = sk->sk_socket;
904 struct dn_scp *scp = DN_SK(sk);
905 int err = -EISCONN;
906 struct flowi fl;
907
908 if (sock->state == SS_CONNECTED)
909 goto out;
910
911 if (sock->state == SS_CONNECTING) {
912 err = 0;
913 if (scp->state == DN_RUN) {
914 sock->state = SS_CONNECTED;
915 goto out;
916 }
917 err = -ECONNREFUSED;
918 if (scp->state != DN_CI && scp->state != DN_CC) {
919 sock->state = SS_UNCONNECTED;
920 goto out;
921 }
922 return dn_wait_run(sk, timeo);
923 }
924
925 err = -EINVAL;
926 if (scp->state != DN_O)
927 goto out;
928
929 if (addr == NULL || addrlen != sizeof(struct sockaddr_dn))
930 goto out;
931 if (addr->sdn_family != AF_DECnet)
932 goto out;
933 if (addr->sdn_flags & SDF_WILD)
934 goto out;
935
936 if (sock_flag(sk, SOCK_ZAPPED)) {
937 err = dn_auto_bind(sk->sk_socket);
938 if (err)
939 goto out;
940 }
941
942 memcpy(&scp->peer, addr, sizeof(struct sockaddr_dn));
943
944 err = -EHOSTUNREACH;
945 memset(&fl, 0, sizeof(fl));
946 fl.oif = sk->sk_bound_dev_if;
947 fl.fld_dst = dn_saddr2dn(&scp->peer);
948 fl.fld_src = dn_saddr2dn(&scp->addr);
949 dn_sk_ports_copy(&fl, scp);
950 fl.proto = DNPROTO_NSP;
951 if (dn_route_output_sock(&sk->sk_dst_cache, &fl, sk, flags) < 0)
952 goto out;
953 sk->sk_route_caps = sk->sk_dst_cache->dev->features;
954 sock->state = SS_CONNECTING;
955 scp->state = DN_CI;
956 scp->segsize_loc = dst_metric(sk->sk_dst_cache, RTAX_ADVMSS);
957
958 dn_nsp_send_conninit(sk, NSP_CI);
959 err = -EINPROGRESS;
960 if (*timeo) {
961 err = dn_wait_run(sk, timeo);
962 }
963out:
964 return err;
965}
966
967static int dn_connect(struct socket *sock, struct sockaddr *uaddr, int addrlen, int flags)
968{
969 struct sockaddr_dn *addr = (struct sockaddr_dn *)uaddr;
970 struct sock *sk = sock->sk;
971 int err;
972 long timeo = sock_sndtimeo(sk, flags & O_NONBLOCK);
973
974 lock_sock(sk);
975 err = __dn_connect(sk, addr, addrlen, &timeo, 0);
976 release_sock(sk);
977
978 return err;
979}
980
981static inline int dn_check_state(struct sock *sk, struct sockaddr_dn *addr, int addrlen, long *timeo, int flags)
982{
983 struct dn_scp *scp = DN_SK(sk);
984
985 switch(scp->state) {
986 case DN_RUN:
987 return 0;
988 case DN_CR:
989 return dn_confirm_accept(sk, timeo, sk->sk_allocation);
990 case DN_CI:
991 case DN_CC:
992 return dn_wait_run(sk, timeo);
993 case DN_O:
994 return __dn_connect(sk, addr, addrlen, timeo, flags);
995 }
996
997 return -EINVAL;
998}
999
1000
1001static void dn_access_copy(struct sk_buff *skb, struct accessdata_dn *acc)
1002{
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001003 unsigned char *ptr = skb->data;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001004
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001005 acc->acc_userl = *ptr++;
1006 memcpy(&acc->acc_user, ptr, acc->acc_userl);
1007 ptr += acc->acc_userl;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001008
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001009 acc->acc_passl = *ptr++;
1010 memcpy(&acc->acc_pass, ptr, acc->acc_passl);
1011 ptr += acc->acc_passl;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001012
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001013 acc->acc_accl = *ptr++;
1014 memcpy(&acc->acc_acc, ptr, acc->acc_accl);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001015
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001016 skb_pull(skb, acc->acc_accl + acc->acc_passl + acc->acc_userl + 3);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001017
1018}
1019
1020static void dn_user_copy(struct sk_buff *skb, struct optdata_dn *opt)
1021{
Steven Whitehouse375d9d72006-11-07 15:09:17 -08001022 unsigned char *ptr = skb->data;
1023 u16 len = *ptr++; /* yes, it's 8bit on the wire */
Linus Torvalds1da177e2005-04-16 15:20:36 -07001024
Steven Whitehouse375d9d72006-11-07 15:09:17 -08001025 BUG_ON(len > 16); /* we've checked the contents earlier */
1026 opt->opt_optl = dn_htons(len);
1027 opt->opt_status = 0;
1028 memcpy(opt->opt_data, ptr, len);
1029 skb_pull(skb, len + 1);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001030}
1031
1032static struct sk_buff *dn_wait_for_connect(struct sock *sk, long *timeo)
1033{
1034 DEFINE_WAIT(wait);
1035 struct sk_buff *skb = NULL;
1036 int err = 0;
1037
1038 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
1039 for(;;) {
1040 release_sock(sk);
1041 skb = skb_dequeue(&sk->sk_receive_queue);
1042 if (skb == NULL) {
1043 *timeo = schedule_timeout(*timeo);
1044 skb = skb_dequeue(&sk->sk_receive_queue);
1045 }
1046 lock_sock(sk);
1047 if (skb != NULL)
1048 break;
1049 err = -EINVAL;
1050 if (sk->sk_state != TCP_LISTEN)
1051 break;
1052 err = sock_intr_errno(*timeo);
1053 if (signal_pending(current))
1054 break;
1055 err = -EAGAIN;
1056 if (!*timeo)
1057 break;
1058 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
1059 }
1060 finish_wait(sk->sk_sleep, &wait);
1061
1062 return skb == NULL ? ERR_PTR(err) : skb;
1063}
1064
1065static int dn_accept(struct socket *sock, struct socket *newsock, int flags)
1066{
1067 struct sock *sk = sock->sk, *newsk;
1068 struct sk_buff *skb = NULL;
1069 struct dn_skb_cb *cb;
1070 unsigned char menuver;
1071 int err = 0;
1072 unsigned char type;
1073 long timeo = sock_rcvtimeo(sk, flags & O_NONBLOCK);
1074
1075 lock_sock(sk);
1076
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001077 if (sk->sk_state != TCP_LISTEN || DN_SK(sk)->state != DN_O) {
Linus Torvalds1da177e2005-04-16 15:20:36 -07001078 release_sock(sk);
1079 return -EINVAL;
1080 }
1081
1082 skb = skb_dequeue(&sk->sk_receive_queue);
1083 if (skb == NULL) {
1084 skb = dn_wait_for_connect(sk, &timeo);
1085 if (IS_ERR(skb)) {
1086 release_sock(sk);
1087 return PTR_ERR(skb);
1088 }
1089 }
1090
1091 cb = DN_SKB_CB(skb);
1092 sk->sk_ack_backlog--;
1093 newsk = dn_alloc_sock(newsock, sk->sk_allocation);
1094 if (newsk == NULL) {
1095 release_sock(sk);
1096 kfree_skb(skb);
1097 return -ENOBUFS;
1098 }
1099 release_sock(sk);
1100
1101 dst_release(xchg(&newsk->sk_dst_cache, skb->dst));
1102 skb->dst = NULL;
1103
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001104 DN_SK(newsk)->state = DN_CR;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001105 DN_SK(newsk)->addrrem = cb->src_port;
1106 DN_SK(newsk)->services_rem = cb->services;
1107 DN_SK(newsk)->info_rem = cb->info;
1108 DN_SK(newsk)->segsize_rem = cb->segsize;
1109 DN_SK(newsk)->accept_mode = DN_SK(sk)->accept_mode;
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001110
Linus Torvalds1da177e2005-04-16 15:20:36 -07001111 if (DN_SK(newsk)->segsize_rem < 230)
1112 DN_SK(newsk)->segsize_rem = 230;
1113
1114 if ((DN_SK(newsk)->services_rem & NSP_FC_MASK) == NSP_FC_NONE)
1115 DN_SK(newsk)->max_window = decnet_no_fc_max_cwnd;
1116
1117 newsk->sk_state = TCP_LISTEN;
1118 memcpy(&(DN_SK(newsk)->addr), &(DN_SK(sk)->addr), sizeof(struct sockaddr_dn));
1119
1120 /*
1121 * If we are listening on a wild socket, we don't want
1122 * the newly created socket on the wrong hash queue.
1123 */
1124 DN_SK(newsk)->addr.sdn_flags &= ~SDF_WILD;
1125
1126 skb_pull(skb, dn_username2sockaddr(skb->data, skb->len, &(DN_SK(newsk)->addr), &type));
1127 skb_pull(skb, dn_username2sockaddr(skb->data, skb->len, &(DN_SK(newsk)->peer), &type));
Steven Whitehousec4ea94a2006-03-20 22:42:39 -08001128 *(__le16 *)(DN_SK(newsk)->peer.sdn_add.a_addr) = cb->src;
1129 *(__le16 *)(DN_SK(newsk)->addr.sdn_add.a_addr) = cb->dst;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001130
1131 menuver = *skb->data;
1132 skb_pull(skb, 1);
1133
1134 if (menuver & DN_MENUVER_ACC)
1135 dn_access_copy(skb, &(DN_SK(newsk)->accessdata));
1136
1137 if (menuver & DN_MENUVER_USR)
1138 dn_user_copy(skb, &(DN_SK(newsk)->conndata_in));
1139
1140 if (menuver & DN_MENUVER_PRX)
1141 DN_SK(newsk)->peer.sdn_flags |= SDF_PROXY;
1142
1143 if (menuver & DN_MENUVER_UIC)
1144 DN_SK(newsk)->peer.sdn_flags |= SDF_UICPROXY;
1145
1146 kfree_skb(skb);
1147
1148 memcpy(&(DN_SK(newsk)->conndata_out), &(DN_SK(sk)->conndata_out),
1149 sizeof(struct optdata_dn));
1150 memcpy(&(DN_SK(newsk)->discdata_out), &(DN_SK(sk)->discdata_out),
1151 sizeof(struct optdata_dn));
1152
1153 lock_sock(newsk);
1154 err = dn_hash_sock(newsk);
1155 if (err == 0) {
1156 sock_reset_flag(newsk, SOCK_ZAPPED);
1157 dn_send_conn_ack(newsk);
1158
1159 /*
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001160 * Here we use sk->sk_allocation since although the conn conf is
1161 * for the newsk, the context is the old socket.
1162 */
Linus Torvalds1da177e2005-04-16 15:20:36 -07001163 if (DN_SK(newsk)->accept_mode == ACC_IMMED)
1164 err = dn_confirm_accept(newsk, &timeo,
1165 sk->sk_allocation);
1166 }
1167 release_sock(newsk);
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001168 return err;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001169}
1170
1171
1172static int dn_getname(struct socket *sock, struct sockaddr *uaddr,int *uaddr_len,int peer)
1173{
1174 struct sockaddr_dn *sa = (struct sockaddr_dn *)uaddr;
1175 struct sock *sk = sock->sk;
1176 struct dn_scp *scp = DN_SK(sk);
1177
1178 *uaddr_len = sizeof(struct sockaddr_dn);
1179
1180 lock_sock(sk);
1181
1182 if (peer) {
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001183 if ((sock->state != SS_CONNECTED &&
1184 sock->state != SS_CONNECTING) &&
Patrick McHardy52c41a32006-10-12 01:48:20 -07001185 scp->accept_mode == ACC_IMMED) {
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001186 release_sock(sk);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001187 return -ENOTCONN;
Patrick McHardy52c41a32006-10-12 01:48:20 -07001188 }
Linus Torvalds1da177e2005-04-16 15:20:36 -07001189
1190 memcpy(sa, &scp->peer, sizeof(struct sockaddr_dn));
1191 } else {
1192 memcpy(sa, &scp->addr, sizeof(struct sockaddr_dn));
1193 }
1194
1195 release_sock(sk);
1196
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001197 return 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001198}
1199
1200
1201static unsigned int dn_poll(struct file *file, struct socket *sock, poll_table *wait)
1202{
1203 struct sock *sk = sock->sk;
1204 struct dn_scp *scp = DN_SK(sk);
1205 int mask = datagram_poll(file, sock, wait);
1206
David S. Millerb03efcf2005-07-08 14:57:23 -07001207 if (!skb_queue_empty(&scp->other_receive_queue))
Linus Torvalds1da177e2005-04-16 15:20:36 -07001208 mask |= POLLRDBAND;
1209
1210 return mask;
1211}
1212
1213static int dn_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
1214{
1215 struct sock *sk = sock->sk;
1216 struct dn_scp *scp = DN_SK(sk);
1217 int err = -EOPNOTSUPP;
1218 long amount = 0;
1219 struct sk_buff *skb;
1220 int val;
1221
1222 switch(cmd)
1223 {
1224 case SIOCGIFADDR:
1225 case SIOCSIFADDR:
1226 return dn_dev_ioctl(cmd, (void __user *)arg);
1227
1228 case SIOCATMARK:
1229 lock_sock(sk);
David S. Millerb03efcf2005-07-08 14:57:23 -07001230 val = !skb_queue_empty(&scp->other_receive_queue);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001231 if (scp->state != DN_RUN)
1232 val = -ENOTCONN;
1233 release_sock(sk);
1234 return val;
1235
1236 case TIOCOUTQ:
1237 amount = sk->sk_sndbuf - atomic_read(&sk->sk_wmem_alloc);
1238 if (amount < 0)
1239 amount = 0;
1240 err = put_user(amount, (int __user *)arg);
1241 break;
1242
1243 case TIOCINQ:
1244 lock_sock(sk);
1245 if ((skb = skb_peek(&scp->other_receive_queue)) != NULL) {
1246 amount = skb->len;
1247 } else {
1248 struct sk_buff *skb = sk->sk_receive_queue.next;
1249 for(;;) {
1250 if (skb ==
1251 (struct sk_buff *)&sk->sk_receive_queue)
1252 break;
1253 amount += skb->len;
1254 skb = skb->next;
1255 }
1256 }
1257 release_sock(sk);
1258 err = put_user(amount, (int __user *)arg);
1259 break;
1260
1261 default:
Christoph Hellwigb5e5fa52006-01-03 14:18:33 -08001262 err = -ENOIOCTLCMD;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001263 break;
1264 }
1265
1266 return err;
1267}
1268
1269static int dn_listen(struct socket *sock, int backlog)
1270{
1271 struct sock *sk = sock->sk;
1272 int err = -EINVAL;
1273
1274 lock_sock(sk);
1275
1276 if (sock_flag(sk, SOCK_ZAPPED))
1277 goto out;
1278
1279 if ((DN_SK(sk)->state != DN_O) || (sk->sk_state == TCP_LISTEN))
1280 goto out;
1281
1282 sk->sk_max_ack_backlog = backlog;
1283 sk->sk_ack_backlog = 0;
1284 sk->sk_state = TCP_LISTEN;
1285 err = 0;
1286 dn_rehash_sock(sk);
1287
1288out:
1289 release_sock(sk);
1290
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001291 return err;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001292}
1293
1294
1295static int dn_shutdown(struct socket *sock, int how)
1296{
1297 struct sock *sk = sock->sk;
1298 struct dn_scp *scp = DN_SK(sk);
1299 int err = -ENOTCONN;
1300
1301 lock_sock(sk);
1302
1303 if (sock->state == SS_UNCONNECTED)
1304 goto out;
1305
1306 err = 0;
1307 if (sock->state == SS_DISCONNECTING)
1308 goto out;
1309
1310 err = -EINVAL;
1311 if (scp->state == DN_O)
1312 goto out;
1313
1314 if (how != SHUTDOWN_MASK)
1315 goto out;
1316
1317 sk->sk_shutdown = how;
1318 dn_destroy_sock(sk);
1319 err = 0;
1320
1321out:
1322 release_sock(sk);
1323
1324 return err;
1325}
1326
1327static int dn_setsockopt(struct socket *sock, int level, int optname, char __user *optval, int optlen)
1328{
1329 struct sock *sk = sock->sk;
1330 int err;
1331
1332 lock_sock(sk);
1333 err = __dn_setsockopt(sock, level, optname, optval, optlen, 0);
1334 release_sock(sk);
1335
1336 return err;
1337}
1338
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001339static int __dn_setsockopt(struct socket *sock, int level,int optname, char __user *optval, int optlen, int flags)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001340{
1341 struct sock *sk = sock->sk;
1342 struct dn_scp *scp = DN_SK(sk);
1343 long timeo;
1344 union {
1345 struct optdata_dn opt;
1346 struct accessdata_dn acc;
1347 int mode;
1348 unsigned long win;
1349 int val;
1350 unsigned char services;
1351 unsigned char info;
1352 } u;
1353 int err;
1354
1355 if (optlen && !optval)
1356 return -EINVAL;
1357
1358 if (optlen > sizeof(u))
1359 return -EINVAL;
1360
1361 if (copy_from_user(&u, optval, optlen))
1362 return -EFAULT;
1363
1364 switch(optname) {
1365 case DSO_CONDATA:
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001366 if (sock->state == SS_CONNECTED)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001367 return -EISCONN;
1368 if ((scp->state != DN_O) && (scp->state != DN_CR))
1369 return -EINVAL;
1370
1371 if (optlen != sizeof(struct optdata_dn))
1372 return -EINVAL;
1373
Steven Whitehousec4ea94a2006-03-20 22:42:39 -08001374 if (dn_ntohs(u.opt.opt_optl) > 16)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001375 return -EINVAL;
1376
1377 memcpy(&scp->conndata_out, &u.opt, optlen);
1378 break;
1379
1380 case DSO_DISDATA:
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001381 if (sock->state != SS_CONNECTED && scp->accept_mode == ACC_IMMED)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001382 return -ENOTCONN;
1383
1384 if (optlen != sizeof(struct optdata_dn))
1385 return -EINVAL;
1386
Steven Whitehousec4ea94a2006-03-20 22:42:39 -08001387 if (dn_ntohs(u.opt.opt_optl) > 16)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001388 return -EINVAL;
1389
1390 memcpy(&scp->discdata_out, &u.opt, optlen);
1391 break;
1392
1393 case DSO_CONACCESS:
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001394 if (sock->state == SS_CONNECTED)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001395 return -EISCONN;
1396 if (scp->state != DN_O)
1397 return -EINVAL;
1398
1399 if (optlen != sizeof(struct accessdata_dn))
1400 return -EINVAL;
1401
1402 if ((u.acc.acc_accl > DN_MAXACCL) ||
1403 (u.acc.acc_passl > DN_MAXACCL) ||
1404 (u.acc.acc_userl > DN_MAXACCL))
1405 return -EINVAL;
1406
1407 memcpy(&scp->accessdata, &u.acc, optlen);
1408 break;
1409
1410 case DSO_ACCEPTMODE:
1411 if (sock->state == SS_CONNECTED)
1412 return -EISCONN;
1413 if (scp->state != DN_O)
1414 return -EINVAL;
1415
1416 if (optlen != sizeof(int))
1417 return -EINVAL;
1418
1419 if ((u.mode != ACC_IMMED) && (u.mode != ACC_DEFER))
1420 return -EINVAL;
1421
1422 scp->accept_mode = (unsigned char)u.mode;
1423 break;
1424
1425 case DSO_CONACCEPT:
1426
1427 if (scp->state != DN_CR)
1428 return -EINVAL;
1429 timeo = sock_rcvtimeo(sk, 0);
1430 err = dn_confirm_accept(sk, &timeo, sk->sk_allocation);
1431 return err;
1432
1433 case DSO_CONREJECT:
1434
1435 if (scp->state != DN_CR)
1436 return -EINVAL;
1437
1438 scp->state = DN_DR;
1439 sk->sk_shutdown = SHUTDOWN_MASK;
1440 dn_nsp_send_disc(sk, 0x38, 0, sk->sk_allocation);
1441 break;
1442
1443 default:
1444#ifdef CONFIG_NETFILTER
1445 return nf_setsockopt(sk, PF_DECnet, optname, optval, optlen);
1446#endif
1447 case DSO_LINKINFO:
1448 case DSO_STREAM:
1449 case DSO_SEQPACKET:
1450 return -ENOPROTOOPT;
1451
1452 case DSO_MAXWINDOW:
1453 if (optlen != sizeof(unsigned long))
1454 return -EINVAL;
1455 if (u.win > NSP_MAX_WINDOW)
1456 u.win = NSP_MAX_WINDOW;
1457 if (u.win == 0)
1458 return -EINVAL;
1459 scp->max_window = u.win;
1460 if (scp->snd_window > u.win)
1461 scp->snd_window = u.win;
1462 break;
1463
1464 case DSO_NODELAY:
1465 if (optlen != sizeof(int))
1466 return -EINVAL;
1467 if (scp->nonagle == 2)
1468 return -EINVAL;
1469 scp->nonagle = (u.val == 0) ? 0 : 1;
1470 /* if (scp->nonagle == 1) { Push pending frames } */
1471 break;
1472
1473 case DSO_CORK:
1474 if (optlen != sizeof(int))
1475 return -EINVAL;
1476 if (scp->nonagle == 1)
1477 return -EINVAL;
1478 scp->nonagle = (u.val == 0) ? 0 : 2;
1479 /* if (scp->nonagle == 0) { Push pending frames } */
1480 break;
1481
1482 case DSO_SERVICES:
1483 if (optlen != sizeof(unsigned char))
1484 return -EINVAL;
1485 if ((u.services & ~NSP_FC_MASK) != 0x01)
1486 return -EINVAL;
1487 if ((u.services & NSP_FC_MASK) == NSP_FC_MASK)
1488 return -EINVAL;
1489 scp->services_loc = u.services;
1490 break;
1491
1492 case DSO_INFO:
1493 if (optlen != sizeof(unsigned char))
1494 return -EINVAL;
1495 if (u.info & 0xfc)
1496 return -EINVAL;
1497 scp->info_loc = u.info;
1498 break;
1499 }
1500
1501 return 0;
1502}
1503
1504static int dn_getsockopt(struct socket *sock, int level, int optname, char __user *optval, int __user *optlen)
1505{
1506 struct sock *sk = sock->sk;
1507 int err;
1508
1509 lock_sock(sk);
1510 err = __dn_getsockopt(sock, level, optname, optval, optlen, 0);
1511 release_sock(sk);
1512
1513 return err;
1514}
1515
1516static int __dn_getsockopt(struct socket *sock, int level,int optname, char __user *optval,int __user *optlen, int flags)
1517{
1518 struct sock *sk = sock->sk;
1519 struct dn_scp *scp = DN_SK(sk);
1520 struct linkinfo_dn link;
1521 unsigned int r_len;
1522 void *r_data = NULL;
1523 unsigned int val;
1524
1525 if(get_user(r_len , optlen))
1526 return -EFAULT;
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001527
Linus Torvalds1da177e2005-04-16 15:20:36 -07001528 switch(optname) {
1529 case DSO_CONDATA:
1530 if (r_len > sizeof(struct optdata_dn))
1531 r_len = sizeof(struct optdata_dn);
1532 r_data = &scp->conndata_in;
1533 break;
1534
1535 case DSO_DISDATA:
1536 if (r_len > sizeof(struct optdata_dn))
1537 r_len = sizeof(struct optdata_dn);
1538 r_data = &scp->discdata_in;
1539 break;
1540
1541 case DSO_CONACCESS:
1542 if (r_len > sizeof(struct accessdata_dn))
1543 r_len = sizeof(struct accessdata_dn);
1544 r_data = &scp->accessdata;
1545 break;
1546
1547 case DSO_ACCEPTMODE:
1548 if (r_len > sizeof(unsigned char))
1549 r_len = sizeof(unsigned char);
1550 r_data = &scp->accept_mode;
1551 break;
1552
1553 case DSO_LINKINFO:
1554 if (r_len > sizeof(struct linkinfo_dn))
1555 r_len = sizeof(struct linkinfo_dn);
1556
1557 switch(sock->state) {
1558 case SS_CONNECTING:
1559 link.idn_linkstate = LL_CONNECTING;
1560 break;
1561 case SS_DISCONNECTING:
1562 link.idn_linkstate = LL_DISCONNECTING;
1563 break;
1564 case SS_CONNECTED:
1565 link.idn_linkstate = LL_RUNNING;
1566 break;
1567 default:
1568 link.idn_linkstate = LL_INACTIVE;
1569 }
1570
1571 link.idn_segsize = scp->segsize_rem;
1572 r_data = &link;
1573 break;
1574
1575 default:
1576#ifdef CONFIG_NETFILTER
1577 {
1578 int val, len;
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001579
Linus Torvalds1da177e2005-04-16 15:20:36 -07001580 if(get_user(len, optlen))
1581 return -EFAULT;
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001582
1583 val = nf_getsockopt(sk, PF_DECnet, optname,
Linus Torvalds1da177e2005-04-16 15:20:36 -07001584 optval, &len);
1585 if (val >= 0)
1586 val = put_user(len, optlen);
1587 return val;
1588 }
1589#endif
1590 case DSO_STREAM:
1591 case DSO_SEQPACKET:
1592 case DSO_CONACCEPT:
1593 case DSO_CONREJECT:
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001594 return -ENOPROTOOPT;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001595
1596 case DSO_MAXWINDOW:
1597 if (r_len > sizeof(unsigned long))
1598 r_len = sizeof(unsigned long);
1599 r_data = &scp->max_window;
1600 break;
1601
1602 case DSO_NODELAY:
1603 if (r_len > sizeof(int))
1604 r_len = sizeof(int);
1605 val = (scp->nonagle == 1);
1606 r_data = &val;
1607 break;
1608
1609 case DSO_CORK:
1610 if (r_len > sizeof(int))
1611 r_len = sizeof(int);
1612 val = (scp->nonagle == 2);
1613 r_data = &val;
1614 break;
1615
1616 case DSO_SERVICES:
1617 if (r_len > sizeof(unsigned char))
1618 r_len = sizeof(unsigned char);
1619 r_data = &scp->services_rem;
1620 break;
1621
1622 case DSO_INFO:
1623 if (r_len > sizeof(unsigned char))
1624 r_len = sizeof(unsigned char);
1625 r_data = &scp->info_rem;
1626 break;
1627 }
1628
1629 if (r_data) {
1630 if (copy_to_user(optval, r_data, r_len))
1631 return -EFAULT;
1632 if (put_user(r_len, optlen))
1633 return -EFAULT;
1634 }
1635
1636 return 0;
1637}
1638
1639
1640static int dn_data_ready(struct sock *sk, struct sk_buff_head *q, int flags, int target)
1641{
1642 struct sk_buff *skb = q->next;
1643 int len = 0;
1644
1645 if (flags & MSG_OOB)
David S. Millerb03efcf2005-07-08 14:57:23 -07001646 return !skb_queue_empty(q) ? 1 : 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001647
1648 while(skb != (struct sk_buff *)q) {
1649 struct dn_skb_cb *cb = DN_SKB_CB(skb);
1650 len += skb->len;
1651
1652 if (cb->nsp_flags & 0x40) {
1653 /* SOCK_SEQPACKET reads to EOM */
1654 if (sk->sk_type == SOCK_SEQPACKET)
1655 return 1;
1656 /* so does SOCK_STREAM unless WAITALL is specified */
1657 if (!(flags & MSG_WAITALL))
1658 return 1;
1659 }
1660
1661 /* minimum data length for read exceeded */
1662 if (len >= target)
1663 return 1;
1664
1665 skb = skb->next;
1666 }
1667
1668 return 0;
1669}
1670
1671
1672static int dn_recvmsg(struct kiocb *iocb, struct socket *sock,
1673 struct msghdr *msg, size_t size, int flags)
1674{
1675 struct sock *sk = sock->sk;
1676 struct dn_scp *scp = DN_SK(sk);
1677 struct sk_buff_head *queue = &sk->sk_receive_queue;
1678 size_t target = size > 1 ? 1 : 0;
1679 size_t copied = 0;
1680 int rv = 0;
1681 struct sk_buff *skb, *nskb;
1682 struct dn_skb_cb *cb = NULL;
1683 unsigned char eor = 0;
1684 long timeo = sock_rcvtimeo(sk, flags & MSG_DONTWAIT);
1685
1686 lock_sock(sk);
1687
1688 if (sock_flag(sk, SOCK_ZAPPED)) {
1689 rv = -EADDRNOTAVAIL;
1690 goto out;
1691 }
1692
Patrick Caulfield9eb5c942005-11-11 12:04:28 -08001693 if (sk->sk_shutdown & RCV_SHUTDOWN) {
1694 rv = 0;
1695 goto out;
1696 }
1697
Linus Torvalds1da177e2005-04-16 15:20:36 -07001698 rv = dn_check_state(sk, NULL, 0, &timeo, flags);
1699 if (rv)
1700 goto out;
1701
Patrick Caulfieldc60992d2006-03-20 22:43:05 -08001702 if (flags & ~(MSG_CMSG_COMPAT|MSG_PEEK|MSG_OOB|MSG_WAITALL|MSG_DONTWAIT|MSG_NOSIGNAL)) {
Linus Torvalds1da177e2005-04-16 15:20:36 -07001703 rv = -EOPNOTSUPP;
1704 goto out;
1705 }
1706
1707 if (flags & MSG_OOB)
1708 queue = &scp->other_receive_queue;
1709
1710 if (flags & MSG_WAITALL)
1711 target = size;
1712
1713
1714 /*
1715 * See if there is data ready to read, sleep if there isn't
1716 */
1717 for(;;) {
1718 if (sk->sk_err)
1719 goto out;
1720
David S. Millerb03efcf2005-07-08 14:57:23 -07001721 if (!skb_queue_empty(&scp->other_receive_queue)) {
Linus Torvalds1da177e2005-04-16 15:20:36 -07001722 if (!(flags & MSG_OOB)) {
1723 msg->msg_flags |= MSG_OOB;
1724 if (!scp->other_report) {
1725 scp->other_report = 1;
1726 goto out;
1727 }
1728 }
1729 }
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001730
Linus Torvalds1da177e2005-04-16 15:20:36 -07001731 if (scp->state != DN_RUN)
1732 goto out;
1733
1734 if (signal_pending(current)) {
1735 rv = sock_intr_errno(timeo);
1736 goto out;
1737 }
1738
1739 if (dn_data_ready(sk, queue, flags, target))
1740 break;
1741
1742 if (flags & MSG_DONTWAIT) {
1743 rv = -EWOULDBLOCK;
1744 goto out;
1745 }
1746
1747 set_bit(SOCK_ASYNC_WAITDATA, &sock->flags);
1748 SOCK_SLEEP_PRE(sk)
1749
1750 if (!dn_data_ready(sk, queue, flags, target))
1751 schedule();
1752
1753 SOCK_SLEEP_POST(sk)
1754 clear_bit(SOCK_ASYNC_WAITDATA, &sock->flags);
1755 }
1756
1757 for(skb = queue->next; skb != (struct sk_buff *)queue; skb = nskb) {
1758 unsigned int chunk = skb->len;
1759 cb = DN_SKB_CB(skb);
1760
1761 if ((chunk + copied) > size)
1762 chunk = size - copied;
1763
1764 if (memcpy_toiovec(msg->msg_iov, skb->data, chunk)) {
1765 rv = -EFAULT;
1766 break;
1767 }
1768 copied += chunk;
1769
1770 if (!(flags & MSG_PEEK))
1771 skb_pull(skb, chunk);
1772
1773 eor = cb->nsp_flags & 0x40;
1774 nskb = skb->next;
1775
1776 if (skb->len == 0) {
David S. Miller8728b832005-08-09 19:25:21 -07001777 skb_unlink(skb, queue);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001778 kfree_skb(skb);
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001779 /*
Linus Torvalds1da177e2005-04-16 15:20:36 -07001780 * N.B. Don't refer to skb or cb after this point
1781 * in loop.
1782 */
1783 if ((scp->flowloc_sw == DN_DONTSEND) && !dn_congested(sk)) {
1784 scp->flowloc_sw = DN_SEND;
1785 dn_nsp_send_link(sk, DN_SEND, 0);
1786 }
1787 }
1788
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001789 if (eor) {
Linus Torvalds1da177e2005-04-16 15:20:36 -07001790 if (sk->sk_type == SOCK_SEQPACKET)
1791 break;
1792 if (!(flags & MSG_WAITALL))
1793 break;
1794 }
1795
1796 if (flags & MSG_OOB)
1797 break;
1798
1799 if (copied >= target)
1800 break;
1801 }
1802
1803 rv = copied;
1804
1805
1806 if (eor && (sk->sk_type == SOCK_SEQPACKET))
1807 msg->msg_flags |= MSG_EOR;
1808
1809out:
1810 if (rv == 0)
1811 rv = (flags & MSG_PEEK) ? -sk->sk_err : sock_error(sk);
1812
1813 if ((rv >= 0) && msg->msg_name) {
1814 memcpy(msg->msg_name, &scp->peer, sizeof(struct sockaddr_dn));
1815 msg->msg_namelen = sizeof(struct sockaddr_dn);
1816 }
1817
1818 release_sock(sk);
1819
1820 return rv;
1821}
1822
1823
1824static inline int dn_queue_too_long(struct dn_scp *scp, struct sk_buff_head *queue, int flags)
1825{
1826 unsigned char fctype = scp->services_rem & NSP_FC_MASK;
1827 if (skb_queue_len(queue) >= scp->snd_window)
1828 return 1;
1829 if (fctype != NSP_FC_NONE) {
1830 if (flags & MSG_OOB) {
1831 if (scp->flowrem_oth == 0)
1832 return 1;
1833 } else {
1834 if (scp->flowrem_dat == 0)
1835 return 1;
1836 }
1837 }
1838 return 0;
1839}
1840
1841/*
Michael Opdenacker59c51592007-05-09 08:57:56 +02001842 * The DECnet spec requires that the "routing layer" accepts packets which
Linus Torvalds1da177e2005-04-16 15:20:36 -07001843 * are at least 230 bytes in size. This excludes any headers which the NSP
1844 * layer might add, so we always assume that we'll be using the maximal
1845 * length header on data packets. The variation in length is due to the
1846 * inclusion (or not) of the two 16 bit acknowledgement fields so it doesn't
1847 * make much practical difference.
1848 */
1849unsigned dn_mss_from_pmtu(struct net_device *dev, int mtu)
1850{
1851 unsigned mss = 230 - DN_MAX_NSP_DATA_HEADER;
1852 if (dev) {
1853 struct dn_dev *dn_db = dev->dn_ptr;
1854 mtu -= LL_RESERVED_SPACE(dev);
1855 if (dn_db->use_long)
1856 mtu -= 21;
1857 else
1858 mtu -= 6;
1859 mtu -= DN_MAX_NSP_DATA_HEADER;
1860 } else {
1861 /*
1862 * 21 = long header, 16 = guess at MAC header length
1863 */
1864 mtu -= (21 + DN_MAX_NSP_DATA_HEADER + 16);
1865 }
1866 if (mtu > mss)
1867 mss = mtu;
1868 return mss;
1869}
1870
1871static inline unsigned int dn_current_mss(struct sock *sk, int flags)
1872{
1873 struct dst_entry *dst = __sk_dst_get(sk);
1874 struct dn_scp *scp = DN_SK(sk);
1875 int mss_now = min_t(int, scp->segsize_loc, scp->segsize_rem);
1876
1877 /* Other data messages are limited to 16 bytes per packet */
1878 if (flags & MSG_OOB)
1879 return 16;
1880
1881 /* This works out the maximum size of segment we can send out */
1882 if (dst) {
1883 u32 mtu = dst_mtu(dst);
1884 mss_now = min_t(int, dn_mss_from_pmtu(dst->dev, mtu), mss_now);
1885 }
1886
1887 return mss_now;
1888}
1889
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09001890/*
Patrick Caulfield12a49ff2005-09-01 17:43:45 -07001891 * N.B. We get the timeout wrong here, but then we always did get it
1892 * wrong before and this is another step along the road to correcting
1893 * it. It ought to get updated each time we pass through the routine,
1894 * but in practise it probably doesn't matter too much for now.
1895 */
1896static inline struct sk_buff *dn_alloc_send_pskb(struct sock *sk,
1897 unsigned long datalen, int noblock,
1898 int *errcode)
1899{
1900 struct sk_buff *skb = sock_alloc_send_skb(sk, datalen,
1901 noblock, errcode);
1902 if (skb) {
1903 skb->protocol = __constant_htons(ETH_P_DNA_RT);
1904 skb->pkt_type = PACKET_OUTGOING;
1905 }
1906 return skb;
1907}
1908
Linus Torvalds1da177e2005-04-16 15:20:36 -07001909static int dn_sendmsg(struct kiocb *iocb, struct socket *sock,
Patrick Caulfield12a49ff2005-09-01 17:43:45 -07001910 struct msghdr *msg, size_t size)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001911{
1912 struct sock *sk = sock->sk;
1913 struct dn_scp *scp = DN_SK(sk);
1914 size_t mss;
1915 struct sk_buff_head *queue = &scp->data_xmit_queue;
1916 int flags = msg->msg_flags;
1917 int err = 0;
1918 size_t sent = 0;
1919 int addr_len = msg->msg_namelen;
1920 struct sockaddr_dn *addr = (struct sockaddr_dn *)msg->msg_name;
1921 struct sk_buff *skb = NULL;
1922 struct dn_skb_cb *cb;
1923 size_t len;
1924 unsigned char fctype;
Patrick Caulfield12a49ff2005-09-01 17:43:45 -07001925 long timeo;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001926
1927 if (flags & ~(MSG_TRYHARD|MSG_OOB|MSG_DONTWAIT|MSG_EOR|MSG_NOSIGNAL|MSG_MORE|MSG_CMSG_COMPAT))
1928 return -EOPNOTSUPP;
1929
1930 if (addr_len && (addr_len != sizeof(struct sockaddr_dn)))
1931 return -EINVAL;
1932
Patrick Caulfield12a49ff2005-09-01 17:43:45 -07001933 lock_sock(sk);
1934 timeo = sock_sndtimeo(sk, flags & MSG_DONTWAIT);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001935 /*
1936 * The only difference between stream sockets and sequenced packet
1937 * sockets is that the stream sockets always behave as if MSG_EOR
1938 * has been set.
1939 */
1940 if (sock->type == SOCK_STREAM) {
Patrick Caulfield12a49ff2005-09-01 17:43:45 -07001941 if (flags & MSG_EOR) {
1942 err = -EINVAL;
1943 goto out;
1944 }
Linus Torvalds1da177e2005-04-16 15:20:36 -07001945 flags |= MSG_EOR;
1946 }
1947
Linus Torvalds1da177e2005-04-16 15:20:36 -07001948
1949 err = dn_check_state(sk, addr, addr_len, &timeo, flags);
1950 if (err)
1951 goto out_err;
1952
1953 if (sk->sk_shutdown & SEND_SHUTDOWN) {
1954 err = -EPIPE;
Patrick Caulfield9eb5c942005-11-11 12:04:28 -08001955 if (!(flags & MSG_NOSIGNAL))
1956 send_sig(SIGPIPE, current, 0);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001957 goto out_err;
1958 }
1959
1960 if ((flags & MSG_TRYHARD) && sk->sk_dst_cache)
1961 dst_negative_advice(&sk->sk_dst_cache);
1962
1963 mss = scp->segsize_rem;
1964 fctype = scp->services_rem & NSP_FC_MASK;
1965
1966 mss = dn_current_mss(sk, flags);
1967
1968 if (flags & MSG_OOB) {
1969 queue = &scp->other_xmit_queue;
1970 if (size > mss) {
1971 err = -EMSGSIZE;
1972 goto out;
1973 }
1974 }
1975
1976 scp->persist_fxn = dn_nsp_xmit_timeout;
1977
1978 while(sent < size) {
1979 err = sock_error(sk);
1980 if (err)
1981 goto out;
1982
1983 if (signal_pending(current)) {
1984 err = sock_intr_errno(timeo);
1985 goto out;
1986 }
1987
1988 /*
1989 * Calculate size that we wish to send.
1990 */
1991 len = size - sent;
1992
1993 if (len > mss)
1994 len = mss;
1995
1996 /*
1997 * Wait for queue size to go down below the window
1998 * size.
1999 */
2000 if (dn_queue_too_long(scp, queue, flags)) {
2001 if (flags & MSG_DONTWAIT) {
2002 err = -EWOULDBLOCK;
2003 goto out;
2004 }
2005
2006 SOCK_SLEEP_PRE(sk)
2007
2008 if (dn_queue_too_long(scp, queue, flags))
2009 schedule();
2010
2011 SOCK_SLEEP_POST(sk)
2012
2013 continue;
2014 }
2015
2016 /*
2017 * Get a suitably sized skb.
Patrick Caulfield12a49ff2005-09-01 17:43:45 -07002018 * 64 is a bit of a hack really, but its larger than any
2019 * link-layer headers and has served us well as a good
2020 * guess as to their real length.
Linus Torvalds1da177e2005-04-16 15:20:36 -07002021 */
Patrick Caulfield12a49ff2005-09-01 17:43:45 -07002022 skb = dn_alloc_send_pskb(sk, len + 64 + DN_MAX_NSP_DATA_HEADER,
2023 flags & MSG_DONTWAIT, &err);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002024
2025 if (err)
2026 break;
2027
2028 if (!skb)
2029 continue;
2030
2031 cb = DN_SKB_CB(skb);
2032
Patrick Caulfield12a49ff2005-09-01 17:43:45 -07002033 skb_reserve(skb, 64 + DN_MAX_NSP_DATA_HEADER);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002034
2035 if (memcpy_fromiovec(skb_put(skb, len), msg->msg_iov, len)) {
2036 err = -EFAULT;
2037 goto out;
2038 }
2039
2040 if (flags & MSG_OOB) {
2041 cb->nsp_flags = 0x30;
2042 if (fctype != NSP_FC_NONE)
2043 scp->flowrem_oth--;
2044 } else {
2045 cb->nsp_flags = 0x00;
2046 if (scp->seg_total == 0)
2047 cb->nsp_flags |= 0x20;
2048
2049 scp->seg_total += len;
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09002050
Linus Torvalds1da177e2005-04-16 15:20:36 -07002051 if (((sent + len) == size) && (flags & MSG_EOR)) {
2052 cb->nsp_flags |= 0x40;
2053 scp->seg_total = 0;
2054 if (fctype == NSP_FC_SCMC)
2055 scp->flowrem_dat--;
2056 }
2057 if (fctype == NSP_FC_SRC)
2058 scp->flowrem_dat--;
2059 }
2060
2061 sent += len;
2062 dn_nsp_queue_xmit(sk, skb, sk->sk_allocation, flags & MSG_OOB);
2063 skb = NULL;
2064
2065 scp->persist = dn_nsp_persist(sk);
2066
2067 }
2068out:
2069
2070 if (skb)
2071 kfree_skb(skb);
2072
2073 release_sock(sk);
2074
2075 return sent ? sent : err;
2076
2077out_err:
Steven Whitehouse001ab022005-08-10 11:32:57 -07002078 err = sk_stream_error(sk, flags, err);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002079 release_sock(sk);
2080 return err;
2081}
2082
2083static int dn_device_event(struct notifier_block *this, unsigned long event,
2084 void *ptr)
2085{
2086 struct net_device *dev = (struct net_device *)ptr;
2087
2088 switch(event) {
2089 case NETDEV_UP:
2090 dn_dev_up(dev);
2091 break;
2092 case NETDEV_DOWN:
2093 dn_dev_down(dev);
2094 break;
2095 default:
2096 break;
2097 }
2098
2099 return NOTIFY_DONE;
2100}
2101
2102static struct notifier_block dn_dev_notifier = {
2103 .notifier_call = dn_device_event,
2104};
2105
David S. Millerf2ccd8f2005-08-09 19:34:12 -07002106extern int dn_route_rcv(struct sk_buff *, struct net_device *, struct packet_type *, struct net_device *);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002107
2108static struct packet_type dn_dix_packet_type = {
2109 .type = __constant_htons(ETH_P_DNA_RT),
2110 .dev = NULL, /* All devices */
2111 .func = dn_route_rcv,
2112};
2113
2114#ifdef CONFIG_PROC_FS
2115struct dn_iter_state {
2116 int bucket;
2117};
2118
2119static struct sock *dn_socket_get_first(struct seq_file *seq)
2120{
2121 struct dn_iter_state *state = seq->private;
2122 struct sock *n = NULL;
2123
2124 for(state->bucket = 0;
2125 state->bucket < DN_SK_HASH_SIZE;
2126 ++state->bucket) {
2127 n = sk_head(&dn_sk_hash[state->bucket]);
2128 if (n)
2129 break;
2130 }
2131
2132 return n;
2133}
2134
2135static struct sock *dn_socket_get_next(struct seq_file *seq,
2136 struct sock *n)
2137{
2138 struct dn_iter_state *state = seq->private;
2139
2140 n = sk_next(n);
2141try_again:
2142 if (n)
2143 goto out;
2144 if (++state->bucket >= DN_SK_HASH_SIZE)
2145 goto out;
2146 n = sk_head(&dn_sk_hash[state->bucket]);
2147 goto try_again;
2148out:
2149 return n;
2150}
2151
2152static struct sock *socket_get_idx(struct seq_file *seq, loff_t *pos)
2153{
2154 struct sock *sk = dn_socket_get_first(seq);
2155
2156 if (sk) {
2157 while(*pos && (sk = dn_socket_get_next(seq, sk)))
2158 --*pos;
2159 }
2160 return *pos ? NULL : sk;
2161}
2162
2163static void *dn_socket_get_idx(struct seq_file *seq, loff_t pos)
2164{
2165 void *rc;
2166 read_lock_bh(&dn_hash_lock);
2167 rc = socket_get_idx(seq, &pos);
2168 if (!rc) {
2169 read_unlock_bh(&dn_hash_lock);
2170 }
2171 return rc;
2172}
2173
2174static void *dn_socket_seq_start(struct seq_file *seq, loff_t *pos)
2175{
2176 return *pos ? dn_socket_get_idx(seq, *pos - 1) : SEQ_START_TOKEN;
2177}
2178
2179static void *dn_socket_seq_next(struct seq_file *seq, void *v, loff_t *pos)
2180{
2181 void *rc;
2182
2183 if (v == SEQ_START_TOKEN) {
2184 rc = dn_socket_get_idx(seq, 0);
2185 goto out;
2186 }
2187
2188 rc = dn_socket_get_next(seq, v);
2189 if (rc)
2190 goto out;
2191 read_unlock_bh(&dn_hash_lock);
2192out:
2193 ++*pos;
2194 return rc;
2195}
2196
2197static void dn_socket_seq_stop(struct seq_file *seq, void *v)
2198{
2199 if (v && v != SEQ_START_TOKEN)
2200 read_unlock_bh(&dn_hash_lock);
2201}
2202
2203#define IS_NOT_PRINTABLE(x) ((x) < 32 || (x) > 126)
2204
2205static void dn_printable_object(struct sockaddr_dn *dn, unsigned char *buf)
2206{
2207 int i;
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09002208
Linus Torvalds1da177e2005-04-16 15:20:36 -07002209 switch (dn_ntohs(dn->sdn_objnamel)) {
2210 case 0:
2211 sprintf(buf, "%d", dn->sdn_objnum);
2212 break;
2213 default:
2214 for (i = 0; i < dn_ntohs(dn->sdn_objnamel); i++) {
2215 buf[i] = dn->sdn_objname[i];
2216 if (IS_NOT_PRINTABLE(buf[i]))
2217 buf[i] = '.';
2218 }
2219 buf[i] = 0;
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09002220 }
Linus Torvalds1da177e2005-04-16 15:20:36 -07002221}
2222
2223static char *dn_state2asc(unsigned char state)
2224{
2225 switch(state) {
2226 case DN_O:
2227 return "OPEN";
2228 case DN_CR:
2229 return " CR";
2230 case DN_DR:
2231 return " DR";
2232 case DN_DRC:
2233 return " DRC";
2234 case DN_CC:
2235 return " CC";
2236 case DN_CI:
2237 return " CI";
2238 case DN_NR:
2239 return " NR";
2240 case DN_NC:
2241 return " NC";
2242 case DN_CD:
2243 return " CD";
2244 case DN_RJ:
2245 return " RJ";
2246 case DN_RUN:
2247 return " RUN";
2248 case DN_DI:
2249 return " DI";
2250 case DN_DIC:
2251 return " DIC";
2252 case DN_DN:
2253 return " DN";
2254 case DN_CL:
2255 return " CL";
2256 case DN_CN:
2257 return " CN";
2258 }
2259
2260 return "????";
2261}
2262
2263static inline void dn_socket_format_entry(struct seq_file *seq, struct sock *sk)
2264{
2265 struct dn_scp *scp = DN_SK(sk);
2266 char buf1[DN_ASCBUF_LEN];
2267 char buf2[DN_ASCBUF_LEN];
2268 char local_object[DN_MAXOBJL+3];
2269 char remote_object[DN_MAXOBJL+3];
2270
2271 dn_printable_object(&scp->addr, local_object);
2272 dn_printable_object(&scp->peer, remote_object);
2273
2274 seq_printf(seq,
2275 "%6s/%04X %04d:%04d %04d:%04d %01d %-16s "
2276 "%6s/%04X %04d:%04d %04d:%04d %01d %-16s %4s %s\n",
2277 dn_addr2asc(dn_ntohs(dn_saddr2dn(&scp->addr)), buf1),
2278 scp->addrloc,
2279 scp->numdat,
2280 scp->numoth,
2281 scp->ackxmt_dat,
2282 scp->ackxmt_oth,
2283 scp->flowloc_sw,
2284 local_object,
2285 dn_addr2asc(dn_ntohs(dn_saddr2dn(&scp->peer)), buf2),
2286 scp->addrrem,
2287 scp->numdat_rcv,
2288 scp->numoth_rcv,
2289 scp->ackrcv_dat,
2290 scp->ackrcv_oth,
2291 scp->flowrem_sw,
2292 remote_object,
2293 dn_state2asc(scp->state),
2294 ((scp->accept_mode == ACC_IMMED) ? "IMMED" : "DEFER"));
2295}
2296
2297static int dn_socket_seq_show(struct seq_file *seq, void *v)
2298{
2299 if (v == SEQ_START_TOKEN) {
2300 seq_puts(seq, "Local Remote\n");
2301 } else {
2302 dn_socket_format_entry(seq, v);
2303 }
2304 return 0;
2305}
2306
Philippe De Muyter56b3d972007-07-10 23:07:31 -07002307static const struct seq_operations dn_socket_seq_ops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -07002308 .start = dn_socket_seq_start,
2309 .next = dn_socket_seq_next,
2310 .stop = dn_socket_seq_stop,
2311 .show = dn_socket_seq_show,
2312};
2313
2314static int dn_socket_seq_open(struct inode *inode, struct file *file)
2315{
2316 struct seq_file *seq;
2317 int rc = -ENOMEM;
2318 struct dn_iter_state *s = kmalloc(sizeof(*s), GFP_KERNEL);
2319
2320 if (!s)
2321 goto out;
2322
2323 rc = seq_open(file, &dn_socket_seq_ops);
2324 if (rc)
2325 goto out_kfree;
2326
2327 seq = file->private_data;
2328 seq->private = s;
2329 memset(s, 0, sizeof(*s));
2330out:
2331 return rc;
2332out_kfree:
2333 kfree(s);
2334 goto out;
2335}
2336
Arjan van de Ven9a321442007-02-12 00:55:35 -08002337static const struct file_operations dn_socket_seq_fops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -07002338 .owner = THIS_MODULE,
2339 .open = dn_socket_seq_open,
2340 .read = seq_read,
2341 .llseek = seq_lseek,
2342 .release = seq_release_private,
2343};
2344#endif
2345
2346static struct net_proto_family dn_family_ops = {
2347 .family = AF_DECnet,
2348 .create = dn_create,
2349 .owner = THIS_MODULE,
2350};
2351
Eric Dumazet90ddc4f2005-12-22 12:49:22 -08002352static const struct proto_ops dn_proto_ops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -07002353 .family = AF_DECnet,
2354 .owner = THIS_MODULE,
2355 .release = dn_release,
2356 .bind = dn_bind,
2357 .connect = dn_connect,
2358 .socketpair = sock_no_socketpair,
2359 .accept = dn_accept,
2360 .getname = dn_getname,
2361 .poll = dn_poll,
2362 .ioctl = dn_ioctl,
2363 .listen = dn_listen,
2364 .shutdown = dn_shutdown,
2365 .setsockopt = dn_setsockopt,
2366 .getsockopt = dn_getsockopt,
2367 .sendmsg = dn_sendmsg,
2368 .recvmsg = dn_recvmsg,
2369 .mmap = sock_no_mmap,
2370 .sendpage = sock_no_sendpage,
2371};
2372
2373void dn_register_sysctl(void);
2374void dn_unregister_sysctl(void);
2375
2376MODULE_DESCRIPTION("The Linux DECnet Network Protocol");
2377MODULE_AUTHOR("Linux DECnet Project Team");
2378MODULE_LICENSE("GPL");
2379MODULE_ALIAS_NETPROTO(PF_DECnet);
2380
2381static char banner[] __initdata = KERN_INFO "NET4: DECnet for Linux: V.2.5.68s (C) 1995-2003 Linux DECnet Project Team\n";
2382
2383static int __init decnet_init(void)
2384{
2385 int rc;
2386
YOSHIFUJI Hideaki429eb0f2007-02-09 23:24:40 +09002387 printk(banner);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002388
2389 rc = proto_register(&dn_proto, 1);
2390 if (rc != 0)
2391 goto out;
2392
2393 dn_neigh_init();
2394 dn_dev_init();
2395 dn_route_init();
2396 dn_fib_init();
2397
2398 sock_register(&dn_family_ops);
2399 dev_add_pack(&dn_dix_packet_type);
2400 register_netdevice_notifier(&dn_dev_notifier);
2401
2402 proc_net_fops_create("decnet", S_IRUGO, &dn_socket_seq_fops);
2403 dn_register_sysctl();
2404out:
2405 return rc;
2406
2407}
2408module_init(decnet_init);
2409
2410/*
2411 * Prevent DECnet module unloading until its fixed properly.
2412 * Requires an audit of the code to check for memory leaks and
2413 * initialisation problems etc.
2414 */
2415#if 0
2416static void __exit decnet_exit(void)
2417{
2418 sock_unregister(AF_DECnet);
Thomas Graffa34ddd2007-03-22 11:57:46 -07002419 rtnl_unregister_all(PF_DECnet);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002420 dev_remove_pack(&dn_dix_packet_type);
2421
2422 dn_unregister_sysctl();
2423
2424 unregister_netdevice_notifier(&dn_dev_notifier);
2425
2426 dn_route_cleanup();
2427 dn_dev_cleanup();
2428 dn_neigh_cleanup();
2429 dn_fib_cleanup();
2430
2431 proc_net_remove("decnet");
2432
2433 proto_unregister(&dn_proto);
2434}
2435module_exit(decnet_exit);
2436#endif