mirror of https://github.com/flysand7/ciabatta.git
140 lines
3.5 KiB
C
140 lines
3.5 KiB
C
#include <stdio.h>
|
|
#include <stdarg.h>
|
|
#include <ctype.h>
|
|
#include <stdbool.h>
|
|
#include <math.h>
|
|
|
|
#include <_os.h>
|
|
|
|
#define __STDC_WANT_LIB_EXT1__ 1
|
|
#include <string.h>
|
|
|
|
int remove(const char *filename)
|
|
{
|
|
return _os_del_file(filename);
|
|
}
|
|
|
|
int rename(const char *old, const char *new)
|
|
{
|
|
return _os_mov_file(old, new);
|
|
}
|
|
|
|
char *tmpnam(char *s)
|
|
{
|
|
static char static_buffer[L_tmpnam];
|
|
char *buffer = s;
|
|
if(s == NULL) buffer = static_buffer;
|
|
return _os_tmpname(buffer);
|
|
}
|
|
|
|
FILE *fopen(const char *restrict filename, const char *restrict mode)
|
|
{
|
|
// Basically defined UB here by introducing missing modes
|
|
// It is simpler to implement that way I think.
|
|
int base_mode = mode[0];
|
|
int binary = 0;
|
|
int exclusive = 0;
|
|
int update = 0;
|
|
for(; *mode != 0; ++mode) {
|
|
if(*mode == 'x') exclusive = 1;
|
|
if(*mode == 'b') binary = 1;
|
|
if(*mode == '+') update = 1;
|
|
}
|
|
if(base_mode == 'r' && exclusive) return NULL;
|
|
if(base_mode == 'a' && exclusive) return NULL;
|
|
|
|
_OS_ModeFlags mode_flags = {
|
|
.base_mode = base_mode,
|
|
.binary = binary,
|
|
.update = update,
|
|
.exclusive = exclusive,
|
|
};
|
|
|
|
return _os_fopen(filename, mode_flags);
|
|
}
|
|
|
|
int fclose(FILE *stream)
|
|
{
|
|
return _os_fclose(stream);
|
|
}
|
|
|
|
// TODO:kekw:
|
|
FILE *freopen(
|
|
const char *restrict filename,
|
|
const char *restrict mode,
|
|
FILE *restrict stream)
|
|
{
|
|
fclose(stream);
|
|
return NULL;
|
|
}
|
|
|
|
typedef void(*OutputFunc)(void* ctx, size_t n, const char str[]);
|
|
|
|
///////////////////////////////////////////////
|
|
// Instantiate formatted print functions
|
|
///////////////////////////////////////////////
|
|
// TODO: instantiate wide char variants of print
|
|
#define FMT_FUNC_NAME fmt_print_char
|
|
#define FMT_CHAR_TYPE char
|
|
#define FMT_STRLEN_S(s, maxsize) strnlen_s(s, maxsize)
|
|
#include "printf.h"
|
|
|
|
typedef struct {
|
|
size_t used, capacity;
|
|
char* string;
|
|
} StrPrintCtx;
|
|
|
|
FILE *stdout, *stderr, *stdin;
|
|
|
|
#define CALL_PRINTF(fmt_func, ctx, out, fmt) \
|
|
va_list args; \
|
|
va_start(args, fmt); \
|
|
int result = fmt_func(ctx, out, fmt, args); \
|
|
va_end(args)
|
|
|
|
static void string_write(void *ctx, size_t n, const char *restrict str) {
|
|
StrPrintCtx *c = ctx;
|
|
memcpy(c->string + c->used, str, n);
|
|
c->used += n;
|
|
}
|
|
|
|
int fprintf(FILE *file, const char *restrict fmt, ...) {
|
|
CALL_PRINTF(fmt_print_char, file, _os_file_write, fmt);
|
|
return result;
|
|
}
|
|
|
|
int printf(const char *restrict fmt, ...) {
|
|
CALL_PRINTF(fmt_print_char, stdout, _os_file_write, fmt);
|
|
return result;
|
|
}
|
|
|
|
int snprintf(char *restrict s, size_t n, const char *restrict fmt, ...) {
|
|
StrPrintCtx ctx = { 0, n, s };
|
|
CALL_PRINTF(fmt_print_char, &ctx, string_write, fmt);
|
|
return result;
|
|
}
|
|
|
|
int sprintf(char *restrict s, const char *restrict fmt, ...) {
|
|
StrPrintCtx ctx = { 0, SIZE_MAX, s };
|
|
CALL_PRINTF(fmt_print_char, &ctx, string_write, fmt);
|
|
return result;
|
|
}
|
|
|
|
int vfprintf(FILE *file, const char *restrict fmt, va_list args) {
|
|
return fmt_print_char(file, _os_file_write, fmt, args);
|
|
}
|
|
|
|
int vprintf(const char *restrict fmt, va_list args) {
|
|
return fmt_print_char(stdout, _os_file_write, fmt, args);
|
|
}
|
|
|
|
int vsnprintf(char *restrict s, size_t n, const char *restrict fmt, va_list args) {
|
|
StrPrintCtx ctx = { 0, n, s };
|
|
return fmt_print_char(&ctx, string_write, fmt, args);
|
|
}
|
|
|
|
int vsprintf(char *restrict s, const char *restrict fmt, va_list args) {
|
|
StrPrintCtx ctx = { 0, SIZE_MAX, s };
|
|
return fmt_print_char(&ctx, string_write, fmt, args);
|
|
}
|