219 lines
4.9 KiB
C
219 lines
4.9 KiB
C
/*
|
|
* Copyright 2023 Xavier Del Campo Romero
|
|
*
|
|
* Licensed under the Apache License, Version 2.0 (the "License");
|
|
* you may not use this file except in compliance with the License.
|
|
* You may obtain a copy of the License at
|
|
*
|
|
* http://www.apache.org/licenses/LICENSE-2.0
|
|
*
|
|
* Unless required by applicable law or agreed to in writing, software
|
|
* distributed under the License is distributed on an "AS IS" BASIS,
|
|
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
* See the License for the specific language governing permissions and
|
|
* limitations under the License.
|
|
*/
|
|
|
|
#define _POSIX_C_SOURCE 200809L
|
|
|
|
#include <fswrap.h>
|
|
#include <errno.h>
|
|
#include <limits.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
struct secret_file
|
|
{
|
|
FILE *f;
|
|
const void *buf;
|
|
long offset, sz;
|
|
int eof, error;
|
|
};
|
|
|
|
FILE *__wrap_fopen(const char *restrict const pathname,
|
|
const char *restrict const flags)
|
|
{
|
|
FILE *__real_fopen(const char *, const char *);
|
|
struct secret_file *const s = malloc(sizeof *s);
|
|
|
|
if (!s)
|
|
return NULL;
|
|
|
|
*s = (const struct secret_file){0};
|
|
|
|
for (size_t i = 0; i < fswrap_entries->n; i++)
|
|
{
|
|
const struct fswrap_entry *const e = &fswrap_entries->entries[i];
|
|
|
|
if (!strcmp(pathname, e->pathname))
|
|
{
|
|
if (strcmp(flags, "r") && strcmp(flags, "rb"))
|
|
{
|
|
fprintf(stderr, "%s: unsupported flags %s\n", __func__, flags);
|
|
return NULL;
|
|
}
|
|
|
|
s->buf = e->buf;
|
|
s->sz = e->sz;
|
|
return (FILE *)s;
|
|
}
|
|
}
|
|
|
|
if (!(s->f = __real_fopen(pathname, flags)))
|
|
goto failure;
|
|
|
|
return (FILE *)s;
|
|
|
|
failure:
|
|
free(s);
|
|
return NULL;
|
|
}
|
|
|
|
int __wrap_fclose(FILE *const f)
|
|
{
|
|
int ret;
|
|
int __real_fclose(FILE *);
|
|
struct secret_file *const s = (struct secret_file *)f;
|
|
|
|
if (s->f)
|
|
ret = __real_fclose(s->f);
|
|
|
|
free(s);
|
|
return ret;
|
|
}
|
|
|
|
static int read_item(void *restrict *const ptr, const size_t size,
|
|
struct secret_file *restrict const s)
|
|
{
|
|
if (size > s->sz - s->offset) {
|
|
s->eof = 1;
|
|
return -1;
|
|
}
|
|
|
|
memcpy(*ptr, &((const char *restrict)(s->buf))[s->offset], size);
|
|
*ptr = (char *restrict)*ptr + size;
|
|
s->offset += size;
|
|
return 0;
|
|
}
|
|
|
|
size_t __wrap_fread(void *restrict ptr, const size_t size,
|
|
const size_t nitems, FILE *restrict const stream)
|
|
{
|
|
size_t __real_fread(void *restrict, size_t, size_t, FILE *restrict);
|
|
|
|
if (((struct secret_file *restrict )stream)->f)
|
|
return __real_fread(ptr, size, nitems,
|
|
((struct secret_file *restrict)stream)->f);
|
|
|
|
for (size_t i = 0; i < nitems; i++)
|
|
if (read_item(&ptr, size, (struct secret_file *restrict)stream))
|
|
return i;
|
|
|
|
return nitems;
|
|
}
|
|
|
|
int __wrap_feof(FILE *const stream)
|
|
{
|
|
int __real_feof(FILE *);
|
|
struct secret_file *const s = (struct secret_file *)stream;
|
|
|
|
if (s->f)
|
|
return __real_feof(s->f);
|
|
|
|
return s->eof;
|
|
}
|
|
|
|
int __wrap_ferror(FILE *const stream)
|
|
{
|
|
int __real_ferror(FILE *);
|
|
struct secret_file *const s = (struct secret_file *)stream;
|
|
|
|
if (s->f)
|
|
return __real_ferror(s->f);
|
|
|
|
return s->error;
|
|
}
|
|
|
|
static int file_seek(struct secret_file *const s, const long offset,
|
|
const int whence)
|
|
{
|
|
switch (whence)
|
|
{
|
|
case SEEK_SET:
|
|
if (offset < 0)
|
|
{
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
s->offset = offset;
|
|
break;
|
|
|
|
case SEEK_CUR:
|
|
if (offset > LONG_MAX - s->offset)
|
|
{
|
|
errno = EOVERFLOW;
|
|
return -1;
|
|
}
|
|
else if (offset < -s->offset)
|
|
{
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
s->offset += offset;
|
|
break;
|
|
|
|
case SEEK_END:
|
|
if (offset > LONG_MAX - s->sz)
|
|
{
|
|
errno = EOVERFLOW;
|
|
return -1;
|
|
}
|
|
else if (offset < -s->sz)
|
|
{
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
s->offset = s->sz + offset;
|
|
break;
|
|
|
|
default:
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
s->eof = 0;
|
|
return 0;
|
|
}
|
|
|
|
int __wrap_fseek(FILE *const stream, const long offset, const int whence)
|
|
{
|
|
int __real_fseek(FILE *, long, int);
|
|
struct secret_file *const s = (struct secret_file *)stream;
|
|
|
|
if (s->f)
|
|
return __real_fseek(stream, offset, whence);
|
|
|
|
return file_seek(s, offset, whence);
|
|
}
|
|
|
|
void __wrap_clearerr(FILE *const stream)
|
|
{
|
|
int __real_clearerr(FILE *);
|
|
struct secret_file *const s = (struct secret_file *)stream;
|
|
|
|
if (s->f)
|
|
__real_clearerr(s->f);
|
|
else
|
|
s->eof = s->error = 0;
|
|
}
|
|
|
|
int __wrap_access(const char *const pathname, const int mode)
|
|
{
|
|
return -1;
|
|
}
|