%% options copyright owner = Dirk Krause copyright year = 2016-xxxx SPDX-License-Identifier: BSD-3-Clause %% header /** @file dk4svbuf.h File buffering. */ #ifndef DK4CONF_H_INCLUDED #if DK4_BUILDING_DKTOOLS4 #include "dk4conf.h" #else #include #endif #endif #ifndef STDIO_H_INCLUDED #include #define STDIO_H_INCLUDED 1 #endif #ifndef DK4ERROR_H_INCLUDED #if DK4_BUILDING_DKTOOLS4 #include "dk4error.h" #else #include #endif #endif /** How to buffer a file. */ typedef enum { DK4_FILE_NO_BUFFERING = 0 , /**< Do not use buffers. */ DK4_FILE_LINE_BUFFERING , /**< Buffer lines. */ DK4_FILE_FULL_BUFFERING /**< Full buffering. */ } dk4_file_buffering_t; #ifdef __cplusplus extern "C" { #endif /** Set up buffering for a file. @param fipo File to modify. @param tp Buffering type. @param pbuf Start address of buffer to use, may be NULL. @param szbuf Size of buffer, may be 0. @param erp Error report, may be NULL. @return 1 on success, 0 on error. Error codes: - DK4_E_INVALID_ARGUMENTS
if fipo is NULL, - DK4_E_NOT_SUPPORTED
if neither the setbuffer function nor the setvbuf() function is available on the system. - DK4_E_SYSTEM
if setvbuf() indicated an error. */ int dk4setvbuf( FILE *fipo, dk4_file_buffering_t tp, char *pbuf, size_t szbuf, dk4_er_t *erp ); #ifdef __cplusplus } #endif /* vim: set ai sw=4 ts=4 : */ %% module #include "dk4conf.h" #include "dk4svbuf.h" #if DK4_HAVE_ERRNO_H #ifndef ERRNO_H_INCLUDED #include #define ERRNO_H_INCLUDED 1 #endif #endif #if DK4_HAVE_ASSERT_H #ifndef ASSERT_H_INCLUDED #include #define ASSERT_H_INCLUDED 1 #endif #endif $!trace-include /** Buffering type constants. */ static int buffering_types[] = { _IONBF, _IOLBF, _IOFBF }; int dk4setvbuf( FILE *fipo, dk4_file_buffering_t tp, char *pbuf, size_t szbuf, dk4_er_t *erp ) { int back = 0; #if DK4_HAVE_SETVBUF int svbres = 0; #endif int btp; #if DK4_USE_ASSERT assert(NULL != fipo); #endif if (NULL != fipo) { btp = ( ((0 <= (int)tp) && (3 > (int)tp)) ? (buffering_types[(int)tp]) : (buffering_types[2]) ); #if DK4_HAVE_SETVBUF errno = 0; svbres = setvbuf( fipo, ((0 < szbuf) ? (pbuf) : (NULL)), (((NULL != pbuf) && (0 < szbuf)) ? (btp) : (buffering_types[0])), szbuf ); if (0 == svbres) { back = 1; } else { dk4error_set_idetails(erp, DK4_E_SYSTEM, errno); } #else #if DK4_HAVE_SETBUFFER setbuffer(fipo, pbuf, szbuf); back = 1; #else back = 1; dk4error_set_simple_error_code(erp, DK4_E_NOT_SUPPORTED); #endif #endif } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } return back; } /* vim: set ai sw=4 ts=4 : */