EV-cares

 view release on metacpan or  search on metacpan

cares.xs  view on Meta::CPAN


        /* address families */
        CONST_IV(stash, AF_INET);
        CONST_IV(stash, AF_INET6);
        CONST_IV(stash, AF_UNSPEC);
    }
}

void
new(class, ...)
PPCODE:
{
    const char *class_name = SvPV_nolen(ST(0));
    ev_cares_t *self;
    struct ares_options opts;
    int optmask = 0;
    int status, i;
    const char *servers = NULL;
    struct ev_loop *loop_ptr = EV_DEFAULT;
    SV *loop_sv = NULL;

cares.xs  view on Meta::CPAN

    }

    rc = ares_set_servers_csv(self->channel, SvPV_nolen(csv));
    if (rc != ARES_SUCCESS)
        croak("EV::cares::set_servers: %s", ares_strerror(rc));
}

void
servers(self)
    EV::cares self
PPCODE:
{
    char *csv;
    REQUIRE_LIVE(self);
    csv = ares_get_servers_csv(self->channel);
    if (!csv) croak("EV::cares::servers: ares_get_servers_csv failed");
    mXPUSHp(csv, strlen(csv));
    ares_free_string(csv);
}

void



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