/* Copyright (C) 2015-2020, Dirk Krause SPDX-License-Identifier: BSD-3-Clause */ /* WARNING: This file was generated by the dkct program (see http://dktools.sourceforge.net/ for details). 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: dk4strmf.ctr */ /** @file dk4strmf.c The dk4strmf module. */ #line 113 "dk4strmf.ctr" #include "dk4conf.h" #include "dk4strmf.h" #ifndef STDIO_H_INCLUDED #include #define STDIO_H_INCLUDED 1 #endif #if DK4_HAVE_ASSERT_H #ifndef ASSERT_H_INCLUDED #include #define ASSERT_H_INCLUDED 1 #endif #endif void dk4stream_file_with_close_function(dk4_stream_api_t *api) { FILE *fipo; size_t res; #if DK4_USE_ASSERT assert(NULL != api); #endif if (NULL != api) { api->res = 0; api->sz_out = 0; fipo = (FILE *)(api->d); if (NULL != fipo) { switch (api->cmd) { case DK4_STREAM_API_READ: { res = fread(api->b, 1, api->sz_in, fipo); api->sz_out = res; if (0 < res) { api->res = 1; } } break; case DK4_STREAM_API_WRITE: { if (0 < api->sz_in) { res = fwrite(api->b, 1, api->sz_in, fipo); if (res == api->sz_in) { api->res = 1; } api->sz_out = res; } else { api->res = 1; } } break; case DK4_STREAM_API_FLUSH: { if (0 == fflush(fipo)) { api->res = 1; } } break; case DK4_STREAM_API_AT_END: { if (0 != feof(fipo)) { api->res = 1; } } break; case DK4_STREAM_API_CLOSE: { if (0 == fclose(fipo)) { api->res = 1; } } break; } } } } void dk4stream_file_function(dk4_stream_api_t *api) { #if DK4_USE_ASSERT assert(NULL != api); #endif if (NULL != api) { switch (api->cmd) { case DK4_STREAM_API_CLOSE: { api->res = 1; } break; default: { dk4stream_file_with_close_function(api); } break; } } } dk4_stream_t * dk4stream_open_for_file( FILE *fipo, int fl, size_t ibs, size_t obs, dk4_er_t *erp ) { #if DK4_USE_ASSERT assert(NULL != fipo); #endif return ( dk4stream_open( (void *)fipo, dk4stream_file_function, fl, ibs, obs, erp ) ); } dk4_stream_t * dk4stream_open_for_file_with_close( FILE *fipo, int fl, size_t ibs, size_t obs, dk4_er_t *erp ) { #if DK4_USE_ASSERT assert(NULL != fipo); #endif return ( dk4stream_open( (void *)fipo, dk4stream_file_with_close_function, fl, ibs, obs, erp ) ); }