00001 /* ==================================================================== 00002 * The Kannel Software License, Version 1.0 00003 * 00004 * Copyright (c) 2001-2008 Kannel Group 00005 * Copyright (c) 1998-2001 WapIT Ltd. 00006 * All rights reserved. 00007 * 00008 * Redistribution and use in source and binary forms, with or without 00009 * modification, are permitted provided that the following conditions 00010 * are met: 00011 * 00012 * 1. Redistributions of source code must retain the above copyright 00013 * notice, this list of conditions and the following disclaimer. 00014 * 00015 * 2. Redistributions in binary form must reproduce the above copyright 00016 * notice, this list of conditions and the following disclaimer in 00017 * the documentation and/or other materials provided with the 00018 * distribution. 00019 * 00020 * 3. The end-user documentation included with the redistribution, 00021 * if any, must include the following acknowledgment: 00022 * "This product includes software developed by the 00023 * Kannel Group (http://www.kannel.org/)." 00024 * Alternately, this acknowledgment may appear in the software itself, 00025 * if and wherever such third-party acknowledgments normally appear. 00026 * 00027 * 4. The names "Kannel" and "Kannel Group" must not be used to 00028 * endorse or promote products derived from this software without 00029 * prior written permission. For written permission, please 00030 * contact org@kannel.org. 00031 * 00032 * 5. Products derived from this software may not be called "Kannel", 00033 * nor may "Kannel" appear in their name, without prior written 00034 * permission of the Kannel Group. 00035 * 00036 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED 00037 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 00038 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE 00039 * DISCLAIMED. IN NO EVENT SHALL THE KANNEL GROUP OR ITS CONTRIBUTORS 00040 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, 00041 * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT 00042 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR 00043 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 00044 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE 00045 * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, 00046 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00047 * ==================================================================== 00048 * 00049 * This software consists of voluntary contributions made by many 00050 * individuals on behalf of the Kannel Group. For more information on 00051 * the Kannel Group, please see <http://www.kannel.org/>. 00052 * 00053 * Portions of this software are based upon software originally written at 00054 * WapIT Ltd., Helsinki, Finland for the Kannel project. 00055 */ 00056 00057 /* 00058 * 00059 * wsstream.c 00060 * 00061 * Author: Markku Rossi <mtr@iki.fi> 00062 * 00063 * Copyright (c) 1999-2000 WAPIT OY LTD. 00064 * All rights reserved. 00065 * 00066 * Generic input / output stream. 00067 * 00068 */ 00069 00070 #include "wsint.h" 00071 00072 /********************* Global functions *********************************/ 00073 00074 WsBool ws_stream_getc(WsStream *stream, WsUInt32 *ch_return) 00075 { 00076 if (stream->ungetch_valid) { 00077 *ch_return = stream->ungetch; 00078 stream->ungetch_valid = WS_FALSE; 00079 00080 return WS_TRUE; 00081 } 00082 00083 if (stream->buffer_pos >= stream->data_in_buffer) { 00084 /* Read more data to the buffer. */ 00085 stream->buffer_pos = 0; 00086 stream->data_in_buffer = (*stream->io)(stream->context, 00087 stream->buffer, 00088 WS_STREAM_BUFFER_SIZE); 00089 if (stream->data_in_buffer == 0) 00090 /* EOF reached. */ 00091 return WS_FALSE; 00092 } 00093 00094 /* Return the next character. */ 00095 *ch_return = stream->buffer[stream->buffer_pos++]; 00096 00097 return WS_TRUE; 00098 } 00099 00100 00101 void ws_stream_ungetc(WsStream *stream, WsUInt32 ch) 00102 { 00103 stream->ungetch = ch; 00104 stream->ungetch_valid = WS_TRUE; 00105 } 00106 00107 00108 WsBool ws_stream_flush(WsStream *stream) 00109 { 00110 if (stream->flush) 00111 return (*stream->flush)(stream->context); 00112 00113 return WS_TRUE; 00114 } 00115 00116 00117 void ws_stream_close(WsStream *stream) 00118 { 00119 if (stream->close) 00120 (*stream->close)(stream->context); 00121 00122 ws_free(stream); 00123 } 00124 00125 00126 WsStream *ws_stream_new(void *context, WsStreamIOProc io, 00127 WsStreamFlushProc flush, WsStreamCloseProc close) 00128 { 00129 WsStream *stream = ws_calloc(1, sizeof(*stream)); 00130 00131 if (stream == NULL) 00132 return NULL; 00133 00134 stream->io = io; 00135 stream->flush = flush; 00136 stream->close = close; 00137 stream->context = context; 00138 00139 return stream; 00140 }