From e0c6872cf40896c7be36b11dcc744620f10adf1d Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 2 Sep 2019 13:46:59 +0900 Subject: Initial commit --- support/dktools/dk3strmb.c | 161 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 161 insertions(+) create mode 100644 support/dktools/dk3strmb.c (limited to 'support/dktools/dk3strmb.c') diff --git a/support/dktools/dk3strmb.c b/support/dktools/dk3strmb.c new file mode 100644 index 0000000000..669ea64611 --- /dev/null +++ b/support/dktools/dk3strmb.c @@ -0,0 +1,161 @@ +/* + WARNING: This file was generated by dkct. + Changes you make here will be lost if dkct is run again! + You should modify the original source and run dkct on it. + Original source: dk3strmb.ctr +*/ + +/* +Copyright (C) 2011-2017, Dirk Krause + +Redistribution and use in source and binary forms, with or without +modification, are permitted provided that the following conditions are met: + +* Redistributions of source code must retain the above copyright notice, + this list of conditions and the following disclaimer. +* Redistributions in binary form must reproduce the above opyright notice, + this list of conditions and the following disclaimer in the documentation + and/or other materials provided with the distribution. +* Neither the name of the author nor the names of contributors may be used + to endorse or promote products derived from this software without specific + prior written permission. + +THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS IS'' +AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE +IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE +ARE DISCLAIMED. +IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY +DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES +(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; +LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND +ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF +THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +*/ + +/** @file dk3strmb.c The dk3strmb module. +*/ + + +#line 10 "dk3strmb.ctr" + +#include "dk3all.h" + + + + + + +#line 16 "dk3strmb.ctr" + + + +/** Low-level stream function to deal with bzip2 compression. + Closing the stream also closes the bzip2-file. + @param api API structure. +*/ +static +void +dk3stream_bz_fct(dk3_stream_api_t *api) +{ +#if DK3_HAVE_BZLIB_H + BZFILE *b = NULL; /* Low level I/O object. */ + int res = 0; /* Operation result. */ +#endif + api->suc = 0; + (api->res).sz = 0; + (api->res).ec = DK3_ERROR_NOT_SUPPORTED; +#if DK3_HAVE_BZLIB_H + b = (BZFILE *)((api->arg).d); + (api->res).ec = 0; + switch(api->cmd) { + case DK3_STREAM_API_READ: { + if(((api->arg).b) && ((api->arg).sz) && ((api->arg).d)) { + res = BZ2_bzread(b, (api->arg).b, (int)((api->arg).sz)); + if(res > 0) { + api->suc = 1; (api->res).ec = 0; (api->res).sz = (size_t)res; + } + } + } break; + case DK3_STREAM_API_WRITE: { + if(((api->arg).b) && ((api->arg).sz) && ((api->arg).d)) { + res = BZ2_bzwrite(b, (api->arg).b, (int)((api->arg).sz)); + if(res > 0) { + (api->res).sz = (size_t)res; + if((size_t)res == (api->arg).sz) { + api->suc = 1; (api->res).ec = 0; + } + } + } + } break; + case DK3_STREAM_API_FLUSH: { + if((api->arg).d) { + BZ2_bzflush(b); + api->suc = 1; (api->res).ec = 0; + /* + As the library manual explains BZ2_bzflush() does nothing. + So we always return success. + */ + } + } break; + case DK3_STREAM_API_AT_END: { + + } break; + case DK3_STREAM_API_CLOSE: { + if((api->arg).d) { + BZ2_bzclose(b); + api->suc = 1; (api->res).ec = 0; + } + } break; + case DK3_STREAM_API_ZERO_IS_END: { + api->suc = 1; (api->res).ec = 0; /* Correct if necessary */ + } break; + case DK3_STREAM_API_ERROR: { + } break; + } +#endif +} + + + +/** Low-level stream function to deal with bzip2 compression. + Closing the stream does not close the bzip2 file. + @param api API structure. +*/ +static +void +dk3stream_bz_fct_no_close(dk3_stream_api_t *api) +{ + if(api->cmd != DK3_STREAM_API_CLOSE) { + dk3stream_bz_fct(api); + } else { + api->suc = 1; (api->res).ec = 0; + } +} + + + +#if DK3_HAVE_BZLIB_H + +/** Open a stream for an existing BZFILE. + @param b BZFILE already opened. + @param fl Read/write flags. + @param app Application structure for diagnostics, may be NULL. + @return Pointer to new stream on success, NULL on error. +*/ +dk3_stream_t * +dk3stream_open_bz2_app(BZFILE *b, int fl, dk3_app_t *app) +{ + dk3_stream_t *back = NULL; + if(b) { + back = dk3stream_open_app((void *)b, dk3stream_bz_fct_no_close, fl, app); + } + return back; +} + +#endif + + + +/* vim: set ai sw=2 : */ + -- cgit v1.2.3