libc
/* $Id$ */
/* Copyright (c) 2012-2017 Pierre Pronchery <khorben@defora.org> */
/* This file is part of DeforaOS System libc */
/* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are
* met:
*
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
*
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
* IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
* PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
* HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
* PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
* LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
#include <fcntl.h>
#include <stdarg.h>
#include <stdlib.h>
#include <string.h>
#include <stdio.h>
#include "../src/stdio.c"
/* stdio */
/* fmemopen */
static int _fmemopen(char const * progname, void * buffer, size_t size)
{
int ret = 1;
FILE * file;
char * buf;
size_t s;
printf("%s: Testing fmemopen()\n", progname);
if((file = fmemopen(buffer, size, "r")) == NULL)
return 2;
if((buf = malloc(size)) == NULL)
{
fclose(file);
return 3;
}
if((s = fread(buf, sizeof(*buf), size, file)) != size)
printf("%s: Obtained %lu (expected: %lu)\n", progname, s, size);
else if(memcmp(buf, buffer, size) != 0)
printf("%s: Obtained \"%s\" (expected: \"%s\")\n", progname,
buf, buffer);
else
ret = 0;
free(buf);
if(fclose(file) != 0 && ret == 0)
ret = 4;
return ret;
}
/* fopen */
static int _fopen(char const * progname, char const * mode, int expected)
{
int m = _fopen_mode(mode);
printf("%s: Testing fopen() mode \"%s\": 0x%x (0x%x)\n", progname,
mode, m, expected);
return (m == expected) ? 0 : 1;
}
/* printf */
static int _printf(char const * progname, char const * format, int64_t i,
char const * expected)
{
int ret;
char * buf;
int len;
printf("%s: Testing printf(\"%s\")\n", progname, format);
if((len = snprintf(NULL, 0, format, i)) <= 0)
return -1;
if((buf = malloc(len + 2)) == NULL)
return -1;
snprintf(buf, len + 2, format, i);
buf[len + 1] = '\0';
if((ret = strcmp(buf, expected)) != 0)
printf("%s: Obtained \"%s\" (expected: \"%s\")\n", progname,
buf, expected);
free(buf);
return ret;
}
/* sscanf */
static int _sscanf(char const * progname)
{
char const * str = "abc e 42def3";
char const * format = "abc e %udef%c";
unsigned int u;
char c;
char buf[4];
printf("%s: Testing sscanf()\n", progname);
if(sscanf(str, format, &u, &c) != 2
|| u != 42 || c != '3')
return 1;
if(sscanf(str, "a%3s", &buf) != 1
|| strncmp(&str[1], buf, 2) != 0)
return 2;
if(sscanf(str, "a%3c", &buf) != 1
|| strncmp(&str[1], buf, 3) != 0)
return 3;
return 0;
}
/* tmpfile */
static int _tmpfile(char const * progname)
{
FILE * fp;
printf("%s: Testing tmpfile()\n", progname);
if((fp = tmpfile()) == NULL)
return 1;
fclose(fp);
return 0;
}
/* tmpnam */
static int _tmpnam(char const * progname, char * str)
{
printf("%s: Testing tmpnam()\n", progname);
return (tmpnam(str) != NULL) ? 0 : 1;
}
/* main */
int main(int argc, char * argv[])
{
int ret = 0;
(void) argc;
ret += _fmemopen(argv[0], "test", 5);
ret += _fopen(argv[0], "a", O_WRONLY | O_APPEND | O_CREAT);
ret += _fopen(argv[0], "ab", O_WRONLY | O_APPEND | O_CREAT);
ret += _fopen(argv[0], "a+", O_RDWR | O_APPEND | O_CREAT);
ret += _fopen(argv[0], "ab+", O_RDWR | O_APPEND | O_CREAT);
ret += _fopen(argv[0], "ax", O_WRONLY | O_APPEND | O_CREAT | O_EXCL);
ret += _fopen(argv[0], "abx", O_WRONLY | O_APPEND | O_CREAT | O_EXCL);
ret += _fopen(argv[0], "a+x", O_RDWR | O_APPEND | O_CREAT | O_EXCL);
ret += _fopen(argv[0], "ab+x", O_RDWR | O_APPEND | O_CREAT | O_EXCL);
ret += _fopen(argv[0], "r", O_RDONLY);
ret += _fopen(argv[0], "rb", O_RDONLY);
ret += _fopen(argv[0], "r+", O_RDWR);
ret += _fopen(argv[0], "rb+", O_RDWR);
ret += _fopen(argv[0], "rx", O_RDONLY | O_EXCL);
ret += _fopen(argv[0], "rbx", O_RDONLY | O_EXCL);
ret += _fopen(argv[0], "r+x", O_RDWR | O_EXCL);
ret += _fopen(argv[0], "rb+x", O_RDWR | O_EXCL);
ret += _fopen(argv[0], "w", O_WRONLY | O_TRUNC | O_CREAT);
ret += _fopen(argv[0], "wb", O_WRONLY | O_TRUNC | O_CREAT);
ret += _fopen(argv[0], "w+", O_RDWR | O_TRUNC | O_CREAT);
ret += _fopen(argv[0], "wb+", O_RDWR | O_TRUNC | O_CREAT);
ret += _fopen(argv[0], "wx", O_WRONLY | O_TRUNC | O_CREAT | O_EXCL);
ret += _fopen(argv[0], "wbx", O_WRONLY | O_TRUNC | O_CREAT | O_EXCL);
ret += _fopen(argv[0], "w+x", O_RDWR | O_TRUNC | O_CREAT | O_EXCL);
ret += _fopen(argv[0], "wb+x", O_RDWR | O_TRUNC | O_CREAT | O_EXCL);
ret += _printf(argv[0], "%d", 42, "42");
ret += _printf(argv[0], "%3d", 42, " 42");
ret += _printf(argv[0], "%d", -42, "-42");
ret += _printf(argv[0], "%4d", -42, " -42");
ret += _printf(argv[0], "%o", 42, "52");
ret += _printf(argv[0], "%u", 42, "42");
ret += _printf(argv[0], "%x", 42, "2a");
ret += _printf(argv[0], "%#x", 42, "0x2a");
ret += _printf(argv[0], "%X", 42, "2A");
ret += _sscanf(argv[0]);
ret += _tmpfile(argv[0]);
ret += _tmpnam(argv[0], NULL);
return (ret == 0) ? 0 : 2;
}