l4/pkg/uclibc/lib/contrib/uclibc/test/nptl/tst-sem7.c

   1 /* Copyright (C) 2003 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3    Contributed by Ulrich Drepper <drepper@redhat.com>, 2003.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, see
  17    <http://www.gnu.org/licenses/>.  */
  18
  19 #include <errno.h>
  20 #include <fcntl.h>
  21 #include <semaphore.h>
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <unistd.h>
  25
  26
  27 static void
  28 remove_sem (int status, void *arg)
  29 {
  30   sem_unlink (arg);
  31 }
  32
  33
  34 int
  35 main (void)
  36 {
  37   sem_t *s;
  38   sem_t *s2;
  39   sem_t *s3;
  40
  41   s = sem_open ("/glibc-tst-sem7", O_CREAT, 0600, 1);
  42   if (s == SEM_FAILED)
  43     {
  44       if (errno == ENOSYS)
  45         {
  46           puts ("sem_open not supported.  Oh well.");
  47           return 0;
  48         }
  49
  50       /* Maybe the shm filesystem has strict permissions.  */
  51       if (errno == EACCES)
  52         {
  53           puts ("sem_open not allowed.  Oh well.");
  54           return 0;
  55         }
  56
  57       printf ("sem_open: %m\n");
  58       return 1;
  59     }
  60
  61   on_exit (remove_sem, (void *) "/glibc-tst-sem7");
  62
  63   /* We have the semaphore object.  Now try again.  We should get the
  64      same address.  */
  65   s2 = sem_open ("/glibc-tst-sem7", O_CREAT, 0600, 1);
  66   if (s2 == SEM_FAILED)
  67     {
  68       puts ("2nd sem_open failed");
  69       return 1;
  70     }
  71   if (s != s2)
  72     {
  73       puts ("2nd sem_open didn't return the same address");
  74       return 1;
  75     }
  76
  77   /* And again, this time without O_CREAT.  */
  78   s3 = sem_open ("/glibc-tst-sem7", 0);
  79   if (s3 == SEM_FAILED)
  80     {
  81       puts ("3rd sem_open failed");
  82       return 1;
  83     }
  84   if (s != s3)
  85     {
  86       puts ("3rd sem_open didn't return the same address");
  87       return 1;
  88     }
  89
  90   /* Now close the handle.  Three times.  */
  91   if (sem_close (s2) != 0)
  92     {
  93       puts ("1st sem_close failed");
  94       return 1;
  95     }
  96   if (sem_close (s) != 0)
  97     {
  98       puts ("2nd sem_close failed");
  99       return 1;
 100     }
 101   if (sem_close (s3) != 0)
 102     {
 103       puts ("3rd sem_close failed");
 104       return 1;
 105     }
 106
 107   return 0;
 108 }