/* -*-c-*-
*
- * $Id: sel.c,v 1.7 1999/12/11 11:12:17 mdw Exp $
+ * $Id: sel.c,v 1.8 2000/03/23 20:42:08 mdw Exp $
*
* I/O multiplexing support
*
/*----- Revision history --------------------------------------------------*
*
* $Log: sel.c,v $
+ * Revision 1.8 2000/03/23 20:42:08 mdw
+ * Rearrange timeout handling to avoid list corruptions.
+ *
* Revision 1.7 1999/12/11 11:12:17 mdw
* Fix comment formatting error.
*
/* --- Run through the timers --- */
- {
+ if (s->timers && TV_CMP(&s->timers->tv, <=, &a.now)) {
sel_timer *t, *tt;
- for (t = s->timers; t && TV_CMP(&t->tv, <=, &a.now); t = tt) {
+ tt = s->timers;
+ for (t = tt; t && TV_CMP(&t->tv, <=, &a.now); t = t->next)
+ ;
+ if (t) {
+ t->prev->next = 0;
+ t->prev = (sel_timer *)&s->timers;
+ }
+ s->timers = t;
+ for (t = tt; t; t = tt) {
tt = t->next;
- t->next = t->prev = t;
t->func(&a.now, t->p);
}
- s->timers = t;
- if (t)
- t->prev = (sel_timer *)&s->timers;
}
/* --- And finally run through the files --- *