michael@0: /*
michael@0:  * Copyright (c) 2002-2007 Niels Provos <provos@citi.umich.edu>
michael@0:  * Copyright (c) 2007-2012 Niels Provos, Nick Mathewson
michael@0:  *
michael@0:  * Redistribution and use in source and binary forms, with or without
michael@0:  * modification, are permitted provided that the following conditions
michael@0:  * are met:
michael@0:  * 1. Redistributions of source code must retain the above copyright
michael@0:  *    notice, this list of conditions and the following disclaimer.
michael@0:  * 2. Redistributions in binary form must reproduce the above copyright
michael@0:  *    notice, this list of conditions and the following disclaimer in the
michael@0:  *    documentation and/or other materials provided with the distribution.
michael@0:  * 3. The name of the author may not be used to endorse or promote products
michael@0:  *    derived from this software without specific prior written permission.
michael@0:  *
michael@0:  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
michael@0:  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
michael@0:  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
michael@0:  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
michael@0:  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
michael@0:  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
michael@0:  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
michael@0:  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
michael@0:  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
michael@0:  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
michael@0:  */
michael@0: 
michael@0: #include <sys/types.h>
michael@0: 
michael@0: #include "event2/event-config.h"
michael@0: 
michael@0: #ifdef _EVENT_HAVE_SYS_TIME_H
michael@0: #include <sys/time.h>
michael@0: #endif
michael@0: 
michael@0: #include <errno.h>
michael@0: #include <stdio.h>
michael@0: #include <stdlib.h>
michael@0: #include <string.h>
michael@0: #ifdef _EVENT_HAVE_STDARG_H
michael@0: #include <stdarg.h>
michael@0: #endif
michael@0: 
michael@0: #ifdef WIN32
michael@0: #include <winsock2.h>
michael@0: #endif
michael@0: #include <errno.h>
michael@0: 
michael@0: #include "event2/util.h"
michael@0: #include "event2/buffer.h"
michael@0: #include "event2/buffer_compat.h"
michael@0: #include "event2/bufferevent.h"
michael@0: #include "event2/bufferevent_struct.h"
michael@0: #include "event2/bufferevent_compat.h"
michael@0: #include "event2/event.h"
michael@0: #include "log-internal.h"
michael@0: #include "mm-internal.h"
michael@0: #include "bufferevent-internal.h"
michael@0: #include "evbuffer-internal.h"
michael@0: #include "util-internal.h"
michael@0: 
michael@0: static void _bufferevent_cancel_all(struct bufferevent *bev);
michael@0: 
michael@0: 
michael@0: void
michael@0: bufferevent_suspend_read(struct bufferevent *bufev, bufferevent_suspend_flags what)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 	BEV_LOCK(bufev);
michael@0: 	if (!bufev_private->read_suspended)
michael@0: 		bufev->be_ops->disable(bufev, EV_READ);
michael@0: 	bufev_private->read_suspended |= what;
michael@0: 	BEV_UNLOCK(bufev);
michael@0: }
michael@0: 
michael@0: void
michael@0: bufferevent_unsuspend_read(struct bufferevent *bufev, bufferevent_suspend_flags what)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 	BEV_LOCK(bufev);
michael@0: 	bufev_private->read_suspended &= ~what;
michael@0: 	if (!bufev_private->read_suspended && (bufev->enabled & EV_READ))
michael@0: 		bufev->be_ops->enable(bufev, EV_READ);
michael@0: 	BEV_UNLOCK(bufev);
michael@0: }
michael@0: 
michael@0: void
michael@0: bufferevent_suspend_write(struct bufferevent *bufev, bufferevent_suspend_flags what)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 	BEV_LOCK(bufev);
michael@0: 	if (!bufev_private->write_suspended)
michael@0: 		bufev->be_ops->disable(bufev, EV_WRITE);
michael@0: 	bufev_private->write_suspended |= what;
michael@0: 	BEV_UNLOCK(bufev);
michael@0: }
michael@0: 
michael@0: void
michael@0: bufferevent_unsuspend_write(struct bufferevent *bufev, bufferevent_suspend_flags what)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 	BEV_LOCK(bufev);
michael@0: 	bufev_private->write_suspended &= ~what;
michael@0: 	if (!bufev_private->write_suspended && (bufev->enabled & EV_WRITE))
michael@0: 		bufev->be_ops->enable(bufev, EV_WRITE);
michael@0: 	BEV_UNLOCK(bufev);
michael@0: }
michael@0: 
michael@0: 
michael@0: /* Callback to implement watermarks on the input buffer.  Only enabled
michael@0:  * if the watermark is set. */
michael@0: static void
michael@0: bufferevent_inbuf_wm_cb(struct evbuffer *buf,
michael@0:     const struct evbuffer_cb_info *cbinfo,
michael@0:     void *arg)
michael@0: {
michael@0: 	struct bufferevent *bufev = arg;
michael@0: 	size_t size;
michael@0: 
michael@0: 	size = evbuffer_get_length(buf);
michael@0: 
michael@0: 	if (size >= bufev->wm_read.high)
michael@0: 		bufferevent_wm_suspend_read(bufev);
michael@0: 	else
michael@0: 		bufferevent_wm_unsuspend_read(bufev);
michael@0: }
michael@0: 
michael@0: static void
michael@0: bufferevent_run_deferred_callbacks_locked(struct deferred_cb *_, void *arg)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private = arg;
michael@0: 	struct bufferevent *bufev = &bufev_private->bev;
michael@0: 
michael@0: 	BEV_LOCK(bufev);
michael@0: 	if ((bufev_private->eventcb_pending & BEV_EVENT_CONNECTED) &&
michael@0: 	    bufev->errorcb) {
michael@0: 		/* The "connected" happened before any reads or writes, so
michael@0: 		   send it first. */
michael@0: 		bufev_private->eventcb_pending &= ~BEV_EVENT_CONNECTED;
michael@0: 		bufev->errorcb(bufev, BEV_EVENT_CONNECTED, bufev->cbarg);
michael@0: 	}
michael@0: 	if (bufev_private->readcb_pending && bufev->readcb) {
michael@0: 		bufev_private->readcb_pending = 0;
michael@0: 		bufev->readcb(bufev, bufev->cbarg);
michael@0: 	}
michael@0: 	if (bufev_private->writecb_pending && bufev->writecb) {
michael@0: 		bufev_private->writecb_pending = 0;
michael@0: 		bufev->writecb(bufev, bufev->cbarg);
michael@0: 	}
michael@0: 	if (bufev_private->eventcb_pending && bufev->errorcb) {
michael@0: 		short what = bufev_private->eventcb_pending;
michael@0: 		int err = bufev_private->errno_pending;
michael@0: 		bufev_private->eventcb_pending = 0;
michael@0: 		bufev_private->errno_pending = 0;
michael@0: 		EVUTIL_SET_SOCKET_ERROR(err);
michael@0: 		bufev->errorcb(bufev, what, bufev->cbarg);
michael@0: 	}
michael@0: 	_bufferevent_decref_and_unlock(bufev);
michael@0: }
michael@0: 
michael@0: static void
michael@0: bufferevent_run_deferred_callbacks_unlocked(struct deferred_cb *_, void *arg)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private = arg;
michael@0: 	struct bufferevent *bufev = &bufev_private->bev;
michael@0: 
michael@0: 	BEV_LOCK(bufev);
michael@0: #define UNLOCKED(stmt) \
michael@0: 	do { BEV_UNLOCK(bufev); stmt; BEV_LOCK(bufev); } while(0)
michael@0: 
michael@0: 	if ((bufev_private->eventcb_pending & BEV_EVENT_CONNECTED) &&
michael@0: 	    bufev->errorcb) {
michael@0: 		/* The "connected" happened before any reads or writes, so
michael@0: 		   send it first. */
michael@0: 		bufferevent_event_cb errorcb = bufev->errorcb;
michael@0: 		void *cbarg = bufev->cbarg;
michael@0: 		bufev_private->eventcb_pending &= ~BEV_EVENT_CONNECTED;
michael@0: 		UNLOCKED(errorcb(bufev, BEV_EVENT_CONNECTED, cbarg));
michael@0: 	}
michael@0: 	if (bufev_private->readcb_pending && bufev->readcb) {
michael@0: 		bufferevent_data_cb readcb = bufev->readcb;
michael@0: 		void *cbarg = bufev->cbarg;
michael@0: 		bufev_private->readcb_pending = 0;
michael@0: 		UNLOCKED(readcb(bufev, cbarg));
michael@0: 	}
michael@0: 	if (bufev_private->writecb_pending && bufev->writecb) {
michael@0: 		bufferevent_data_cb writecb = bufev->writecb;
michael@0: 		void *cbarg = bufev->cbarg;
michael@0: 		bufev_private->writecb_pending = 0;
michael@0: 		UNLOCKED(writecb(bufev, cbarg));
michael@0: 	}
michael@0: 	if (bufev_private->eventcb_pending && bufev->errorcb) {
michael@0: 		bufferevent_event_cb errorcb = bufev->errorcb;
michael@0: 		void *cbarg = bufev->cbarg;
michael@0: 		short what = bufev_private->eventcb_pending;
michael@0: 		int err = bufev_private->errno_pending;
michael@0: 		bufev_private->eventcb_pending = 0;
michael@0: 		bufev_private->errno_pending = 0;
michael@0: 		EVUTIL_SET_SOCKET_ERROR(err);
michael@0: 		UNLOCKED(errorcb(bufev,what,cbarg));
michael@0: 	}
michael@0: 	_bufferevent_decref_and_unlock(bufev);
michael@0: #undef UNLOCKED
michael@0: }
michael@0: 
michael@0: #define SCHEDULE_DEFERRED(bevp)						\
michael@0: 	do {								\
michael@0: 		bufferevent_incref(&(bevp)->bev);			\
michael@0: 		event_deferred_cb_schedule(				\
michael@0: 			event_base_get_deferred_cb_queue((bevp)->bev.ev_base), \
michael@0: 			&(bevp)->deferred);				\
michael@0: 	} while (0)
michael@0: 
michael@0: 
michael@0: void
michael@0: _bufferevent_run_readcb(struct bufferevent *bufev)
michael@0: {
michael@0: 	/* Requires that we hold the lock and a reference */
michael@0: 	struct bufferevent_private *p =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 	if (bufev->readcb == NULL)
michael@0: 		return;
michael@0: 	if (p->options & BEV_OPT_DEFER_CALLBACKS) {
michael@0: 		p->readcb_pending = 1;
michael@0: 		if (!p->deferred.queued)
michael@0: 			SCHEDULE_DEFERRED(p);
michael@0: 	} else {
michael@0: 		bufev->readcb(bufev, bufev->cbarg);
michael@0: 	}
michael@0: }
michael@0: 
michael@0: void
michael@0: _bufferevent_run_writecb(struct bufferevent *bufev)
michael@0: {
michael@0: 	/* Requires that we hold the lock and a reference */
michael@0: 	struct bufferevent_private *p =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 	if (bufev->writecb == NULL)
michael@0: 		return;
michael@0: 	if (p->options & BEV_OPT_DEFER_CALLBACKS) {
michael@0: 		p->writecb_pending = 1;
michael@0: 		if (!p->deferred.queued)
michael@0: 			SCHEDULE_DEFERRED(p);
michael@0: 	} else {
michael@0: 		bufev->writecb(bufev, bufev->cbarg);
michael@0: 	}
michael@0: }
michael@0: 
michael@0: void
michael@0: _bufferevent_run_eventcb(struct bufferevent *bufev, short what)
michael@0: {
michael@0: 	/* Requires that we hold the lock and a reference */
michael@0: 	struct bufferevent_private *p =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 	if (bufev->errorcb == NULL)
michael@0: 		return;
michael@0: 	if (p->options & BEV_OPT_DEFER_CALLBACKS) {
michael@0: 		p->eventcb_pending |= what;
michael@0: 		p->errno_pending = EVUTIL_SOCKET_ERROR();
michael@0: 		if (!p->deferred.queued)
michael@0: 			SCHEDULE_DEFERRED(p);
michael@0: 	} else {
michael@0: 		bufev->errorcb(bufev, what, bufev->cbarg);
michael@0: 	}
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_init_common(struct bufferevent_private *bufev_private,
michael@0:     struct event_base *base,
michael@0:     const struct bufferevent_ops *ops,
michael@0:     enum bufferevent_options options)
michael@0: {
michael@0: 	struct bufferevent *bufev = &bufev_private->bev;
michael@0: 
michael@0: 	if (!bufev->input) {
michael@0: 		if ((bufev->input = evbuffer_new()) == NULL)
michael@0: 			return -1;
michael@0: 	}
michael@0: 
michael@0: 	if (!bufev->output) {
michael@0: 		if ((bufev->output = evbuffer_new()) == NULL) {
michael@0: 			evbuffer_free(bufev->input);
michael@0: 			return -1;
michael@0: 		}
michael@0: 	}
michael@0: 
michael@0: 	bufev_private->refcnt = 1;
michael@0: 	bufev->ev_base = base;
michael@0: 
michael@0: 	/* Disable timeouts. */
michael@0: 	evutil_timerclear(&bufev->timeout_read);
michael@0: 	evutil_timerclear(&bufev->timeout_write);
michael@0: 
michael@0: 	bufev->be_ops = ops;
michael@0: 
michael@0: 	/*
michael@0: 	 * Set to EV_WRITE so that using bufferevent_write is going to
michael@0: 	 * trigger a callback.  Reading needs to be explicitly enabled
michael@0: 	 * because otherwise no data will be available.
michael@0: 	 */
michael@0: 	bufev->enabled = EV_WRITE;
michael@0: 
michael@0: #ifndef _EVENT_DISABLE_THREAD_SUPPORT
michael@0: 	if (options & BEV_OPT_THREADSAFE) {
michael@0: 		if (bufferevent_enable_locking(bufev, NULL) < 0) {
michael@0: 			/* cleanup */
michael@0: 			evbuffer_free(bufev->input);
michael@0: 			evbuffer_free(bufev->output);
michael@0: 			bufev->input = NULL;
michael@0: 			bufev->output = NULL;
michael@0: 			return -1;
michael@0: 		}
michael@0: 	}
michael@0: #endif
michael@0: 	if ((options & (BEV_OPT_DEFER_CALLBACKS|BEV_OPT_UNLOCK_CALLBACKS))
michael@0: 	    == BEV_OPT_UNLOCK_CALLBACKS) {
michael@0: 		event_warnx("UNLOCK_CALLBACKS requires DEFER_CALLBACKS");
michael@0: 		return -1;
michael@0: 	}
michael@0: 	if (options & BEV_OPT_DEFER_CALLBACKS) {
michael@0: 		if (options & BEV_OPT_UNLOCK_CALLBACKS)
michael@0: 			event_deferred_cb_init(&bufev_private->deferred,
michael@0: 			    bufferevent_run_deferred_callbacks_unlocked,
michael@0: 			    bufev_private);
michael@0: 		else
michael@0: 			event_deferred_cb_init(&bufev_private->deferred,
michael@0: 			    bufferevent_run_deferred_callbacks_locked,
michael@0: 			    bufev_private);
michael@0: 	}
michael@0: 
michael@0: 	bufev_private->options = options;
michael@0: 
michael@0: 	evbuffer_set_parent(bufev->input, bufev);
michael@0: 	evbuffer_set_parent(bufev->output, bufev);
michael@0: 
michael@0: 	return 0;
michael@0: }
michael@0: 
michael@0: void
michael@0: bufferevent_setcb(struct bufferevent *bufev,
michael@0:     bufferevent_data_cb readcb, bufferevent_data_cb writecb,
michael@0:     bufferevent_event_cb eventcb, void *cbarg)
michael@0: {
michael@0: 	BEV_LOCK(bufev);
michael@0: 
michael@0: 	bufev->readcb = readcb;
michael@0: 	bufev->writecb = writecb;
michael@0: 	bufev->errorcb = eventcb;
michael@0: 
michael@0: 	bufev->cbarg = cbarg;
michael@0: 	BEV_UNLOCK(bufev);
michael@0: }
michael@0: 
michael@0: struct evbuffer *
michael@0: bufferevent_get_input(struct bufferevent *bufev)
michael@0: {
michael@0: 	return bufev->input;
michael@0: }
michael@0: 
michael@0: struct evbuffer *
michael@0: bufferevent_get_output(struct bufferevent *bufev)
michael@0: {
michael@0: 	return bufev->output;
michael@0: }
michael@0: 
michael@0: struct event_base *
michael@0: bufferevent_get_base(struct bufferevent *bufev)
michael@0: {
michael@0: 	return bufev->ev_base;
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_write(struct bufferevent *bufev, const void *data, size_t size)
michael@0: {
michael@0: 	if (evbuffer_add(bufev->output, data, size) == -1)
michael@0: 		return (-1);
michael@0: 
michael@0: 	return 0;
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_write_buffer(struct bufferevent *bufev, struct evbuffer *buf)
michael@0: {
michael@0: 	if (evbuffer_add_buffer(bufev->output, buf) == -1)
michael@0: 		return (-1);
michael@0: 
michael@0: 	return 0;
michael@0: }
michael@0: 
michael@0: size_t
michael@0: bufferevent_read(struct bufferevent *bufev, void *data, size_t size)
michael@0: {
michael@0: 	return (evbuffer_remove(bufev->input, data, size));
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_read_buffer(struct bufferevent *bufev, struct evbuffer *buf)
michael@0: {
michael@0: 	return (evbuffer_add_buffer(buf, bufev->input));
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_enable(struct bufferevent *bufev, short event)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 	short impl_events = event;
michael@0: 	int r = 0;
michael@0: 
michael@0: 	_bufferevent_incref_and_lock(bufev);
michael@0: 	if (bufev_private->read_suspended)
michael@0: 		impl_events &= ~EV_READ;
michael@0: 	if (bufev_private->write_suspended)
michael@0: 		impl_events &= ~EV_WRITE;
michael@0: 
michael@0: 	bufev->enabled |= event;
michael@0: 
michael@0: 	if (impl_events && bufev->be_ops->enable(bufev, impl_events) < 0)
michael@0: 		r = -1;
michael@0: 
michael@0: 	_bufferevent_decref_and_unlock(bufev);
michael@0: 	return r;
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_set_timeouts(struct bufferevent *bufev,
michael@0: 			 const struct timeval *tv_read,
michael@0: 			 const struct timeval *tv_write)
michael@0: {
michael@0: 	int r = 0;
michael@0: 	BEV_LOCK(bufev);
michael@0: 	if (tv_read) {
michael@0: 		bufev->timeout_read = *tv_read;
michael@0: 	} else {
michael@0: 		evutil_timerclear(&bufev->timeout_read);
michael@0: 	}
michael@0: 	if (tv_write) {
michael@0: 		bufev->timeout_write = *tv_write;
michael@0: 	} else {
michael@0: 		evutil_timerclear(&bufev->timeout_write);
michael@0: 	}
michael@0: 
michael@0: 	if (bufev->be_ops->adj_timeouts)
michael@0: 		r = bufev->be_ops->adj_timeouts(bufev);
michael@0: 	BEV_UNLOCK(bufev);
michael@0: 
michael@0: 	return r;
michael@0: }
michael@0: 
michael@0: 
michael@0: /* Obsolete; use bufferevent_set_timeouts */
michael@0: void
michael@0: bufferevent_settimeout(struct bufferevent *bufev,
michael@0: 		       int timeout_read, int timeout_write)
michael@0: {
michael@0: 	struct timeval tv_read, tv_write;
michael@0: 	struct timeval *ptv_read = NULL, *ptv_write = NULL;
michael@0: 
michael@0: 	memset(&tv_read, 0, sizeof(tv_read));
michael@0: 	memset(&tv_write, 0, sizeof(tv_write));
michael@0: 
michael@0: 	if (timeout_read) {
michael@0: 		tv_read.tv_sec = timeout_read;
michael@0: 		ptv_read = &tv_read;
michael@0: 	}
michael@0: 	if (timeout_write) {
michael@0: 		tv_write.tv_sec = timeout_write;
michael@0: 		ptv_write = &tv_write;
michael@0: 	}
michael@0: 
michael@0: 	bufferevent_set_timeouts(bufev, ptv_read, ptv_write);
michael@0: }
michael@0: 
michael@0: 
michael@0: int
michael@0: bufferevent_disable_hard(struct bufferevent *bufev, short event)
michael@0: {
michael@0: 	int r = 0;
michael@0: 	struct bufferevent_private *bufev_private =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 
michael@0: 	BEV_LOCK(bufev);
michael@0: 	bufev->enabled &= ~event;
michael@0: 
michael@0: 	bufev_private->connecting = 0;
michael@0: 	if (bufev->be_ops->disable(bufev, event) < 0)
michael@0: 		r = -1;
michael@0: 
michael@0: 	BEV_UNLOCK(bufev);
michael@0: 	return r;
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_disable(struct bufferevent *bufev, short event)
michael@0: {
michael@0: 	int r = 0;
michael@0: 
michael@0: 	BEV_LOCK(bufev);
michael@0: 	bufev->enabled &= ~event;
michael@0: 
michael@0: 	if (bufev->be_ops->disable(bufev, event) < 0)
michael@0: 		r = -1;
michael@0: 
michael@0: 	BEV_UNLOCK(bufev);
michael@0: 	return r;
michael@0: }
michael@0: 
michael@0: /*
michael@0:  * Sets the water marks
michael@0:  */
michael@0: 
michael@0: void
michael@0: bufferevent_setwatermark(struct bufferevent *bufev, short events,
michael@0:     size_t lowmark, size_t highmark)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 
michael@0: 	BEV_LOCK(bufev);
michael@0: 	if (events & EV_WRITE) {
michael@0: 		bufev->wm_write.low = lowmark;
michael@0: 		bufev->wm_write.high = highmark;
michael@0: 	}
michael@0: 
michael@0: 	if (events & EV_READ) {
michael@0: 		bufev->wm_read.low = lowmark;
michael@0: 		bufev->wm_read.high = highmark;
michael@0: 
michael@0: 		if (highmark) {
michael@0: 			/* There is now a new high-water mark for read.
michael@0: 			   enable the callback if needed, and see if we should
michael@0: 			   suspend/bufferevent_wm_unsuspend. */
michael@0: 
michael@0: 			if (bufev_private->read_watermarks_cb == NULL) {
michael@0: 				bufev_private->read_watermarks_cb =
michael@0: 				    evbuffer_add_cb(bufev->input,
michael@0: 						    bufferevent_inbuf_wm_cb,
michael@0: 						    bufev);
michael@0: 			}
michael@0: 			evbuffer_cb_set_flags(bufev->input,
michael@0: 				      bufev_private->read_watermarks_cb,
michael@0: 				      EVBUFFER_CB_ENABLED|EVBUFFER_CB_NODEFER);
michael@0: 
michael@0: 			if (evbuffer_get_length(bufev->input) > highmark)
michael@0: 				bufferevent_wm_suspend_read(bufev);
michael@0: 			else if (evbuffer_get_length(bufev->input) < highmark)
michael@0: 				bufferevent_wm_unsuspend_read(bufev);
michael@0: 		} else {
michael@0: 			/* There is now no high-water mark for read. */
michael@0: 			if (bufev_private->read_watermarks_cb)
michael@0: 				evbuffer_cb_clear_flags(bufev->input,
michael@0: 				    bufev_private->read_watermarks_cb,
michael@0: 				    EVBUFFER_CB_ENABLED);
michael@0: 			bufferevent_wm_unsuspend_read(bufev);
michael@0: 		}
michael@0: 	}
michael@0: 	BEV_UNLOCK(bufev);
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_flush(struct bufferevent *bufev,
michael@0:     short iotype,
michael@0:     enum bufferevent_flush_mode mode)
michael@0: {
michael@0: 	int r = -1;
michael@0: 	BEV_LOCK(bufev);
michael@0: 	if (bufev->be_ops->flush)
michael@0: 		r = bufev->be_ops->flush(bufev, iotype, mode);
michael@0: 	BEV_UNLOCK(bufev);
michael@0: 	return r;
michael@0: }
michael@0: 
michael@0: void
michael@0: _bufferevent_incref_and_lock(struct bufferevent *bufev)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private =
michael@0: 	    BEV_UPCAST(bufev);
michael@0: 	BEV_LOCK(bufev);
michael@0: 	++bufev_private->refcnt;
michael@0: }
michael@0: 
michael@0: #if 0
michael@0: static void
michael@0: _bufferevent_transfer_lock_ownership(struct bufferevent *donor,
michael@0:     struct bufferevent *recipient)
michael@0: {
michael@0: 	struct bufferevent_private *d = BEV_UPCAST(donor);
michael@0: 	struct bufferevent_private *r = BEV_UPCAST(recipient);
michael@0: 	if (d->lock != r->lock)
michael@0: 		return;
michael@0: 	if (r->own_lock)
michael@0: 		return;
michael@0: 	if (d->own_lock) {
michael@0: 		d->own_lock = 0;
michael@0: 		r->own_lock = 1;
michael@0: 	}
michael@0: }
michael@0: #endif
michael@0: 
michael@0: int
michael@0: _bufferevent_decref_and_unlock(struct bufferevent *bufev)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 	struct bufferevent *underlying;
michael@0: 
michael@0: 	EVUTIL_ASSERT(bufev_private->refcnt > 0);
michael@0: 
michael@0: 	if (--bufev_private->refcnt) {
michael@0: 		BEV_UNLOCK(bufev);
michael@0: 		return 0;
michael@0: 	}
michael@0: 
michael@0: 	underlying = bufferevent_get_underlying(bufev);
michael@0: 
michael@0: 	/* Clean up the shared info */
michael@0: 	if (bufev->be_ops->destruct)
michael@0: 		bufev->be_ops->destruct(bufev);
michael@0: 
michael@0: 	/* XXX what happens if refcnt for these buffers is > 1?
michael@0: 	 * The buffers can share a lock with this bufferevent object,
michael@0: 	 * but the lock might be destroyed below. */
michael@0: 	/* evbuffer will free the callbacks */
michael@0: 	evbuffer_free(bufev->input);
michael@0: 	evbuffer_free(bufev->output);
michael@0: 
michael@0: 	if (bufev_private->rate_limiting) {
michael@0: 		if (bufev_private->rate_limiting->group)
michael@0: 			bufferevent_remove_from_rate_limit_group_internal(bufev,0);
michael@0: 		if (event_initialized(&bufev_private->rate_limiting->refill_bucket_event))
michael@0: 			event_del(&bufev_private->rate_limiting->refill_bucket_event);
michael@0: 		event_debug_unassign(&bufev_private->rate_limiting->refill_bucket_event);
michael@0: 		mm_free(bufev_private->rate_limiting);
michael@0: 		bufev_private->rate_limiting = NULL;
michael@0: 	}
michael@0: 
michael@0: 	event_debug_unassign(&bufev->ev_read);
michael@0: 	event_debug_unassign(&bufev->ev_write);
michael@0: 
michael@0: 	BEV_UNLOCK(bufev);
michael@0: 	if (bufev_private->own_lock)
michael@0: 		EVTHREAD_FREE_LOCK(bufev_private->lock,
michael@0: 		    EVTHREAD_LOCKTYPE_RECURSIVE);
michael@0: 
michael@0: 	/* Free the actual allocated memory. */
michael@0: 	mm_free(((char*)bufev) - bufev->be_ops->mem_offset);
michael@0: 
michael@0: 	/* Release the reference to underlying now that we no longer need the
michael@0: 	 * reference to it.  We wait this long mainly in case our lock is
michael@0: 	 * shared with underlying.
michael@0: 	 *
michael@0: 	 * The 'destruct' function will also drop a reference to underlying
michael@0: 	 * if BEV_OPT_CLOSE_ON_FREE is set.
michael@0: 	 *
michael@0: 	 * XXX Should we/can we just refcount evbuffer/bufferevent locks?
michael@0: 	 * It would probably save us some headaches.
michael@0: 	 */
michael@0: 	if (underlying)
michael@0: 		bufferevent_decref(underlying);
michael@0: 
michael@0: 	return 1;
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_decref(struct bufferevent *bufev)
michael@0: {
michael@0: 	BEV_LOCK(bufev);
michael@0: 	return _bufferevent_decref_and_unlock(bufev);
michael@0: }
michael@0: 
michael@0: void
michael@0: bufferevent_free(struct bufferevent *bufev)
michael@0: {
michael@0: 	BEV_LOCK(bufev);
michael@0: 	bufferevent_setcb(bufev, NULL, NULL, NULL, NULL);
michael@0: 	_bufferevent_cancel_all(bufev);
michael@0: 	_bufferevent_decref_and_unlock(bufev);
michael@0: }
michael@0: 
michael@0: void
michael@0: bufferevent_incref(struct bufferevent *bufev)
michael@0: {
michael@0: 	struct bufferevent_private *bufev_private =
michael@0: 	    EVUTIL_UPCAST(bufev, struct bufferevent_private, bev);
michael@0: 
michael@0: 	BEV_LOCK(bufev);
michael@0: 	++bufev_private->refcnt;
michael@0: 	BEV_UNLOCK(bufev);
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_enable_locking(struct bufferevent *bufev, void *lock)
michael@0: {
michael@0: #ifdef _EVENT_DISABLE_THREAD_SUPPORT
michael@0: 	return -1;
michael@0: #else
michael@0: 	struct bufferevent *underlying;
michael@0: 
michael@0: 	if (BEV_UPCAST(bufev)->lock)
michael@0: 		return -1;
michael@0: 	underlying = bufferevent_get_underlying(bufev);
michael@0: 
michael@0: 	if (!lock && underlying && BEV_UPCAST(underlying)->lock) {
michael@0: 		lock = BEV_UPCAST(underlying)->lock;
michael@0: 		BEV_UPCAST(bufev)->lock = lock;
michael@0: 		BEV_UPCAST(bufev)->own_lock = 0;
michael@0: 	} else if (!lock) {
michael@0: 		EVTHREAD_ALLOC_LOCK(lock, EVTHREAD_LOCKTYPE_RECURSIVE);
michael@0: 		if (!lock)
michael@0: 			return -1;
michael@0: 		BEV_UPCAST(bufev)->lock = lock;
michael@0: 		BEV_UPCAST(bufev)->own_lock = 1;
michael@0: 	} else {
michael@0: 		BEV_UPCAST(bufev)->lock = lock;
michael@0: 		BEV_UPCAST(bufev)->own_lock = 0;
michael@0: 	}
michael@0: 	evbuffer_enable_locking(bufev->input, lock);
michael@0: 	evbuffer_enable_locking(bufev->output, lock);
michael@0: 
michael@0: 	if (underlying && !BEV_UPCAST(underlying)->lock)
michael@0: 		bufferevent_enable_locking(underlying, lock);
michael@0: 
michael@0: 	return 0;
michael@0: #endif
michael@0: }
michael@0: 
michael@0: int
michael@0: bufferevent_setfd(struct bufferevent *bev, evutil_socket_t fd)
michael@0: {
michael@0: 	union bufferevent_ctrl_data d;
michael@0: 	int res = -1;
michael@0: 	d.fd = fd;
michael@0: 	BEV_LOCK(bev);
michael@0: 	if (bev->be_ops->ctrl)
michael@0: 		res = bev->be_ops->ctrl(bev, BEV_CTRL_SET_FD, &d);
michael@0: 	BEV_UNLOCK(bev);
michael@0: 	return res;
michael@0: }
michael@0: 
michael@0: evutil_socket_t
michael@0: bufferevent_getfd(struct bufferevent *bev)
michael@0: {
michael@0: 	union bufferevent_ctrl_data d;
michael@0: 	int res = -1;
michael@0: 	d.fd = -1;
michael@0: 	BEV_LOCK(bev);
michael@0: 	if (bev->be_ops->ctrl)
michael@0: 		res = bev->be_ops->ctrl(bev, BEV_CTRL_GET_FD, &d);
michael@0: 	BEV_UNLOCK(bev);
michael@0: 	return (res<0) ? -1 : d.fd;
michael@0: }
michael@0: 
michael@0: static void
michael@0: _bufferevent_cancel_all(struct bufferevent *bev)
michael@0: {
michael@0: 	union bufferevent_ctrl_data d;
michael@0: 	memset(&d, 0, sizeof(d));
michael@0: 	BEV_LOCK(bev);
michael@0: 	if (bev->be_ops->ctrl)
michael@0: 		bev->be_ops->ctrl(bev, BEV_CTRL_CANCEL_ALL, &d);
michael@0: 	BEV_UNLOCK(bev);
michael@0: }
michael@0: 
michael@0: short
michael@0: bufferevent_get_enabled(struct bufferevent *bufev)
michael@0: {
michael@0: 	short r;
michael@0: 	BEV_LOCK(bufev);
michael@0: 	r = bufev->enabled;
michael@0: 	BEV_UNLOCK(bufev);
michael@0: 	return r;
michael@0: }
michael@0: 
michael@0: struct bufferevent *
michael@0: bufferevent_get_underlying(struct bufferevent *bev)
michael@0: {
michael@0: 	union bufferevent_ctrl_data d;
michael@0: 	int res = -1;
michael@0: 	d.ptr = NULL;
michael@0: 	BEV_LOCK(bev);
michael@0: 	if (bev->be_ops->ctrl)
michael@0: 		res = bev->be_ops->ctrl(bev, BEV_CTRL_GET_UNDERLYING, &d);
michael@0: 	BEV_UNLOCK(bev);
michael@0: 	return (res<0) ? NULL : d.ptr;
michael@0: }
michael@0: 
michael@0: static void
michael@0: bufferevent_generic_read_timeout_cb(evutil_socket_t fd, short event, void *ctx)
michael@0: {
michael@0: 	struct bufferevent *bev = ctx;
michael@0: 	_bufferevent_incref_and_lock(bev);
michael@0: 	bufferevent_disable(bev, EV_READ);
michael@0: 	_bufferevent_run_eventcb(bev, BEV_EVENT_TIMEOUT|BEV_EVENT_READING);
michael@0: 	_bufferevent_decref_and_unlock(bev);
michael@0: }
michael@0: static void
michael@0: bufferevent_generic_write_timeout_cb(evutil_socket_t fd, short event, void *ctx)
michael@0: {
michael@0: 	struct bufferevent *bev = ctx;
michael@0: 	_bufferevent_incref_and_lock(bev);
michael@0: 	bufferevent_disable(bev, EV_WRITE);
michael@0: 	_bufferevent_run_eventcb(bev, BEV_EVENT_TIMEOUT|BEV_EVENT_WRITING);
michael@0: 	_bufferevent_decref_and_unlock(bev);
michael@0: }
michael@0: 
michael@0: void
michael@0: _bufferevent_init_generic_timeout_cbs(struct bufferevent *bev)
michael@0: {
michael@0: 	evtimer_assign(&bev->ev_read, bev->ev_base,
michael@0: 	    bufferevent_generic_read_timeout_cb, bev);
michael@0: 	evtimer_assign(&bev->ev_write, bev->ev_base,
michael@0: 	    bufferevent_generic_write_timeout_cb, bev);
michael@0: }
michael@0: 
michael@0: int
michael@0: _bufferevent_del_generic_timeout_cbs(struct bufferevent *bev)
michael@0: {
michael@0: 	int r1,r2;
michael@0: 	r1 = event_del(&bev->ev_read);
michael@0: 	r2 = event_del(&bev->ev_write);
michael@0: 	if (r1<0 || r2<0)
michael@0: 		return -1;
michael@0: 	return 0;
michael@0: }
michael@0: 
michael@0: int
michael@0: _bufferevent_generic_adj_timeouts(struct bufferevent *bev)
michael@0: {
michael@0: 	const short enabled = bev->enabled;
michael@0: 	struct bufferevent_private *bev_p =
michael@0: 	    EVUTIL_UPCAST(bev, struct bufferevent_private, bev);
michael@0: 	int r1=0, r2=0;
michael@0: 	if ((enabled & EV_READ) && !bev_p->read_suspended &&
michael@0: 	    evutil_timerisset(&bev->timeout_read))
michael@0: 		r1 = event_add(&bev->ev_read, &bev->timeout_read);
michael@0: 	else
michael@0: 		r1 = event_del(&bev->ev_read);
michael@0: 
michael@0: 	if ((enabled & EV_WRITE) && !bev_p->write_suspended &&
michael@0: 	    evutil_timerisset(&bev->timeout_write) &&
michael@0: 	    evbuffer_get_length(bev->output))
michael@0: 		r2 = event_add(&bev->ev_write, &bev->timeout_write);
michael@0: 	else
michael@0: 		r2 = event_del(&bev->ev_write);
michael@0: 	if (r1 < 0 || r2 < 0)
michael@0: 		return -1;
michael@0: 	return 0;
michael@0: }
michael@0: 
michael@0: int
michael@0: _bufferevent_add_event(struct event *ev, const struct timeval *tv)
michael@0: {
michael@0: 	if (tv->tv_sec == 0 && tv->tv_usec == 0)
michael@0: 		return event_add(ev, NULL);
michael@0: 	else
michael@0: 		return event_add(ev, tv);
michael@0: }
michael@0: 
michael@0: /* For use by user programs only; internally, we should be calling
michael@0:    either _bufferevent_incref_and_lock(), or BEV_LOCK. */
michael@0: void
michael@0: bufferevent_lock(struct bufferevent *bev)
michael@0: {
michael@0: 	_bufferevent_incref_and_lock(bev);
michael@0: }
michael@0: 
michael@0: void
michael@0: bufferevent_unlock(struct bufferevent *bev)
michael@0: {
michael@0: 	_bufferevent_decref_and_unlock(bev);
michael@0: }