diff options
Diffstat (limited to 'c/src/tests/psxtests/psxfile01/test.c')
-rw-r--r-- | c/src/tests/psxtests/psxfile01/test.c | 547 |
1 files changed, 0 insertions, 547 deletions
diff --git a/c/src/tests/psxtests/psxfile01/test.c b/c/src/tests/psxtests/psxfile01/test.c deleted file mode 100644 index 1e61fef2b8..0000000000 --- a/c/src/tests/psxtests/psxfile01/test.c +++ /dev/null @@ -1,547 +0,0 @@ -/* - * Simple test program to exercise some of the basic functionality of - * POSIX Files and Directories Support. - * - * This test assumes that the file system is initialized with the - * following directory structure: - * - * XXXX fill this in. - * / - * /dev - * /dev/XXX [where XXX includes at least console] - * - * COPYRIGHT (c) 1989-1999. - * On-Line Applications Research Corporation (OAR). - * - * The license and distribution terms for this file may be - * found in the file LICENSE in this distribution or at - * http://www.rtems.com/license/LICENSE. - * - * $Id$ - */ - -#include <stdio.h> - -#include <tmacros.h> -#include <sys/types.h> -#include <sys/stat.h> -#include <fcntl.h> -#include <unistd.h> -#include <errno.h> -#include <string.h> -#include <ctype.h> - -#include <assert.h> -#include <rtems.h> -#include <rtems/libio.h> - -void test_case_reopen_append(void); - -char test_write_buffer[ 1024 ]; - -/* - * File test support routines. - */ - -void test_cat( - char *file, - int offset_arg, - int length -); - -void test_write( - char *file, - off_t offset, - char *buffer -); - -void test_extend( - char *file, - off_t new_len -); - -void IMFS_dump( void ); -int IMFS_memfile_maximum_size( void ); - -/* - * dump_statbuf - */ - -void dump_statbuf( struct stat *buf ) -{ - int major1; - int minor1; - int major2; - int minor2; - - rtems_filesystem_split_dev_t( buf->st_dev, major1, minor1 ); - rtems_filesystem_split_dev_t( buf->st_rdev, major2, minor2 ); - - printf( "....st_dev (0x%x:0x%x)\n", major1, minor1 ); - printf( "....st_ino %x may vary by small amount\n", - (unsigned int) buf->st_ino ); - printf( "....mode = %08o\n", buf->st_mode ); - printf( "....nlink = %d\n", buf->st_nlink ); - - printf( "....uid = %d\n", buf->st_uid ); - printf( "....gid = %d\n", buf->st_gid ); - - printf( "....atime = %s", ctime(&buf->st_atime) ); - printf( "....mtime = %s", ctime(&buf->st_mtime) ); - printf( "....ctime = %s", ctime(&buf->st_ctime) ); - -#if defined(__svr4__) && !defined(__PPC__) && !defined(__sun__) - printf( "....st_blksize %x\n", buf.st_blksize ); - printf( "....st_blocks %x\n", buf.st_blocks ); -#endif - -} - -void stat_a_file( - const char *file -) -{ - int status; - struct stat statbuf; - - assert( file ); - - printf( "stat( %s ) returned ", file ); - fflush( stdout ); - - status = stat( file, &statbuf ); - - if ( status == -1 ) { - printf( ": %s\n", strerror( errno ) ); - } else { - puts(""); - dump_statbuf( &statbuf ); - } - -} - - -/* - * Main entry point of the test - */ - -#if defined(__rtems__) -int test_main(void) -#else -int main( - int argc, - char **argv -) -#endif -{ - int status; - int max_size; - int fd; - int i; - struct stat buf; - char buffer[128]; - FILE *file; - time_t atime1; - time_t mtime1; - time_t ctime1; - time_t atime2; - time_t mtime2; - time_t ctime2; - rtems_status_code rtems_status; - rtems_time_of_day time; - - printf( "\n\n*** FILE TEST 1 ***\n" ); - - /* - * Grab the maximum size of an in-memory file. - */ - - max_size = IMFS_memfile_maximum_size(); - - build_time( &time, 12, 31, 1988, 9, 0, 0, 0 ); - rtems_status = rtems_clock_set( &time ); - - /* - * Dump an empty file system - */ - - IMFS_dump(); - - /* - * Simple stat() of /dev/console. - */ - - puts( "stat of /dev/console" ); - status = stat( "/dev/console", &buf ); - assert( !status ); - - dump_statbuf( &buf ); - - /* - * Exercise mkdir() and some path evaluation. - */ - - puts( "" ); - puts( "mkdir /dev/tty" ); - status = mkdir( "/dev/tty", S_IRWXU ); - assert( !status ); - - puts( "" ); - puts( "mkdir /usr" ); - status = mkdir( "/usr", S_IRWXU ); - assert( !status ); - puts( "mkdir /etc" ); - status = mkdir( "/etc", S_IRWXU ); - assert( !status ); - - puts( "mkdir /tmp" ); - status = mkdir( "/tmp", S_IRWXU ); - assert( !status ); - - /* this tests the ".." path in path name evaluation */ - puts( "mkdir /tmp/.." ); - status = mkdir( "/tmp/..", S_IRWXU ); - assert( status == -1 ); - assert( errno == EEXIST ); - - /* now check out trailing separators */ - puts( "mkdir /tmp/" ); - status = mkdir( "/tmp/", S_IRWXU ); - assert( status == -1 ); - assert( errno == EEXIST ); - - /* try to make a directory under a non-existent subdirectory */ - puts( "mkdir /j/j1" ); - status = mkdir( "/j/j1", S_IRWXU ); - assert( status == -1 ); - assert( errno == ENOENT ); - - /* this tests the ability to make a directory in the current one */ - puts( "mkdir tmp" ); - status = mkdir( "tmp", S_IRWXU ); - assert( status == -1 ); - assert( errno == EEXIST ); - - /* test rtems_filesystem_evaluate_path by sending NULL path */ - status = chdir( NULL ); - assert( status == -1 ); - - /* - * Now switch gears and exercise rmdir(). - */ - - puts( "" ); - puts( "rmdir /usr" ); - status = rmdir( "/usr" ); - assert( !status ); - - puts( "rmdir /dev" ); - status = rmdir( "/dev" ); - assert( status == -1 ); - assert( errno == ENOTEMPTY); - - puts( "rmdir /fred" ); - status = rmdir ("/fred"); - assert (status == -1); - assert( errno == ENOENT ); - - puts( "mknod /dev/test_console" ); - status = mknod( "/dev/test_console", S_IFCHR, 0LL ); - assert( !status ); - - puts( "mknod /dev/tty/S3" ); - status = mknod( "/dev/tty/S3", S_IFCHR, 0xFF00000080LL ); - assert( !status ); - - puts ("mknod /etc/passwd"); - status = mknod( "/etc/passwd", (S_IFREG | S_IRWXU), 0LL ); - assert( !status ); - - puts( "mkdir /tmp/my_dir"); - status = mkdir( "/tmp/my_dir", S_IRWXU ); - assert( status == 0 ); - - puts("mkfifo /c/my_dir" ); - status = mkfifo( "/c/my_dir", S_IRWXU ); - assert( status == -1 ); - - /* - * Try to make a directory under a file -- ERROR - */ - - puts( "mkdir /etc/passwd/j" ); - status = mkdir( "/etc/passwd/j", S_IRWXU ); - assert( status == -1 ); - assert( errno == ENOTDIR ); - - /* - * Simple open failure case on non-existent file - */ - - puts( "open /tmp/joel - should fail with ENOENT" ); - fd = open( "/tmp/joel", O_RDONLY ); - assert( fd == -1 ); - assert( errno == ENOENT ); - - /* - * Simple open case where the file is created. - */ - - puts( "open /tmp/j" ); - fd = open( "/tmp/j", O_RDWR|O_CREAT, S_IRWXU|S_IRWXG|S_IRWXO ); - assert( fd != -1 ); - printf( "open returned file descriptor %d\n", fd ); - - puts( "close /tmp/j" ); - status = close( fd ); - assert( !status ); - - puts( "close /tmp/j again" ); - status = close( fd ); - assert( status == -1 ); - - puts( "unlink /tmp/j" ); - status = unlink( "/tmp/j" ); - assert( !status ); - - puts( "unlink /tmp" ); - status = unlink( "/tmp" ); - assert( status ); - - /* - * Simple open failure. Trying to create an existing file. - */ - - puts("create and close /tmp/tom"); - fd = open( "/tmp/tom", O_CREAT, S_IRWXU|S_IRWXG|S_IRWXO ); - assert( fd != -1 ); - status = close( fd ); - assert( status == 0 ); - - puts("Attempt to recreate /tmp/tom"); - fd = open( "/tmp/tom", O_CREAT | O_EXCL, S_IRWXU|S_IRWXG|S_IRWXO ); - assert( fd == -1 ); - assert( errno == EEXIST ); - - puts("create /tmp/john"); - fd = open( "/tmp/john", O_RDWR|O_CREAT, S_IRWXU|S_IRWXG|S_IRWXO ); - assert( fd != -1 ); - - puts("tcdrain /tmp/john" ); - status = tcdrain( fd ); - assert( status == 0 ); - - /* - * Test simple write to a file at offset 0 - */ - - puts( "mknod /tmp/joel" ); - status = mknod( "/tmp/joel", (S_IFREG | S_IRWXU), 0LL ); - test_write( "/tmp/joel", 0, "the first write!!!\n" ); - test_cat( "/tmp/joel", 0, 0 ); - - /* - * Test simple write to a file at a non-0 offset in the first block - */ - - status = unlink( "/tmp/joel" ); - assert( !status ); - - status = mknod( "/tmp/joel", (S_IFREG | S_IRWXU), 0LL ); - assert( !status ); - - test_write( "/tmp/joel", 10, "the first write!!!\n" ); - test_cat( "/tmp/joel", 0, 0 ); - stat_a_file( "/tmp/joel" ); - - /* - * Test simple write to a file at a non-0 offset in the second block. Then - * try to read from various offsets and lengths. - */ - - puts("unlink /tmp/joel"); - status = unlink( "/tmp/joel" ); - assert( !status ); - - /* Test a failure path */ - - puts( "unlink /tmp/joel" ); - status = unlink( "/tmp/joel" ); - assert( status == -1 ); - - puts( "mknod /tmp/joel"); - status = mknod( "/tmp/joel", (S_IFREG | S_IRWXU), 0LL ); - assert( !status ); - - test_write( "/tmp/joel", 514, "the first write!!!\n" ); - test_write( "/tmp/joel", 1, test_write_buffer ); - test_write( "/tmp/joel", 63, test_write_buffer ); - test_cat( "/tmp/joel", 0, 1 ); - test_cat( "/tmp/joel", 1, 1 ); - test_cat( "/tmp/joel", 490, 1 ); - test_cat( "/tmp/joel", 512, 1 ); - test_cat( "/tmp/joel", 513, 1 ); - test_cat( "/tmp/joel", 514, 1 ); - test_cat( "/tmp/joel", 520, 1 ); - test_cat( "/tmp/joel", 1, 1024 ); - - /* - * Read from a much longer file so we can descend into doubly and - * triply indirect blocks. - */ - - if ( max_size < 300 * 1024 ) { - test_extend( "/tmp/joel", max_size - 1 ); - test_cat( "/tmp/joel", max_size / 2, 1024 ); - } else { - printf( "Skipping maximum file size test since max_size is %d bytes\n", max_size ); - puts("That is likely to be bigger than the available RAM on many targets." ); - } - - stat_a_file( "/tmp/joel" ); - - /* - * Now try to use a FILE * descriptor - * - * /tmp/j should not exist at this point. - */ - - puts( "stat of /tmp/j" ); - errno = 0; - status = stat( "/tmp/j", &buf ); - printf( "stat(/tmp/j) returned %d (errno=%d)\n", status, errno ); - dump_statbuf( &buf ); - - puts( "fopen of /tmp/j" ); - file = fopen( "/tmp/j", "w+" ); - assert( file ); - - puts( "fprintf to /tmp/j" ); - for (i=1 ; i<=5 ; i++) { - status = fprintf( file, "This is call %d to fprintf\n", i ); - assert( status ); - printf( "(%d) %d characters written to the file\n", i, status ); - } - - fflush( file ); - - status = stat( "/tmp/j", &buf ); - assert( !status ); - dump_statbuf( &buf ); - atime2 = buf.st_atime; - mtime2 = buf.st_mtime; - ctime2 = buf.st_ctime; - - - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - rewind( file ); - while ( fgets(buffer, 128, file) ) - printf( "%s", buffer ); - - /* - * Verify only atime changed for a read. - */ - status = stat( "/tmp/j", &buf ); - assert( !status ); - dump_statbuf( &buf ); - atime1 = buf.st_atime; - mtime1 = buf.st_mtime; - ctime1 = buf.st_ctime; - assert( atime1 != atime2); - assert( mtime1 == mtime2); - assert( ctime1 == ctime2); - - IMFS_dump(); - - unlink( "/tmp/joel" ); - - /* - * Now truncate a file - */ - - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - puts( "truncate /tmp/j to length of 40" ); - status = truncate( "/tmp/j", 40 ); - assert( !status ); - - /* - * Verify truncate changed only atime. - */ - status = stat( "/tmp/j", &buf ); - assert( !status ); - dump_statbuf( &buf ); - atime2 = buf.st_atime; - mtime2 = buf.st_mtime; - ctime2 = buf.st_ctime; - assert( atime1 != atime2); - assert( mtime1 == mtime2); - assert( ctime1 == ctime2); - - IMFS_dump(); - - /* try to truncate the console and see what happens */ - status = truncate( "/dev/console", 40 ); - assert(status == -1 ); - - puts( "truncate /tmp/j to length of 0" ); - status = truncate( "/tmp/j", 0 ); - assert( !status ); - - puts( "truncate /tmp to length of 0 should fail with EISDIR\n"); - status = truncate( "/tmp", 0 ); - assert( status == -1 ); - printf( "%d: %s\n", errno, strerror( errno ) ); - assert( errno == EISDIR ); - - IMFS_dump(); - - status = truncate( "/tmp/fred", 10 ); - assert( status == -1); - - rtems_status = rtems_io_register_name( "/dev/console", 0, 0 ); - - test_case_reopen_append(); - - printf( "*** END OF FILE TEST 1 ***\n" ); - rtems_test_exit( 0 ); -} - -/* - * Open/Create a File and write to it - * - * Test case submitted by Andrew Bythell <abythell@nortelnetworks.com>. - * - */ - -void test_file (char *filename, char *mode); - -void test_case_reopen_append(void) -{ - printf ("Writing First File\n"); - test_file ("/one.txt", "a"); - test_file ("/one.txt", "a"); - - /* but not the second time - this will insert junk. - the number of ^@'s seems to equal the number of - actual characters in the file */ - - printf ("Writing Second File\n"); - test_file ("/two.txt", "a"); - test_file ("/two.txt", "a"); - - test_cat( "/one.txt", 0, 1024 ); - test_cat( "/two.txt", 0, 1024 ); -} - -void test_file (char *filename, char *mode) -{ - FILE *fp; - fp = fopen (filename, mode); - if (!fp) - perror ("fopen"); - fprintf (fp, "this is a test line\n"); - if (fclose (fp)) - perror ("fclose"); -} - - |