/* * OpenGGSN - Gateway GPRS Support Node * Copyright (C) 2002, 2003, 2004 Mondru AB. * * The contents of this file may be used under the terms of the GNU * General Public License Version 2, provided that the above copyright * notice and this permission notice is included in all copies or * substantial portions of the software. * */ /* ggsn.c * */ #ifdef __linux__ #define _GNU_SOURCE 1 /* strdup() prototype, broken arpa/inet.h */ #endif #include "../config.h" #include #ifdef HAVE_STDINT_H #include #endif #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "../lib/tun.h" #include "../lib/ippool.h" #include "../lib/syserr.h" #include "../lib/in46_addr.h" #include "../gtp/pdp.h" #include "../gtp/gtp.h" #include "cmdline.h" #include "gtp-kernel.h" #include "icmpv6.h" int end = 0; int maxfd = 0; /* For select() */ struct in_addr listen_; struct in46_addr netaddr, destaddr, net; /* Network interface */ size_t prefixlen; struct in46_addr dns1, dns2; /* PCO DNS address */ char *ipup, *ipdown; /* Filename of scripts */ int debug; /* Print debug output */ struct ul255_t pco; struct ul255_t qos; struct ul255_t apn; struct gsn_t *gsn; /* GSN instance */ struct tun_t *tun; /* TUN instance */ struct ippool_t *ippool; /* Pool of IP addresses */ /* To exit gracefully. Used with GCC compilation flag -pg and gprof */ void signal_handler(int s) { DEBUGP(DGGSN, "Received signal %d, exiting.\n", s); end = 1; } /* Used to write process ID to file. Assume someone else will delete */ void log_pid(char *pidfile) { FILE *file; mode_t oldmask; oldmask = umask(022); file = fopen(pidfile, "w"); umask(oldmask); if (!file) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Failed to create process ID file: %s!", pidfile); return; } fprintf(file, "%d\n", (int)getpid()); fclose(file); } #if defined(__sun__) int daemon(int nochdir, int noclose) { int fd; switch (fork()) { case -1: return (-1); case 0: break; default: _exit(0); } if (setsid() == -1) return (-1); if (!nochdir) chdir("/"); if (!noclose && (fd = open("/dev/null", O_RDWR, 0)) != -1) { dup2(fd, STDIN_FILENO); dup2(fd, STDOUT_FILENO); dup2(fd, STDERR_FILENO); if (fd > 2) close(fd); } return (0); } #endif static bool send_trap(const struct gsn_t *gsn, const struct pdp_t *pdp, const struct ippoolm_t *member, const char *var) { char addrbuf[256]; char val[NAMESIZE]; const char *addrstr = in46a_ntop(&member->addr, addrbuf, sizeof(addrbuf)); snprintf(val, sizeof(val), "%s,%s", imsi_gtp2str(&pdp->imsi), addrstr); if (ctrl_cmd_send_trap(gsn->priv, var, val) < 0) { LOGP(DGGSN, LOGL_ERROR, "Failed to create and send TRAP for IMSI %" PRIu64 " [%s].\n", pdp->imsi, var); return false; } return true; } int delete_context(struct pdp_t *pdp) { DEBUGP(DGGSN, "Deleting PDP context\n"); struct ippoolm_t *member = pdp->peer; if (pdp->peer) { send_trap(gsn, pdp, member, "imsi-rem-ip"); /* TRAP with IP removal */ ippool_freeip(ippool, (struct ippoolm_t *)pdp->peer); } else SYS_ERR(DGGSN, LOGL_ERROR, 0, "Peer not defined!"); if (gtp_kernel_tunnel_del(pdp)) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Cannot delete tunnel from kernel: %s\n", strerror(errno)); } return 0; } #include /* 3GPP TS 24.008 10.6.5.3 */ enum pco_protocols { PCO_P_LCP = 0xC021, PCO_P_PAP = 0xC023, PCO_P_CHAP = 0xC223, PCO_P_IPCP = 0x8021, PCO_P_PCSCF_ADDR = 0x0001, PCO_P_IM_CN_SS_F = 0x0002, PCO_P_DNS_IPv6_ADDR = 0x0003, PCO_P_POLICY_CTRL_REJ = 0x0004, /* only in Network->MS */ PCO_P_MS_SUP_NETREQ_BCI = 0x0005, /* reserved */ PCO_P_DSMIPv6_HA_ADDR = 0x0007, PCO_P_DSMIPv6_HN_PREF = 0x0008, PCO_P_DSMIPv6_v4_HA_ADDR= 0x0009, PCO_P_IP_ADDR_VIA_NAS = 0x000a, /* only MS->Network */ PCO_P_IPv4_ADDR_VIA_DHCP= 0x000b, /* only MS->Netowrk */ PCO_P_PCSCF_IPv4_ADDR = 0x000c, PCO_P_DNS_IPv4_ADDR = 0x000d, PCO_P_MSISDN = 0x000e, PCO_P_IFOM_SUPPORT = 0x000f, PCO_P_IPv4_LINK_MTU = 0x0010, PCO_P_MS_SUPP_LOC_A_TFT = 0x0011, PCO_P_PCSCF_RESEL_SUP = 0x0012, /* only MS->Network */ PCO_P_NBIFOM_REQ = 0x0013, PCO_P_NBIFOM_MODE = 0x0014, PCO_P_NONIP_LINK_MTU = 0x0015, PCO_P_APN_RATE_CTRL_SUP = 0x0016, PCO_P_PS_DATA_OFF_UE = 0x0017, PCO_P_REL_DATA_SVC = 0x0018, }; /* determine if PCO contains given protocol */ static bool pco_contains_proto(struct ul255_t *pco, uint16_t prot) { uint8_t *cur = pco->v + 1; /* iterate over PCO and check if protocol contained */ while (cur + 3 <= pco->v + pco->l) { uint16_t cur_prot = osmo_load16be(cur); uint8_t cur_len = cur[2]; if (cur_prot == prot) return true; if (cur_len == 0) break; cur += cur_len + 3; } return false; } /* determine if PDP context has IPv6 support */ static bool pdp_has_v4(struct pdp_t *pdp) { if (pdp->eua.l == 4+2) return true; else return false; } /* process one PCO request from a MS/UE, putting together the proper responses */ static void process_pco(struct pdp_t *pdp) { struct msgb *msg = msgb_alloc(256, "PCO"); msgb_put_u8(msg, 0x80); /* ext-bit + configuration protocol byte */ /* FIXME: also check if primary / secondary DNS was requested */ if (pdp_has_v4(pdp) && pco_contains_proto(&pdp->pco_req, PCO_P_IPCP)) { /* FIXME: properly implement this for IPCP */ uint8_t *cur = msgb_put(msg, pco.l-1); memcpy(cur, pco.v+1, pco.l-1); } if (pco_contains_proto(&pdp->pco_req, PCO_P_DNS_IPv6_ADDR)) { if (dns1.len == 16) msgb_t16lv_put(msg, PCO_P_DNS_IPv6_ADDR, dns1.len, dns1.v6.s6_addr); if (dns2.len == 16) msgb_t16lv_put(msg, PCO_P_DNS_IPv6_ADDR, dns2.len, dns2.v6.s6_addr); } if (pco_contains_proto(&pdp->pco_req, PCO_P_DNS_IPv4_ADDR)) { if (dns1.len == 4) msgb_t16lv_put(msg, PCO_P_DNS_IPv4_ADDR, dns1.len, (uint8_t *)&dns1.v4); if (dns2.len == 4) msgb_t16lv_put(msg, PCO_P_DNS_IPv4_ADDR, dns2.len, (uint8_t *)&dns2.v4); } if (msgb_length(msg) > 1) { memcpy(pdp->pco_neg.v, msgb_data(msg), msgb_length(msg)); pdp->pco_neg.l = msgb_length(msg); } else pdp->pco_neg.l = 0; msgb_free(msg); } int create_context_ind(struct pdp_t *pdp) { struct in46_addr addr; struct ippoolm_t *member; int rc; DEBUGP(DGGSN, "Received create PDP context request\n"); /* FIXME: we manually force all context requests to dynamic here! */ if (pdp->eua.l > 2) pdp->eua.l = 2; memcpy(pdp->qos_neg0, pdp->qos_req0, sizeof(pdp->qos_req0)); memcpy(pdp->qos_neg.v, pdp->qos_req.v, pdp->qos_req.l); /* TODO */ pdp->qos_neg.l = pdp->qos_req.l; if (in46a_from_eua(&pdp->eua, &addr)) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Cannot decode EUA from MS/SGSN: %s", osmo_hexdump(pdp->eua.v, pdp->eua.l)); gtp_create_context_resp(gsn, pdp, GTPCAUSE_UNKNOWN_PDP); return 0; } rc = ippool_newip(ippool, &member, &addr, 0); if (rc < 0) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Cannot allocate IP address in pool\n"); gtp_create_context_resp(gsn, pdp, -rc); return 0; /* Allready in use, or no more available */ } if (addr.len == sizeof(struct in6_addr)) { struct in46_addr tmp; /* IPv6 doesn't really send the real/allocated address at this point, but just * the link-identifier which the MS shall use for router solicitation */ tmp.len = addr.len; /* initialize upper 64 bits to prefix, they are discarded by MS anyway */ memcpy(tmp.v6.s6_addr, &member->addr.v6, 8); /* use allocated 64bit prefix as lower 64bit, used as link id by MS */ memcpy(tmp.v6.s6_addr+8, &member->addr.v6, 8); in46a_to_eua(&tmp, &pdp->eua); } else in46a_to_eua(&member->addr, &pdp->eua); pdp->peer = member; pdp->ipif = tun; /* TODO */ member->peer = pdp; /* TODO: In IPv6, EUA doesn't contain the actual IP addr/prefix! */ if (gtp_kernel_tunnel_add(pdp) < 0) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Cannot add tunnel to kernel: %s\n", strerror(errno)); gtp_create_context_resp(gsn, pdp, GTPCAUSE_SYS_FAIL); return 0; } if (!send_trap(gsn, pdp, member, "imsi-ass-ip")) { /* TRAP with IP assignment */ gtp_create_context_resp(gsn, pdp, GTPCAUSE_NO_RESOURCES); return 0; } process_pco(pdp); gtp_create_context_resp(gsn, pdp, GTPCAUSE_ACC_REQ); return 0; /* Success */ } /* Callback for receiving messages from tun */ int cb_tun_ind(struct tun_t *tun, void *pack, unsigned len) { struct ippoolm_t *ipm; struct in46_addr dst; struct iphdr *iph = (struct iphdr *)pack; struct ip6_hdr *ip6h = (struct ip6_hdr *)pack; if (iph->version == 4) { if (len < sizeof(*iph) || len < 4*iph->ihl) return -1; dst.len = 4; dst.v4.s_addr = iph->daddr; } else if (iph->version == 6) { /* Due to the fact that 3GPP requires an allocation of a * /64 prefix to each MS, we must instruct * ippool_getip() below to match only the leading /64 * prefix, i.e. the first 8 bytes of the address */ dst.len = 8; dst.v6 = ip6h->ip6_dst; } else { LOGP(DGGSN, LOGL_NOTICE, "non-IPv packet received from tun\n"); return -1; } DEBUGP(DGGSN, "Received packet from tun!\n"); if (ippool_getip(ippool, &ipm, &dst)) { DEBUGP(DGGSN, "Received packet with no destination!!!\n"); return 0; } if (ipm->peer) /* Check if a peer protocol is defined */ gtp_data_req(gsn, (struct pdp_t *)ipm->peer, pack, len); return 0; } /* RFC3307 link-local scope multicast address */ static const struct in6_addr all_router_mcast_addr = { .s6_addr = { 0xff,0x02,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,2 } }; int encaps_tun(struct pdp_t *pdp, void *pack, unsigned len) { struct iphdr *iph = (struct iphdr *)pack; struct ip6_hdr *ip6h = (struct ip6_hdr *)pack; DEBUGP(DGGSN, "encaps_tun. Packet received: forwarding to tun\n"); switch (iph->version) { case 6: /* daddr: all-routers multicast addr */ if (IN6_ARE_ADDR_EQUAL(&ip6h->ip6_dst, &all_router_mcast_addr)) return handle_router_mcast(gsn, pdp, pack, len); break; case 4: break; default: LOGP(DGGSN, LOGL_ERROR, "Packet from MS is neither IPv4 nor IPv6\n"); return -1; } return tun_encaps((struct tun_t *)pdp->ipif, pack, len); } int main(int argc, char **argv) { /* gengeopt declarations */ struct gengetopt_args_info args_info; struct hostent *host; /* Handle keyboard interrupt SIGINT */ struct sigaction s; s.sa_handler = (void *)signal_handler; if ((0 != sigemptyset(&s.sa_mask)) && debug) printf("sigemptyset failed.\n"); s.sa_flags = SA_RESETHAND; if ((sigaction(SIGINT, &s, NULL) != 0) && debug) printf("Could not register SIGINT signal handler.\n"); fd_set fds; /* For select() */ struct timeval idleTime; /* How long to select() */ int timelimit; /* Number of seconds to be connected */ int starttime; /* Time program was started */ osmo_init_logging(&log_info); if (cmdline_parser(argc, argv, &args_info) != 0) exit(1); if (args_info.debug_flag) { printf("listen: %s\n", args_info.listen_arg); if (args_info.conf_arg) printf("conf: %s\n", args_info.conf_arg); printf("fg: %d\n", args_info.fg_flag); printf("debug: %d\n", args_info.debug_flag); printf("qos: %#08x\n", args_info.qos_arg); if (args_info.apn_arg) printf("apn: %s\n", args_info.apn_arg); if (args_info.net_arg) printf("net: %s\n", args_info.net_arg); if (args_info.dynip_arg) printf("dynip: %s\n", args_info.dynip_arg); if (args_info.statip_arg) printf("statip: %s\n", args_info.statip_arg); if (args_info.ipup_arg) printf("ipup: %s\n", args_info.ipup_arg); if (args_info.ipdown_arg) printf("ipdown: %s\n", args_info.ipdown_arg); if (args_info.pidfile_arg) printf("pidfile: %s\n", args_info.pidfile_arg); if (args_info.statedir_arg) printf("statedir: %s\n", args_info.statedir_arg); if (args_info.gtp_linux_flag) printf("gtp_linux: %d\n", args_info.gtp_linux_flag); printf("timelimit: %d\n", args_info.timelimit_arg); } /* Try out our new parser */ if (cmdline_parser_configfile(args_info.conf_arg, &args_info, 0, 0, 0) != 0) exit(1); /* Open a log file */ if (args_info.logfile_arg) { struct log_target *tgt; int lvl; tgt = log_target_find(LOG_TGT_TYPE_FILE, args_info.logfile_arg); if (!tgt) { tgt = log_target_create_file(args_info.logfile_arg); if (!tgt) { LOGP(DGGSN, LOGL_ERROR, "Failed to create logfile: %s\n", args_info.logfile_arg); exit(1); } log_add_target(tgt); } log_set_all_filter(tgt, 1); log_set_use_color(tgt, 0); if (args_info.loglevel_arg) { lvl = log_parse_level(args_info.loglevel_arg); log_set_log_level(tgt, lvl); LOGP(DGGSN, LOGL_NOTICE, "Set file log level to %s\n", log_level_str(lvl)); } } if (args_info.debug_flag) { printf("cmdline_parser_configfile\n"); printf("listen: %s\n", args_info.listen_arg); printf("conf: %s\n", args_info.conf_arg); printf("fg: %d\n", args_info.fg_flag); printf("debug: %d\n", args_info.debug_flag); printf("qos: %#08x\n", args_info.qos_arg); if (args_info.apn_arg) printf("apn: %s\n", args_info.apn_arg); if (args_info.net_arg) printf("net: %s\n", args_info.net_arg); if (args_info.dynip_arg) printf("dynip: %s\n", args_info.dynip_arg); if (args_info.statip_arg) printf("statip: %s\n", args_info.statip_arg); if (args_info.ipup_arg) printf("ipup: %s\n", args_info.ipup_arg); if (args_info.ipdown_arg) printf("ipdown: %s\n", args_info.ipdown_arg); if (args_info.pidfile_arg) printf("pidfile: %s\n", args_info.pidfile_arg); if (args_info.statedir_arg) printf("statedir: %s\n", args_info.statedir_arg); if (args_info.gtp_linux_flag) printf("gtp-linux: %d\n", args_info.gtp_linux_flag); printf("timelimit: %d\n", args_info.timelimit_arg); } /* Handle each option */ /* debug */ debug = args_info.debug_flag; /* listen */ /* Do hostname lookup to translate hostname to IP address */ /* Any port listening is not possible as a valid address is */ /* required for create_pdp_context_response messages */ if (args_info.listen_arg) { if (!(host = gethostbyname(args_info.listen_arg))) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Invalid listening address: %s!", args_info.listen_arg); exit(1); } else { memcpy(&listen_.s_addr, host->h_addr, host->h_length); } } else { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Listening address must be specified! " "Please use command line option --listen or " "edit %s configuration file\n", args_info.conf_arg); exit(1); } /* net */ /* Store net as in_addr net and mask */ if (args_info.net_arg) { if (ippool_aton(&net, &prefixlen, args_info.net_arg, 0)) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Invalid network address: %s!", args_info.net_arg); exit(1); } /* default for network + destination address = net + 1 */ netaddr = net; in46a_inc(&netaddr); destaddr = netaddr; } else { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Network address must be specified: %s!", args_info.net_arg); exit(1); } /* dynip */ struct in46_prefix i46p; size_t prefixlen; if (!args_info.dynip_arg) { if (ippool_aton(&i46p.addr, &prefixlen, args_info.net_arg, 0)) { SYS_ERR(DIP, LOGL_ERROR, 0, "Failed to parse dynamic pool"); exit(1); } } else { if (ippool_aton(&i46p.addr, &prefixlen, args_info.dynip_arg, 0)) { SYS_ERR(DIP, LOGL_ERROR, 0, "Failed to parse dynamic pool"); exit(1); } } i46p.prefixlen = prefixlen; if (ippool_new(&ippool, &i46p, NULL, IPPOOL_NONETWORK | IPPOOL_NOGATEWAY | IPPOOL_NOBROADCAST)) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Failed to allocate IP pool!"); exit(1); } /* DNS1 and DNS2 */ memset(&dns1, 0, sizeof(dns1)); if (args_info.pcodns1_arg) { size_t tmp; if (ippool_aton(&dns1, &tmp, args_info.pcodns1_arg, 0) != 0) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Failed to convert pcodns1!"); exit(1); } } memset(&dns2, 0, sizeof(dns2)); if (args_info.pcodns2_arg) { size_t tmp; if (ippool_aton(&dns2, &tmp, args_info.pcodns2_arg, 0) != 0) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Failed to convert pcodns2!"); exit(1); } } unsigned int cur = 0; pco.v[cur++] = 0x80; /* x0000yyy x=1, yyy=000: PPP */ pco.v[cur++] = 0x80; /* IPCP */ pco.v[cur++] = 0x21; pco.v[cur++] = 0xFF; /* Length of contents */ pco.v[cur++] = 0x02; /* ACK */ pco.v[cur++] = 0x00; /* ID: Need to match request */ pco.v[cur++] = 0x00; /* Length */ pco.v[cur++] = 0xFF; /* overwritten */ if (dns1.len == 4) { pco.v[cur++] = 0x81; /* DNS 1 */ pco.v[cur++] = 2 + dns1.len; if (dns1.len == 4) memcpy(&pco.v[cur], &dns1.v4, dns1.len); else memcpy(&pco.v[cur], &dns1.v6, dns1.len); cur += dns1.len; } if (dns2.len == 4) { pco.v[cur++] = 0x83; pco.v[cur++] = 2 + dns2.len; /* DNS 2 */ if (dns2.len == 4) memcpy(&pco.v[cur], &dns2.v4, dns2.len); else memcpy(&pco.v[cur], &dns2.v6, dns2.len); cur += dns2.len; } pco.l = cur; /* patch in length values */ pco.v[3] = pco.l - 4; pco.v[7] = pco.l - 4; /* ipup */ ipup = args_info.ipup_arg; /* ipdown */ ipdown = args_info.ipdown_arg; /* Timelimit */ timelimit = args_info.timelimit_arg; starttime = time(NULL); /* qos */ qos.l = 3; qos.v[2] = (args_info.qos_arg) & 0xff; qos.v[1] = ((args_info.qos_arg) >> 8) & 0xff; qos.v[0] = ((args_info.qos_arg) >> 16) & 0xff; /* apn */ if (strlen(args_info.apn_arg) > (sizeof(apn.v) - 1)) { LOGP(DGGSN, LOGL_ERROR, "Invalid APN\n"); return -1; } apn.l = strlen(args_info.apn_arg) + 1; apn.v[0] = (char)strlen(args_info.apn_arg); strncpy((char *)&apn.v[1], args_info.apn_arg, sizeof(apn.v) - 1); /* foreground */ /* If flag not given run as a daemon */ if (!args_info.fg_flag) { FILE *f; int rc; /* Close the standard file descriptors. */ /* Is this really needed ? */ f = freopen("/dev/null", "w", stdout); if (f == NULL) { SYS_ERR(DGGSN, LOGL_NOTICE, 0, "Could not redirect stdout to /dev/null"); } f = freopen("/dev/null", "w", stderr); if (f == NULL) { SYS_ERR(DGGSN, LOGL_NOTICE, 0, "Could not redirect stderr to /dev/null"); } f = freopen("/dev/null", "r", stdin); if (f == NULL) { SYS_ERR(DGGSN, LOGL_NOTICE, 0, "Could not redirect stdin to /dev/null"); } rc = daemon(0, 0); if (rc != 0) { SYS_ERR(DGGSN, LOGL_ERROR, rc, "Could not daemonize"); exit(1); } } /* pidfile */ /* This has to be done after we have our final pid */ if (args_info.pidfile_arg) { log_pid(args_info.pidfile_arg); } DEBUGP(DGGSN, "gtpclient: Initialising GTP tunnel\n"); if (gtp_new(&gsn, args_info.statedir_arg, &listen_, GTP_MODE_GGSN)) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Failed to create gtp"); exit(1); } if (gsn->fd0 > maxfd) maxfd = gsn->fd0; if (gsn->fd1c > maxfd) maxfd = gsn->fd1c; if (gsn->fd1u > maxfd) maxfd = gsn->fd1u; /* use GTP kernel module for data packet encapsulation */ if (args_info.gtp_linux_given) { if (gtp_kernel_init(gsn, &net.v4, prefixlen, args_info.net_arg) < 0) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Failed to initialize kernel GTP\n"); goto err; } } gtp_set_cb_data_ind(gsn, encaps_tun); gtp_set_cb_delete_context(gsn, delete_context); gtp_set_cb_create_context_ind(gsn, create_context_ind); gsn->priv = ctrl_interface_setup(NULL, OSMO_CTRL_PORT_GGSN, NULL); if (!gsn->priv) { LOGP(DGGSN, LOGL_ERROR, "Failed to create CTRL interface.\n"); exit(1); } /* skip the configuration of the tun0 if we're using the gtp0 device */ if (gtp_kernel_enabled()) goto skip_tun; /* Create a tunnel interface */ DEBUGP(DGGSN, "Creating tun interface\n"); if (tun_new((struct tun_t **)&tun)) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Failed to create tun"); exit(1); } DEBUGP(DGGSN, "Setting tun IP address\n"); if (tun_setaddr(tun, &netaddr, &destaddr, prefixlen)) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "Failed to set tun IP address"); exit(1); } tun_set_cb_ind(tun, cb_tun_ind); if (tun->fd > maxfd) maxfd = tun->fd; if (ipup) tun_runscript(tun, ipup); skip_tun: /******************************************************************/ /* Main select loop */ /******************************************************************/ while ((((starttime + timelimit) > time(NULL)) || (0 == timelimit)) && (!end)) { FD_ZERO(&fds); if (tun) FD_SET(tun->fd, &fds); FD_SET(gsn->fd0, &fds); FD_SET(gsn->fd1c, &fds); FD_SET(gsn->fd1u, &fds); gtp_retranstimeout(gsn, &idleTime); switch (select(maxfd + 1, &fds, NULL, NULL, &idleTime)) { case -1: /* errno == EINTR : unblocked signal */ SYS_ERR(DGGSN, LOGL_ERROR, 0, "select() returned -1"); /* On error, select returns without modifying fds */ FD_ZERO(&fds); break; case 0: /* printf("Select returned 0\n"); */ gtp_retrans(gsn); /* Only retransmit if nothing else */ break; default: break; } if (tun && tun->fd != -1 && FD_ISSET(tun->fd, &fds) && tun_decaps(tun) < 0) { SYS_ERR(DGGSN, LOGL_ERROR, 0, "TUN read failed (fd)=(%d)", tun->fd); } if (FD_ISSET(gsn->fd0, &fds)) gtp_decaps0(gsn); if (FD_ISSET(gsn->fd1c, &fds)) gtp_decaps1c(gsn); if (FD_ISSET(gsn->fd1u, &fds)) gtp_decaps1u(gsn); osmo_select_main(1); } err: gtp_kernel_stop(); cmdline_parser_free(&args_info); ippool_free(ippool); gtp_free(gsn); if (tun) tun_free(tun); return 1; }