Home | History | Annotate | Line # | Download | only in isc
      1 /*	$NetBSD: stdio.c,v 1.3 2025/01/26 16:25:38 christos Exp $	*/
      2 
      3 /*
      4  * Copyright (C) Internet Systems Consortium, Inc. ("ISC")
      5  *
      6  * SPDX-License-Identifier: MPL-2.0
      7  *
      8  * This Source Code Form is subject to the terms of the Mozilla Public
      9  * License, v. 2.0. If a copy of the MPL was not distributed with this
     10  * file, you can obtain one at https://mozilla.org/MPL/2.0/.
     11  *
     12  * See the COPYRIGHT file distributed with this work for additional
     13  * information regarding copyright ownership.
     14  */
     15 
     16 #include <errno.h>
     17 #include <sys/stat.h>
     18 #include <unistd.h>
     19 
     20 #include <isc/stdio.h>
     21 #include <isc/util.h>
     22 
     23 #include "errno2result.h"
     24 
     25 isc_result_t
     26 isc_stdio_open(const char *filename, const char *mode, FILE **fp) {
     27 	FILE *f;
     28 
     29 	f = fopen(filename, mode);
     30 	if (f == NULL) {
     31 		return isc__errno2result(errno);
     32 	}
     33 	*fp = f;
     34 	return ISC_R_SUCCESS;
     35 }
     36 
     37 isc_result_t
     38 isc_stdio_close(FILE *f) {
     39 	int r;
     40 
     41 	r = fclose(f);
     42 	if (r == 0) {
     43 		return ISC_R_SUCCESS;
     44 	} else {
     45 		return isc__errno2result(errno);
     46 	}
     47 }
     48 
     49 isc_result_t
     50 isc_stdio_seek(FILE *f, off_t offset, int whence) {
     51 	int r;
     52 
     53 	r = fseeko(f, offset, whence);
     54 	if (r == 0) {
     55 		return ISC_R_SUCCESS;
     56 	} else {
     57 		return isc__errno2result(errno);
     58 	}
     59 }
     60 
     61 isc_result_t
     62 isc_stdio_tell(FILE *f, off_t *offsetp) {
     63 	off_t r;
     64 
     65 	REQUIRE(offsetp != NULL);
     66 
     67 	r = ftello(f);
     68 	if (r >= 0) {
     69 		*offsetp = r;
     70 		return ISC_R_SUCCESS;
     71 	} else {
     72 		return isc__errno2result(errno);
     73 	}
     74 }
     75 
     76 isc_result_t
     77 isc_stdio_read(void *ptr, size_t size, size_t nmemb, FILE *f, size_t *nret) {
     78 	isc_result_t result = ISC_R_SUCCESS;
     79 	size_t r;
     80 
     81 	clearerr(f);
     82 	r = fread(ptr, size, nmemb, f);
     83 	if (r != nmemb) {
     84 		if (feof(f)) {
     85 			result = ISC_R_EOF;
     86 		} else {
     87 			result = isc__errno2result(errno);
     88 		}
     89 	}
     90 	SET_IF_NOT_NULL(nret, r);
     91 	return result;
     92 }
     93 
     94 isc_result_t
     95 isc_stdio_write(const void *ptr, size_t size, size_t nmemb, FILE *f,
     96 		size_t *nret) {
     97 	isc_result_t result = ISC_R_SUCCESS;
     98 	size_t r;
     99 
    100 	clearerr(f);
    101 	r = fwrite(ptr, size, nmemb, f);
    102 	if (r != nmemb) {
    103 		result = isc__errno2result(errno);
    104 	}
    105 	SET_IF_NOT_NULL(nret, r);
    106 	return result;
    107 }
    108 
    109 isc_result_t
    110 isc_stdio_flush(FILE *f) {
    111 	int r;
    112 
    113 	r = fflush(f);
    114 	if (r == 0) {
    115 		return ISC_R_SUCCESS;
    116 	} else {
    117 		return isc__errno2result(errno);
    118 	}
    119 }
    120 
    121 /*
    122  * OpenBSD has deprecated ENOTSUP in favor of EOPNOTSUPP.
    123  */
    124 #if defined(EOPNOTSUPP) && !defined(ENOTSUP)
    125 #define ENOTSUP EOPNOTSUPP
    126 #endif /* if defined(EOPNOTSUPP) && !defined(ENOTSUP) */
    127 
    128 isc_result_t
    129 isc_stdio_sync(FILE *f) {
    130 	struct stat buf;
    131 	int r;
    132 
    133 	if (fstat(fileno(f), &buf) != 0) {
    134 		return isc__errno2result(errno);
    135 	}
    136 
    137 	/*
    138 	 * Only call fsync() on regular files.
    139 	 */
    140 	if ((buf.st_mode & S_IFMT) != S_IFREG) {
    141 		return ISC_R_SUCCESS;
    142 	}
    143 
    144 	r = fsync(fileno(f));
    145 	if (r == 0) {
    146 		return ISC_R_SUCCESS;
    147 	} else {
    148 		return isc__errno2result(errno);
    149 	}
    150 }
    151