/* -*-c-*-
*
- * $Id: pkbuf.c,v 1.2 2000/07/16 12:29:16 mdw Exp $
+ * $Id: pkbuf.c,v 1.4 2001/02/03 16:23:33 mdw Exp $
*
* Simple packet buffering
*
/*----- Revision history --------------------------------------------------*
*
* $Log: pkbuf.c,v $
+ * Revision 1.4 2001/02/03 16:23:33 mdw
+ * Bug fix: handle a disable during a close-induced flush without dumping
+ * core.
+ *
+ * Revision 1.3 2000/07/16 18:55:45 mdw
+ * Remove some stray debugging code.
+ *
* Revision 1.2 2000/07/16 12:29:16 mdw
* Change to arena `realloc' interface, to fix a design bug.
*
size_t l;
size_t keep;
+ if (pk->f & PKBUF_CLOSE) {
+ pk->func(0, 0, pk, 0, pk->p);
+ return;
+ }
+
/* --- Initialize variables as necessary --- */
if (!p) {
void pkbuf_close(pkbuf *pk)
{
if (pk->buf) {
- fprintf(stderr, "*** destroying buffer, closing down\n");
x_free(pk->a, pk->buf);
pk->buf = 0;
}
+ pk->f |= PKBUF_CLOSE;
if (pk->f & PKBUF_ENABLE)
pk->func(0, 0, pk, 0, pk->p);
}