Net-ADNS

 view release on metacpan or  search on metacpan

ADNS.xs  view on Meta::CPAN

    }
OUTPUT:
    RETVAL

void
open_queries(self)
    adns_state self
PREINIT:
    int n;
    SV *wrapper;
PPCODE:
    adns_forallqueries_begin(self);
    for ( n = 0;
          adns_forallqueries_next(self, (void**)(&wrapper));
          n++)
        XPUSHs(sv_2mortal(newSVsv(wrapper)));
    XSRETURN(n);

SV *
adns_wait(self, query=0)
    adns_state self

ADNS.xs  view on Meta::CPAN

    RETVAL

void
adns_before_select(self)
    adns_state self;
PREINIT:
    fd_set rfds, wfds, efds;
    int maxfd = 0;
    struct timeval *tv_mod = 0;
    struct timeval tv_buf, now;
PPCODE:
    FD_ZERO(&rfds); FD_ZERO(&wfds); FD_ZERO(&efds);
    gettimeofday(&now, NULL);
    adns_beforeselect(self,
                      &maxfd, &rfds, &wfds, &efds,
                      &tv_mod, &tv_buf, &now);
    /* fprintf(stderr, "maxfd: %d\n", maxfd); fflush(stderr); */
    XPUSHs(sv_2mortal(_fd_set2sv(aTHX_ &rfds, maxfd)));
    XPUSHs(sv_2mortal(_fd_set2sv(aTHX_ &wfds, maxfd)));
    XPUSHs(sv_2mortal(_fd_set2sv(aTHX_ &efds, maxfd)));
    if (tv_mod) {



( run in 1.617 second using v1.01-cache-2.11-cpan-5511b514fd6 )