psxtests/psxfile01/test_cat.c

0001 /* SPDX-License-Identifier: BSD-2-Clause */
0002
0003 /**
0004  *  @file
0005  *
0006  *  A test support function which performs a crude version of
0007  *  "cat" so you can look at specific parts of a file.
0008  */
0009
0010 /*
0011  *  COPYRIGHT (c) 1989-2012.
0012  *  On-Line Applications Research Corporation (OAR).
0013  *
0014  * Redistribution and use in source and binary forms, with or without
0015  * modification, are permitted provided that the following conditions
0016  * are met:
0017  * 1. Redistributions of source code must retain the above copyright
0018  *    notice, this list of conditions and the following disclaimer.
0019  * 2. Redistributions in binary form must reproduce the above copyright
0020  *    notice, this list of conditions and the following disclaimer in the
0021  *    documentation and/or other materials provided with the distribution.
0022  *
0023  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
0024  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
0025  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
0026  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
0027  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
0028  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
0029  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
0030  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
0031  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
0032  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
0033  * POSSIBILITY OF SUCH DAMAGE.
0034  */
0035
0036 #ifdef HAVE_CONFIG_H
0037 #include "config.h"
0038 #endif
0039
0040 #include <stdio.h>
0041
0042 #include <sys/types.h>
0043 #include <sys/stat.h>
0044 #include <fcntl.h>
0045 #include <unistd.h>
0046 #include <errno.h>
0047 #include <string.h>
0048 #include <ctype.h>
0049
0050 #include <tmacros.h>
0051
0052 /* forward declarations to avoid warnings */
0053 void test_cat(char *file, int offset_arg, int length);
0054
0055 /*
0056  *  test_cat routine
0057  */
0058
0059 unsigned char test_cat_buffer[ 1024 ];
0060
0061 void test_cat(
0062   char *file,
0063   int   offset_arg,
0064   int   length
0065 )
0066 {
0067   int            fd;
0068   int            status;
0069   int            is_printable = 0;
0070   int            my_length;
0071   int            i;
0072   unsigned char  c;
0073   int            count = 0;
0074   off_t          offset = (off_t)offset_arg;
0075
0076   my_length = (length) ? length : sizeof( test_cat_buffer );
0077   rtems_test_assert( my_length <= sizeof( test_cat_buffer ) );
0078
0079   fd = open( file, O_RDONLY );
0080   if ( fd == -1 ) {
0081     printf( "test_cat: open( %s ) failed : %s\n", file, strerror( errno ) );
0082     rtems_test_exit( 0 );
0083   }
0084
0085   for ( ;; ) {
0086     status = lseek( fd, offset, SEEK_SET );
0087     rtems_test_assert( status != -1 );
0088
0089     status = read( fd, test_cat_buffer, sizeof(test_cat_buffer) );
0090     if ( status <= 0 ) {
0091       if (!is_printable)
0092         printf( "(%d)", count );
0093       puts( "" );
0094       break;
0095     }
0096
0097     for ( i=0 ; i<status ; i++ ) {
0098       c = test_cat_buffer[i];
0099       if (isprint(c) || isspace(c)) {
0100         if (!is_printable) {
0101           printf( "(%d)", count );
0102           count = 0;
0103           is_printable = 1;
0104         }
0105         putchar(c);
0106       } else {
0107         is_printable = 0;
0108         count++;
0109       }
0110     }
0111     offset += status;
0112   }
0113
0114   status = close( fd );
0115   rtems_test_assert( !status );
0116 }