+static void udp_make_socket(struct udp *st, struct udp *us)
+{
+ const union iaddr *addr=&us->addr;
+ us->fd=socket(PF_INET, SOCK_DGRAM, IPPROTO_UDP);
+ if (us->fd<0) {
+ fatal_perror("udp (%s:%d): socket",st->loc.file,st->loc.line);
+ }
+ if (fcntl(us->fd, F_SETFL, fcntl(us->fd, F_GETFL)|O_NONBLOCK)==-1) {
+ fatal_perror("udp (%s:%d): fcntl(set O_NONBLOCK)",
+ st->loc.file,st->loc.line);
+ }
+ setcloexec(us->fd);
+
+ if (st->authbind) {
+ pid_t c;
+ int status;
+
+ /* XXX this fork() and waitpid() business needs to be hidden
+ in some system-specific library functions. */
+ c=fork();
+ if (c==-1) {
+ fatal_perror("udp_phase_hook: fork() for authbind");
+ }
+ if (c==0) {
+ char *argv[4], addrstr[9], portstr[5];
+ switch (addr->sa.sa_family) {
+ case AF_INET:
+ sprintf(addrstr,"%08lX",(long)addr->sin.sin_addr.s_addr);
+ sprintf(portstr,"%04X",addr->sin.sin_port);
+ break;
+ default:
+ fatal("udp (%s:%d): unsupported address family for authbind",
+ st->loc.file,st->loc.line);
+ }
+ argv[0]=st->authbind;
+ argv[1]=addrstr;
+ argv[2]=portstr;
+ argv[3]=NULL;
+ dup2(us->fd,0);
+ execvp(st->authbind,argv);
+ _exit(255);
+ }
+ while (waitpid(c,&status,0)==-1) {
+ if (errno==EINTR) continue;
+ fatal_perror("udp (%s:%d): authbind",st->loc.file,st->loc.line);
+ }
+ if (WIFSIGNALED(status)) {
+ fatal("udp (%s:%d): authbind died on signal %d",st->loc.file,
+ st->loc.line, WTERMSIG(status));
+ }
+ if (WIFEXITED(status) && WEXITSTATUS(status)!=0) {
+ fatal("udp (%s:%d): authbind died with status %d",st->loc.file,
+ st->loc.line, WEXITSTATUS(status));
+ }
+ } else {
+ if (bind(us->fd, &addr->sa, iaddr_socklen(addr))!=0) {
+ fatal_perror("udp (%s:%d): bind",st->loc.file,st->loc.line);
+ }
+ }
+}
+
+static void udp_phase_hook(void *sst, uint32_t new_phase)
+{
+ struct udp *st=sst;
+ udp_make_socket(st,st);
+ register_for_poll(st,udp_beforepoll,udp_afterpoll,1,"udp");
+}
+