source: asp3_tinet_ecnl_arm/trunk/ntshell/src/socket_stub.c@ 374

Last change on this file since 374 was 374, checked in by coas-nagasima, 5 years ago

mbed関連を更新
シリアルドライバをmbedのHALを使うよう変更
ファイルディスクリプタの処理を更新
  • Property svn:eol-style set to native
  • Property svn:mime-type set to text/x-csrc;charset=UTF-8
File size: 30.7 KB
Line 
1/*
2 * TOPPERS ECHONET Lite Communication Middleware
3 *
4 * Copyright (C) 2017 Cores Co., Ltd. Japan
5 *
6 * 上記著作権者は，以下の(1)～(4)の条件を満たす場合に限り，本ソフトウェ
7 * ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
8 * 変・再配布（以下，利用と呼ぶ）することを無償で許諾する．
9 * (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
10 * 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
11 * スコード中に含まれていること．
12 * (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
13 * 用できる形で再配布する場合には，再配布に伴うドキュメント（利用
14 * 者マニュアルなど）に，上記の著作権表示，この利用条件および下記
15 * の無保証規定を掲載すること．
16 * (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
17 * 用できない形で再配布する場合には，次のいずれかの条件を満たすこ
18 * と．
19 * (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
20 * 作権表示，この利用条件および下記の無保証規定を掲載すること．
21 * (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
22 * 報告すること．
23 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
24 * 害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
25 * また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
26 * 由に基づく請求からも，上記著作権者およびTOPPERSプロジェクトを
27 * 免責すること．
28 *
29 * 本ソフトウェアは，無保証で提供されているものである．上記著作権者お
30 * よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
31 * に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
32 * アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
33 * の責任を負わない．
34 *
35 * @(#) $Id$
36 */
37#include "shellif.h"
38#include <kernel.h>
39#include <t_syslog.h>
40#include <t_stdlib.h>
41#include <string.h>
42#include <sil.h>
43#include "syssvc/syslog.h"
44#include <tinet_defs.h>
45#include <tinet_config.h>
46#include <net/net.h>
47#include <net/net_endian.h>
48#include <netinet/in.h>
49#include <netinet/in_itron.h>
50#include <tinet_nic_defs.h>
51#include <tinet_cfg.h>
52#include <netinet/in_var.h>
53#include <net/ethernet.h>
54#include <net/if6_var.h>
55#include <net/net.h>
56#include <net/if_var.h>
57#include <netinet/udp_var.h>
58#include <net/net_buf.h>
59#include <netinet/udp.h>
60#include <netinet/udp_var.h>
61#include <netinet/tcp.h>
62#include <netinet/tcp_var.h>
63#include <netapp/resolver.h>
64extern const ID tmax_tcp_cepid;
65#include "ff.h"
66#include "socket_stub.h"
67#include "kernel_cfg.h"
68
69#ifdef _DEBUG
70static const char THIS_FILE[] = __FILE__;
71#endif
72
73#define SOCKET_TIMEOUT 2000000
74
75static int tcp_fd_close(struct SHELL_FILE *fp);
76static size_t tcp_fd_read(struct SHELL_FILE *fp, unsigned char *data, size_t len);
77static size_t tcp_fd_write(struct SHELL_FILE *fp, const unsigned char *data, size_t len);
78static off_t tcp_fd_seek(struct SHELL_FILE *fp, off_t ofs, int org);
79static int tcp_fd_ioctl(struct SHELL_FILE *fp, int req, void *arg);
80static bool_t tcp_fd_readable(struct SHELL_FILE *fp);
81static void tcp_fd_delete(struct SHELL_FILE *fp);
82
83static int udp_fd_close(struct SHELL_FILE *fp);
84static size_t udp_fd_read(struct SHELL_FILE *fp, unsigned char *data, size_t len);
85static size_t udp_fd_write(struct SHELL_FILE *fp, const unsigned char *data, size_t len);
86static off_t udp_fd_seek(struct SHELL_FILE *fp, off_t ofs, int org);
87static int udp_fd_ioctl(struct SHELL_FILE *fp, int req, void *arg);
88static bool_t udp_fd_readable(struct SHELL_FILE *fp);
89static void udp_fd_delete(struct SHELL_FILE *fp);
90
91IO_TYPE IO_TYPE_TCP = { tcp_fd_close, tcp_fd_read, tcp_fd_write, tcp_fd_seek, tcp_fd_ioctl, tcp_fd_readable, tcp_fd_delete };
92IO_TYPE IO_TYPE_UDP = { udp_fd_close, udp_fd_read, udp_fd_write, udp_fd_seek, udp_fd_ioctl, udp_fd_readable, udp_fd_delete };
93
94typedef struct id_table_t {
95 int used;
96 ID id;
97} id_table_t;
98
99id_table_t tcp_repid_table[] = {
100 {0, USR_TCP_REP1}, {0, USR_TCP_REP2}, {0, USR_TCP_REP3}, {0, USR_TCP_REP4}
101};
102#define tcp_repid_table_count (sizeof(tcp_repid_table) / sizeof(tcp_repid_table[0]))
103
104id_table_t tcp_cepid_table[] = {
105 {0, USR_TCP_CEP1}, {0, USR_TCP_CEP2}, {0, USR_TCP_CEP3}, {0, USR_TCP_CEP4},
106#ifndef TOPPERS_GRSAKURA
107 {0, USR_TCP_CEP5}, {0, USR_TCP_CEP6}, {0, USR_TCP_CEP7}, {0, USR_TCP_CEP8}
108#endif
109};
110#define tcp_cepid_table_count (sizeof(tcp_cepid_table) / sizeof(tcp_cepid_table[0]))
111
112id_table_t udp_cepid_table[] = {
113 {0, USR_UDP_CEP1}, {0, USR_UDP_CEP2}, {0, USR_UDP_CEP3}, {0, USR_UDP_CEP4}
114};
115#define udp_cepid_table_count (sizeof(udp_cepid_table) / sizeof(udp_cepid_table[0]))
116
117ID new_id(id_table_t *table, int count)
118{
119 for (int i = 0; i < count; i++) {
120 id_table_t *item = &table[i];
121 if (item->used != 0)
122 continue;
123
124 item->used = 1;
125 return item->id;
126}
127
128 return -ENOMEM;
129}
130
131int delete_id(id_table_t *table, int count, ID id)
132{
133 for (int i = 0; i < count; i++) {
134 id_table_t *item = &table[i];
135 if ((item->used == 0) || (item->id != id))
136 continue;
137
138 item->used = 0;
139 return 0;
140 }
141 return -EINVAL;
142}
143
144typedef struct SHELL_FILE SOCKET;
145
146int shell_socket(int family, int type, int protocol)
147{
148 SOCKET *fp;
149 unsigned int flags;
150
151 switch (family) {
152 case AF_INET:
153 case AF_INET6:
154 break;
155 default:
156 return -EAFNOSUPPORT;
157 }
158
159 flags = type & (SOCK_CLOEXEC|SOCK_NONBLOCK);
160 type &= ~flags;
161
162 switch (type) {
163 case SOCK_STREAM:
164 fp = new_fp(&IO_TYPE_TCP, 0, 0);
165 if (fp == NULL)
166 return -ENOMEM;
167
168 fp->exinf = malloc(sizeof(socket_t));
169 memset(fp->exinf, 0, sizeof(socket_t));
170 break;
171 case SOCK_DGRAM:
172 fp = new_fp(&IO_TYPE_UDP, 0, 1);
173 if (fp == NULL)
174 return -ENOMEM;
175
176 fp->exinf = malloc(sizeof(socket_t));
177 memset(fp->exinf, 0, sizeof(socket_t));
178 break;
179 default:
180 return -ENOPROTOOPT;
181 }
182
183 socket_t *socket = (socket_t *)fp->exinf;
184 socket->family = family;
185 socket->type = type;
186 socket->protocol = protocol;
187 socket->flags = flags;
188
189 return fp->fd;
190}
191
192int shell_bind(int fd, const struct sockaddr *addr, socklen_t len)
193{
194 SOCKET *fp = fd_to_fp(fd);
195 if (fp == NULL)
196 return -EBADF;
197 socket_t *socket = (socket_t *)fp->exinf;
198 if (socket->family != addr->sa_family)
199 return -EINVAL;
200
201 ER ret;
202 switch (addr->sa_family) {
203 case AF_INET: {
204 if (len < 8) {
205 return -EINVAL;
206 }
207 struct sockaddr_in *addr_in = (struct sockaddr_in *)addr;
208 memcpy(&socket->laddr4, addr, len);
209 switch (socket->type) {
210 case SOCK_STREAM: {
211 ID cepid = new_id(tcp_cepid_table, tcp_cepid_table_count);
212 if (cepid < 0)
213 return -ENOMEM;
214
215 socket->buf_size = 512 + 512;
216 socket->buf = malloc(socket->buf_size);
217#ifdef _DEBUG
218 memset(socket->buf, 0, socket->buf_size);
219#endif
220 T_TCP_CCEP ccep = { 0, socket->buf, 512, &socket->buf[512], 512, (FP)socket_tcp_callback };
221 ret = tcp_cre_cep(cepid, &ccep);
222 if (ret != E_OK) {
223 delete_id(tcp_cepid_table, tcp_cepid_table_count, cepid);
224 return -ENOMEM;
225 }
226 fp->handle = cepid;
227 socket->cepid = cepid;
228 break;
229 }
230 case SOCK_DGRAM: {
231 ID cepid = new_id(udp_cepid_table, udp_cepid_table_count);
232 if (cepid < 0)
233 return -ENOMEM;
234
235 T_UDP_CCEP ccep = { 0, {ntohl(addr_in->sin_addr.s_addr), ntohs(addr_in->sin_port)}, (FP)socket_udp_callback };
236 ret = udp_cre_cep(cepid, &ccep);
237 if (ret != E_OK) {
238 delete_id(udp_cepid_table, udp_cepid_table_count, cepid);
239 return -ENOMEM;
240 }
241 fp->handle = cepid;
242 socket->cepid = cepid;
243 break;
244 }
245 default:
246 return -ENOPROTOOPT;
247 }
248 break;
249 }
250 case AF_INET6: {
251 if (len < 20) {
252 return -EINVAL;
253 }
254 memcpy(&socket->laddr4, addr, len);
255 break;
256 }
257 }
258
259 return 0;
260}
261
262int shell_listen(int fd, int backlog)
263{
264 SOCKET *fp = fd_to_fp(fd);
265 if (fp == NULL)
266 return -EBADF;
267 socket_t *socket = (socket_t *)fp->exinf;
268 if (socket->type != SOCK_STREAM)
269 return -EINVAL;
270
271 socket->backlog = backlog;
272
273 ER ret;
274 switch (socket->family) {
275 case AF_INET: {
276 ID repid = new_id(tcp_repid_table, tcp_repid_table_count);
277 if (repid < 0)
278 return -ENOMEM;
279
280 struct sockaddr_in *laddr = &socket->laddr4;
281 T_TCP_CREP crep = { 0, {ntohl(laddr->sin_addr.s_addr), ntohs(laddr->sin_port)} };
282 ret = tcp_cre_rep(repid, &crep);
283 if (ret != E_OK) {
284 delete_id(tcp_repid_table, tcp_repid_table_count, repid);
285 return -ENOMEM;
286 }
287 socket->repid = repid;
288 break;
289 }
290 case AF_INET6: {
291 break;
292 }
293 }
294
295 return 0;
296}
297
298int shell_connect(int fd, const struct sockaddr *addr, socklen_t len)
299{
300 SOCKET *fp = fd_to_fp(fd);
301 if (fp == NULL)
302 return -EBADF;
303 socket_t *socket = (socket_t *)fp->exinf;
304 if (socket->type != SOCK_STREAM)
305 return -EINVAL;
306
307 ER ret;
308 switch (socket->family) {
309 case AF_INET: {
310 if (len < 8) {
311 return -EINVAL;
312 }
313 if (socket->cepid == 0) {
314 ID cepid = new_id(tcp_cepid_table, tcp_cepid_table_count);
315 if (cepid < 0)
316 return -ENOMEM;
317
318 socket->buf_size = 512 + 512;
319 socket->buf = malloc(socket->buf_size);
320#ifdef _DEBUG
321 memset(socket->buf, 0, socket->buf_size);
322#endif
323 T_TCP_CCEP ccep = { 0, socket->buf, 512, &socket->buf[512], 512, (FP)socket_tcp_callback };
324 ret = tcp_cre_cep(cepid, &ccep);
325 if (ret != E_OK) {
326 delete_id(tcp_cepid_table, tcp_cepid_table_count, cepid);
327 return -ENOMEM;
328 }
329 fp->handle = cepid;
330 socket->cepid = cepid;
331 }
332 struct sockaddr_in *laddr = &socket->laddr4;
333 struct sockaddr_in *raddr = &socket->raddr4;
334 memset(raddr, 0, sizeof(*raddr));
335 memcpy(raddr, addr, len);
336 T_IPV4EP lep = { ntohl(laddr->sin_addr.s_addr), ntohs(laddr->sin_port) };
337 T_IPV4EP rep = { ntohl(raddr->sin_addr.s_addr), ntohs(raddr->sin_port) };
338 ret = tcp_con_cep(socket->cepid, &lep, &rep, SOCKET_TIMEOUT);
339 if (ret < 0) {
340 return -EHOSTUNREACH;
341 }
342 break;
343 }
344 case AF_INET6: {
345 break;
346 }
347 }
348
349 return 0;
350}
351
352int shell_accept(int fd, struct sockaddr *__restrict addr, socklen_t *__restrict len)
353{
354 SOCKET *lfp = fd_to_fp(fd);
355 if (lfp == NULL)
356 return -EBADF;
357 if (((socket_t *)lfp->exinf)->type != SOCK_STREAM)
358 return -EINVAL;
359
360 SOCKET *fp = new_fp(&IO_TYPE_TCP, 0, 0);
361 if (fp == NULL)
362 return -ENOMEM;
363
364 fp->exinf = malloc(sizeof(socket_t));
365 memset(fp->exinf, 0, sizeof(socket_t));
366
367 memcpy(fp->exinf, lfp->exinf, offsetof(socket_t, buf_size));
368
369 ER ret;
370 socket_t *socket = (socket_t *)fp->exinf;
371 switch (socket->family) {
372 case AF_INET: {
373 ID cepid;
374 if (socket->cepid == 0) {
375 cepid = new_id(tcp_cepid_table, tcp_cepid_table_count);
376 if (cepid < 0)
377 return -ENOMEM;
378
379 socket->buf_size = 512 + 512;
380 socket->buf = malloc(socket->buf_size);
381#ifdef _DEBUG
382 memset(socket->buf, 0, socket->buf_size);
383#endif
384 T_TCP_CCEP ccep = { 0, socket->buf, 512, &socket->buf[512], 512, (FP)socket_tcp_callback };
385 ret = tcp_cre_cep(cepid, &ccep);
386 if (ret != E_OK) {
387 delete_id(tcp_cepid_table, tcp_cepid_table_count, cepid);
388 return -ENOMEM;
389 }
390 fp->handle = cepid;
391 socket->cepid = cepid;
392 }
393 else {
394 cepid = ((socket_t *)lfp->exinf)->cepid;
395 fp->handle = cepid;
396 lfp->handle = tmax_tcp_cepid + ((socket_t *)lfp->exinf)->repid;
397 ((socket_t *)lfp->exinf)->cepid = 0;
398 ((socket_t *)lfp->exinf)->buf_size = 0;
399 ((socket_t *)lfp->exinf)->buf = 0;
400 }
401 T_IPV4EP rep = { 0, 0 };
402 ret = tcp_acp_cep(socket->cepid, socket->repid, &rep, TMO_FEVR);
403 if (ret < 0) {
404 return -ENOMEM;
405 }
406 struct sockaddr_in *raddr = &socket->raddr4;
407 memset(raddr, 0, sizeof(*raddr));
408 raddr->sin_family = AF_INET;
409 raddr->sin_port = htons(rep.portno);
410 raddr->sin_addr.s_addr = htonl(rep.ipaddr);
411 break;
412 }
413 case AF_INET6: {
414 return -EAFNOSUPPORT;
415 }
416 }
417
418 if (addr != NULL && len != NULL) {
419 int sz = *len;
420 if (sz < 8) {
421 return -EINVAL;
422 }
423 struct sockaddr_in *raddr = &socket->raddr4;
424 if (sz > sizeof(*raddr))
425 sz = sizeof(*raddr);
426 memcpy(addr, raddr, sz);
427 *len = sizeof(*raddr);
428 }
429
430 return fp->fd;
431}
432
433ssize_t shell_sendto(int fd, const void *buf, size_t len, int flags, const struct sockaddr *addr, socklen_t alen)
434{
435 SOCKET *fp = fd_to_fp(fd);
436 if (fp == NULL) {
437 return -EBADF;
438 }
439
440 int ret = 0;
441 socket_t *socket = (socket_t *)fp->exinf;
442 switch (socket->family) {
443 case AF_INET: {
444 switch (socket->type) {
445 case SOCK_STREAM: {
446 if ((addr != NULL) || (alen != 0)) {
447 return -EISCONN;
448 }
449
450 if (flags & MSG_OOB) {
451 ret = tcp_snd_oob(socket->cepid, (void *)buf, len, SOCKET_TIMEOUT);
452 if (ret < 0) {
453 return -ECOMM;
454 }
455 }
456 else {
457 for (;;) {
458 ret = tcp_snd_dat(socket->cepid, (void *)buf, len, SOCKET_TIMEOUT);
459 if (ret < 0) {
460 if (ret == E_TMOUT)
461 return -ETIME;
462 return -ECOMM;
463 }
464 len -= ret;
465 if (len <= 0)
466 break;
467 buf = (const void *)&((uint8_t *)buf)[ret];
468 }
469 }
470 break;
471 }
472 case SOCK_DGRAM: {
473 int sz = alen;
474 if ((addr == NULL) || (sz < 8)) {
475 return -EINVAL;
476 }
477 struct sockaddr_in *raddr = &socket->raddr4;
478 memset(raddr, 0, sizeof(*raddr));
479 memcpy(raddr, addr, sz);
480 T_IPV4EP rep = { ntohl(raddr->sin_addr.s_addr), ntohs(raddr->sin_port) };
481 ret = udp_snd_dat(socket->cepid, &rep, (void *)buf, len,
482 (socket->flags & O_NONBLOCK) ? TMO_POL : SOCKET_TIMEOUT);
483 if (ret < 0) {
484 return (ret == E_TMOUT) ? -ETIME : -ECOMM;
485 }
486 break;
487 }
488 }
489 break;
490 }
491 case AF_INET6: {
492 return -EAFNOSUPPORT;
493 }
494 }
495
496 return ret;
497}
498
499ssize_t shell_sendmsg(int fd, const struct msghdr *msg, int flags)
500{
501 no_implement("sendmsg\n");
502 return -ENOSYS;
503}
504
505ssize_t shell_recvfrom(int fd, void *__restrict buf, size_t len, int flags, struct sockaddr *__restrict addr, socklen_t *__restrict alen)
506{
507 SOCKET *fp = fd_to_fp(fd);
508 if (fp == NULL) {
509 return -EBADF;
510 }
511
512 int ret = 0;
513 socket_t *socket = (socket_t *)fp->exinf;
514 switch (socket->family) {
515 case AF_INET: {
516 switch (socket->type) {
517 case SOCK_STREAM: {
518 if (flags & MSG_OOB) {
519 ret = tcp_rcv_oob(socket->cepid, buf, len);
520 if (ret < 0) {
521 syslog(LOG_ERROR, "tcp_rcv_oob => %d", ret);
522 return -ECOMM;
523 }
524 }
525 else {
526 int rsz, tmp;
527 if (socket->input == NULL) {
528 ret = wai_sem(SEM_FILEDESC);
529 if (ret < 0) {
530 syslog(LOG_ERROR, "wai_sem => %d", ret);
531 }
532 socket->len = 0;
533 ret = sig_sem(SEM_FILEDESC);
534 if (ret < 0) {
535 syslog(LOG_ERROR, "sig_sem => %d", ret);
536 }
537 ret = tcp_rcv_buf(socket->cepid, &socket->input, TMO_FEVR);
538 if (ret < 0) {
539 syslog(LOG_ERROR, "tcp_rcv_buf => %d", ret);
540 return -ECOMM;
541 }
542 rsz = ret;
543 }
544 else
545 rsz = socket->len;
546 tmp = rsz;
547 if (rsz > len)
548 rsz = len;
549 if (rsz >= 0) {
550 memcpy(buf, socket->input, rsz);
551 ret = wai_sem(SEM_FILEDESC);
552 if (ret < 0) {
553 syslog(LOG_ERROR, "wai_sem => %d", ret);
554 }
555 socket->len = tmp - rsz;
556 ret = sig_sem(SEM_FILEDESC);
557 if (ret < 0) {
558 syslog(LOG_ERROR, "sig_sem => %d", ret);
559 }
560 if (tmp - rsz == 0) {
561 socket->input = NULL;
562 }
563 else
564 socket->input = (void *)&((uint8_t *)socket->input)[rsz];
565 ret = tcp_rel_buf(socket->cepid, rsz);
566 if ((ret != E_OBJ) && (ret < 0)) {
567 syslog(LOG_ERROR, "tcp_rel_buf => %d", ret);
568 //return -ECOMM;
569 }
570 }
571 ret = rsz;
572 }
573 break;
574 }
575 case SOCK_DGRAM: {
576 struct sockaddr_in *raddr = &socket->raddr4;
577 int rsz;
578 ret = wai_sem(SEM_FILEDESC);
579 if (ret < 0) {
580 syslog(LOG_ERROR, "wai_sem => %d", ret);
581 }
582 T_NET_BUF *input = socket->input;
583 if (input == NULL) {
584 ret = sig_sem(SEM_FILEDESC);
585 if (ret < 0) {
586 syslog(LOG_ERROR, "sig_sem => %d", ret);
587 }
588
589 T_IPV4EP rep = { 0, 0 };
590 ret = udp_rcv_dat(socket->cepid, &rep, buf, len,
591 (socket->flags & O_NONBLOCK) ? TMO_POL : SOCKET_TIMEOUT);
592 if (ret < 0) {
593 if ((socket->flags & O_NONBLOCK) == 0)
594 syslog(LOG_ERROR, "udp_rcv_buf => %d", ret);
595 return (ret == E_TMOUT) ? -ETIME : -ECOMM;
596 }
597 rsz = ret;
598 if ((addr != NULL) && (alen != NULL)) {
599 ret = wai_sem(SEM_FILEDESC);
600 if (ret < 0) {
601 syslog(LOG_ERROR, "wai_sem => %d", ret);
602 }
603 int sz = *alen;
604 memset(raddr, 0, sizeof(socket->raddr4));
605 raddr->sin_family = AF_INET;
606 raddr->sin_port = htons(rep.portno);
607 raddr->sin_addr.s_addr = htonl(rep.ipaddr);
608 if (sz > sizeof(socket->raddr4))
609 sz = sizeof(socket->raddr4);
610 memcpy(addr, raddr, sz);
611 *alen = sz;
612 ret = sig_sem(SEM_FILEDESC);
613 if (ret < 0) {
614 syslog(LOG_ERROR, "sig_sem => %d", ret);
615 }
616 }
617 }
618 else {
619 rsz = socket->len;
620 void *pbuf = socket->buf;
621 socket->input = NULL;
622 socket->len = 0;
623 socket->buf = NULL;
624 if ((addr != NULL) && (alen != NULL)) {
625 int sz = *alen;
626 if (sz > sizeof(socket->raddr4))
627 sz = sizeof(socket->raddr4);
628 memcpy(addr, raddr, sz);
629 *alen = sz;
630 }
631 ret = sig_sem(SEM_FILEDESC);
632 if (ret < 0) {
633 syslog(LOG_ERROR, "sig_sem => %d", ret);
634 }
635 if (rsz > len)
636 rsz = len;
637 memcpy(buf, pbuf, rsz);
638 ret = rel_net_buf(input);
639 if (ret < 0) {
640 syslog(LOG_ERROR, "rel_net_buf => %d", ret);
641 //return -ECOMM;
642 }
643 }
644 ret = rsz;
645 }
646 }
647 break;
648 }
649 case AF_INET6: {
650 return -EAFNOSUPPORT;
651 }
652 }
653
654 return ret;
655}
656
657ssize_t shell_recvmsg(int fd, struct msghdr *msg, int flags)
658{
659 no_implement("recvmsg\n");
660 return -ENOSYS;
661}
662
663int shell_shutdown(int fd, int how)
664{
665 SOCKET *fp = fd_to_fp(fd);
666 if (fp == NULL) {
667 return -EBADF;
668 }
669
670 ER ret;
671 socket_t *socket = (socket_t *)fp->exinf;
672 switch (socket->family) {
673 case AF_INET: {
674 switch (socket->type) {
675 case SOCK_STREAM: {
676 ret = tcp_sht_cep(socket->cepid);
677 if (ret < 0) {
678 return -ECOMM;
679 }
680 break;
681 }
682 }
683 break;
684 }
685 case AF_INET6: {
686 return -EAFNOSUPPORT;
687 }
688 }
689
690 return 0;
691}
692
693int shell_getsockopt(int fd, int level, int optname, void *optval, socklen_t *__restrict optlen)
694{
695 SOCKET *fp = fd_to_fp(fd);
696 if (fp == NULL) {
697 return -EBADF;
698 }
699
700 ER ret;
701 socket_t *socket = (socket_t *)fp->exinf;
702 switch (socket->family) {
703 case AF_INET: {
704 switch (socket->type) {
705 case SOCK_STREAM: {
706 switch (level) {
707 case SOL_SOCKET:
708 switch (optname) {
709 case SO_REUSEADDR:
710 if (socket->flags & SO_REUSEADDR) {
711 *(bool *)optval = true;
712 }
713 else {
714 *(bool *)optval = false;
715 }
716 break;
717 case SO_KEEPALIVE:
718 if (socket->flags & SO_KEEPALIVE) {
719 *(bool *)optval = true;
720 }
721 else {
722 *(bool *)optval = false;
723 }
724 break;
725 case SO_ERROR:
726 *(int *)optval = 0;
727 break;
728 default:
729 return -EINVAL;
730 }
731 break;
732 case IPPROTO_TCP:
733 ret = tcp_get_opt(socket->cepid, optname, (void *)optval, *optlen);
734 if (ret < 0) {
735 return -EINVAL;
736 }
737 *optlen = ret;
738 break;
739 default:
740 return -EINVAL;
741 }
742 break;
743 }
744 case SOCK_DGRAM: {
745 switch (level) {
746 case IPPROTO_UDP:
747 ret = udp_get_opt(socket->cepid, optname, (void *)optval, *optlen);
748 if (ret < 0) {
749 return -EINVAL;
750 }
751 *optlen = ret;
752 break;
753 default:
754 return -EINVAL;
755 }
756 break;
757 }
758 }
759 break;
760 }
761 case AF_INET6: {
762 return -EAFNOSUPPORT;
763 }
764 }
765
766 return 0;
767}
768
769int shell_setsockopt(int fd, int level, int optname, const void *optval, socklen_t optlen)
770{
771 SOCKET *fp = fd_to_fp(fd);
772 if (fp == NULL) {
773 return -EBADF;
774 }
775
776 ER ret;
777 socket_t *socket = (socket_t *)fp->exinf;
778 switch (socket->family) {
779 case AF_INET: {
780 switch (socket->type) {
781 case SOCK_STREAM: {
782 switch (level){
783 case SOL_SOCKET:
784 switch (optname) {
785 case SO_REUSEADDR:
786 if (*(bool *)optval) {
787 socket->flags |= SO_REUSEADDR;
788 }
789 else {
790 socket->flags &= ~SO_REUSEADDR;
791 }
792 break;
793 case SO_KEEPALIVE:
794 if (*(bool *)optval) {
795 socket->flags |= SO_KEEPALIVE;
796 }
797 else {
798 socket->flags &= ~SO_KEEPALIVE;
799 }
800 break;
801 default:
802 return -EINVAL;
803 }
804 break;
805 case IPPROTO_TCP:
806 ret = tcp_set_opt(socket->cepid, optname, (void *)optval, optlen);
807 if (ret < 0) {
808 return -EINVAL;
809 }
810 break;
811 default:
812 return -EINVAL;
813 }
814 break;
815 }
816 case SOCK_DGRAM: {
817 switch (level){
818 case IPPROTO_UDP:
819 ret = udp_set_opt(socket->cepid, optname, (void *)optval, optlen);
820 if (ret < 0) {
821 return -EINVAL;
822 }
823 break;
824 default:
825 return -EINVAL;
826 }
827 break;
828 }
829 }
830 break;
831 }
832 case AF_INET6: {
833 return -EAFNOSUPPORT;
834 }
835 }
836
837 return 0;
838}
839
840int shell_getpeername(int fd, struct sockaddr *restrict addr, socklen_t *restrict len)
841{
842 SOCKET *fp = fd_to_fp(fd);
843 if (fp == NULL) {
844 return -EBADF;
845 }
846 if (len == NULL) {
847 return -EINVAL;
848 }
849
850 socklen_t size = *len;
851 socket_t *socket = (socket_t *)fp->exinf;
852 switch (socket->family) {
853 case AF_INET: {
854 struct sockaddr_in *raddr = &socket->raddr4;
855 *len = sizeof(struct sockaddr_in);
856 if (size > sizeof(struct sockaddr_in))
857 size = sizeof(struct sockaddr_in);
858 memcpy(addr, raddr, size);
859 break;
860 }
861 case AF_INET6: {
862 return -EAFNOSUPPORT;
863 }
864 }
865
866 return 0;
867}
868
869int shell_getsockname(int fd, struct sockaddr *restrict addr, socklen_t *restrict len)
870{
871 SOCKET *fp = fd_to_fp(fd);
872 if (fp == NULL) {
873 return -EBADF;
874 }
875 if (len == NULL) {
876 return -EINVAL;
877 }
878
879 socklen_t size = *len;
880 socket_t *socket = (socket_t *)fp->exinf;
881 switch (socket->family) {
882 case AF_INET: {
883 const T_IN4_ADDR *laddr4 = in4_get_ifaddr(0);
884 struct sockaddr_in laddr;
885 laddr.sin_family = AF_INET;
886 laddr.sin_addr.s_addr = htonl(*laddr4);
887 laddr.sin_port = socket->laddr4.sin_port;
888 memset(&laddr.sin_zero, 0, sizeof(laddr.sin_zero));
889 *len = sizeof(struct sockaddr_in);
890 if (size > sizeof(struct sockaddr_in))
891 size = sizeof(struct sockaddr_in);
892 memcpy(addr, &laddr, size);
893 break;
894 }
895 case AF_INET6: {
896 return -EAFNOSUPPORT;
897 }
898 }
899
900 return 0;
901}
902
903int tcp_fd_close(struct SHELL_FILE *fp)
904{
905 ER ret, ret2;
906
907 socket_t *socket = (socket_t *)fp->exinf;
908 switch (socket->family) {
909 case AF_INET: {
910 if (socket->cepid != 0) {
911 ID cepid = socket->cepid;
912 ret = tcp_sht_cep(cepid);
913 if (ret < 0) {
914 //return -1;
915 }
916 ret = tcp_cls_cep(cepid, (socket->repid != 0) ? 0 : SOCKET_TIMEOUT);
917 ret2 = tcp_del_cep(cepid);
918 //delete_fd_by_id(&IO_TYPE_TCP, cepid);
919 delete_id(tcp_cepid_table, tcp_cepid_table_count, cepid);
920 if ((ret < 0) || (ret2 < 0)) {
921 return (ret == E_TMOUT) ? -ETIME : -EINVAL;
922 }
923 }
924 else if (socket->repid != 0) {
925 ID repid = socket->repid;
926 ret = tcp_del_rep(repid);
927 //delete_fd_by_id(&IO_TYPE_TCP, tmax_tcp_cepid + repid);
928 delete_id(tcp_repid_table, tcp_repid_table_count, repid);
929 if (ret < 0) {
930 return -EINVAL;
931 }
932 }
933 else {
934 return -EINVAL;
935 }
936 break;
937 }
938 case AF_INET6: {
939 return -EAFNOSUPPORT;
940 }
941 }
942
943 return 0;
944}
945
946size_t tcp_fd_read(struct SHELL_FILE *fp, unsigned char *dst, size_t dstsz)
947{
948 return shell_recvfrom(fp->fd, dst, dstsz, 0, NULL, NULL);
949}
950
951size_t tcp_fd_write(struct SHELL_FILE *fp, const unsigned char *src, size_t srcsz)
952{
953 return shell_sendto(fp->fd, src, srcsz, 0, NULL, 0);
954}
955
956off_t tcp_fd_seek(struct SHELL_FILE *fp, off_t ofs, int org)
957{
958 return -EPERM;
959}
960
961int tcp_fd_ioctl(struct SHELL_FILE *fp, int req, void *arg)
962{
963 return -EINVAL;
964}
965
966bool_t tcp_fd_readable(struct SHELL_FILE *fp)
967{
968 ER ret;
969
970 socket_t *socket = (socket_t *)fp->exinf;
971 if (socket->cepid != 0) {
972 if (socket->len == 0) {
973 ret = tcp_rcv_buf(socket->cepid, &socket->input, TMO_NBLK);
974 if ((ret != E_WBLK) && (ret != E_OBJ) && (ret < 0)) {
975 syslog(LOG_ERROR, "tcp_rcv_buf => %d", ret);
976 //return ret;
977 }
978 if (ret > 0) {
979 ret = wai_sem(SEM_FILEDESC);
980 if (ret < 0) {
981 syslog(LOG_ERROR, "wai_sem => %d", ret);
982 }
983 socket->len += ret;
984 ret = sig_sem(SEM_FILEDESC);
985 if (ret < 0) {
986 syslog(LOG_ERROR, "sig_sem => %d", ret);
987 }
988 }
989 }
990 else ret = 1;
991 if (ret > 0) {
992 return true;
993 }
994 }
995
996 return false;
997}
998
999void tcp_fd_delete(struct SHELL_FILE *fp)
1000{
1001 socket_t *socket = (socket_t *)fp->exinf;
1002 free(socket->buf);
1003 socket->buf = NULL;
1004 free(fp->exinf);
1005 fp->exinf = NULL;
1006}
1007
1008ER socket_tcp_callback(ID cepid, FN fncd, void *p_parblk)
1009{
1010 struct SHELL_FILE *fp = id_to_fd(&IO_TYPE_TCP, cepid);
1011 FLGPTN flgptn = 0;
1012 ER ret;
1013 int len;
1014
1015 if (fp == NULL)
1016 return E_PAR;
1017
1018 int fd = fp->fd;
1019 FD_SET(fd, (fd_set *)&flgptn);
1020
1021 switch (fncd) {
1022 case TFN_TCP_RCV_BUF:
1023 len = *(int *)p_parblk;
1024 if ((len <= 0) || (fp->exinf == NULL))
1025 return E_OK;
1026
1027 ret = wai_sem(SEM_FILEDESC);
1028 if (ret < 0) {
1029 syslog(LOG_ERROR, "wai_sem => %d", ret);
1030 }
1031 socket_t *socket = (socket_t *)fp->exinf;
1032 socket->len += len;
1033 ret = sig_sem(SEM_FILEDESC);
1034 if (ret < 0) {
1035 syslog(LOG_ERROR, "sig_sem => %d", ret);
1036 }
1037
1038 if (fp->readevt_w == fp->readevt_r) fp->readevt_w++;
1039
1040 set_flg(FLG_SELECT_WAIT, flgptn);
1041 return E_OK;
1042
1043 case TFN_TCP_RCV_DAT:
1044 len = *(int *)p_parblk;
1045 if ((len <= 0) || (fp->exinf == NULL))
1046 return E_OK;
1047
1048 ret = wai_sem(SEM_FILEDESC);
1049 if (ret < 0) {
1050 syslog(LOG_ERROR, "wai_sem => %d", ret);
1051 }
1052 socket->len += len;
1053 ret = sig_sem(SEM_FILEDESC);
1054 if (ret < 0) {
1055 syslog(LOG_ERROR, "sig_sem => %d", ret);
1056 }
1057
1058 if (fp->readevt_w == fp->readevt_r) fp->readevt_w++;
1059
1060 set_flg(FLG_SELECT_WAIT, flgptn);
1061 return E_OK;
1062
1063 case TFN_TCP_SND_DAT:
1064 if (fp->writeevt_w == fp->writeevt_r) fp->writeevt_w++;
1065
1066 set_flg(FLG_SELECT_WAIT, flgptn);
1067 return E_OK;
1068
1069 case TFN_TCP_CAN_CEP:
1070 if (fp->errorevt_w == fp->errorevt_r) fp->errorevt_w++;
1071
1072 set_flg(FLG_SELECT_WAIT, flgptn);
1073 return E_OK;
1074
1075 case TFN_TCP_DEL_REP:
1076 delete_fd_by_id(&IO_TYPE_TCP, tmax_tcp_cepid + cepid);
1077 return E_OK;
1078
1079 case TFN_TCP_DEL_CEP:
1080 delete_fd_by_id(&IO_TYPE_TCP, cepid);
1081 return E_OK;
1082
1083 default:
1084 return E_OK;
1085 }
1086}
1087
1088int udp_fd_close(struct SHELL_FILE *fp)
1089{
1090 ER ret;
1091 ID cepid;
1092
1093 socket_t *socket = (socket_t *)fp->exinf;
1094 switch (socket->family) {
1095 case AF_INET: {
1096 cepid = socket->cepid;
1097 ret = udp_del_cep(cepid);
1098 //delete_fd_by_id(&IO_TYPE_UDP, cepid);
1099 delete_id(udp_cepid_table, udp_cepid_table_count, cepid);
1100 if (ret < 0) {
1101 return -EINVAL;
1102 }
1103 break;
1104 }
1105 case AF_INET6: {
1106 return -EAFNOSUPPORT;
1107 }
1108 }
1109
1110 return 0;
1111}
1112
1113size_t udp_fd_read(struct SHELL_FILE *fp, unsigned char *dst, size_t dstsz)
1114{
1115 return shell_recvfrom(fp->fd, dst, dstsz, 0, NULL, NULL);
1116}
1117
1118size_t udp_fd_write(struct SHELL_FILE *fp, const unsigned char *src, size_t srcsz)
1119{
1120 return shell_sendto(fp->fd, src, srcsz, 0, NULL, 0);
1121}
1122
1123off_t udp_fd_seek(struct SHELL_FILE *fp, off_t ofs, int org)
1124{
1125 return -EPERM;
1126}
1127
1128int udp_fd_ioctl(struct SHELL_FILE *fp, int req, void *arg)
1129{
1130 return -EINVAL;
1131}
1132
1133bool_t udp_fd_readable(struct SHELL_FILE *fp)
1134{
1135 socket_t *socket = (socket_t *)fp->exinf;
1136 if (socket->cepid != 0) {
1137 if (socket->input != NULL) {
1138 return true;
1139 }
1140 }
1141
1142 return false;
1143}
1144
1145void udp_fd_delete(struct SHELL_FILE *fp)
1146{
1147 //socket_t *socket = (socket_t *)fp->exinf;
1148 //free(socket->buf);
1149 //socket->buf = NULL;
1150 free(fp->exinf);
1151 fp->exinf = NULL;
1152}
1153
1154ER socket_udp_callback(ID cepid, FN fncd, void *p_parblk)
1155{
1156 struct SHELL_FILE *fp = id_to_fd(&IO_TYPE_UDP, cepid);
1157 FLGPTN flgptn = 0;
1158 int len;
1159
1160 if (fp == NULL)
1161 return E_PAR;
1162
1163 int fd = fp->fd;
1164 FD_SET(fd, (fd_set *)&flgptn);
1165
1166 switch (fncd) {
1167 case TEV_UDP_RCV_DAT:
1168 {
1169 T_UDP_RCV_DAT_PARA *udppara = (T_UDP_RCV_DAT_PARA *)p_parblk;
1170 len = udppara->len;
1171 if ((len <= 0) || (fp->exinf == NULL))
1172 return E_OK;
1173
1174 ER ret = wai_sem(SEM_FILEDESC);
1175 if (ret < 0) {
1176 syslog(LOG_ERROR, "wai_sem => %d", ret);
1177 }
1178 socket_t *socket = (socket_t *)fp->exinf;
1179 socket->len = len;
1180 if (socket->input != NULL) {
1181 ret = rel_net_buf(socket->input);
1182 if (ret < 0) {
1183 syslog(LOG_ERROR, "rel_net_buf => %d", ret);
1184 }
1185 }
1186 socket->input = udppara->input;
1187 socket->buf = GET_UDP_SDU(udppara->input, udppara->off);
1188 memset(&socket->raddr4, 0, sizeof(socket->raddr4));
1189 socket->raddr4.sin_family = AF_INET;
1190 socket->raddr4.sin_port = htons(udppara->rep4.portno);
1191 socket->raddr4.sin_addr.s_addr = htonl(udppara->rep4.ipaddr);
1192 udppara->input->flags |= NB_FLG_NOREL_IFOUT;
1193 ret = sig_sem(SEM_FILEDESC);
1194 if (ret < 0) {
1195 syslog(LOG_ERROR, "sig_sem => %d", ret);
1196 }
1197
1198 if (fp->readevt_w == fp->readevt_r) fp->readevt_w++;
1199
1200 set_flg(FLG_SELECT_WAIT, flgptn);
1201 return E_OK;
1202 }
1203 case TFN_UDP_CRE_CEP:
1204 return E_OK;
1205
1206 case TFN_UDP_RCV_DAT:
1207 len = *(int *)p_parblk;
1208 if ((len <= 0) || (fp->exinf == NULL))
1209 return E_OK;
1210
1211 if (fp->readevt_w == fp->readevt_r) fp->readevt_w++;
1212
1213 set_flg(FLG_SELECT_WAIT, flgptn);
1214 return E_OK;
1215
1216 case TFN_UDP_SND_DAT:
1217 if (fp->writeevt_w == fp->writeevt_r) fp->writeevt_w++;
1218
1219 set_flg(FLG_SELECT_WAIT, flgptn);
1220 return E_OK;
1221
1222 case TFN_UDP_CAN_CEP:
1223 if (fp->errorevt_w == fp->errorevt_r) fp->errorevt_w++;
1224
1225 set_flg(FLG_SELECT_WAIT, flgptn);
1226 return E_OK;
1227
1228 case TFN_UDP_DEL_CEP:
1229 delete_fd_by_id(&IO_TYPE_UDP, cepid);
1230 return E_OK;
1231
1232 default:
1233 return E_OK;
1234 }
1235}
1236
1237#ifndef TCP_CFG_EXTENTIONS
1238ER tcp_cre_rep(ID repid, T_TCP_CREP *pk_crep)
1239{
1240 syslog(LOG_ERROR, "tcp_cre_rep not implement");
1241 shell_abort();
1242 return E_SYS;
1243}
1244
1245ER tcp_cre_cep(ID cepid, T_TCP_CCEP *pk_ccep)
1246{
1247 syslog(LOG_ERROR, "tcp_cre_cep not implement");
1248 shell_abort();
1249 return E_SYS;
1250}
1251#endif
1252
1253#ifndef UDP_CFG_EXTENTIONS
1254ER udp_cre_cep(ID cepid, T_UDP_CCEP *pk_ccep)
1255{
1256 syslog(LOG_ERROR, "udp_cre_cep not implement");
1257 shell_abort();
1258 return E_SYS;
1259}
1260#endif
1261
1262#ifndef TCP_CFG_EXTENTIONS
1263ER_UINT tcp_snd_oob(ID cepid, void *data, int_t len, TMO tmout)
1264{
1265 syslog(LOG_ERROR, "tcp_snd_oob not implement");
1266 shell_abort();
1267 return E_SYS;
1268}
1269
1270ER_UINT tcp_rcv_oob(ID cepid, void *data, int_t len)
1271{
1272 syslog(LOG_ERROR, "tcp_rcv_oob not implement");
1273 shell_abort();
1274 return E_SYS;
1275}
1276
1277ER tcp_set_opt(ID cepid, int_t optname, void *optval, int_t optlen)
1278{
1279 syslog(LOG_ERROR, "tcp_set_opt not implement");
1280 shell_abort();
1281 return E_SYS;
1282}
1283
1284ER tcp_get_opt(ID cepid, int_t optname, void *optval, int_t optlen)
1285{
1286 syslog(LOG_ERROR, "tcp_get_opt not implement");
1287 shell_abort();
1288 return E_SYS;
1289}
1290#endif
1291
1292#ifndef UDP_CFG_EXTENTIONS
1293ER udp_get_opt(ID cepid, int_t optname, void *optval, int_t optlen)
1294{
1295 syslog(LOG_ERROR, "udp_get_opt not implement");
1296 shell_abort();
1297 return E_SYS;
1298}
1299
1300ER udp_set_opt(ID cepid, int_t optname, void *optval, int_t optlen)
1301{
1302 syslog(LOG_ERROR, "udp_set_opt not implement");
1303 shell_abort();
1304 return E_SYS;
1305}
1306#endif
1307
1308// musl-1.1.18/network/lookup.h
1309struct address {
1310 int family;
1311 unsigned scopeid;
1312 uint8_t addr[16];
1313 int sortkey;
1314};
1315
1316#define MAXNS 3
1317
1318struct resolvconf {
1319 struct address ns[MAXNS];
1320 unsigned nns, attempts, ndots;
1321 unsigned timeout;
1322};
1323
1324// musl-1.1.18/network/resolvconf.c
1325int __get_resolv_conf(struct resolvconf *conf, char *search, size_t search_sz)
1326{
1327 int nns = 0;
1328
1329 conf->ndots = 1;
1330 conf->timeout = 5;
1331 conf->attempts = 2;
1332 if (search) *search = 0;
1333
1334#if defined(SUPPORT_INET4)
1335 T_IN4_ADDR in4_addr;
1336 conf->ns[nns].family = AF_INET;
1337 conf->ns[nns].scopeid = 0;
1338 dns_in4_get_addr(&in4_addr);
1339 *(uint32_t *)conf->ns[nns].addr = ntohl(in4_addr);
1340 nns++;
1341#endif
1342
1343#if defined(SUPPORT_INET6)
1344 conf->ns[nns].family = AF_INET6;
1345 conf->ns[nns].scopeid = 0;
1346 dns_in6_get_addr((T_IN6_ADDR *)conf->ns[nns].addr);
1347 nns++;
1348#endif
1349 conf->nns = nns;
1350
1351 return 0;
1352}
Note: See TracBrowser for help on using the repository browser.