--- libev/ev_select.c 2007/10/30 20:59:31 1.1 +++ libev/ev_select.c 2007/10/30 23:54:38 1.2 @@ -0,0 +1,92 @@ +/* for broken bsd's */ +#include +#include +#include + +/* for unix systems */ +#include + +#include +#include + +static unsigned char *vec_ri, *vec_ro, *vec_wi, *vec_wo; +static int vec_max; + +static void +select_modify (int fd, int oev, int nev) +{ + int offs = fd >> 3; + int mask = 1 << (fd & 7); + + if (vec_max < (fd >> 5) + 1) + { + vec_max = (fd >> 5) + 1; + + vec_ri = (unsigned char *)realloc (vec_ri, vec_max * 4); + vec_ro = (unsigned char *)realloc (vec_ro, vec_max * 4); /* could free/malloc */ + vec_wi = (unsigned char *)realloc (vec_wi, vec_max * 4); + vec_wo = (unsigned char *)realloc (vec_wo, vec_max * 4); /* could free/malloc */ + } + + vec_ri [offs] |= mask; + if (!(nev & EV_READ)) + vec_ri [offs] &= ~mask; + + vec_wi [offs] |= mask; + if (!(nev & EV_WRITE)) + vec_wi [offs] &= ~mask; +} + +static void select_poll (ev_tstamp timeout) +{ + struct timeval tv; + int res; + + memcpy (vec_ro, vec_ri, vec_max * 4); + memcpy (vec_wo, vec_wi, vec_max * 4); + + tv.tv_sec = (long)timeout; + tv.tv_usec = (long)((timeout - (ev_tstamp)tv.tv_sec) * 1e6); + + res = select (vec_max * 32, (fd_set *)vec_ro, (fd_set *)vec_wo, 0, &tv); + + if (res > 0) + { + int word, offs; + + for (word = vec_max; word--; ) + { + if (((uint32_t *)vec_ro) [word] | ((uint32_t *)vec_wo) [word]) + for (offs = 4; offs--; ) + { + int idx = word * 4 + offs; + unsigned char byte_r = vec_ro [idx]; + unsigned char byte_w = vec_wo [idx]; + int bit; + + if (byte_r | byte_w) + for (bit = 8; bit--; ) + { + int events = 0; + events |= byte_r & (1 << bit) ? EV_READ : 0; + events |= byte_w & (1 << bit) ? EV_WRITE : 0; + + if (events) + fd_event (idx * 8 + bit, events); + } + } + } + } +} + +int select_init (int flags) +{ + ev_method = EVMETHOD_SELECT; + method_fudge = 1e-2; /* needed to compensate for select returning early, very conservative */ + method_modify = select_modify; + method_poll = select_poll; + + return 1; +} + +