| [9] | 1 | /* test 5 */
|
|---|
| 2 |
|
|---|
| 3 | #include <sys/types.h>
|
|---|
| 4 | #include <sys/wait.h>
|
|---|
| 5 | #include <errno.h>
|
|---|
| 6 | #include <fcntl.h>
|
|---|
| 7 | #include <signal.h>
|
|---|
| 8 | #include <stdlib.h>
|
|---|
| 9 | #include <unistd.h>
|
|---|
| 10 | #include <stdio.h>
|
|---|
| 11 | #include <string.h>
|
|---|
| 12 |
|
|---|
| 13 | #define ITERATIONS 2
|
|---|
| 14 | #define MAX_ERROR 4
|
|---|
| 15 |
|
|---|
| 16 | int errct;
|
|---|
| 17 | int subtest;
|
|---|
| 18 | int zero[1024];
|
|---|
| 19 |
|
|---|
| 20 | int sigmap[5] = {9, 10, 11};
|
|---|
| 21 |
|
|---|
| 22 | _PROTOTYPE(int main, (int argc, char *argv[]));
|
|---|
| 23 | _PROTOTYPE(void test5a, (void));
|
|---|
| 24 | _PROTOTYPE(void parent, (int childpid));
|
|---|
| 25 | _PROTOTYPE(void child, (int parpid));
|
|---|
| 26 | _PROTOTYPE(void func1, (int s));
|
|---|
| 27 | _PROTOTYPE(void func8, (int s));
|
|---|
| 28 | _PROTOTYPE(void func10, (int s));
|
|---|
| 29 | _PROTOTYPE(void func11, (int s));
|
|---|
| 30 | _PROTOTYPE(void test5b, (void));
|
|---|
| 31 | _PROTOTYPE(void test5c, (void));
|
|---|
| 32 | _PROTOTYPE(void test5d, (void));
|
|---|
| 33 | _PROTOTYPE(void test5e, (void));
|
|---|
| 34 | _PROTOTYPE(void test5f, (void));
|
|---|
| 35 | _PROTOTYPE(void test5g, (void));
|
|---|
| 36 | _PROTOTYPE(void funcalrm, (int s));
|
|---|
| 37 | _PROTOTYPE(void test5h, (void));
|
|---|
| 38 | _PROTOTYPE(void test5i, (void));
|
|---|
| 39 | _PROTOTYPE(void ex, (void));
|
|---|
| 40 | _PROTOTYPE(void e, (int n));
|
|---|
| 41 | _PROTOTYPE(void quit, (void));
|
|---|
| 42 |
|
|---|
| 43 | #ifdef _ANSI
|
|---|
| 44 | void (*Signal(int _sig, void (*_func)(int)))(int);
|
|---|
| 45 | #define SIG_ZERO ((void (*)(int))0) /* default signal handling */
|
|---|
| 46 | #else
|
|---|
| 47 | sighandler_t Signal();
|
|---|
| 48 | /* void (*Signal()) (); */
|
|---|
| 49 | #define SIG_ZERO ((void (*)())0) /* default signal handling */
|
|---|
| 50 | #endif
|
|---|
| 51 |
|
|---|
| 52 | _VOLATILE int childsigs, parsigs, alarms;
|
|---|
| 53 |
|
|---|
| 54 | int main(argc, argv)
|
|---|
| 55 | int argc;
|
|---|
| 56 | char *argv[];
|
|---|
| 57 | {
|
|---|
| 58 | int i, m = 0x7777;
|
|---|
| 59 |
|
|---|
| 60 | printf("Test 5 ");
|
|---|
| 61 | fflush(stdout); /* have to flush for child's benefit */
|
|---|
| 62 |
|
|---|
| 63 | system("rm -rf DIR_05; mkdir DIR_05");
|
|---|
| 64 | chdir("DIR_05");
|
|---|
| 65 |
|
|---|
| 66 | for (i = 0; i < ITERATIONS; i++) {
|
|---|
| 67 | if (m & 0001) test5a();
|
|---|
| 68 | if (m & 0002) test5b();
|
|---|
| 69 | if (m & 0004) test5c();
|
|---|
| 70 | if (m & 0010) test5d();
|
|---|
| 71 | if (m & 0020) test5e();
|
|---|
| 72 | if (m & 0040) test5f();
|
|---|
| 73 | if (m & 0100) test5g();
|
|---|
| 74 | if (m & 0200) test5h();
|
|---|
| 75 | if (m & 0400) test5i();
|
|---|
| 76 | }
|
|---|
| 77 | quit();
|
|---|
| 78 | return(-1); /* impossible */
|
|---|
| 79 | }
|
|---|
| 80 |
|
|---|
| 81 | void test5a()
|
|---|
| 82 | {
|
|---|
| 83 | int parpid, childpid, flag, *zp;
|
|---|
| 84 |
|
|---|
| 85 | subtest = 0;
|
|---|
| 86 | flag = 0;
|
|---|
| 87 | for (zp = &zero[0]; zp < &zero[1024]; zp++)
|
|---|
| 88 | if (*zp != 0) flag = 1;
|
|---|
| 89 | if (flag) e(0); /* check if bss is cleared to 0 */
|
|---|
| 90 | if (Signal(1, func1) == SIG_ERR) e(1);
|
|---|
| 91 | if (Signal(10, func10) < SIG_ZERO) e(2);
|
|---|
| 92 | parpid = getpid();
|
|---|
| 93 | if (childpid = fork()) {
|
|---|
| 94 | if (childpid < 0) ex();
|
|---|
| 95 | parent(childpid);
|
|---|
| 96 | } else {
|
|---|
| 97 | child(parpid);
|
|---|
| 98 | }
|
|---|
| 99 | if (Signal(1, SIG_DFL) < SIG_ZERO) e(4);
|
|---|
| 100 | if (Signal(10, SIG_DFL) < SIG_ZERO) e(5);
|
|---|
| 101 | }
|
|---|
| 102 |
|
|---|
| 103 | void parent(childpid)
|
|---|
| 104 | int childpid;
|
|---|
| 105 | {
|
|---|
| 106 | int i, pid;
|
|---|
| 107 |
|
|---|
| 108 | for (i = 0; i < 3; i++) {
|
|---|
| 109 | if (kill(childpid, 1) < 0) e(6);
|
|---|
| 110 | while (parsigs == 0);
|
|---|
| 111 | parsigs--;
|
|---|
| 112 | }
|
|---|
| 113 | if ( (pid = wait(&i)) < 0) e(7);
|
|---|
| 114 | if (i != 256 * 6) e(8);
|
|---|
| 115 | }
|
|---|
| 116 |
|
|---|
| 117 | void child(parpid)
|
|---|
| 118 | int parpid;
|
|---|
| 119 | {
|
|---|
| 120 |
|
|---|
| 121 | int i;
|
|---|
| 122 |
|
|---|
| 123 | for (i = 0; i < 3; i++) {
|
|---|
| 124 | while (childsigs == 0);
|
|---|
| 125 | childsigs--;
|
|---|
| 126 | if (kill(parpid, 10) < 0) e(9);
|
|---|
| 127 | }
|
|---|
| 128 | exit(6);
|
|---|
| 129 | }
|
|---|
| 130 |
|
|---|
| 131 | void func1(s)
|
|---|
| 132 | int s; /* for ANSI */
|
|---|
| 133 | {
|
|---|
| 134 | if (Signal(1, func1) < SIG_ZERO) e(10);
|
|---|
| 135 | childsigs++;
|
|---|
| 136 | }
|
|---|
| 137 |
|
|---|
| 138 | void func8(s)
|
|---|
| 139 | int s;
|
|---|
| 140 | {
|
|---|
| 141 | }
|
|---|
| 142 |
|
|---|
| 143 | void func10(s)
|
|---|
| 144 | int s; /* for ANSI */
|
|---|
| 145 | {
|
|---|
| 146 | if (Signal(10, func10) < SIG_ZERO) e(11);
|
|---|
| 147 | parsigs++;
|
|---|
| 148 | }
|
|---|
| 149 |
|
|---|
| 150 | void func11(s)
|
|---|
| 151 | int s; /* for ANSI */
|
|---|
| 152 | {
|
|---|
| 153 | e(38);
|
|---|
| 154 | }
|
|---|
| 155 |
|
|---|
| 156 | void test5b()
|
|---|
| 157 | {
|
|---|
| 158 | int cpid, n, pid;
|
|---|
| 159 |
|
|---|
| 160 | subtest = 1;
|
|---|
| 161 | if ((pid = fork())) {
|
|---|
| 162 | if (pid < 0) ex();
|
|---|
| 163 | if ((pid = fork())) {
|
|---|
| 164 | if (pid < 0) ex();
|
|---|
| 165 | if (cpid = fork()) {
|
|---|
| 166 | if (cpid < 0) ex();
|
|---|
| 167 | if (kill(cpid, 9) < 0) e(12);
|
|---|
| 168 | if (wait(&n) < 0) e(13);
|
|---|
| 169 | if (wait(&n) < 0) e(14);
|
|---|
| 170 | if (wait(&n) < 0) e(15);
|
|---|
| 171 | } else {
|
|---|
| 172 | pause();
|
|---|
| 173 | while (1);
|
|---|
| 174 | }
|
|---|
| 175 | } else {
|
|---|
| 176 | exit(0);
|
|---|
| 177 | }
|
|---|
| 178 | } else {
|
|---|
| 179 | exit(0);
|
|---|
| 180 | }
|
|---|
| 181 | }
|
|---|
| 182 |
|
|---|
| 183 | void test5c()
|
|---|
| 184 | {
|
|---|
| 185 | int n, i, pid, wpid;
|
|---|
| 186 |
|
|---|
| 187 | /* Test exit status codes for processes killed by signals. */
|
|---|
| 188 | subtest = 3;
|
|---|
| 189 | for (i = 0; i < 2; i++) {
|
|---|
| 190 | if (pid = fork()) {
|
|---|
| 191 | if (pid < 0) ex();
|
|---|
| 192 | sleep(2); /* wait for child to pause */
|
|---|
| 193 | if (kill(pid, sigmap[i]) < 0) {
|
|---|
| 194 | e(20);
|
|---|
| 195 | exit(1);
|
|---|
| 196 | }
|
|---|
| 197 | if ((wpid = wait(&n)) < 0) e(21);
|
|---|
| 198 | if ((n & 077) != sigmap[i]) e(22);
|
|---|
| 199 | if (pid != wpid) e(23);
|
|---|
| 200 | } else {
|
|---|
| 201 | pause();
|
|---|
| 202 | exit(0);
|
|---|
| 203 | }
|
|---|
| 204 | }
|
|---|
| 205 | }
|
|---|
| 206 |
|
|---|
| 207 | void test5d()
|
|---|
| 208 | {
|
|---|
| 209 | /* Test alarm */
|
|---|
| 210 |
|
|---|
| 211 | int i;
|
|---|
| 212 |
|
|---|
| 213 | subtest = 4;
|
|---|
| 214 | alarms = 0;
|
|---|
| 215 | for (i = 0; i < 8; i++) {
|
|---|
| 216 | Signal(SIGALRM, funcalrm);
|
|---|
| 217 | alarm(1);
|
|---|
| 218 | pause();
|
|---|
| 219 | if (alarms != i + 1) e(24);
|
|---|
| 220 | }
|
|---|
| 221 | }
|
|---|
| 222 |
|
|---|
| 223 | void test5e()
|
|---|
| 224 | {
|
|---|
| 225 | /* When a signal knocks a processes out of WAIT or PAUSE, it is supposed to
|
|---|
| 226 | * get EINTR as error status. Check that.
|
|---|
| 227 | */
|
|---|
| 228 | int n, j;
|
|---|
| 229 |
|
|---|
| 230 | subtest = 5;
|
|---|
| 231 | if (Signal(8, func8) < SIG_ZERO) e(25);
|
|---|
| 232 | if (n = fork()) {
|
|---|
| 233 | /* Parent must delay to give child a chance to pause. */
|
|---|
| 234 | if (n < 0) ex();
|
|---|
| 235 | sleep(1);
|
|---|
| 236 | if (kill(n, 8) < 0) e(26);
|
|---|
| 237 | if (wait(&n) < 0) e(27);
|
|---|
| 238 | if (Signal(8, SIG_DFL) < SIG_ZERO) e(28);
|
|---|
| 239 | } else {
|
|---|
| 240 | j = pause();
|
|---|
| 241 | if (errno != EINTR && -errno != EINTR) e(29);
|
|---|
| 242 | exit(0);
|
|---|
| 243 | }
|
|---|
| 244 | }
|
|---|
| 245 |
|
|---|
| 246 | void test5f()
|
|---|
| 247 | {
|
|---|
| 248 | int i, j, k, n;
|
|---|
| 249 |
|
|---|
| 250 | subtest = 6;
|
|---|
| 251 | if (getuid() != 0) return;
|
|---|
| 252 | n = fork();
|
|---|
| 253 | if (n < 0) ex();
|
|---|
| 254 | if (n) {
|
|---|
| 255 | wait(&i);
|
|---|
| 256 | i = (i >> 8) & 0377;
|
|---|
| 257 | if (i != (n & 0377)) e(30);
|
|---|
| 258 | } else {
|
|---|
| 259 | i = getgid();
|
|---|
| 260 | j = getegid();
|
|---|
| 261 | k = (i + j + 7) & 0377;
|
|---|
| 262 | if (setgid(k) < 0) e(31);
|
|---|
| 263 | if (getgid() != k) e(32);
|
|---|
| 264 | if (getegid() != k) e(33);
|
|---|
| 265 | i = getuid();
|
|---|
| 266 | j = geteuid();
|
|---|
| 267 | k = (i + j + 1) & 0377;
|
|---|
| 268 | if (setuid(k) < 0) e(34);
|
|---|
| 269 | if (getuid() != k) e(35);
|
|---|
| 270 | if (geteuid() != k) e(36);
|
|---|
| 271 | i = getpid() & 0377;
|
|---|
| 272 | if (wait(&j) != -1) e(37);
|
|---|
| 273 | exit(i);
|
|---|
| 274 | }
|
|---|
| 275 | }
|
|---|
| 276 |
|
|---|
| 277 | void test5g()
|
|---|
| 278 | {
|
|---|
| 279 | int n;
|
|---|
| 280 |
|
|---|
| 281 | subtest = 7;
|
|---|
| 282 | Signal(11, func11);
|
|---|
| 283 | Signal(11, SIG_IGN);
|
|---|
| 284 | n = getpid();
|
|---|
| 285 | if (kill(n, 11) != 0) e(1);
|
|---|
| 286 | Signal(11, SIG_DFL);
|
|---|
| 287 | }
|
|---|
| 288 |
|
|---|
| 289 | void funcalrm(s)
|
|---|
| 290 | int s; /* for ANSI */
|
|---|
| 291 | {
|
|---|
| 292 | alarms++;
|
|---|
| 293 | }
|
|---|
| 294 |
|
|---|
| 295 | void test5h()
|
|---|
| 296 | {
|
|---|
| 297 | /* When a signal knocks a processes out of PIPE, it is supposed to
|
|---|
| 298 | * get EINTR as error status. Check that.
|
|---|
| 299 | */
|
|---|
| 300 | int n, j, fd[2];
|
|---|
| 301 |
|
|---|
| 302 | subtest = 8;
|
|---|
| 303 | unlink("XXX.test5");
|
|---|
| 304 | if (Signal(8, func8) < SIG_ZERO) e(1);
|
|---|
| 305 | pipe(fd);
|
|---|
| 306 | if (n = fork()) {
|
|---|
| 307 | /* Parent must delay to give child a chance to pause. */
|
|---|
| 308 | if (n < 0) ex();
|
|---|
| 309 | while (access("XXX.test5", 0) != 0) /* just wait */ ;
|
|---|
| 310 | sleep(1);
|
|---|
| 311 | unlink("XXX.test5");
|
|---|
| 312 | if (kill(n, 8) < 0) e(2);
|
|---|
| 313 | if (wait(&n) < 0) e(3);
|
|---|
| 314 | if (Signal(8, SIG_DFL) < SIG_ZERO) e(4);
|
|---|
| 315 | if (close(fd[0]) != 0) e(5);
|
|---|
| 316 | if (close(fd[1]) != 0) e(6);
|
|---|
| 317 | } else {
|
|---|
| 318 | if (creat("XXX.test5", 0777) < 0) e(7);
|
|---|
| 319 | j = read(fd[0], (char *) &n, 1);
|
|---|
| 320 | if (errno != EINTR) e(8);
|
|---|
| 321 | exit(0);
|
|---|
| 322 | }
|
|---|
| 323 | }
|
|---|
| 324 |
|
|---|
| 325 | void test5i()
|
|---|
| 326 | {
|
|---|
| 327 | int fd[2], pid, buf[10], n;
|
|---|
| 328 |
|
|---|
| 329 | subtest = 9;
|
|---|
| 330 | pipe(fd);
|
|---|
| 331 | unlink("XXXxxxXXX");
|
|---|
| 332 |
|
|---|
| 333 | if ( (pid = fork())) {
|
|---|
| 334 | /* Parent */
|
|---|
| 335 | /* Wait until child has started and has created the XXXxxxXXX file. */
|
|---|
| 336 | while (access("XXXxxxXXX", 0) != 0) /* loop */ ;
|
|---|
| 337 | sleep(1);
|
|---|
| 338 | if (kill(pid, SIGKILL) != 0) e(1);
|
|---|
| 339 | if (wait(&n) < 0) e(2);
|
|---|
| 340 | if (close(fd[0]) != 0) e(3);
|
|---|
| 341 | if (close(fd[1]) != 0) e(4);
|
|---|
| 342 | } else {
|
|---|
| 343 | if (creat("XXXxxxXXX", 0777) < 0) e(5);
|
|---|
| 344 | read(fd[0], (char *) buf, 1);
|
|---|
| 345 | e(5); /* should be killed by signal and not get here */
|
|---|
| 346 | }
|
|---|
| 347 | unlink("XXXxxxXXX");
|
|---|
| 348 | }
|
|---|
| 349 |
|
|---|
| 350 | void ex()
|
|---|
| 351 | {
|
|---|
| 352 | int e = errno;
|
|---|
| 353 | printf("Fork failed: %s (%d)\n", strerror(e), e);
|
|---|
| 354 | exit(1);
|
|---|
| 355 | }
|
|---|
| 356 |
|
|---|
| 357 | void e(n)
|
|---|
| 358 | int n;
|
|---|
| 359 | {
|
|---|
| 360 | int err_num = errno; /* save errno in case printf clobbers it */
|
|---|
| 361 |
|
|---|
| 362 | printf("Subtest %d, error %d errno=%d ", subtest, n, errno);
|
|---|
| 363 | errno = err_num; /* restore errno, just in case */
|
|---|
| 364 | perror("");
|
|---|
| 365 | if (errct++ > MAX_ERROR) {
|
|---|
| 366 | printf("Too many errors; test aborted\n");
|
|---|
| 367 | chdir("..");
|
|---|
| 368 | system("rm -rf DIR*");
|
|---|
| 369 | exit(1);
|
|---|
| 370 | }
|
|---|
| 371 | }
|
|---|
| 372 |
|
|---|
| 373 | #ifdef _ANSI
|
|---|
| 374 | void (*Signal(int a, void (*b)(int)))(int)
|
|---|
| 375 | #else
|
|---|
| 376 | sighandler_t Signal(a, b)
|
|---|
| 377 | int a;
|
|---|
| 378 | void (*b)();
|
|---|
| 379 | #endif
|
|---|
| 380 | {
|
|---|
| 381 | if (signal(a, (void (*) ()) b) == (void (*)()) -1)
|
|---|
| 382 | return(SIG_ERR);
|
|---|
| 383 | else
|
|---|
| 384 | return(SIG_ZERO);
|
|---|
| 385 | }
|
|---|
| 386 |
|
|---|
| 387 | void quit()
|
|---|
| 388 | {
|
|---|
| 389 |
|
|---|
| 390 | chdir("..");
|
|---|
| 391 | system("rm -rf DIR*");
|
|---|
| 392 |
|
|---|
| 393 | if (errct == 0) {
|
|---|
| 394 | printf("ok\n");
|
|---|
| 395 | exit(0);
|
|---|
| 396 | } else {
|
|---|
| 397 | printf("%d errors\n", errct);
|
|---|
| 398 | exit(1);
|
|---|
| 399 | }
|
|---|
| 400 | }
|
|---|
