psxtests/psxshm01/init.c

0001 /* SPDX-License-Identifier: BSD-2-Clause */
0002
0003 /*
0004  * Copyright (c) 2016 Gedare Bloom.
0005  *
0006  * Redistribution and use in source and binary forms, with or without
0007  * modification, are permitted provided that the following conditions
0008  * are met:
0009  * 1. Redistributions of source code must retain the above copyright
0010  *    notice, this list of conditions and the following disclaimer.
0011  * 2. Redistributions in binary form must reproduce the above copyright
0012  *    notice, this list of conditions and the following disclaimer in the
0013  *    documentation and/or other materials provided with the distribution.
0014  *
0015  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
0016  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
0017  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
0018  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
0019  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
0020  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
0021  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
0022  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
0023  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
0024  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
0025  * POSSIBILITY OF SUCH DAMAGE.
0026  */
0027
0028 /*
0029  * From http://pubs.opengroup.org/onlinepubs/9699919799/functions/shm_open.html
0030  */
0031
0032 #ifdef HAVE_CONFIG_H
0033 #include "config.h"
0034 #endif
0035
0036 #define CONFIGURE_INIT
0037 #include "system.h"
0038 #include "pritime.h"
0039
0040 #include <sys/mman.h>
0041
0042 #include <errno.h>
0043 #include <fcntl.h>
0044 #include <string.h>
0045
0046 const char rtems_test_name[] = "PSX SHM01";
0047
0048 #define MAX_LEN 10000
0049 struct region {        /* Defines "structure" of shared memory */
0050   int len;
0051   char buf[MAX_LEN];
0052 };
0053
0054 void *POSIX_Init(
0055   void *argument
0056 )
0057 {
0058   struct region *p;
0059   int fd;
0060   int err;
0061   char *name = "/shm";
0062
0063   TEST_BEGIN();
0064
0065   puts( "Init: shm_open" );
0066   fd = shm_open( name, O_CREAT | O_RDWR, S_IRUSR | S_IWUSR );
0067   if ( fd == -1 ) {
0068     printf ( "Error: %s\n", strerror(errno) );
0069     rtems_test_assert( fd != -1 );
0070   }
0071
0072   puts( "Init: ftruncate" );
0073   err = ftruncate( fd, sizeof( struct region ) );
0074   if ( err == -1 ) {
0075     printf ( "Error: %s\n", strerror(errno) );
0076     rtems_test_assert( err != -1 );
0077   }
0078
0079   puts( "Init: mmap" );
0080   p = mmap(
0081     NULL,
0082     sizeof( struct region ),
0083     PROT_READ | PROT_WRITE, MAP_SHARED,
0084     fd,
0085     0
0086   );
0087
0088   if ( p != MAP_FAILED ) {
0089     puts( "Init: write to mapped region" );
0090     p->len = MAX_LEN;
0091
0092     puts( "Init: munmap" );
0093     err = munmap( p, sizeof( struct region ) );
0094     if ( err == -1 ) {
0095       printf ( "Error: %s\n", strerror(errno) );
0096       rtems_test_assert( err != -1 );
0097     }
0098   } else {
0099     puts( "Init: FIXME: mmap() not supported" );
0100   }
0101
0102   puts( "Init: close" );
0103   err = close( fd );
0104   if ( err == -1 ) {
0105     printf ( "Error: %s\n", strerror(errno) );
0106     rtems_test_assert( err != -1 );
0107   }
0108
0109   TEST_END();
0110
0111   rtems_test_exit(0);
0112   return 0;
0113 }