aboutsummaryrefslogtreecommitdiffstats
path: root/src/pdclib/platform/example/functions
diff options
context:
space:
mode:
authorClyne Sullivan <tullivan99@gmail.com>2018-11-29 20:43:06 -0500
committerClyne Sullivan <tullivan99@gmail.com>2018-11-29 20:43:06 -0500
commit563c92e6d08c305cb9f7693818ecbe2a2dec527b (patch)
tree5b8a6dcdad1daa64dc3a73e3dc9385b85b2c9200 /src/pdclib/platform/example/functions
parent22615096dee294f63c6940c17f2a448da51d9197 (diff)
hello world from initrd
Diffstat (limited to 'src/pdclib/platform/example/functions')
-rw-r--r--src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_Exit.c40
-rw-r--r--src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB__Exit.c40
-rw-r--r--src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_allocpages.c86
-rw-r--r--src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_close.c36
-rw-r--r--src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_fillbuffer.c78
-rw-r--r--src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_flushbuffer.c110
-rw-r--r--src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_open.c167
-rw-r--r--src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_rename.c144
-rw-r--r--src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_seek.c82
-rw-r--r--src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_stdinit.c430
-rw-r--r--src/pdclib/platform/example/functions/signal/raise.c114
-rw-r--r--src/pdclib/platform/example/functions/signal/signal.c75
-rw-r--r--src/pdclib/platform/example/functions/stdio/remove.c75
-rw-r--r--src/pdclib/platform/example/functions/stdio/tmpfile.c114
-rw-r--r--src/pdclib/platform/example/functions/stdlib/getenv.c45
-rw-r--r--src/pdclib/platform/example/functions/stdlib/system.c57
-rw-r--r--src/pdclib/platform/example/functions/time/clock.c35
-rw-r--r--src/pdclib/platform/example/functions/time/time.c41
-rw-r--r--src/pdclib/platform/example/functions/time/timespec_get.c42
19 files changed, 0 insertions, 1811 deletions
diff --git a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_Exit.c b/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_Exit.c
deleted file mode 100644
index d2e6ee4..0000000
--- a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_Exit.c
+++ /dev/null
@@ -1,40 +0,0 @@
-/* _PDCLIB_exit( int )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of _PDCLIB_exit() fit for use with POSIX
- kernels.
-*/
-
-#include <stdlib.h>
-
-#ifndef REGTEST
-
-#include "pdclib/_PDCLIB_glue.h"
-
-extern void _exit( int status ) _PDCLIB_NORETURN;
-
-void _PDCLIB_Exit( int status )
-{
- _exit( status );
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
-#ifndef REGTEST
- int UNEXPECTED_RETURN = 0;
- _PDCLIB_Exit( 0 );
- TESTCASE( UNEXPECTED_RETURN );
-#endif
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB__Exit.c b/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB__Exit.c
deleted file mode 100644
index d2e6ee4..0000000
--- a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB__Exit.c
+++ /dev/null
@@ -1,40 +0,0 @@
-/* _PDCLIB_exit( int )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of _PDCLIB_exit() fit for use with POSIX
- kernels.
-*/
-
-#include <stdlib.h>
-
-#ifndef REGTEST
-
-#include "pdclib/_PDCLIB_glue.h"
-
-extern void _exit( int status ) _PDCLIB_NORETURN;
-
-void _PDCLIB_Exit( int status )
-{
- _exit( status );
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
-#ifndef REGTEST
- int UNEXPECTED_RETURN = 0;
- _PDCLIB_Exit( 0 );
- TESTCASE( UNEXPECTED_RETURN );
-#endif
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_allocpages.c b/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_allocpages.c
deleted file mode 100644
index d46d46f..0000000
--- a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_allocpages.c
+++ /dev/null
@@ -1,86 +0,0 @@
-/* _PDCLIB_allocpages( int const )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of _PDCLIB_allocpages() fit for use with
- POSIX kernels.
-*/
-
-#include <stdint.h>
-#include <stddef.h>
-
-#ifndef REGTEST
-
-int brk( void * );
-void * sbrk( intptr_t );
-
-#include "pdclib/_PDCLIB_glue.h"
-
-static void * membreak = NULL;
-
-void * _PDCLIB_allocpages( int const n )
-{
- void * oldbreak;
- if ( membreak == NULL )
- {
- /* first call, make sure end-of-heap is page-aligned */
- intptr_t unaligned = 0;
- membreak = sbrk( 0 );
- unaligned = _PDCLIB_PAGESIZE - (intptr_t)membreak % _PDCLIB_PAGESIZE;
- if ( unaligned < _PDCLIB_PAGESIZE )
- {
- /* end-of-heap not page-aligned - adjust */
- if ( sbrk( unaligned ) != membreak )
- {
- /* error */
- return NULL;
- }
- membreak = (char *)membreak + unaligned;
- }
- }
- /* increasing or decreasing heap - standard operation */
- oldbreak = membreak;
- membreak = (void *)( (char *)membreak + ( n * _PDCLIB_PAGESIZE ) );
-#ifdef __CYGWIN__
- if ( sbrk( (char*)membreak - (char*)oldbreak ) == membreak )
-#else
- if ( brk( membreak ) == 0 )
-#endif
- {
- /* successful */
- return oldbreak;
- }
- else
- {
- /* out of memory */
- membreak = oldbreak;
- return NULL;
- }
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
-#ifndef REGTEST
- char * startbreak = sbrk( 0 );
- TESTCASE( _PDCLIB_allocpages( 0 ) );
- TESTCASE( ( (char *)sbrk( 0 ) - startbreak ) <= _PDCLIB_PAGESIZE );
- startbreak = sbrk( 0 );
- TESTCASE( _PDCLIB_allocpages( 1 ) );
- TESTCASE( sbrk( 0 ) == startbreak + ( 1 * _PDCLIB_PAGESIZE ) );
- TESTCASE( _PDCLIB_allocpages( 5 ) );
- TESTCASE( sbrk( 0 ) == startbreak + ( 6 * _PDCLIB_PAGESIZE ) );
- TESTCASE( _PDCLIB_allocpages( -3 ) );
- TESTCASE( sbrk( 0 ) == startbreak + ( 3 * _PDCLIB_PAGESIZE ) );
-#endif
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_close.c b/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_close.c
deleted file mode 100644
index 113290a..0000000
--- a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_close.c
+++ /dev/null
@@ -1,36 +0,0 @@
-/* _PDCLIB_close( _PDCLIB_fd_t )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of _PDCLIB_close() fit for use with POSIX
- kernels.
-*/
-
-#include <stdio.h>
-
-#ifndef REGTEST
-
-#include "pdclib/_PDCLIB_glue.h"
-
-extern int close( int fd );
-
-int _PDCLIB_close( int fd )
-{
- return close( fd );
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- /* No testdriver; tested in driver for _PDCLIB_open(). */
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_fillbuffer.c b/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_fillbuffer.c
deleted file mode 100644
index 012eed8..0000000
--- a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_fillbuffer.c
+++ /dev/null
@@ -1,78 +0,0 @@
-/* _PDCLIB_fillbuffer( struct _PDCLIB_file_t * )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of _PDCLIB_fillbuffer() fit for
- use with POSIX kernels.
-*/
-
-#include <stdio.h>
-
-#ifndef REGTEST
-
-#include "pdclib/_PDCLIB_glue.h"
-
-#include </usr/include/errno.h>
-
-typedef long ssize_t;
-extern ssize_t read( int fd, void * buf, size_t count );
-
-int _PDCLIB_fillbuffer( struct _PDCLIB_file_t * stream )
-{
- /* No need to handle buffers > INT_MAX, as PDCLib doesn't allow them */
- ssize_t rc = read( stream->handle, stream->buffer, stream->bufsize );
- if ( rc > 0 )
- {
- /* Reading successful. */
- if ( ! ( stream->status & _PDCLIB_FBIN ) )
- {
- /* TODO: Text stream conversion here */
- }
- stream->pos.offset += rc;
- stream->bufend = rc;
- stream->bufidx = 0;
- return 0;
- }
- if ( rc < 0 )
- {
- /* Reading error */
- switch ( errno )
- {
- /* See comments on implementation-defined errno values in
- <_PDCLIB_config.h>.
- */
- case EBADF:
- case EFAULT:
- case EINTR:
- case EINVAL:
- case EIO:
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- default:
- /* This should be something like EUNKNOWN. */
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- }
- stream->status |= _PDCLIB_ERRORFLAG;
- return EOF;
- }
- /* End-of-File */
- stream->status |= _PDCLIB_EOFFLAG;
- return EOF;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- /* Testing covered by ftell.c */
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_flushbuffer.c b/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_flushbuffer.c
deleted file mode 100644
index ca6b998..0000000
--- a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_flushbuffer.c
+++ /dev/null
@@ -1,110 +0,0 @@
-/* _PDCLIB_flushbuffer( struct _PDCLIB_file_t * )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of _PDCLIB_flushbuffer() fit for
- use with POSIX kernels.
-*/
-
-#include <stdio.h>
-#include <string.h>
-
-#ifndef REGTEST
-
-#include "pdclib/_PDCLIB_glue.h"
-
-#include </usr/include/errno.h>
-
-typedef long ssize_t;
-extern ssize_t write( int fd, const void * buf, size_t count );
-
-/* The number of attempts to complete an output buffer flushing before giving
- * up.
- * */
-#define _PDCLIB_IO_RETRIES 1
-
-/* What the system should do after an I/O operation did not succeed, before */
-/* trying again. (Empty by default.) */
-#define _PDCLIB_IO_RETRY_OP( stream )
-
-int _PDCLIB_flushbuffer( struct _PDCLIB_file_t * stream )
-{
- /* No need to handle buffers > INT_MAX, as PDCLib doesn't allow them */
- _PDCLIB_size_t written = 0;
- int rc;
- unsigned int retries;
- if ( ! ( stream->status & _PDCLIB_FBIN ) )
- {
- /* TODO: Text stream conversion here */
- }
- /* Keep trying to write data until everything is written, an error
- occurs, or the configured number of retries is exceeded.
- */
- for ( retries = _PDCLIB_IO_RETRIES; retries > 0; --retries )
- {
- rc = (int)write( stream->handle, stream->buffer + written, stream->bufidx - written );
- if ( rc < 0 )
- {
- /* Write error */
- switch ( errno )
- {
- /* See <_PDCLIB_config.h>. There should be differenciated errno
- handling here, possibly even a 1:1 mapping; but that is up
- to the individual platform.
- */
- case EBADF:
- case EFAULT:
- case EFBIG:
- case EINTR:
- case EINVAL:
- case EIO:
- case ENOSPC:
- case EPIPE:
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- default:
- /* This should be something like EUNKNOWN. */
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- }
- stream->status |= _PDCLIB_ERRORFLAG;
- /* Move unwritten remains to begin of buffer. */
- stream->bufidx -= written;
- memmove( stream->buffer, stream->buffer + written, stream->bufidx );
- return EOF;
- }
- written += (_PDCLIB_size_t)rc;
- stream->pos.offset += rc;
- if ( written == stream->bufidx )
- {
- /* Buffer written completely. */
- stream->bufidx = 0;
- return 0;
- }
- }
- /* Number of retries exceeded. You probably want a different errno value
- here.
- */
- _PDCLIB_errno = _PDCLIB_ERROR;
- stream->status |= _PDCLIB_ERRORFLAG;
- /* Move unwritten remains to begin of buffer. */
- stream->bufidx -= written;
- memmove( stream->buffer, stream->buffer + written, stream->bufidx );
- return EOF;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- /* Testing covered by ftell.c */
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_open.c b/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_open.c
deleted file mode 100644
index e35d65d..0000000
--- a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_open.c
+++ /dev/null
@@ -1,167 +0,0 @@
-/* _PDCLIB_open( const char * const, int )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of _PDCLIB_open() fit for use with POSIX
- kernels.
-*/
-
-#include <stdio.h>
-
-#ifndef REGTEST
-
-#include "pdclib/_PDCLIB_glue.h"
-
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <fcntl.h>
-#include <unistd.h>
-
-#include "/usr/include/errno.h"
-
-int _PDCLIB_open( const char * const filename, unsigned int mode )
-{
- /* This is an example implementation of _PDCLIB_open() fit for use with
- POSIX kernels.
- */
- int osmode;
- int rc;
- switch ( mode & ( _PDCLIB_FREAD | _PDCLIB_FWRITE | _PDCLIB_FAPPEND | _PDCLIB_FRW ) )
- {
- case _PDCLIB_FREAD: /* "r" */
- osmode = O_RDONLY;
- break;
- case _PDCLIB_FWRITE: /* "w" */
- osmode = O_WRONLY | O_CREAT | O_TRUNC;
- break;
- case _PDCLIB_FAPPEND: /* "a" */
- osmode = O_WRONLY | O_APPEND | O_CREAT;
- break;
- case _PDCLIB_FREAD | _PDCLIB_FRW: /* "r+" */
- osmode = O_RDWR;
- break;
- case _PDCLIB_FWRITE | _PDCLIB_FRW: /* "w+" */
- osmode = O_RDWR | O_CREAT | O_TRUNC;
- break;
- case _PDCLIB_FAPPEND | _PDCLIB_FRW: /* "a+" */
- osmode = O_RDWR | O_APPEND | O_CREAT;
- break;
- default: /* Invalid mode */
- return -1;
- }
- if ( osmode & O_CREAT )
- {
- rc = open( filename, osmode, S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH );
- }
- else
- {
- rc = open( filename, osmode );
- }
- if ( rc == -1 )
- {
- switch ( errno )
- {
- /* See the comments on implementation-defined errno values in
- <_PDCLIB_config.h>.
- */
- case EACCES:
- case EFAULT:
- case EINTR:
- case EISDIR:
- case ELOOP:
- case EMFILE:
- case ENAMETOOLONG:
- case ENFILE:
- case ENODEV:
- case ENOENT:
- case ENOMEM:
- case ENOSPC:
- case ENOTDIR:
- case EOVERFLOW:
- case EROFS:
- case ETXTBSY:
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- default:
- /* This should be something like EUNKNOWN. */
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- }
- }
- return rc;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-#include <stdlib.h>
-#include <string.h>
-
-int main( void )
-{
-#ifndef REGTEST
- /* This testdriver assumes POSIX, i.e. _PDCLIB_fd_t being int and being
- incremented by one on each successful open.
- */
- int fh;
- char buffer[ 10 ];
- remove( testfile );
- /* Trying to read non-existent file. */
- TESTCASE( _PDCLIB_open( testfile, _PDCLIB_FREAD ) == _PDCLIB_NOHANDLE );
- /* Writing to file, trying to read from it. */
- TESTCASE( ( fh = _PDCLIB_open( testfile, _PDCLIB_FWRITE ) ) != _PDCLIB_NOHANDLE );
- TESTCASE( write( fh, "test", 4 ) == 4 );
- TESTCASE( lseek( fh, 0, SEEK_SET ) == 0 );
- TESTCASE( read( fh, buffer, 4 ) == -1 );
- TESTCASE( _PDCLIB_close( fh ) == 0 );
- /* Reading from file, trying to write to it. */
- TESTCASE( ( fh = _PDCLIB_open( testfile, _PDCLIB_FREAD ) ) != _PDCLIB_NOHANDLE );
- TESTCASE( write( fh, "test", 4 ) == -1 );
- TESTCASE( _PDCLIB_close( fh ) == 0 );
- /* Appending to file, trying to read from it. */
- TESTCASE( ( fh = _PDCLIB_open( testfile, _PDCLIB_FAPPEND ) ) != _PDCLIB_NOHANDLE );
- TESTCASE( write( fh, "app", 3 ) == 3 );
- TESTCASE( lseek( fh, 0, SEEK_SET ) == 0 );
- TESTCASE( read( fh, buffer, 10 ) == -1 );
- TESTCASE( write( fh, "end", 3 ) == 3 );
- TESTCASE( _PDCLIB_close( fh ) == 0 );
- /* Reading and writing from file ("r+"). */
- TESTCASE( ( fh = _PDCLIB_open( testfile, _PDCLIB_FREAD | _PDCLIB_FRW ) ) != _PDCLIB_NOHANDLE );
- TESTCASE( read( fh, buffer, 10 ) == 10 );
- TESTCASE( memcmp( buffer, "testappend", 10 ) == 0 );
- TESTCASE( lseek( fh, 0, SEEK_SET ) == 0 );
- TESTCASE( write( fh, "wedo", 4 ) == 4 );
- TESTCASE( lseek( fh, 0, SEEK_SET ) == 0 );
- TESTCASE( read( fh, buffer, 10 ) == 10 );
- TESTCASE( memcmp( buffer, "wedoappend", 10 ) == 0 );
- TESTCASE( _PDCLIB_close( fh ) == 0 );
- /* Writing and reading from file ("w+"). */
- TESTCASE( ( fh = _PDCLIB_open( testfile, _PDCLIB_FWRITE | _PDCLIB_FRW ) ) != _PDCLIB_NOHANDLE );
- TESTCASE( write( fh, "test", 4 ) == 4 );
- TESTCASE( lseek( fh, 1, SEEK_SET ) == 1 );
- TESTCASE( read( fh, buffer, 2 ) == 2 );
- TESTCASE( memcmp( buffer, "es", 2 ) == 0 );
- TESTCASE( write( fh, "sie", 3 ) == 3 );
- TESTCASE( lseek( fh, 0, SEEK_SET ) == 0 );
- TESTCASE( read( fh, buffer, 6 ) == 6 );
- TESTCASE( memcmp( buffer, "tessie", 6 ) == 0 );
- TESTCASE( _PDCLIB_close( fh ) == 0 );
- /* Appending and reading from file ("a+"). */
- TESTCASE( ( fh = _PDCLIB_open( testfile, _PDCLIB_FAPPEND | _PDCLIB_FRW ) ) != _PDCLIB_NOHANDLE );
- TESTCASE( write( fh, "baby", 4 ) == 4 );
- TESTCASE( lseek( fh, 0, SEEK_SET ) == 0 );
- TESTCASE( read( fh, buffer, 10 ) == 10 );
- TESTCASE( memcmp( buffer, "tessiebaby", 10 ) == 0 );
- TESTCASE( _PDCLIB_close( fh ) == 0 );
- /* Cleaning up. */
- TESTCASE( remove( testfile ) == 0 );
-#endif
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_rename.c b/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_rename.c
deleted file mode 100644
index 8c23f79..0000000
--- a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_rename.c
+++ /dev/null
@@ -1,144 +0,0 @@
-/* _PDCLIB_rename( const char *, const char * )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of _PDCLIB_rename() fit for use with
- POSIX kernels.
- */
-
-#include <stdio.h>
-
-#ifndef REGTEST
-
-#include "pdclib/_PDCLIB_glue.h"
-
-#include </usr/include/errno.h>
-
-extern int unlink( const char * pathname );
-extern int link( const char * old, const char * new );
-
-int _PDCLIB_rename( const char * old, const char * new )
-{
- /* Note that the behaviour if new file exists is implementation-defined.
- There is nothing wrong with either overwriting it or failing the
- operation, but you might want to document whichever you chose.
- This example fails if new file exists.
- */
- if ( link( old, new ) == 0 )
- {
- if ( unlink( old ) == EOF )
- {
- switch ( errno )
- {
- /* See the comments on implementation-defined errno values in
- <_PDCLIB_config.h>.
- */
- case EACCES:
- case EFAULT:
- case EIO:
- case EISDIR:
- case ELOOP:
- case ENAMETOOLONG:
- case ENOENT:
- case ENOMEM:
- case ENOTDIR:
- case EPERM:
- case EROFS:
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- default:
- /* This should be something like EUNKNOWN. */
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- }
- return -1;
- }
- else
- {
- return 0;
- }
- }
- else
- {
- switch ( errno )
- {
- /* See the comments on implementation-defined errno values in
- <_PDCLIB_config.h>.
- */
- case EACCES:
- case EEXIST:
- case EFAULT:
- case EIO:
- case ELOOP:
- case EMLINK:
- case ENAMETOOLONG:
- case ENOENT:
- case ENOMEM:
- case ENOSPC:
- case ENOTDIR:
- case EPERM:
- case EROFS:
- case EXDEV:
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- default:
- /* This should be something like EUNKNOWN. */
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- }
- return EOF;
- }
-}
-
-#endif
-
-#ifdef TEST
-#include "_PDCLIB_test.h"
-
-#include <stdlib.h>
-
-int main( void )
-{
-#ifndef REGTEST
- FILE * file;
- remove( testfile1 );
- remove( testfile2 );
- /* check that neither file exists */
- TESTCASE( fopen( testfile1, "r" ) == NULL );
- TESTCASE( fopen( testfile2, "r" ) == NULL );
- /* rename file 1 to file 2 - expected to fail */
- TESTCASE( _PDCLIB_rename( testfile1, testfile2 ) == -1 );
- /* create file 1 */
- TESTCASE( ( file = fopen( testfile1, "w" ) ) != NULL );
- TESTCASE( fputc( 'x', file ) == 'x' );
- TESTCASE( fclose( file ) == 0 );
- /* check that file 1 exists */
- TESTCASE( ( file = fopen( testfile1, "r" ) ) != NULL );
- TESTCASE( fclose( file ) == 0 );
- /* rename file 1 to file 2 */
- TESTCASE( _PDCLIB_rename( testfile1, testfile2 ) == 0 );
- /* check that file 2 exists, file 1 does not */
- TESTCASE( fopen( testfile1, "r" ) == NULL );
- TESTCASE( ( file = fopen( testfile2, "r" ) ) != NULL );
- TESTCASE( fclose( file ) == 0 );
- /* create another file 1 */
- TESTCASE( ( file = fopen( testfile1, "w" ) ) != NULL );
- TESTCASE( fputc( 'x', file ) == 'x' );
- TESTCASE( fclose( file ) == 0 );
- /* check that file 1 exists */
- TESTCASE( ( file = fopen( testfile1, "r" ) ) != NULL );
- TESTCASE( fclose( file ) == 0 );
- /* rename file 1 to file 2 - expected to fail, see comment in
- _PDCLIB_rename() itself.
- */
- TESTCASE( _PDCLIB_rename( testfile1, testfile2 ) == -1 );
- /* remove both files */
- remove( testfile1 );
- remove( testfile2 );
-#endif
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_seek.c b/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_seek.c
deleted file mode 100644
index 4d09460..0000000
--- a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_seek.c
+++ /dev/null
@@ -1,82 +0,0 @@
-/* int64_t _PDCLIB_seek( FILE *, int64_t, int )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of _PDCLIB_seek() fit for use with POSIX
- kernels.
- */
-
-#include <stdio.h>
-
-#ifndef REGTEST
-
-#include "pdclib/_PDCLIB_glue.h"
-
-#include "/usr/include/errno.h"
-
-extern _PDCLIB_int64_t lseek64( int fd, _PDCLIB_int64_t offset, int whence );
-extern long lseek( int fd, long offset, int whence );
-
-_PDCLIB_int64_t _PDCLIB_seek( struct _PDCLIB_file_t * stream, _PDCLIB_int64_t offset, int whence )
-{
- _PDCLIB_int64_t rc;
- switch ( whence )
- {
- case SEEK_SET:
- case SEEK_CUR:
- case SEEK_END:
- /* EMPTY - OK */
- break;
- default:
- /* See comments on implementation-defined errno values in
- <_PDCLIB_config.h>.
- */
- _PDCLIB_errno = _PDCLIB_ERROR;
- return EOF;
- break;
- }
-#ifdef __CYGWIN__
- rc = lseek( stream->handle, offset, whence );
-#else
- rc = lseek64( stream->handle, offset, whence );
-#endif
- if ( rc != EOF )
- {
- stream->ungetidx = 0;
- stream->bufidx = 0;
- stream->bufend = 0;
- stream->pos.offset = rc;
- return rc;
- }
- switch ( errno )
- {
- case EBADF:
- case EFAULT:
- /* See comments on implementation-defined errno values in
- <_PDCLIB_config.h>.
- */
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- default:
- /* This should be something like EUNKNOWN. */
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- }
- return EOF;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- /* Testing covered by ftell.c */
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_stdinit.c b/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_stdinit.c
deleted file mode 100644
index 52b0651..0000000
--- a/src/pdclib/platform/example/functions/_PDCLIB/_PDCLIB_stdinit.c
+++ /dev/null
@@ -1,430 +0,0 @@
-/* _PDCLIB_stdinit
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example initialization of stdin, stdout and stderr to the integer
- file descriptors 0, 1, and 2, respectively. This applies for a great variety
- of operating systems, including POSIX compliant ones.
-*/
-
-#include <stdio.h>
-#include <locale.h>
-#include <limits.h>
-
-#ifndef REGTEST
-
-/* In a POSIX system, stdin / stdout / stderr are equivalent to the (int) file
- descriptors 0, 1, and 2 respectively.
-*/
-/* TODO: This is proof-of-concept, requires finetuning. */
-static char _PDCLIB_sin_buffer[BUFSIZ];
-static char _PDCLIB_sout_buffer[BUFSIZ];
-static char _PDCLIB_serr_buffer[BUFSIZ];
-
-static unsigned char _PDCLIB_sin_ungetbuf[_PDCLIB_UNGETCBUFSIZE];
-static unsigned char _PDCLIB_sout_ungetbuf[_PDCLIB_UNGETCBUFSIZE];
-static unsigned char _PDCLIB_serr_ungetbuf[_PDCLIB_UNGETCBUFSIZE];
-
-static struct _PDCLIB_file_t _PDCLIB_serr = { 2, _PDCLIB_serr_buffer, BUFSIZ, 0, 0, { 0, 0 }, 0, _PDCLIB_serr_ungetbuf, _IONBF | _PDCLIB_FWRITE | _PDCLIB_STATIC, NULL, NULL };
-static struct _PDCLIB_file_t _PDCLIB_sout = { 1, _PDCLIB_sout_buffer, BUFSIZ, 0, 0, { 0, 0 }, 0, _PDCLIB_sout_ungetbuf, _IOLBF | _PDCLIB_FWRITE | _PDCLIB_STATIC, NULL, &_PDCLIB_serr };
-static struct _PDCLIB_file_t _PDCLIB_sin = { 0, _PDCLIB_sin_buffer, BUFSIZ, 0, 0, { 0, 0 }, 0, _PDCLIB_sin_ungetbuf, _IOLBF | _PDCLIB_FREAD | _PDCLIB_STATIC, NULL, &_PDCLIB_sout };
-
-struct _PDCLIB_file_t * stdin = &_PDCLIB_sin;
-struct _PDCLIB_file_t * stdout = &_PDCLIB_sout;
-struct _PDCLIB_file_t * stderr = &_PDCLIB_serr;
-
-/* FIXME: This approach is a possible attack vector. */
-struct _PDCLIB_file_t * _PDCLIB_filelist = &_PDCLIB_sin;
-
-/* "C" locale - defaulting to ASCII-7.
- 1 kByte (+ 4 byte) of <ctype.h> data.
- Each line: flags, lowercase, uppercase, collation.
-*/
-static struct _PDCLIB_lc_ctype_entry_t _ctype_entries[ _PDCLIB_CHARSET_SIZE + 1 ] = {
- { /* EOF */ 0, 0, 0 },
- { /* NUL */ _PDCLIB_CTYPE_CNTRL, 0x00, 0x00 },
- { /* SOH */ _PDCLIB_CTYPE_CNTRL, 0x01, 0x01 },
- { /* STX */ _PDCLIB_CTYPE_CNTRL, 0x02, 0x02 },
- { /* ETX */ _PDCLIB_CTYPE_CNTRL, 0x03, 0x03 },
- { /* EOT */ _PDCLIB_CTYPE_CNTRL, 0x04, 0x04 },
- { /* ENQ */ _PDCLIB_CTYPE_CNTRL, 0x05, 0x05 },
- { /* ACK */ _PDCLIB_CTYPE_CNTRL, 0x06, 0x06 },
- { /* BEL */ _PDCLIB_CTYPE_CNTRL, 0x07, 0x07 },
- { /* BS */ _PDCLIB_CTYPE_CNTRL, 0x08, 0x08 },
- { /* HT */ _PDCLIB_CTYPE_CNTRL | _PDCLIB_CTYPE_BLANK | _PDCLIB_CTYPE_SPACE, 0x09, 0x09 },
- { /* LF */ _PDCLIB_CTYPE_CNTRL | _PDCLIB_CTYPE_SPACE, 0x0A, 0x0A },
- { /* VT */ _PDCLIB_CTYPE_CNTRL | _PDCLIB_CTYPE_SPACE, 0x0B, 0x0B },
- { /* FF */ _PDCLIB_CTYPE_CNTRL | _PDCLIB_CTYPE_SPACE, 0x0C, 0x0C },
- { /* CR */ _PDCLIB_CTYPE_CNTRL | _PDCLIB_CTYPE_SPACE, 0x0D, 0x0D },
- { /* SO */ _PDCLIB_CTYPE_CNTRL, 0x0E, 0x0E },
- { /* SI */ _PDCLIB_CTYPE_CNTRL, 0x0F, 0x0F },
- { /* DLE */ _PDCLIB_CTYPE_CNTRL, 0x10, 0x10 },
- { /* DC1 */ _PDCLIB_CTYPE_CNTRL, 0x11, 0x11 },
- { /* DC2 */ _PDCLIB_CTYPE_CNTRL, 0x12, 0x12 },
- { /* DC3 */ _PDCLIB_CTYPE_CNTRL, 0x13, 0x13 },
- { /* DC4 */ _PDCLIB_CTYPE_CNTRL, 0x14, 0x14 },
- { /* NAK */ _PDCLIB_CTYPE_CNTRL, 0x15, 0x15 },
- { /* SYN */ _PDCLIB_CTYPE_CNTRL, 0x16, 0x16 },
- { /* ETB */ _PDCLIB_CTYPE_CNTRL, 0x17, 0x17 },
- { /* CAN */ _PDCLIB_CTYPE_CNTRL, 0x18, 0x18 },
- { /* EM */ _PDCLIB_CTYPE_CNTRL, 0x19, 0x19 },
- { /* SUB */ _PDCLIB_CTYPE_CNTRL, 0x1A, 0x1A },
- { /* ESC */ _PDCLIB_CTYPE_CNTRL, 0x1B, 0x1B },
- { /* FS */ _PDCLIB_CTYPE_CNTRL, 0x1C, 0x1C },
- { /* GS */ _PDCLIB_CTYPE_CNTRL, 0x1D, 0x1D },
- { /* RS */ _PDCLIB_CTYPE_CNTRL, 0x1E, 0x1E },
- { /* US */ _PDCLIB_CTYPE_CNTRL, 0x1F, 0x1F },
- { /* SP */ _PDCLIB_CTYPE_BLANK | _PDCLIB_CTYPE_SPACE, 0x20, 0x20 },
- { /* '!' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x21, 0x21 },
- { /* '"' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x22, 0x22 },
- { /* '#' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x23, 0x23 },
- { /* '$' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x24, 0x24 },
- { /* '%' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x25, 0x25 },
- { /* '&' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x26, 0x26 },
- { /* ''' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x27, 0x27 },
- { /* '(' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x28, 0x28 },
- { /* ')' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x29, 0x29 },
- { /* '*' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2A, 0x2A },
- { /* '+' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2B, 0x2B },
- { /* ',' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2C, 0x2C },
- { /* '-' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2D, 0x2D },
- { /* '.' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2E, 0x2E },
- { /* '/' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2F, 0x2F },
- { /* '0' */ _PDCLIB_CTYPE_GRAPH, 0x30, 0x30 },
- { /* '1' */ _PDCLIB_CTYPE_GRAPH, 0x31, 0x31 },
- { /* '2' */ _PDCLIB_CTYPE_GRAPH, 0x32, 0x32 },
- { /* '3' */ _PDCLIB_CTYPE_GRAPH, 0x33, 0x33 },
- { /* '4' */ _PDCLIB_CTYPE_GRAPH, 0x34, 0x34 },
- { /* '5' */ _PDCLIB_CTYPE_GRAPH, 0x35, 0x35 },
- { /* '6' */ _PDCLIB_CTYPE_GRAPH, 0x36, 0x36 },
- { /* '7' */ _PDCLIB_CTYPE_GRAPH, 0x37, 0x37 },
- { /* '8' */ _PDCLIB_CTYPE_GRAPH, 0x38, 0x38 },
- { /* '9' */ _PDCLIB_CTYPE_GRAPH, 0x39, 0x39 },
- { /* ':' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3A, 0x3A },
- { /* ';' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3B, 0x3B },
- { /* '<' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3C, 0x3C },
- { /* '=' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3D, 0x3D },
- { /* '>' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3E, 0x3E },
- { /* '?' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3F, 0x3F },
- { /* '@' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x40, 0x40 },
- { /* 'A' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x41, 0x61 },
- { /* 'B' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x42, 0x62 },
- { /* 'C' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x43, 0x63 },
- { /* 'D' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x44, 0x64 },
- { /* 'E' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x45, 0x65 },
- { /* 'F' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x46, 0x66 },
- { /* 'G' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x47, 0x67 },
- { /* 'H' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x48, 0x68 },
- { /* 'I' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x49, 0x69 },
- { /* 'J' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4A, 0x6A },
- { /* 'K' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4B, 0x6B },
- { /* 'L' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4C, 0x6C },
- { /* 'M' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4D, 0x6D },
- { /* 'N' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4E, 0x6E },
- { /* 'O' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4F, 0x6F },
- { /* 'P' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x50, 0x70 },
- { /* 'Q' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x51, 0x71 },
- { /* 'R' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x52, 0x72 },
- { /* 'S' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x53, 0x73 },
- { /* 'T' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x54, 0x74 },
- { /* 'U' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x55, 0x75 },
- { /* 'V' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x56, 0x76 },
- { /* 'W' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x57, 0x77 },
- { /* 'X' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x58, 0x78 },
- { /* 'Y' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x59, 0x79 },
- { /* 'Z' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x5A, 0x7A },
- { /* '[' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x5B, 0x5B },
- { /* '\' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x5C, 0x5C },
- { /* ']' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x5D, 0x5D },
- { /* '^' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x5E, 0x5E },
- { /* '_' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x5F, 0x5F },
- { /* '`' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x60, 0x60 },
- { /* 'a' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x41, 0x61 },
- { /* 'b' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x42, 0x62 },
- { /* 'c' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x43, 0x63 },
- { /* 'd' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x44, 0x64 },
- { /* 'e' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x45, 0x65 },
- { /* 'f' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x46, 0x66 },
- { /* 'g' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x47, 0x67 },
- { /* 'h' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x48, 0x68 },
- { /* 'i' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x49, 0x69 },
- { /* 'j' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4A, 0x6A },
- { /* 'k' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4B, 0x6B },
- { /* 'l' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4C, 0x6C },
- { /* 'm' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4D, 0x6D },
- { /* 'n' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4E, 0x6E },
- { /* 'o' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4F, 0x6F },
- { /* 'p' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x50, 0x70 },
- { /* 'q' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x51, 0x71 },
- { /* 'r' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x52, 0x72 },
- { /* 's' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x53, 0x73 },
- { /* 't' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x54, 0x74 },
- { /* 'u' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x55, 0x75 },
- { /* 'v' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x56, 0x76 },
- { /* 'w' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x57, 0x77 },
- { /* 'x' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x58, 0x78 },
- { /* 'y' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x59, 0x79 },
- { /* 'z' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x5A, 0x7A },
- { /* '{' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x7B, 0x7B },
- { /* '|' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x7C, 0x7C },
- { /* '}' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x7D, 0x7D },
- { /* '~' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x7E, 0x7E },
- { /* DEL */ _PDCLIB_CTYPE_CNTRL, 0x7F, 0x7F },
- { 0x00, 0x80, 0x80 },
- { 0x00, 0x81, 0x81 },
- { 0x00, 0x82, 0x82 },
- { 0x00, 0x83, 0x83 },
- { 0x00, 0x84, 0x84 },
- { 0x00, 0x85, 0x85 },
- { 0x00, 0x86, 0x86 },
- { 0x00, 0x87, 0x87 },
- { 0x00, 0x88, 0x88 },
- { 0x00, 0x89, 0x89 },
- { 0x00, 0x8A, 0x8A },
- { 0x00, 0x8B, 0x8B },
- { 0x00, 0x8C, 0x8C },
- { 0x00, 0x8D, 0x8D },
- { 0x00, 0x8E, 0x8E },
- { 0x00, 0x8F, 0x8F },
- { 0x00, 0x90, 0x90 },
- { 0x00, 0x91, 0x91 },
- { 0x00, 0x92, 0x92 },
- { 0x00, 0x93, 0x93 },
- { 0x00, 0x94, 0x94 },
- { 0x00, 0x95, 0x95 },
- { 0x00, 0x96, 0x96 },
- { 0x00, 0x97, 0x97 },
- { 0x00, 0x98, 0x98 },
- { 0x00, 0x99, 0x99 },
- { 0x00, 0x9A, 0x9A },
- { 0x00, 0x9B, 0x9B },
- { 0x00, 0x9C, 0x9C },
- { 0x00, 0x9D, 0x9D },
- { 0x00, 0x9E, 0x9E },
- { 0x00, 0x9F, 0x9F },
- { 0x00, 0xA0, 0xA0 },
- { 0x00, 0xA1, 0xA1 },
- { 0x00, 0xA2, 0xA2 },
- { 0x00, 0xA3, 0xA3 },
- { 0x00, 0xA4, 0xA4 },
- { 0x00, 0xA5, 0xA5 },
- { 0x00, 0xA6, 0xA6 },
- { 0x00, 0xA7, 0xA7 },
- { 0x00, 0xA8, 0xA8 },
- { 0x00, 0xA9, 0xA9 },
- { 0x00, 0xAA, 0xAA },
- { 0x00, 0xAB, 0xAB },
- { 0x00, 0xAC, 0xAC },
- { 0x00, 0xAD, 0xAD },
- { 0x00, 0xAE, 0xAE },
- { 0x00, 0xAF, 0xAF },
- { 0x00, 0xB0, 0xB0 },
- { 0x00, 0xB1, 0xB1 },
- { 0x00, 0xB2, 0xB2 },
- { 0x00, 0xB3, 0xB3 },
- { 0x00, 0xB4, 0xB4 },
- { 0x00, 0xB5, 0xB5 },
- { 0x00, 0xB6, 0xB6 },
- { 0x00, 0xB7, 0xB7 },
- { 0x00, 0xB8, 0xB8 },
- { 0x00, 0xB9, 0xB9 },
- { 0x00, 0xBA, 0xBA },
- { 0x00, 0xBB, 0xBB },
- { 0x00, 0xBC, 0xBC },
- { 0x00, 0xBD, 0xBD },
- { 0x00, 0xBE, 0xBE },
- { 0x00, 0xBF, 0xBF },
- { 0x00, 0xC0, 0xC0 },
- { 0x00, 0xC1, 0xC1 },
- { 0x00, 0xC2, 0xC2 },
- { 0x00, 0xC3, 0xC3 },
- { 0x00, 0xC4, 0xC4 },
- { 0x00, 0xC5, 0xC5 },
- { 0x00, 0xC6, 0xC6 },
- { 0x00, 0xC7, 0xC7 },
- { 0x00, 0xC8, 0xC8 },
- { 0x00, 0xC9, 0xC9 },
- { 0x00, 0xCA, 0xCA },
- { 0x00, 0xCB, 0xCB },
- { 0x00, 0xCC, 0xCC },
- { 0x00, 0xCD, 0xCD },
- { 0x00, 0xCE, 0xCE },
- { 0x00, 0xCF, 0xCF },
- { 0x00, 0xD0, 0xD0 },
- { 0x00, 0xD1, 0xD1 },
- { 0x00, 0xD2, 0xD2 },
- { 0x00, 0xD3, 0xD3 },
- { 0x00, 0xD4, 0xD4 },
- { 0x00, 0xD5, 0xD5 },
- { 0x00, 0xD6, 0xD6 },
- { 0x00, 0xD7, 0xD7 },
- { 0x00, 0xD8, 0xD8 },
- { 0x00, 0xD9, 0xD9 },
- { 0x00, 0xDA, 0xDA },
- { 0x00, 0xDB, 0xDB },
- { 0x00, 0xDC, 0xDC },
- { 0x00, 0xDD, 0xDD },
- { 0x00, 0xDE, 0xDE },
- { 0x00, 0xDF, 0xDF },
- { 0x00, 0xE0, 0xE0 },
- { 0x00, 0xE1, 0xE1 },
- { 0x00, 0xE2, 0xE2 },
- { 0x00, 0xE3, 0xE3 },
- { 0x00, 0xE4, 0xE4 },
- { 0x00, 0xE5, 0xE5 },
- { 0x00, 0xE6, 0xE6 },
- { 0x00, 0xE7, 0xE7 },
- { 0x00, 0xE8, 0xE8 },
- { 0x00, 0xE9, 0xE9 },
- { 0x00, 0xEA, 0xEA },
- { 0x00, 0xEB, 0xEB },
- { 0x00, 0xEC, 0xEC },
- { 0x00, 0xED, 0xED },
- { 0x00, 0xEE, 0xEE },
- { 0x00, 0xEF, 0xEF },
- { 0x00, 0xF0, 0xF0 },
- { 0x00, 0xF1, 0xF1 },
- { 0x00, 0xF2, 0xF2 },
- { 0x00, 0xF3, 0xF3 },
- { 0x00, 0xF4, 0xF4 },
- { 0x00, 0xF5, 0xF5 },
- { 0x00, 0xF6, 0xF6 },
- { 0x00, 0xF7, 0xF7 },
- { 0x00, 0xF8, 0xF8 },
- { 0x00, 0xF9, 0xF9 },
- { 0x00, 0xFA, 0xFA },
- { 0x00, 0xFB, 0xFB },
- { 0x00, 0xFC, 0xFC },
- { 0x00, 0xFD, 0xFD },
- { 0x00, 0xFE, 0xFE },
- { 0x00, 0xFF, 0xFF }
-};
-
-struct _PDCLIB_lc_ctype_t _PDCLIB_lc_ctype = { 0, 0x30, 0x39, 0x41, 0x46, 0x61, 0x66, &_ctype_entries[1] };
-
-struct _PDCLIB_lc_collate_t _PDCLIB_lc_collate = { 0 };
-
-struct lconv _PDCLIB_lconv = {
- /* decimal_point */ (char *)".",
- /* thousands_sep */ (char *)"",
- /* grouping */ (char *)"",
- /* mon_decimal_point */ (char *)"",
- /* mon_thousands_sep */ (char *)"",
- /* mon_grouping */ (char *)"",
- /* positive_sign */ (char *)"",
- /* negative_sign */ (char *)"",
- /* currency_symbol */ (char *)"",
- /* int_curr_symbol */ (char *)"",
- /* frac_digits */ CHAR_MAX,
- /* p_cs_precedes */ CHAR_MAX,
- /* n_cs_precedes */ CHAR_MAX,
- /* p_sep_by_space */ CHAR_MAX,
- /* n_sep_by_space */ CHAR_MAX,
- /* p_sign_posn */ CHAR_MAX,
- /* n_sign_posn */ CHAR_MAX,
- /* int_frac_digits */ CHAR_MAX,
- /* int_p_cs_precedes */ CHAR_MAX,
- /* int_n_cs_precedes */ CHAR_MAX,
- /* int_p_sep_by_space */ CHAR_MAX,
- /* int_n_sep_by_space */ CHAR_MAX,
- /* int_p_sign_posn */ CHAR_MAX,
- /* int_n_sign_posn */ CHAR_MAX
-};
-
-struct _PDCLIB_lc_numeric_monetary_t _PDCLIB_lc_numeric_monetary = {
- &_PDCLIB_lconv,
- 0, /* numeric_allocated */
- 0 /* monetary_allocated */
-};
-
-struct _PDCLIB_lc_messages_t _PDCLIB_lc_messages = {
- 0,
- /* _PDCLIB_errno_texts */
- {
- /* no error */ (char *)"",
- /* ERANGE */ (char *)"ERANGE (Range error)",
- /* EDOM */ (char *)"EDOM (Domain error)",
- /* EILSEQ */ (char *)"EILSEQ (Illegal sequence)"
- }
-};
-
-struct _PDCLIB_lc_time_t _PDCLIB_lc_time = {
- 0,
- /* _PDCLIB_month_name_abbr */
- {
- (char *)"Jan",
- (char *)"Feb",
- (char *)"Mar",
- (char *)"Apr",
- (char *)"May",
- (char *)"Jun",
- (char *)"Jul",
- (char *)"Aug",
- (char *)"Sep",
- (char *)"Oct",
- (char *)"Now",
- (char *)"Dec"
- },
- /* _PDCLIB_month_name_full */
- {
- (char *)"January",
- (char *)"February",
- (char *)"March",
- (char *)"April",
- (char *)"May",
- (char *)"June",
- (char *)"July",
- (char *)"August",
- (char *)"September",
- (char *)"October",
- (char *)"November",
- (char *)"December"
- },
- /* _PDCLIB_day_name_abbr */
- {
- (char *)"Sun",
- (char *)"Mon",
- (char *)"Tue",
- (char *)"Wed",
- (char *)"Thu",
- (char *)"Fri",
- (char *)"Sat"
- },
- /* _PDCLIB_day_name_full */
- {
- (char *)"Sunday",
- (char *)"Monday",
- (char *)"Tuesday",
- (char *)"Wednesday",
- (char *)"Thursday",
- (char *)"Friday",
- (char *)"Saturday"
- },
- /* date / time format */ (char *)"%a %b %e %T %Y",
- /* 12h time format */ (char *)"%I:%M:%S %p",
- /* date format */ (char *)"%m/%d/%y",
- /* time format */ (char *)"%T",
- /* AM / PM designation */
- {
- (char *)"AM",
- (char *)"PM"
- }
-};
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- /* Testing covered by several other testdrivers using stdin / stdout /
- stderr.
- */
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/signal/raise.c b/src/pdclib/platform/example/functions/signal/raise.c
deleted file mode 100644
index 59ccc9f..0000000
--- a/src/pdclib/platform/example/functions/signal/raise.c
+++ /dev/null
@@ -1,114 +0,0 @@
-/* raise( int )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-#include <signal.h>
-
-#ifndef REGTEST
-
-#include <stdio.h>
-#include <stdlib.h>
-
-extern void (*_PDCLIB_sigabrt)( int );
-extern void (*_PDCLIB_sigfpe)( int );
-extern void (*_PDCLIB_sigill)( int );
-extern void (*_PDCLIB_sigint)( int );
-extern void (*_PDCLIB_sigsegv)( int );
-extern void (*_PDCLIB_sigterm)( int );
-
-int raise( int sig )
-{
- void (*sighandler)( int );
- const char * message;
- switch ( sig )
- {
- case SIGABRT:
- sighandler = _PDCLIB_sigabrt;
- message = "Abnormal termination (SIGABRT)";
- break;
- case SIGFPE:
- sighandler = _PDCLIB_sigfpe;
- message = "Arithmetic exception (SIGFPE)";
- break;
- case SIGILL:
- sighandler = _PDCLIB_sigill;
- message = "Illegal instruction (SIGILL)";
- break;
- case SIGINT:
- sighandler = _PDCLIB_sigint;
- message = "Interactive attention signal (SIGINT)";
- break;
- case SIGSEGV:
- sighandler = _PDCLIB_sigsegv;
- message = "Invalid memory access (SIGSEGV)";
- break;
- case SIGTERM:
- sighandler = _PDCLIB_sigterm;
- message = "Termination request (SIGTERM)";
- break;
- default:
- fprintf( stderr, "Unknown signal #%d\n", sig );
- _Exit( EXIT_FAILURE );
- }
- if ( sighandler == SIG_DFL )
- {
- fputs( message, stderr );
- _Exit( EXIT_FAILURE );
- }
- else if ( sighandler != SIG_IGN )
- {
- sighandler = signal( sig, SIG_DFL );
- sighandler( sig );
- }
- return 0;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-#include <stdlib.h>
-
-static volatile sig_atomic_t flag = 0;
-
-static int expected_signal = 0;
-
-static void test_handler( int sig )
-{
- TESTCASE( sig == expected_signal );
- flag = 1;
-}
-
-int main( void )
-{
- /* Could be other than SIG_DFL if you changed the implementation. */
- TESTCASE( signal( SIGABRT, SIG_IGN ) == SIG_DFL );
- /* Should be ignored. */
- TESTCASE( raise( SIGABRT ) == 0 );
- /* Installing test handler, old handler should be returned */
- TESTCASE( signal( SIGABRT, test_handler ) == SIG_IGN );
- /* Raising and checking SIGABRT */
- expected_signal = SIGABRT;
- TESTCASE( raise( SIGABRT ) == 0 );
- TESTCASE( flag == 1 );
- /* Re-installing test handler, should have been reset to default */
- /* Could be other than SIG_DFL if you changed the implementation. */
- TESTCASE( signal( SIGABRT, test_handler ) == SIG_DFL );
- /* Raising and checking SIGABRT */
- flag = 0;
- TESTCASE( raise( SIGABRT ) == 0 );
- TESTCASE( flag == 1 );
- /* Installing test handler for different signal... */
- TESTCASE( signal( SIGTERM, test_handler ) == SIG_DFL );
- /* Raising and checking SIGTERM */
- expected_signal = SIGTERM;
- TESTCASE( raise( SIGTERM ) == 0 );
- TESTCASE( flag == 1 );
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/signal/signal.c b/src/pdclib/platform/example/functions/signal/signal.c
deleted file mode 100644
index e6775e7..0000000
--- a/src/pdclib/platform/example/functions/signal/signal.c
+++ /dev/null
@@ -1,75 +0,0 @@
-/* signal( int, void (*)( int ) )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-#include <signal.h>
-
-#ifndef REGTEST
-
-#include <stdlib.h>
-
-void (*_PDCLIB_sigabrt)( int ) = SIG_DFL;
-void (*_PDCLIB_sigfpe)( int ) = SIG_DFL;
-void (*_PDCLIB_sigill)( int ) = SIG_DFL;
-void (*_PDCLIB_sigint)( int ) = SIG_DFL;
-void (*_PDCLIB_sigsegv)( int ) = SIG_DFL;
-void (*_PDCLIB_sigterm)( int ) = SIG_DFL;
-
-void (*signal( int sig, void (*func)( int ) ) )( int )
-{
- void (*oldhandler)( int );
- if ( sig <= 0 || func == SIG_ERR )
- {
- return SIG_ERR;
- }
- switch ( sig )
- {
- case SIGABRT:
- oldhandler = _PDCLIB_sigabrt;
- _PDCLIB_sigabrt = func;
- break;
- case SIGFPE:
- oldhandler = _PDCLIB_sigfpe;
- _PDCLIB_sigfpe = func;
- break;
- case SIGILL:
- oldhandler = _PDCLIB_sigill;
- _PDCLIB_sigill = func;
- break;
- case SIGINT:
- oldhandler = _PDCLIB_sigint;
- _PDCLIB_sigint = func;
- break;
- case SIGSEGV:
- oldhandler = _PDCLIB_sigsegv;
- _PDCLIB_sigsegv = func;
- break;
- case SIGTERM:
- oldhandler = _PDCLIB_sigterm;
- _PDCLIB_sigterm = func;
- break;
- default:
- /* The standard calls for an unspecified "positive value". You
- will probably want to define a specific value for this.
- */
- _PDCLIB_errno = 1;
- return SIG_ERR;
- }
- return oldhandler;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- /* Testing covered by raise.c */
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/stdio/remove.c b/src/pdclib/platform/example/functions/stdio/remove.c
deleted file mode 100644
index aca3eaf..0000000
--- a/src/pdclib/platform/example/functions/stdio/remove.c
+++ /dev/null
@@ -1,75 +0,0 @@
-/* remove( const char * )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of remove() fit for use with POSIX kernels.
-*/
-
-#include <stdio.h>
-
-#ifndef REGTEST
-
-#include <string.h>
-
-#include "/usr/include/errno.h"
-
-extern struct _PDCLIB_file_t * _PDCLIB_filelist;
-
-extern int unlink( const char * pathname );
-
-int remove( const char * pathname )
-{
- int rc;
- struct _PDCLIB_file_t * current = _PDCLIB_filelist;
- while ( current != NULL )
- {
- if ( ( current->filename != NULL ) && ( strcmp( current->filename, pathname ) == 0 ) )
- {
- return EOF;
- }
- current = current->next;
- }
- if ( ( rc = unlink( pathname ) ) == -1 )
- {
- switch ( errno )
- {
- /* See the comments on implementation-defined errno values in
- <_PDCLIB_config.h>.
- */
- case EACCES:
- case EFAULT:
- case EIO:
- case EISDIR:
- case ELOOP:
- case ENAMETOOLONG:
- case ENOENT:
- case ENOMEM:
- case ENOTDIR:
- case EPERM:
- case EROFS:
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- default:
- /* This should be something like EUNKNOWN. */
- _PDCLIB_errno = _PDCLIB_ERROR;
- break;
- }
- }
- return rc;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- /* Testing covered by ftell.c (and several others) */
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/stdio/tmpfile.c b/src/pdclib/platform/example/functions/stdio/tmpfile.c
deleted file mode 100644
index 585a61d..0000000
--- a/src/pdclib/platform/example/functions/stdio/tmpfile.c
+++ /dev/null
@@ -1,114 +0,0 @@
-/* tmpfile( void )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-#include <stdio.h>
-
-#ifndef REGTEST
-
-#include "pdclib/_PDCLIB_glue.h"
-
-#include <inttypes.h>
-#include <stdlib.h>
-#include <string.h>
-
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <fcntl.h>
-#include <unistd.h>
-
-extern struct _PDCLIB_file_t * _PDCLIB_filelist;
-
-/* This is an example implementation of tmpfile() fit for use with POSIX
- kernels.
-*/
-struct _PDCLIB_file_t * tmpfile( void )
-{
- FILE * rc;
- /* This is the chosen way to get high-quality randomness. Replace as
- appropriate.
- */
- FILE * randomsource = fopen( "/proc/sys/kernel/random/uuid", "rb" );
- char filename[ L_tmpnam ];
- _PDCLIB_fd_t fd;
- if ( randomsource == NULL )
- {
- return NULL;
- }
- for ( ;; )
- {
- /* Get a filename candidate. What constitutes a valid filename and
- where temporary files are usually located is platform-dependent,
- which is one reason why this function is located in the platform
- overlay. The other reason is that a *good* implementation should
- use high-quality randomness instead of a pseudo-random sequence to
- generate the filename candidate, which is *also* platform-dependent.
- */
- unsigned int random;
- fscanf( randomsource, "%u", &random );
- sprintf( filename, "/tmp/%u.tmp", random );
- /* Check if file of this name exists. Note that fopen() is a very weak
- check, which does not take e.g. access permissions into account
- (file might exist but not readable). Replace with something more
- appropriate.
- */
- fd = open( filename, O_CREAT | O_EXCL | O_RDWR, S_IRUSR | S_IWUSR );
- if ( fd != -1 )
- {
- break;
- }
- close( fd );
- }
- fclose( randomsource );
- /* See fopen(). */
- if ( ( rc = calloc( 1, sizeof( struct _PDCLIB_file_t ) + _PDCLIB_UNGETCBUFSIZE + L_tmpnam + BUFSIZ ) ) == NULL )
- {
- /* No memory to set up FILE structure */
- close( fd );
- return NULL;
- }
- rc->status = _PDCLIB_filemode( "wb+" ) | _IOLBF | _PDCLIB_DELONCLOSE;
- rc->handle = fd;
- rc->ungetbuf = (unsigned char *)rc + sizeof( struct _PDCLIB_file_t );
- rc->filename = (char *)rc->ungetbuf + _PDCLIB_UNGETCBUFSIZE;
- rc->buffer = rc->filename + L_tmpnam;
- strcpy( rc->filename, filename );
- rc->bufsize = BUFSIZ;
- rc->bufidx = 0;
- rc->ungetidx = 0;
- rc->next = _PDCLIB_filelist;
- _PDCLIB_filelist = rc;
- return rc;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-#include <string.h>
-
-int main( void )
-{
- FILE * fh;
-#ifndef REGTEST
- char filename[ L_tmpnam ];
- FILE * fhtest;
-#endif
- TESTCASE( ( fh = tmpfile() ) != NULL );
- TESTCASE( fputc( 'x', fh ) == 'x' );
- /* Checking that file is actually there */
- TESTCASE_NOREG( strcpy( filename, fh->filename ) == filename );
- TESTCASE_NOREG( ( fhtest = fopen( filename, "r" ) ) != NULL );
- TESTCASE_NOREG( fclose( fhtest ) == 0 );
- /* Closing tmpfile */
- TESTCASE( fclose( fh ) == 0 );
- /* Checking that file was deleted */
- TESTCASE_NOREG( fopen( filename, "r" ) == NULL );
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/stdlib/getenv.c b/src/pdclib/platform/example/functions/stdlib/getenv.c
deleted file mode 100644
index 72bbcd2..0000000
--- a/src/pdclib/platform/example/functions/stdlib/getenv.c
+++ /dev/null
@@ -1,45 +0,0 @@
-/* getenv( const char * )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-/* This is an example implementation of getenv() fit for use with POSIX kernels.
-*/
-
-#include <string.h>
-#include <stdlib.h>
-
-#ifndef REGTEST
-
-extern char * * environ;
-
-char * getenv( const char * name )
-{
- size_t len = strlen( name );
- size_t index = 0;
- while ( environ[ index ] != NULL )
- {
- if ( strncmp( environ[ index ], name, len ) == 0 )
- {
- return environ[ index ] + len + 1;
- }
- index++;
- }
- return NULL;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- TESTCASE( strcmp( getenv( "SHELL" ), "/bin/bash" ) == 0 );
- /* TESTCASE( strcmp( getenv( "SHELL" ), "/bin/sh" ) == 0 ); */
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/stdlib/system.c b/src/pdclib/platform/example/functions/stdlib/system.c
deleted file mode 100644
index 15603c3..0000000
--- a/src/pdclib/platform/example/functions/stdlib/system.c
+++ /dev/null
@@ -1,57 +0,0 @@
-/* system( const char * )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-#include <stdlib.h>
-
-/* This is an example implementation of system() fit for use with POSIX kernels.
-*/
-
-extern int fork( void );
-extern int execve( const char * filename, char * const argv[], char * const envp[] );
-extern int wait( int * status );
-
-int system( const char * string )
-{
- const char * argv[] = { "sh", "-c", NULL, NULL };
- argv[2] = string;
- if ( string != NULL )
- {
- int pid = fork();
- if ( pid == 0 )
- {
- execve( "/bin/sh", (char * * const)argv, NULL );
- }
- else if ( pid > 0 )
- {
- while( wait( NULL ) != pid );
- }
- }
- return -1;
-}
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-#define SHELLCOMMAND "echo 'SUCCESS testing system()'"
-
-int main( void )
-{
- FILE * fh;
- char buffer[25];
- buffer[24] = 'x';
- TESTCASE( ( fh = freopen( testfile, "wb+", stdout ) ) != NULL );
- TESTCASE( system( SHELLCOMMAND ) );
- rewind( fh );
- TESTCASE( fread( buffer, 1, 24, fh ) == 24 );
- TESTCASE( memcmp( buffer, "SUCCESS testing system()", 24 ) == 0 );
- TESTCASE( buffer[24] == 'x' );
- TESTCASE( fclose( fh ) == 0 );
- TESTCASE( remove( testfile ) == 0 );
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/time/clock.c b/src/pdclib/platform/example/functions/time/clock.c
deleted file mode 100644
index 825e040..0000000
--- a/src/pdclib/platform/example/functions/time/clock.c
+++ /dev/null
@@ -1,35 +0,0 @@
-/* clock( void )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-#include <time.h>
-
-#ifndef REGTEST
-
-#include <sys/times.h>
-
-clock_t clock( void )
-{
- struct tms buf;
- if ( times( &buf ) != (clock_t)-1 )
- {
- return buf.tms_utime + buf.tms_stime;
- }
- return -1;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- TESTCASE( NO_TESTDRIVER );
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/time/time.c b/src/pdclib/platform/example/functions/time/time.c
deleted file mode 100644
index cbb29e1..0000000
--- a/src/pdclib/platform/example/functions/time/time.c
+++ /dev/null
@@ -1,41 +0,0 @@
-/* time( time_t * )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-#include <time.h>
-
-#ifndef REGTEST
-
-#include <sys/time.h>
-
-/* See comments in time.h on the semantics of time_t. */
-
-time_t time( time_t * timer )
-{
- struct timeval tv;
- if ( gettimeofday( &tv, NULL ) == 0 )
- {
- if ( timer != NULL )
- {
- *timer = tv.tv_sec;
- }
- return tv.tv_sec;
- }
- return -1;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- TESTCASE( NO_TESTDRIVER );
- return TEST_RESULTS;
-}
-
-#endif
diff --git a/src/pdclib/platform/example/functions/time/timespec_get.c b/src/pdclib/platform/example/functions/time/timespec_get.c
deleted file mode 100644
index d8cbab7..0000000
--- a/src/pdclib/platform/example/functions/time/timespec_get.c
+++ /dev/null
@@ -1,42 +0,0 @@
-/* timespec_get( struct timespec *, int )
-
- This file is part of the Public Domain C Library (PDCLib).
- Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-#include <time.h>
-
-#ifndef REGTEST
-
-#include <sys/time.h>
-
-int timespec_get( struct timespec * ts, int base )
-{
- if ( base == TIME_UTC )
- {
- /* We can make do with a really thin wrapper here. */
- struct timeval tv;
- if ( gettimeofday( &tv, NULL ) == 0 )
- {
- ts->tv_sec = tv.tv_sec;
- ts->tv_nsec = tv.tv_usec * 1000;
- return base;
- }
- }
- /* Not supporting any other time base than TIME_UTC for now. */
- return 0;
-}
-
-#endif
-
-#ifdef TEST
-
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
- TESTCASE( NO_TESTDRIVER );
- return TEST_RESULTS;
-}
-
-#endif