svc.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:12k
源码类别:

Linux/Unix编程

开发平台:

Unix_Linux

  1. /* net/atm/svc.c - ATM SVC sockets */
  2. /* Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA */
  3. #include <linux/string.h>
  4. #include <linux/net.h> /* struct socket, struct net_proto,
  5.    struct proto_ops */
  6. #include <linux/errno.h> /* error codes */
  7. #include <linux/kernel.h> /* printk */
  8. #include <linux/skbuff.h>
  9. #include <linux/wait.h>
  10. #include <linux/sched.h> /* jiffies and HZ */
  11. #include <linux/fcntl.h> /* O_NONBLOCK */
  12. #include <linux/init.h>
  13. #include <linux/atm.h> /* ATM stuff */
  14. #include <linux/atmsap.h>
  15. #include <linux/atmsvc.h>
  16. #include <linux/atmdev.h>
  17. #include <linux/bitops.h>
  18. #include <net/sock.h> /* for sock_no_* */
  19. #include <asm/uaccess.h>
  20. #include "resources.h"
  21. #include "common.h" /* common for PVCs and SVCs */
  22. #include "signaling.h"
  23. #include "addr.h"
  24. #if 0
  25. #define DPRINTK(format,args...) printk(KERN_DEBUG format,##args)
  26. #else
  27. #define DPRINTK(format,args...)
  28. #endif
  29. static int svc_create(struct socket *sock,int protocol);
  30. /*
  31.  * Note: since all this is still nicely synchronized with the signaling demon,
  32.  *       there's no need to protect sleep loops with clis. If signaling is
  33.  *       moved into the kernel, that would change.
  34.  */
  35. void svc_callback(struct atm_vcc *vcc)
  36. {
  37. wake_up(&vcc->sleep);
  38. }
  39. static int svc_shutdown(struct socket *sock,int how)
  40. {
  41. return 0;
  42. }
  43. static void svc_disconnect(struct atm_vcc *vcc)
  44. {
  45. DECLARE_WAITQUEUE(wait,current);
  46. struct sk_buff *skb;
  47. DPRINTK("svc_disconnect %pn",vcc);
  48. if (test_bit(ATM_VF_REGIS,&vcc->flags)) {
  49. sigd_enq(vcc,as_close,NULL,NULL,NULL);
  50. add_wait_queue(&vcc->sleep,&wait);
  51. while (!test_bit(ATM_VF_RELEASED,&vcc->flags) && sigd) {
  52. set_current_state(TASK_UNINTERRUPTIBLE);
  53. schedule();
  54. }
  55. remove_wait_queue(&vcc->sleep,&wait);
  56. }
  57. /* beware - socket is still in use by atmsigd until the last
  58.    as_indicate has been answered */
  59. while ((skb = skb_dequeue(&vcc->listenq))) {
  60. DPRINTK("LISTEN RELn");
  61. sigd_enq2(NULL,as_reject,vcc,NULL,NULL,&vcc->qos,0);
  62. dev_kfree_skb(skb);
  63. }
  64. clear_bit(ATM_VF_REGIS,&vcc->flags);
  65. clear_bit(ATM_VF_RELEASED,&vcc->flags);
  66. clear_bit(ATM_VF_CLOSE,&vcc->flags);
  67. /* ... may retry later */
  68. }
  69. static int svc_release(struct socket *sock)
  70. {
  71. struct atm_vcc *vcc;
  72. if (!sock->sk) return 0;
  73. vcc = ATM_SD(sock);
  74. DPRINTK("svc_release %pn",vcc);
  75. clear_bit(ATM_VF_READY,&vcc->flags);
  76. atm_release_vcc_sk(sock->sk,0);
  77. svc_disconnect(vcc);
  78.     /* VCC pointer is used as a reference, so we must not free it
  79.        (thereby subjecting it to re-use) before all pending connections
  80.         are closed */
  81. free_atm_vcc_sk(sock->sk);
  82. return 0;
  83. }
  84. static int svc_bind(struct socket *sock,struct sockaddr *sockaddr,
  85.     int sockaddr_len)
  86. {
  87. DECLARE_WAITQUEUE(wait,current);
  88. struct sockaddr_atmsvc *addr;
  89. struct atm_vcc *vcc;
  90. if (sockaddr_len != sizeof(struct sockaddr_atmsvc)) return -EINVAL;
  91. if (sock->state == SS_CONNECTED) return -EISCONN;
  92. if (sock->state != SS_UNCONNECTED) return -EINVAL;
  93. vcc = ATM_SD(sock);
  94. if (test_bit(ATM_VF_SESSION,&vcc->flags)) return -EINVAL;
  95. addr = (struct sockaddr_atmsvc *) sockaddr;
  96. if (addr->sas_family != AF_ATMSVC) return -EAFNOSUPPORT;
  97. clear_bit(ATM_VF_BOUND,&vcc->flags);
  98.     /* failing rebind will kill old binding */
  99. /* @@@ check memory (de)allocation on rebind */
  100. if (!test_bit(ATM_VF_HASQOS,&vcc->flags)) return -EBADFD;
  101. vcc->local = *addr;
  102. vcc->reply = WAITING;
  103. sigd_enq(vcc,as_bind,NULL,NULL,&vcc->local);
  104. add_wait_queue(&vcc->sleep,&wait);
  105. while (vcc->reply == WAITING && sigd) {
  106. set_current_state(TASK_UNINTERRUPTIBLE);
  107. schedule();
  108. }
  109. remove_wait_queue(&vcc->sleep,&wait);
  110. clear_bit(ATM_VF_REGIS,&vcc->flags); /* doesn't count */
  111. if (!sigd) return -EUNATCH;
  112.         if (!vcc->reply) set_bit(ATM_VF_BOUND,&vcc->flags);
  113. return vcc->reply;
  114. }
  115. static int svc_connect(struct socket *sock,struct sockaddr *sockaddr,
  116.     int sockaddr_len,int flags)
  117. {
  118. DECLARE_WAITQUEUE(wait,current);
  119. struct sockaddr_atmsvc *addr;
  120. struct atm_vcc *vcc = ATM_SD(sock);
  121. int error;
  122. DPRINTK("svc_connect %pn",vcc);
  123. if (sockaddr_len != sizeof(struct sockaddr_atmsvc)) return -EINVAL;
  124. if (sock->state == SS_CONNECTED) return -EISCONN;
  125. if (sock->state == SS_CONNECTING) {
  126. if (vcc->reply == WAITING) return -EALREADY;
  127. sock->state = SS_UNCONNECTED;
  128. if (vcc->reply) return vcc->reply;
  129. }
  130. else {
  131. int error;
  132. if (sock->state != SS_UNCONNECTED) return -EINVAL;
  133. if (test_bit(ATM_VF_SESSION,&vcc->flags)) return -EINVAL;
  134. addr = (struct sockaddr_atmsvc *) sockaddr;
  135. if (addr->sas_family != AF_ATMSVC) return -EAFNOSUPPORT;
  136. if (!test_bit(ATM_VF_HASQOS,&vcc->flags)) return -EBADFD;
  137. if (vcc->qos.txtp.traffic_class == ATM_ANYCLASS ||
  138.     vcc->qos.rxtp.traffic_class == ATM_ANYCLASS)
  139. return -EINVAL;
  140. if (!vcc->qos.txtp.traffic_class &&
  141.     !vcc->qos.rxtp.traffic_class) return -EINVAL;
  142. vcc->remote = *addr;
  143. vcc->reply = WAITING;
  144. sigd_enq(vcc,as_connect,NULL,NULL,&vcc->remote);
  145. if (flags & O_NONBLOCK) {
  146. sock->state = SS_CONNECTING;
  147. return -EINPROGRESS;
  148. }
  149. add_wait_queue(&vcc->sleep,&wait);
  150. error = 0;
  151. while (vcc->reply == WAITING && sigd) {
  152. set_current_state(TASK_INTERRUPTIBLE);
  153. schedule();
  154. if (!signal_pending(current)) continue;
  155. DPRINTK("*ABORT*n");
  156. /*
  157.  * This is tricky:
  158.  *   Kernel ---close--> Demon
  159.  *   Kernel <--close--- Demon
  160.          * or
  161.  *   Kernel ---close--> Demon
  162.  *   Kernel <--error--- Demon
  163.  * or
  164.  *   Kernel ---close--> Demon
  165.  *   Kernel <--okay---- Demon
  166.  *   Kernel <--close--- Demon
  167.  */
  168. sigd_enq(vcc,as_close,NULL,NULL,NULL);
  169. while (vcc->reply == WAITING && sigd) {
  170. set_current_state(TASK_UNINTERRUPTIBLE);
  171. schedule();
  172. }
  173. if (!vcc->reply)
  174. while (!test_bit(ATM_VF_RELEASED,&vcc->flags)
  175.     && sigd) {
  176. set_current_state(TASK_UNINTERRUPTIBLE);
  177. schedule();
  178. }
  179. clear_bit(ATM_VF_REGIS,&vcc->flags);
  180. clear_bit(ATM_VF_RELEASED,&vcc->flags);
  181. clear_bit(ATM_VF_CLOSE,&vcc->flags);
  182.     /* we're gone now but may connect later */
  183. error = -EINTR;
  184. break;
  185. }
  186. remove_wait_queue(&vcc->sleep,&wait);
  187. if (error) return error;
  188. if (!sigd) return -EUNATCH;
  189. if (vcc->reply) return vcc->reply;
  190. }
  191. /*
  192.  * Not supported yet
  193.  *
  194.  * #ifndef CONFIG_SINGLE_SIGITF
  195.  */
  196. vcc->qos.txtp.max_pcr = SELECT_TOP_PCR(vcc->qos.txtp);
  197. vcc->qos.txtp.pcr = 0;
  198. vcc->qos.txtp.min_pcr = 0;
  199. /*
  200.  * #endif
  201.  */
  202. if (!(error = atm_connect(sock,vcc->itf,vcc->vpi,vcc->vci)))
  203. sock->state = SS_CONNECTED;
  204. else (void) svc_disconnect(vcc);
  205. return error;
  206. }
  207. static int svc_listen(struct socket *sock,int backlog)
  208. {
  209. DECLARE_WAITQUEUE(wait,current);
  210. struct atm_vcc *vcc = ATM_SD(sock);
  211. DPRINTK("svc_listen %pn",vcc);
  212. /* let server handle listen on unbound sockets */
  213. if (test_bit(ATM_VF_SESSION,&vcc->flags)) return -EINVAL;
  214. vcc->reply = WAITING;
  215. sigd_enq(vcc,as_listen,NULL,NULL,&vcc->local);
  216. add_wait_queue(&vcc->sleep,&wait);
  217. while (vcc->reply == WAITING && sigd) {
  218. set_current_state(TASK_UNINTERRUPTIBLE);
  219. schedule();
  220. }
  221. remove_wait_queue(&vcc->sleep,&wait);
  222. if (!sigd) return -EUNATCH;
  223. set_bit(ATM_VF_LISTEN,&vcc->flags);
  224. vcc->backlog_quota = backlog > 0 ? backlog : ATM_BACKLOG_DEFAULT;
  225. return vcc->reply;
  226. }
  227. static int svc_accept(struct socket *sock,struct socket *newsock,int flags)
  228. {
  229. struct sk_buff *skb;
  230. struct atmsvc_msg *msg;
  231. struct atm_vcc *old_vcc = ATM_SD(sock);
  232. struct atm_vcc *new_vcc;
  233. int error;
  234. error = svc_create(newsock,0);
  235. if (error)
  236. return error;
  237. new_vcc = ATM_SD(newsock);
  238. DPRINTK("svc_accept %p -> %pn",old_vcc,new_vcc);
  239. while (1) {
  240. DECLARE_WAITQUEUE(wait,current);
  241. add_wait_queue(&old_vcc->sleep,&wait);
  242. while (!(skb = skb_dequeue(&old_vcc->listenq)) && sigd) {
  243. if (test_bit(ATM_VF_RELEASED,&old_vcc->flags)) break;
  244. if (test_bit(ATM_VF_CLOSE,&old_vcc->flags)) {
  245. error = old_vcc->reply;
  246. break;
  247. }
  248. if (flags & O_NONBLOCK) {
  249. error = -EAGAIN;
  250. break;
  251. }
  252. set_current_state(TASK_INTERRUPTIBLE);
  253. schedule();
  254. if (signal_pending(current)) {
  255. error = -ERESTARTSYS;
  256. break;
  257. }
  258. }
  259. remove_wait_queue(&old_vcc->sleep,&wait);
  260. if (error) return error;
  261. if (!skb) return -EUNATCH;
  262. msg = (struct atmsvc_msg *) skb->data;
  263. new_vcc->qos = msg->qos;
  264. set_bit(ATM_VF_HASQOS,&new_vcc->flags);
  265. new_vcc->remote = msg->svc;
  266. new_vcc->local = msg->local;
  267. new_vcc->sap = msg->sap;
  268. error = atm_connect(newsock,msg->pvc.sap_addr.itf,
  269.     msg->pvc.sap_addr.vpi,msg->pvc.sap_addr.vci);
  270. dev_kfree_skb(skb);
  271. old_vcc->backlog_quota++;
  272. if (error) {
  273. sigd_enq2(NULL,as_reject,old_vcc,NULL,NULL,
  274.     &old_vcc->qos,error);
  275. return error == -EAGAIN ? -EBUSY : error;
  276. }
  277. /* wait should be short, so we ignore the non-blocking flag */
  278. new_vcc->reply = WAITING;
  279. sigd_enq(new_vcc,as_accept,old_vcc,NULL,NULL);
  280. add_wait_queue(&new_vcc->sleep,&wait);
  281. while (new_vcc->reply == WAITING && sigd) {
  282. set_current_state(TASK_UNINTERRUPTIBLE);
  283. schedule();
  284. }
  285. remove_wait_queue(&new_vcc->sleep,&wait);
  286. if (!sigd) return -EUNATCH;
  287. if (!new_vcc->reply) break;
  288. if (new_vcc->reply != -ERESTARTSYS) return new_vcc->reply;
  289. }
  290. newsock->state = SS_CONNECTED;
  291. return 0;
  292. }
  293. static int svc_getname(struct socket *sock,struct sockaddr *sockaddr,
  294.     int *sockaddr_len,int peer)
  295. {
  296. struct sockaddr_atmsvc *addr;
  297. *sockaddr_len = sizeof(struct sockaddr_atmsvc);
  298. addr = (struct sockaddr_atmsvc *) sockaddr;
  299. memcpy(addr,peer ? &ATM_SD(sock)->remote : &ATM_SD(sock)->local,
  300.     sizeof(struct sockaddr_atmsvc));
  301. return 0;
  302. }
  303. int svc_change_qos(struct atm_vcc *vcc,struct atm_qos *qos)
  304. {
  305. DECLARE_WAITQUEUE(wait,current);
  306. vcc->reply = WAITING;
  307. sigd_enq2(vcc,as_modify,NULL,NULL,&vcc->local,qos,0);
  308. add_wait_queue(&vcc->sleep,&wait);
  309. while (vcc->reply == WAITING && !test_bit(ATM_VF_RELEASED,&vcc->flags)
  310.     && sigd) {
  311. set_current_state(TASK_UNINTERRUPTIBLE);
  312. schedule();
  313. }
  314. remove_wait_queue(&vcc->sleep,&wait);
  315. if (!sigd) return -EUNATCH;
  316. return vcc->reply;
  317. }
  318. static int svc_setsockopt(struct socket *sock,int level,int optname,
  319.     char *optval,int optlen)
  320. {
  321. struct atm_vcc *vcc;
  322. if (!__SO_LEVEL_MATCH(optname, level) || optname != SO_ATMSAP ||
  323.     optlen != sizeof(struct atm_sap))
  324. return atm_setsockopt(sock,level,optname,optval,optlen);
  325. vcc = ATM_SD(sock);
  326. if (copy_from_user(&vcc->sap,optval,optlen)) return -EFAULT;
  327. set_bit(ATM_VF_HASSAP,&vcc->flags);
  328. return 0;
  329. }
  330. static int svc_getsockopt(struct socket *sock,int level,int optname,
  331.     char *optval,int *optlen)
  332. {
  333. int len;
  334. if (!__SO_LEVEL_MATCH(optname, level) || optname != SO_ATMSAP)
  335. return atm_getsockopt(sock,level,optname,optval,optlen);
  336. if (get_user(len,optlen)) return -EFAULT;
  337. if (len != sizeof(struct atm_sap)) return -EINVAL;
  338. return copy_to_user(optval,&ATM_SD(sock)->sap,sizeof(struct atm_sap)) ?
  339.     -EFAULT : 0;
  340. }
  341. static struct proto_ops SOCKOPS_WRAPPED(svc_proto_ops) = {
  342. family: PF_ATMSVC,
  343. release: svc_release,
  344. bind: svc_bind,
  345. connect: svc_connect,
  346. socketpair: sock_no_socketpair,
  347. accept: svc_accept,
  348. getname: svc_getname,
  349. poll: atm_poll,
  350. ioctl: atm_ioctl,
  351. listen: svc_listen,
  352. shutdown: svc_shutdown,
  353. setsockopt: svc_setsockopt,
  354. getsockopt: svc_getsockopt,
  355. sendmsg: atm_sendmsg,
  356. recvmsg: atm_recvmsg,
  357. mmap: sock_no_mmap,
  358. sendpage: sock_no_sendpage,
  359. };
  360. #include <linux/smp_lock.h>
  361. SOCKOPS_WRAP(svc_proto, PF_ATMSVC);
  362. static int svc_create(struct socket *sock,int protocol)
  363. {
  364. int error;
  365. sock->ops = &svc_proto_ops;
  366. error = atm_create(sock,protocol,AF_ATMSVC);
  367. if (error) return error;
  368. ATM_SD(sock)->callback = svc_callback;
  369. ATM_SD(sock)->local.sas_family = AF_ATMSVC;
  370. ATM_SD(sock)->remote.sas_family = AF_ATMSVC;
  371. return 0;
  372. }
  373. static struct net_proto_family svc_family_ops = {
  374. PF_ATMSVC,
  375. svc_create,
  376. 0, /* no authentication */
  377. 0, /* no encryption */
  378. 0 /* no encrypt_net */
  379. };
  380. /*
  381.  * Initialize the ATM SVC protocol family
  382.  */
  383. static int __init atmsvc_init(void)
  384. {
  385. if (sock_register(&svc_family_ops) < 0) {
  386. printk(KERN_ERR "ATMSVC: can't register");
  387. return -1;
  388. }
  389. return 0;
  390. }
  391. module_init(atmsvc_init);