1 #include "tests.h" 2 #include <sys/ipc.h> 3 #include <sys/sem.h> 4 #include <stdint.h> 5 #include <stdio.h> 6 #include <stdlib.h> 7 #include <unistd.h> 8 9 #include "xlat.h" 10 #include "xlat/semop_flags.h" 11 12 union semun 13 { 14 int val; 15 struct semid_ds *buf; 16 unsigned short *array; 17 struct seminfo *__buf; 18 }; 19 20 static int id = -1; 21 22 static void 23 cleanup(void) 24 { 25 semctl(id, 0, IPC_RMID, 0); 26 id = -1; 27 } 28 29 int 30 main(void) 31 { 32 static const int bogus_semid = 0xfdb97531; 33 static void * const bogus_sops = (void *) -1L; 34 static const size_t bogus_nsops = (size_t) 0xdefaceddeadbeefULL; 35 36 static const struct timespec ts_data = { 1, 123456789 }; 37 38 struct timespec *ts = tail_memdup(&ts_data, sizeof(*ts)); 39 int rc; 40 41 id = semget(IPC_PRIVATE, 1, 0600); 42 if (id < 0) 43 perror_msg_and_skip("semget"); 44 atexit(cleanup); 45 46 union semun sem_union = { .val = 0 }; 47 if (semctl(id, 0, SETVAL, sem_union) == -1) 48 perror_msg_and_skip("semctl"); 49 50 struct sembuf *const sem_b = tail_alloc(sizeof(*sem_b)); 51 struct sembuf *const sem_b2 = tail_alloc(sizeof(*sem_b2)); 52 53 rc = semop(bogus_semid, NULL, bogus_nsops); 54 printf("semop(%d, NULL, %u) = %s\n", 55 bogus_semid, (unsigned) bogus_nsops, sprintrc(rc)); 56 57 rc = semop(bogus_semid, bogus_sops, 1); 58 printf("semop(%d, %p, %u) = %s\n", 59 bogus_semid, bogus_sops, 1, sprintrc(rc)); 60 61 sem_b->sem_num = 0; 62 sem_b->sem_op = 1; 63 sem_b->sem_flg = SEM_UNDO; 64 65 sem_b2->sem_num = 0xface; 66 sem_b2->sem_op = 0xf00d; 67 sem_b2->sem_flg = 0xbeef; 68 69 rc = semop(bogus_semid, sem_b2, 2); 70 printf("semop(%d, [{%hu, %hd, %s%s%#hx}, %p], %u) = %s\n", 71 bogus_semid, sem_b2->sem_num, sem_b2->sem_op, 72 sem_b2->sem_flg & SEM_UNDO ? "SEM_UNDO|" : "", 73 sem_b2->sem_flg & IPC_NOWAIT ? "IPC_NOWAIT|" : "", 74 sem_b2->sem_flg & ~(SEM_UNDO | IPC_NOWAIT), 75 sem_b2 + 1, 2, sprintrc(rc)); 76 77 if (semop(id, sem_b, 1)) 78 perror_msg_and_skip("semop, 1"); 79 printf("semop(%d, [{0, 1, SEM_UNDO}], 1) = 0\n", id); 80 81 sem_b->sem_op = -1; 82 if (semop(id, sem_b, 1)) 83 perror_msg_and_skip("semop, -1"); 84 printf("semop(%d, [{0, -1, SEM_UNDO}], 1) = 0\n", id); 85 86 rc = semtimedop(bogus_semid, NULL, bogus_nsops, NULL); 87 printf("semtimedop(%d, NULL, %u, NULL) = %s\n", 88 bogus_semid, (unsigned) bogus_nsops, sprintrc(rc)); 89 90 rc = semtimedop(id, sem_b + 1, 1, ts + 1); 91 printf("semtimedop(%d, %p, 1, %p) = %s\n", 92 id, sem_b + 1, ts + 1, sprintrc(rc)); 93 94 rc = semtimedop(bogus_semid, sem_b2, 2, ts); 95 printf("semtimedop(%d, [{%hu, %hd, %s%s%#hx}, %p], %u, " 96 "{tv_sec=%jd, tv_nsec=%jd}) = %s\n", 97 bogus_semid, sem_b2->sem_num, sem_b2->sem_op, 98 sem_b2->sem_flg & SEM_UNDO ? "SEM_UNDO|" : "", 99 sem_b2->sem_flg & IPC_NOWAIT ? "IPC_NOWAIT|" : "", 100 sem_b2->sem_flg & ~(SEM_UNDO | IPC_NOWAIT), 101 sem_b2 + 1, 2, 102 (intmax_t) ts->tv_sec, (intmax_t) ts->tv_nsec, 103 sprintrc(rc)); 104 105 sem_b->sem_op = 1; 106 if (semtimedop(id, sem_b, 1, NULL)) 107 perror_msg_and_skip("semtimedop, 1"); 108 printf("semtimedop(%d, [{0, 1, SEM_UNDO}], 1, NULL) = 0\n", id); 109 110 sem_b->sem_op = -1; 111 if (semtimedop(id, sem_b, 1, ts)) 112 perror_msg_and_skip("semtimedop, -1"); 113 printf("semtimedop(%d, [{0, -1, SEM_UNDO}], 1, " 114 "{tv_sec=%jd, tv_nsec=%jd}) = 0\n", id, 115 (intmax_t) ts->tv_sec, (intmax_t) ts->tv_nsec); 116 117 puts("+++ exited with 0 +++"); 118 return 0; 119 } 120