X-Git-Url: http://git.tuebingen.mpg.de/?p=paraslash.git;a=blobdiff_plain;f=dccp_send.c;h=304a42e749a647d5d6a568ae0e9850d183907979;hp=887801a92f3a30128928e95e5232d7c39d4a3b59;hb=fa578bf1d070161cafcbcc69ca7b810414ee1a4b;hpb=f47f21ba8703dfbd05ad8faf1c75869ff7f97f38 diff --git a/dccp_send.c b/dccp_send.c index 887801a9..304a42e7 100644 --- a/dccp_send.c +++ b/dccp_send.c @@ -1,18 +1,20 @@ /* - * Copyright (C) 2006-2008 Andre Noll + * Copyright (C) 2006-2011 Andre Noll * * Licensed under the GPL v2. For licencing details see COPYING. */ -/** \file dccp_send.c paraslash's dccp sender */ +/** \file dccp_send.c Paraslash's dccp sender. */ /* * based on server.c of dccp-cs-0.01.tar.bz2, * (C) 2005 Ian McDonald */ +#include #include #include +#include #include "para.h" #include "error.h" @@ -22,253 +24,225 @@ #include "server.h" #include "net.h" #include "list.h" -#include "vss.h" #include "send.h" +#include "vss.h" #include "fd.h" #include "close_on_fork.h" #include "chunk_queue.h" #include "server.cmdline.h" +#include "acl.h" + +static struct sender_status dccp_sender_status, *dss = &dccp_sender_status; -/** the list of connected clients **/ -static struct list_head clients; -static int listen_fd = -1; - -/** Maximal number of bytes in a chunk queue. */ -#define DCCP_MAX_PENDING_BYTES 40000 - -/** describes one connected client */ -struct dccp_client { - /** the dccp socket */ - int fd; - /** The socket `name' of the client. */ - char *name; - /** the position of this client in the client list */ - struct list_head node; - /** non-zero if audio file header has been sent */ - int header_sent; - /** The list of pending chunks for this client. */ - struct chunk_queue *cq; +struct dccp_fec_client { + struct fec_client_parms fcp; + struct fec_client *fc; }; static void dccp_pre_select(int *max_fileno, fd_set *rfds, __a_unused fd_set *wfds) { - if (listen_fd < 0) - return; - FD_SET(listen_fd, rfds); - *max_fileno = PARA_MAX(*max_fileno, listen_fd); + if (dss->listen_fd >= 0) + para_fd_set(dss->listen_fd, rfds, max_fileno); } -static void dccp_post_select(fd_set *rfds, __a_unused fd_set *wfds) +/** + * Query the TX CCID used on the sender-client half connection. + * \param sockfd Server socket descriptor to query (after accept(2)). + * \return CCID number > 0, -1 on error/incompatibility. + * + * NB: This feature is only available on Linux > 2.6.30; on older kernels + * ENOPROTOOPT ("Protocol not available") will be returned. + */ +static int dccp_get_tx_ccid(int sockfd) { - struct dccp_client *dc; - int ret, fd; + int tx_ccid; + socklen_t len = sizeof(tx_ccid); - if (listen_fd < 0 || !FD_ISSET(listen_fd, rfds)) - return; - ret = para_accept(listen_fd, NULL, 0); - if (ret < 0) { - PARA_ERROR_LOG("%s\n", para_strerror(-ret)); - return; - } - fd = ret; - /* - * Bypass unused CCID paths: the sender does not receive application data - * from the client; by shutting down this unused communication path we can - * reduce processing costs a bit. See analogous comment in dccp_recv.c. - */ - if (shutdown(fd, SHUT_RD) < 0) { - PARA_ERROR_LOG("shutdown(SHUT_RD): %s\n", strerror(errno)); - goto err; + if (getsockopt(sockfd, SOL_DCCP, + DCCP_SOCKOPT_TX_CCID, &tx_ccid, &len) < 0) { + PARA_WARNING_LOG("DCCP_SOCKOPT_TX_CCID: %s\n", strerror(errno)); + return -1; } - ret = mark_fd_nonblocking(fd); - if (ret < 0) { - PARA_ERROR_LOG("%s\n", para_strerror(-ret)); - goto err; - } - dc = para_calloc(sizeof(struct dccp_client)); - dc->fd = fd; - dc->name = make_message("%s", remote_name(dc->fd)); - PARA_NOTICE_LOG("connection from %s\n", dc->name); - para_list_add(&dc->node, &clients); - add_close_on_fork_list(dc->fd); - dc->cq = cq_new(DCCP_MAX_PENDING_BYTES); - return; -err: - close(fd); + return tx_ccid; } -static int dccp_open(void) +static void dccp_shutdown_client(struct sender_client *sc) { - int ret = para_listen(AF_UNSPEC, IPPROTO_DCCP, conf.dccp_port_arg); + struct dccp_fec_client *dfc = sc->private_data; - if (ret < 0) - return ret; - listen_fd = ret; - ret = mark_fd_nonblocking(listen_fd); - if (ret < 0) { - PARA_EMERG_LOG("%s\n", para_strerror(-ret)); - exit(EXIT_FAILURE); - } - add_close_on_fork_list(listen_fd); - return 1; + vss_del_fec_client(dfc->fc); + shutdown_client(sc, dss); } -static void dccp_shutdown_client(struct dccp_client *dc) +static void dccp_shutdown_clients(void) { - PARA_DEBUG_LOG("shutting down %s (fd %d)\n", dc->name, dc->fd); - free(dc->name); - close(dc->fd); - del_close_on_fork_list(dc->fd); - cq_destroy(dc->cq); - list_del(&dc->node); - free(dc); + struct sender_client *sc, *tmp; + + list_for_each_entry_safe(sc, tmp, &dss->client_list, node) + dccp_shutdown_client(sc); } -/* - * ret: Negative on errors, zero if nothing was written and write returned - * EAGAIN, number of bytes written else. - */ -static int dccp_write(int fd, const char *buf, size_t len) +/** * Obtain current MPS according to RFC 4340, sec. 14. */ +static int dccp_init_fec(struct sender_client *sc) { - size_t written = 0; - int ret = 0; - - while (written < len) { - ret = write(fd, buf + written, PARA_MIN(1024, len - written)); - /* - * Error handling: CCID3 has a sending wait queue which fills - * up and is emptied asynchronously. The EAGAIN case means that - * there is currently no space in the wait queue, but this can - * change at any moment and is thus not an error condition. - */ - if (ret < 0 && errno == EAGAIN) - return written; - if (ret < 0) - return -ERRNO_TO_PARA_ERROR(errno); - written += ret; + int mps, ret; + socklen_t ml = sizeof(mps); + + /* If call fails, return some sensible minimum value */ + ret = getsockopt(sc->fd, SOL_DCCP, DCCP_SOCKOPT_GET_CUR_MPS, &mps, &ml); + if (ret < 0) { + PARA_NOTICE_LOG("can not determine MPS: %s\n", strerror(errno)); + mps = generic_max_transport_msg_size(sc->fd) - DCCP_MAX_HEADER; } - return written; + PARA_INFO_LOG("current MPS = %d bytes\n", mps); + assert(mps > 0); + if (conf.dccp_max_slice_size_arg > 0) + mps = PARA_MIN(mps, conf.dccp_max_slice_size_arg); + return mps; } -static int queue_chunk_or_shutdown(struct dccp_client *dc, long unsigned chunk_num, - size_t sent) +static int dccp_send_fec(struct sender_client *sc, char *buf, size_t len) { - int ret = cq_enqueue(dc->cq, chunk_num, sent); - if (ret < 0) { - PARA_NOTICE_LOG("enqueue error\n"); - dccp_shutdown_client(dc); - } + int ret = write_nonblock(sc->fd, buf, len); + + if (ret < 0) + dccp_shutdown_client(sc); return ret; } -static int send_queued_chunks(struct dccp_client *dc) +static void dccp_post_select(fd_set *rfds, __a_unused fd_set *wfds) { - struct queued_chunk *qc; - while ((qc = cq_peek(dc->cq))) { - char *buf; - size_t len; - int ret; - cq_get(qc, &buf, &len); - ret = dccp_write(dc->fd, buf, len); - if (ret < 0) - return ret; - cq_update(dc->cq, ret); - if (ret != len) - return 1; - cq_dequeue(dc->cq); + struct sender_client *sc; + struct dccp_fec_client *dfc; + int tx_ccid; + + sc = accept_sender_client(dss, rfds); + if (!sc) + return; + + /* If CCID identifiable, present client as #~ */ + tx_ccid = dccp_get_tx_ccid(sc->fd); + if (tx_ccid != -1) { + char *tmp = make_message("%s~%d", sc->name, tx_ccid); + + free(sc->name); + sc->name = tmp; } - return 1; + /* + * Bypass unused CCID paths: the sender does not receive application data + * from the client; by shutting down this unused communication path we can + * reduce processing costs a bit. See analogous comment in dccp_recv.c. + */ + if (shutdown(sc->fd, SHUT_RD) < 0) { + PARA_WARNING_LOG("%s\n", strerror(errno)); + shutdown_client(sc, dss); + return; + } + dfc = para_calloc(sizeof(*dfc)); + sc->private_data = dfc; + dfc->fcp.data_slices_per_group = conf.dccp_data_slices_per_group_arg; + dfc->fcp.slices_per_group = conf.dccp_slices_per_group_arg; + dfc->fcp.init_fec = dccp_init_fec; + dfc->fcp.send_fec = dccp_send_fec; + dfc->fcp.need_periodic_header = false; + dfc->fc = vss_add_fec_client(sc, &dfc->fcp); } -static void dccp_send(long unsigned current_chunk, - __a_unused long unsigned chunks_sent, const char *buf, size_t len) +static int dccp_com_on(__a_unused struct sender_command_data *scd) { - struct dccp_client *dc, *tmp; - int ret; - char *header_buf; - - list_for_each_entry_safe(dc, tmp, &clients, node) { - if (!dc->header_sent && current_chunk) { - size_t header_len; - header_buf = vss_get_header(&header_len); - if (header_buf && header_len > 0) { - if (queue_chunk_or_shutdown(dc, -1U, 0) < 0) - continue; - } - dc->header_sent = 1; - } - ret = send_queued_chunks(dc); - if (ret < 0) { - dccp_shutdown_client(dc); - continue; - } - if (!len) - continue; -// PARA_DEBUG_LOG("writing %d bytes to fd %d\n", len, dc->fd); - ret = dccp_write(dc->fd, buf, len); - if (ret < 0) { - PARA_NOTICE_LOG("%s\n", para_strerror(-ret)); - dccp_shutdown_client(dc); - continue; - } - if (ret != len) - queue_chunk_or_shutdown(dc, current_chunk, ret); - } + return generic_com_on(dss, IPPROTO_DCCP); } -static void dccp_shutdown_clients(void) +static int dccp_com_off(__a_unused struct sender_command_data *scd) +{ + dccp_shutdown_clients(); + generic_com_off(dss); + return 1; +} + + +static int dccp_com_deny(struct sender_command_data *scd) { - struct dccp_client *dc, *tmp; + generic_com_deny(scd, dss); + return 1; +} - list_for_each_entry_safe(dc, tmp, &clients, node) - dccp_shutdown_client(dc); +static int dccp_com_allow(struct sender_command_data *scd) +{ + generic_com_allow(scd, dss); + return 1; } -static char *dccp_info(void) +/** + * Return list of available CCIDs or warning, in static buffer. + */ +static const char *dccp_list_available_ccids(void) { - static char *buf; - int num_clients = 0; - struct dccp_client *dc, *tmp; - - free(buf); - list_for_each_entry_safe(dc, tmp, &clients, node) - num_clients++; - buf = make_message("dccp connected clients: %d\n", num_clients); - return buf; + /* Worst case length: n * 3 digits + n-1 spaces + '\0' */ + static char list[DCCP_MAX_HOST_CCIDS * 4]; + uint8_t *ccids; + int i, len, nccids; + + nccids = dccp_available_ccids(&ccids); + if (nccids < 0) { + snprintf(list, sizeof(list), "Unable to query available CCIDs"); + } else { + for (i = len = 0; i < nccids; i++) + len += snprintf(list + len, sizeof(list) - len, + "%s%d", i ? " " : "", ccids[i]); + } + return list; } -static char *dccp_help(void) +static char *dccp_info(void) { - return make_message("no help available\n"); + char *info = get_sender_info(dss, "dccp"); + char *ret = make_message("%s" "\tsupported ccids: %s\n", + info, dccp_list_available_ccids()); + free(info); + return ret; } /** - * the init function of the dccp sender + * The init function of the dccp sender. * - * \param s pointer to the dccp sender struct + * \param s pointer to the dccp sender struct. * * It initializes all function pointers of \a s and starts * listening on the given port. */ void dccp_send_init(struct sender *s) { - int ret; + int ret, k, n; - INIT_LIST_HEAD(&clients); s->info = dccp_info; - s->send = dccp_send; + s->send = NULL; s->pre_select = dccp_pre_select; s->post_select = dccp_post_select; s->shutdown_clients = dccp_shutdown_clients; - s->help = dccp_help; - s->client_cmds[SENDER_ON] = NULL; - s->client_cmds[SENDER_OFF] = NULL; - s->client_cmds[SENDER_DENY] = NULL; - s->client_cmds[SENDER_ALLOW] = NULL; + s->resolve_target = NULL; + s->help = generic_sender_help; + s->client_cmds[SENDER_ON] = dccp_com_on; + s->client_cmds[SENDER_OFF] = dccp_com_off; + s->client_cmds[SENDER_DENY] = dccp_com_deny; + s->client_cmds[SENDER_ALLOW] = dccp_com_allow; s->client_cmds[SENDER_ADD] = NULL; s->client_cmds[SENDER_DELETE] = NULL; - ret = dccp_open(); + + k = conf.dccp_data_slices_per_group_arg; + n = conf.dccp_slices_per_group_arg; + + if (k <= 0 || n <= 0 || k >= n) { + PARA_WARNING_LOG("invalid FEC parameters, using defaults\n"); + conf.dccp_data_slices_per_group_arg = 3; + conf.dccp_slices_per_group_arg = 4; + } + + init_sender_status(dss, conf.dccp_access_arg, conf.dccp_access_given, + conf.dccp_port_arg, conf.dccp_max_clients_arg, + conf.dccp_default_deny_given); + ret = generic_com_on(dss, IPPROTO_DCCP); if (ret < 0) PARA_ERROR_LOG("%s\n", para_strerror(-ret)); }