rpmio/rpmsq.c

   1 /** \ingroup rpmio
   2  * \file rpmio/rpmsq.c
   3  */
   4
   5 #include "system.h"
   6
   7 #if defined(__LCLINT__)
   8 #define _BITS_SIGTHREAD_H       /* XXX avoid __sigset_t heartburn. */
   9
  10 /*@-incondefs -protoparammatch@*/
  11 /*@-exportheader@*/
  12 /*@constant int SA_SIGINFO@*/
  13 extern int sighold(int sig)
  14         /*@globals errno, systemState @*/;
  15 extern int sigignore(int sig)
  16         /*@globals errno, systemState @*/;
  17 extern int sigpause(int sig)
  18         /*@globals errno, systemState @*/;
  19 extern int sigrelse(int sig)
  20         /*@globals errno, systemState @*/;
  21 extern void (*sigset(int sig, void (*disp)(int)))(int)
  22         /*@globals errno, systemState @*/;
  23
  24 struct qelem;
  25 extern  void insque(struct qelem * __elem, struct qelem * __prev)
  26         /*@modifies  __elem, __prev @*/;
  27 extern  void remque(struct qelem * __elem)
  28         /*@modifies  __elem @*/;
  29
  30 extern pthread_t pthread_self(void)
  31         /*@*/;
  32 extern int pthread_equal(pthread_t t1, pthread_t t2)
  33         /*@*/;
  34
  35 extern int pthread_create(/*@out@*/ pthread_t *restrict thread,
  36                 const pthread_attr_t *restrict attr,
  37                 void *(*start_routine)(void*), void *restrict arg)
  38         /*@modifies *thread @*/;
  39 extern int pthread_join(pthread_t thread, /*@out@*/ void **value_ptr)
  40         /*@modifies *value_ptr @*/;
  41
  42 extern int pthread_setcancelstate(int state, /*@out@*/ int *oldstate)
  43         /*@globals internalState @*/
  44         /*@modifies *oldstate, internalState @*/;
  45 extern int pthread_setcanceltype(int type, /*@out@*/ int *oldtype)
  46         /*@globals internalState @*/
  47         /*@modifies *oldtype, internalState @*/;
  48 extern void pthread_testcancel(void)
  49         /*@globals internalState @*/
  50         /*@modifies internalState @*/;
  51 extern void pthread_cleanup_pop(int execute)
  52         /*@globals internalState @*/
  53         /*@modifies internalState @*/;
  54 extern void pthread_cleanup_push(void (*routine)(void*), void *arg)
  55         /*@globals internalState @*/
  56         /*@modifies internalState @*/;
  57 extern void _pthread_cleanup_pop(/*@out@*/ struct _pthread_cleanup_buffer *__buffer, int execute)
  58         /*@globals internalState @*/
  59         /*@modifies internalState @*/;
  60 extern void _pthread_cleanup_push(/*@out@*/ struct _pthread_cleanup_buffer *__buffer, void (*routine)(void*), /*@out@*/ void *arg)
  61         /*@globals internalState @*/
  62         /*@modifies internalState @*/;
  63
  64 extern int pthread_mutexattr_destroy(pthread_mutexattr_t *attr)
  65         /*@globals errno, internalState @*/
  66         /*@modifies *attr, errno, internalState @*/;
  67 extern int pthread_mutexattr_init(/*@out@*/ pthread_mutexattr_t *attr)
  68         /*@globals errno, internalState @*/
  69         /*@modifies *attr, errno, internalState @*/;
  70
  71 int pthread_mutexattr_gettype(const pthread_mutexattr_t *restrict attr,
  72                 /*@out@*/ int *restrict type)
  73         /*@modifies *type @*/;
  74 int pthread_mutexattr_settype(pthread_mutexattr_t *attr, int type)
  75         /*@globals errno, internalState @*/
  76         /*@modifies *attr, errno, internalState @*/;
  77
  78 extern int pthread_mutex_destroy(pthread_mutex_t *mutex)
  79         /*@modifies *mutex @*/;
  80 extern int pthread_mutex_init(/*@out@*/ pthread_mutex_t *restrict mutex,
  81                 /*@null@*/ const pthread_mutexattr_t *restrict attr)
  82         /*@globals errno, internalState @*/
  83         /*@modifies *mutex, errno, internalState @*/;
  84
  85 extern int pthread_mutex_lock(pthread_mutex_t *mutex)
  86         /*@globals errno @*/
  87         /*@modifies *mutex, errno @*/;
  88 extern int pthread_mutex_trylock(pthread_mutex_t *mutex)
  89         /*@globals errno @*/
  90         /*@modifies *mutex, errno @*/;
  91 extern int pthread_mutex_unlock(pthread_mutex_t *mutex)
  92         /*@globals errno @*/
  93         /*@modifies *mutex, errno @*/;
  94
  95 extern int pthread_cond_destroy(pthread_cond_t *cond)
  96         /*@modifies *cond @*/;
  97 extern int pthread_cond_init(/*@out@*/ pthread_cond_t *restrict cond,
  98                 const pthread_condattr_t *restrict attr)
  99         /*@globals errno, internalState @*/
 100         /*@modifies *cond, errno, internalState @*/;
 101
 102 extern int pthread_cond_timedwait(pthread_cond_t *restrict cond,
 103                 pthread_mutex_t *restrict mutex,
 104                 const struct timespec *restrict abstime)
 105         /*@modifies *cond, *mutex @*/;
 106 extern int pthread_cond_wait(pthread_cond_t *restrict cond,
 107                 pthread_mutex_t *restrict mutex)
 108         /*@modifies *cond, *mutex @*/;
 109 extern int pthread_cond_broadcast(pthread_cond_t *cond)
 110         /*@globals errno, internalState @*/
 111         /*@modifies *cond, errno, internalState @*/;
 112 extern int pthread_cond_signal(pthread_cond_t *cond)
 113         /*@globals errno, internalState @*/
 114         /*@modifies *cond, errno, internalState @*/;
 115
 116 /*@=exportheader@*/
 117 /*@=incondefs =protoparammatch@*/
 118 #endif
 119
 120 #include <signal.h>
 121 #include <sys/signal.h>
 122 #include <sys/wait.h>
 123 #include <search.h>
 124
 125 #if defined(HAVE_PTHREAD_H)
 126
 127 #include <pthread.h>
 128
 129 /* XXX suggested in bugzilla #159024 */
 130 #if PTHREAD_MUTEX_DEFAULT != PTHREAD_MUTEX_NORMAL
 131   #error RPM expects PTHREAD_MUTEX_DEFAULT == PTHREAD_MUTEX_NORMAL
 132 #endif
 133
 134 #ifndef PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP
 135 /*@unchecked@*/
 136 static pthread_mutex_t rpmsigTbl_lock = PTHREAD_MUTEX_INITIALIZER;
 137 #else
 138 /*@unchecked@*/
 139 /*@-type@*/
 140 static pthread_mutex_t rpmsigTbl_lock = PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP;
 141 /*@=type@*/
 142 #endif
 143
 144 #define DO_LOCK()       pthread_mutex_lock(&rpmsigTbl_lock);
 145 #define DO_UNLOCK()     pthread_mutex_unlock(&rpmsigTbl_lock);
 146 #define INIT_LOCK()     \
 147     {   pthread_mutexattr_t attr; \
 148         (void) pthread_mutexattr_init(&attr); \
 149         (void) pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_RECURSIVE); \
 150         (void) pthread_mutex_init (&rpmsigTbl_lock, &attr); \
 151         (void) pthread_mutexattr_destroy(&attr); \
 152         rpmsigTbl_sigchld->active = 0; \
 153     }
 154 #define ADD_REF(__tbl)  (__tbl)->active++
 155 #define SUB_REF(__tbl)  --(__tbl)->active
 156 #define CLEANUP_HANDLER(__handler, __arg, __oldtypeptr) \
 157     (void) pthread_setcanceltype (PTHREAD_CANCEL_ASYNCHRONOUS, (__oldtypeptr));\
 158         pthread_cleanup_push((__handler), (__arg));
 159 #define CLEANUP_RESET(__execute, __oldtype) \
 160     pthread_cleanup_pop(__execute); \
 161     (void) pthread_setcanceltype ((__oldtype), &(__oldtype));
 162
 163 #define SAME_THREAD(_a, _b)     pthread_equal(((pthread_t)_a), ((pthread_t)_b))
 164
 165 #define ME()    ((void *)pthread_self())
 166
 167 #else
 168
 169 #define DO_LOCK()
 170 #define DO_UNLOCK()
 171 #define INIT_LOCK()
 172 #define ADD_REF(__tbl)  /*@-noeffect@*/ (0) /*@=noeffect@*/
 173 #define SUB_REF(__tbl)  /*@-noeffect@*/ (0) /*@=noeffect@*/
 174 #define CLEANUP_HANDLER(__handler, __arg, __oldtypeptr)
 175 #define CLEANUP_RESET(__execute, __oldtype)
 176
 177 #define SAME_THREAD(_a, _b)     (42)
 178
 179 #define ME()    (((void *)getpid()))
 180
 181 #endif  /* HAVE_PTHREAD_H */
 182
 183 #include <rpmsq.h>
 184
 185 #include "debug.h"
 186
 187 #define _RPMSQ_DEBUG    0
 188 /*@unchecked@*/
 189 int _rpmsq_debug = _RPMSQ_DEBUG;
 190
 191 /*@unchecked@*/
 192 static struct rpmsqElem rpmsqRock;
 193
 194 /*@-compmempass@*/
 195 /*@unchecked@*/
 196 rpmsq rpmsqQueue = &rpmsqRock;
 197 /*@=compmempass@*/
 198
 199 int rpmsqInsert(void * elem, void * prev)
 200 {
 201     rpmsq sq = (rpmsq) elem;
 202     int ret = -1;
 203
 204     if (sq != NULL) {
 205 #ifdef _RPMSQ_DEBUG
 206 if (_rpmsq_debug)
 207 fprintf(stderr, "    Insert(%p): %p\n", ME(), sq);
 208 #endif
 209         ret = sighold(SIGCHLD);
 210         if (ret == 0) {
 211             sq->child = 0;
 212             sq->reaped = 0;
 213             sq->status = 0;
 214             sq->reaper = 1;
 215 /*@-bounds@*/
 216             sq->pipes[0] = sq->pipes[1] = -1;
 217 /*@=bounds@*/
 218
 219             sq->id = ME();
 220             ret = pthread_mutex_init(&sq->mutex, NULL);
 221             ret = pthread_cond_init(&sq->cond, NULL);
 222             insque(elem, (prev != NULL ? prev : rpmsqQueue));
 223             ret = sigrelse(SIGCHLD);
 224         }
 225     }
 226     return ret;
 227 }
 228
 229 int rpmsqRemove(void * elem)
 230 {
 231     rpmsq sq = (rpmsq) elem;
 232     int ret = -1;
 233
 234     if (elem != NULL) {
 235
 236 #ifdef _RPMSQ_DEBUG
 237 if (_rpmsq_debug)
 238 fprintf(stderr, "    Remove(%p): %p\n", ME(), sq);
 239 #endif
 240         ret = sighold (SIGCHLD);
 241         if (ret == 0) {
 242             remque(elem);
 243             ret = pthread_cond_destroy(&sq->cond);
 244             ret = pthread_mutex_destroy(&sq->mutex);
 245             sq->id = NULL;
 246 /*@-bounds@*/
 247             if (sq->pipes[1])   ret = close(sq->pipes[1]);
 248             if (sq->pipes[0])   ret = close(sq->pipes[0]);
 249             sq->pipes[0] = sq->pipes[1] = -1;
 250 /*@=bounds@*/
 251 #ifdef  NOTYET  /* rpmpsmWait debugging message needs */
 252             sq->reaper = 1;
 253             sq->status = 0;
 254             sq->reaped = 0;
 255             sq->child = 0;
 256 #endif
 257             ret = sigrelse(SIGCHLD);
 258         }
 259     }
 260     return ret;
 261 }
 262
 263 /*@unchecked@*/
 264 sigset_t rpmsqCaught;
 265
 266 /*@unchecked@*/
 267 /*@-fullinitblock@*/
 268 static struct rpmsig_s {
 269     int signum;
 270     void (*handler) (int signum, void * info, void * context);
 271     int active;
 272     struct sigaction oact;
 273 } rpmsigTbl[] = {
 274     { SIGINT,   rpmsqAction },
 275 #define rpmsigTbl_sigint        (&rpmsigTbl[0])
 276     { SIGQUIT,  rpmsqAction },
 277 #define rpmsigTbl_sigquit       (&rpmsigTbl[1])
 278     { SIGCHLD,  rpmsqAction },
 279 #define rpmsigTbl_sigchld       (&rpmsigTbl[2])
 280     { SIGHUP,   rpmsqAction },
 281 #define rpmsigTbl_sighup        (&rpmsigTbl[3])
 282     { SIGTERM,  rpmsqAction },
 283 #define rpmsigTbl_sigterm       (&rpmsigTbl[4])
 284     { SIGPIPE,  rpmsqAction },
 285 #define rpmsigTbl_sigpipe       (&rpmsigTbl[5])
 286     { -1,       NULL },
 287 };
 288 /*@=fullinitblock@*/
 289
 290 void rpmsqAction(int signum,
 291                 /*@unused@*/ void * info, /*@unused@*/ void * context)
 292 {
 293     int save = errno;
 294     rpmsig tbl;
 295
 296     for (tbl = rpmsigTbl; tbl->signum >= 0; tbl++) {
 297         if (tbl->signum != signum)
 298             continue;
 299
 300         (void) sigaddset(&rpmsqCaught, signum);
 301
 302         switch (signum) {
 303         case SIGCHLD:
 304             while (1) {
 305                 rpmsq sq;
 306                 int status = 0;
 307                 pid_t reaped = waitpid(0, &status, WNOHANG);
 308
 309                 /* XXX errno set to ECHILD/EINVAL/EINTR. */
 310                 if (reaped <= 0)
 311                     /*@innerbreak@*/ break;
 312
 313                 /* XXX insque(3)/remque(3) are dequeue, not ring. */
 314                 for (sq = rpmsqQueue->q_forw;
 315                      sq != NULL && sq != rpmsqQueue;
 316                      sq = sq->q_forw)
 317                 {
 318                     if (sq->child != reaped)
 319                         /*@innercontinue@*/ continue;
 320                     sq->reaped = reaped;
 321                     sq->status = status;
 322                     (void) pthread_cond_signal(&sq->cond);
 323                     /*@innerbreak@*/ break;
 324                 }
 325             }
 326             /*@switchbreak@*/ break;
 327         default:
 328             /*@switchbreak@*/ break;
 329         }
 330         break;
 331     }
 332     errno = save;
 333 }
 334
 335 int rpmsqEnable(int signum, /*@null@*/ rpmsqAction_t handler)
 336         /*@globals rpmsigTbl @*/
 337         /*@modifies rpmsigTbl @*/
 338 {
 339     int tblsignum = (signum >= 0 ? signum : -signum);
 340     struct sigaction sa;
 341     rpmsig tbl;
 342     int ret = -1;
 343
 344     (void) DO_LOCK ();
 345     if (rpmsqQueue->id == NULL)
 346         rpmsqQueue->id = ME();
 347     for (tbl = rpmsigTbl; tbl->signum >= 0; tbl++) {
 348         if (tblsignum != tbl->signum)
 349             continue;
 350
 351         if (signum >= 0) {                      /* Enable. */
 352             if (ADD_REF(tbl) <= 0) {
 353                 (void) sigdelset(&rpmsqCaught, tbl->signum);
 354
 355                 /* XXX Don't set a signal handler if already SIG_IGN */
 356                 (void) sigaction(tbl->signum, NULL, &tbl->oact);
 357                 if (tbl->oact.sa_handler == SIG_IGN)
 358                     continue;
 359
 360                 (void) sigemptyset (&sa.sa_mask);
 361                 sa.sa_flags = SA_SIGINFO;
 362 #if defined(__LCLINT__) /* XXX glibc has union to track handler prototype. */
 363                 sa.sa_handler = (handler != NULL ? handler : tbl->handler);
 364 #else
 365                 sa.sa_sigaction = (handler != NULL ? handler : tbl->handler);
 366 #endif
 367                 if (sigaction(tbl->signum, &sa, &tbl->oact) < 0) {
 368                     SUB_REF(tbl);
 369                     break;
 370                 }
 371                 tbl->active = 1;                /* XXX just in case */
 372                 if (handler != NULL)
 373                     tbl->handler = handler;
 374             }
 375         } else {                                /* Disable. */
 376             if (SUB_REF(tbl) <= 0) {
 377                 if (sigaction(tbl->signum, &tbl->oact, NULL) < 0)
 378                     break;
 379                 tbl->active = 0;                /* XXX just in case */
 380                 tbl->handler = (handler != NULL ? handler : rpmsqAction);
 381             }
 382         }
 383         ret = tbl->active;
 384         break;
 385     }
 386     (void) DO_UNLOCK ();
 387     return ret;
 388 }
 389
 390 pid_t rpmsqFork(rpmsq sq)
 391 {
 392     pid_t pid;
 393     int xx;
 394
 395     if (sq->reaper) {
 396         xx = rpmsqInsert(sq, NULL);
 397 #ifdef _RPMSQ_DEBUG
 398 if (_rpmsq_debug)
 399 fprintf(stderr, "    Enable(%p): %p\n", ME(), sq);
 400 #endif
 401         xx = rpmsqEnable(SIGCHLD, NULL);
 402     }
 403
 404     xx = pipe(sq->pipes);
 405
 406     xx = sighold(SIGCHLD);
 407
 408     pid = fork();
 409     if (pid < (pid_t) 0) {              /* fork failed.  */
 410 /*@-bounds@*/
 411         xx = close(sq->pipes[0]);
 412         xx = close(sq->pipes[1]);
 413         sq->pipes[0] = sq->pipes[1] = -1;
 414 /*@=bounds@*/
 415         goto out;
 416     } else if (pid == (pid_t) 0) {      /* Child. */
 417         int yy;
 418
 419         /* Block to permit parent time to wait. */
 420 /*@-bounds@*/
 421         xx = close(sq->pipes[1]);
 422         xx = read(sq->pipes[0], &yy, sizeof(yy));
 423         xx = close(sq->pipes[0]);
 424         sq->pipes[0] = sq->pipes[1] = -1;
 425 /*@=bounds@*/
 426
 427 #ifdef _RPMSQ_DEBUG
 428 if (_rpmsq_debug)
 429 fprintf(stderr, "     Child(%p): %p child %d\n", ME(), sq, getpid());
 430 #endif
 431
 432     } else {                            /* Parent. */
 433
 434         sq->child = pid;
 435
 436 #ifdef _RPMSQ_DEBUG
 437 if (_rpmsq_debug)
 438 fprintf(stderr, "    Parent(%p): %p child %d\n", ME(), sq, sq->child);
 439 #endif
 440
 441     }
 442
 443 out:
 444     xx = sigrelse(SIGCHLD);
 445     return sq->child;
 446 }
 447
 448 /**
 449  * Wait for child process to be reaped, and unregister SIGCHLD handler.
 450  * @todo Rewrite to use waitpid on helper thread.
 451  * @param sq            scriptlet queue element
 452  * @return              0 on success
 453  */
 454 static int rpmsqWaitUnregister(rpmsq sq)
 455         /*@globals fileSystem, internalState @*/
 456         /*@modifies sq, fileSystem, internalState @*/
 457 {
 458     int nothreads = 0;
 459     int ret = 0;
 460     int xx;
 461
 462     /* Protect sq->reaped from handler changes. */
 463     ret = sighold(SIGCHLD);
 464
 465     /* Initialize the cond var mutex. */
 466     if (!nothreads)
 467         ret = pthread_mutex_lock(&sq->mutex);
 468
 469     /* Start the child, linux often runs child before parent. */
 470 /*@-bounds@*/
 471     if (sq->pipes[0] >= 0)
 472         xx = close(sq->pipes[0]);
 473     if (sq->pipes[1] >= 0)
 474         xx = close(sq->pipes[1]);
 475     sq->pipes[0] = sq->pipes[1] = -1;
 476 /*@=bounds@*/
 477
 478     /* Put a stopwatch on the time spent waiting to measure performance gain. */
 479     (void) rpmswEnter(&sq->op, -1);
 480
 481     /* Wait for handler to receive SIGCHLD. */
 482     /*@-infloops@*/
 483     while (ret == 0 && sq->reaped != sq->child) {
 484         if (nothreads)
 485             /* Note that sigpause re-enables SIGCHLD. */
 486             ret = sigpause(SIGCHLD);
 487         else {
 488             xx = sigrelse(SIGCHLD);
 489             ret = pthread_cond_wait(&sq->cond, &sq->mutex);
 490             xx = sighold(SIGCHLD);
 491         }
 492     }
 493     /*@=infloops@*/
 494
 495     /* Accumulate stopwatch time spent waiting, potential performance gain. */
 496     sq->ms_scriptlets += rpmswExit(&sq->op, -1)/1000;
 497
 498     /* Tear down cond var mutex, our child has been reaped. */
 499     if (!nothreads)
 500         xx = pthread_mutex_unlock(&sq->mutex);
 501     xx = sigrelse(SIGCHLD);
 502
 503 #ifdef _RPMSQ_DEBUG
 504 if (_rpmsq_debug)
 505 fprintf(stderr, "      Wake(%p): %p child %d reaper %d ret %d\n", ME(), sq, sq->child, sq->reaper, ret);
 506 #endif
 507
 508     /* Remove processed SIGCHLD item from queue. */
 509     xx = rpmsqRemove(sq);
 510
 511     /* Disable SIGCHLD handler on refcount == 0. */
 512     xx = rpmsqEnable(-SIGCHLD, NULL);
 513 #ifdef _RPMSQ_DEBUG
 514 if (_rpmsq_debug)
 515 fprintf(stderr, "   Disable(%p): %p\n", ME(), sq);
 516 #endif
 517
 518     return ret;
 519 }
 520
 521 pid_t rpmsqWait(rpmsq sq)
 522 {
 523
 524 #ifdef _RPMSQ_DEBUG
 525 if (_rpmsq_debug)
 526 fprintf(stderr, "      Wait(%p): %p child %d reaper %d\n", ME(), sq, sq->child, sq->reaper);
 527 #endif
 528
 529     if (sq->reaper) {
 530         (void) rpmsqWaitUnregister(sq);
 531     } else {
 532         pid_t reaped;
 533         int status;
 534         do {
 535             reaped = waitpid(sq->child, &status, 0);
 536         } while (reaped >= 0 && reaped != sq->child);
 537         sq->reaped = reaped;
 538         sq->status = status;
 539 #ifdef _RPMSQ_DEBUG
 540 if (_rpmsq_debug)
 541 fprintf(stderr, "   Waitpid(%p): %p child %d reaped %d\n", ME(), sq, sq->child, sq->reaped);
 542 #endif
 543     }
 544
 545 #ifdef _RPMSQ_DEBUG
 546 if (_rpmsq_debug)
 547 fprintf(stderr, "      Fini(%p): %p child %d status 0x%x\n", ME(), sq, sq->child, sq->status);
 548 #endif
 549
 550     return sq->reaped;
 551 }
 552
 553 void * rpmsqThread(void * (*start) (void * arg), void * arg)
 554 {
 555     pthread_t pth;
 556     int ret;
 557
 558     ret = pthread_create(&pth, NULL, start, arg);
 559     return (ret == 0 ? (void *)pth : NULL);
 560 }
 561
 562 int rpmsqJoin(void * thread)
 563 {
 564     pthread_t pth = (pthread_t) thread;
 565     if (thread == NULL)
 566         return EINVAL;
 567     return pthread_join(pth, NULL);
 568 }
 569
 570 int rpmsqThreadEqual(void * thread)
 571 {
 572     pthread_t t1 = (pthread_t) thread;
 573     pthread_t t2 = pthread_self();
 574     return pthread_equal(t1, t2);
 575 }
 576
 577 /**
 578  * SIGCHLD cancellation handler.
 579  */
 580 static void
 581 sigchld_cancel (void *arg)
 582         /*@globals rpmsigTbl, fileSystem, internalState @*/
 583         /*@modifies rpmsigTbl, fileSystem, internalState @*/
 584 {
 585     pid_t child = *(pid_t *) arg;
 586     pid_t result;
 587
 588     (void) kill(child, SIGKILL);
 589
 590     do {
 591         result = waitpid(child, NULL, 0);
 592     } while (result == (pid_t)-1 && errno == EINTR);
 593
 594     (void) DO_LOCK ();
 595     if (SUB_REF (rpmsigTbl_sigchld) == 0) {
 596         (void) rpmsqEnable(-SIGQUIT, NULL);
 597         (void) rpmsqEnable(-SIGINT, NULL);
 598     }
 599     (void) DO_UNLOCK ();
 600 }
 601
 602 /**
 603  * Execute a command, returning its status.
 604  */
 605 int
 606 rpmsqExecve (const char ** argv)
 607         /*@globals rpmsigTbl @*/
 608         /*@modifies rpmsigTbl @*/
 609 {
 610     int oldtype;
 611     int status = -1;
 612     pid_t pid = 0;
 613     pid_t result;
 614     sigset_t newMask, oldMask;
 615     rpmsq sq = memset(alloca(sizeof(*sq)), 0, sizeof(*sq));
 616
 617 #ifndef PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP
 618         INIT_LOCK ();
 619 #endif
 620
 621     (void) DO_LOCK ();
 622     if (ADD_REF (rpmsigTbl_sigchld) == 0) {
 623         if (rpmsqEnable(SIGINT, NULL) < 0) {
 624             SUB_REF (rpmsigTbl_sigchld);
 625             goto out;
 626         }
 627         if (rpmsqEnable(SIGQUIT, NULL) < 0) {
 628             SUB_REF (rpmsigTbl_sigchld);
 629             goto out_restore_sigint;
 630         }
 631     }
 632     (void) DO_UNLOCK ();
 633
 634     (void) sigemptyset (&newMask);
 635     (void) sigaddset (&newMask, SIGCHLD);
 636     if (sigprocmask (SIG_BLOCK, &newMask, &oldMask) < 0) {
 637         (void) DO_LOCK ();
 638         if (SUB_REF (rpmsigTbl_sigchld) == 0)
 639             goto out_restore_sigquit_and_sigint;
 640         goto out;
 641     }
 642
 643     CLEANUP_HANDLER(sigchld_cancel, &pid, &oldtype);
 644
 645     pid = fork ();
 646     if (pid < (pid_t) 0) {              /* fork failed.  */
 647         goto out;
 648     } else if (pid == (pid_t) 0) {      /* Child. */
 649
 650         /* Restore the signals.  */
 651         (void) sigaction (SIGINT, &rpmsigTbl_sigint->oact, NULL);
 652         (void) sigaction (SIGQUIT, &rpmsigTbl_sigquit->oact, NULL);
 653         (void) sigprocmask (SIG_SETMASK, &oldMask, NULL);
 654
 655         /* Reset rpmsigTbl lock and refcnt. */
 656         INIT_LOCK ();
 657
 658         (void) execve (argv[0], (char *const *) argv, environ);
 659         _exit (127);
 660     } else {                            /* Parent. */
 661         do {
 662             result = waitpid(pid, &status, 0);
 663         } while (result == (pid_t)-1 && errno == EINTR);
 664         if (result != pid)
 665             status = -1;
 666     }
 667
 668     CLEANUP_RESET(0, oldtype);
 669
 670     (void) DO_LOCK ();
 671     if ((SUB_REF (rpmsigTbl_sigchld) == 0 &&
 672         (rpmsqEnable(-SIGINT, NULL) < 0 || rpmsqEnable (-SIGQUIT, NULL) < 0))
 673       || sigprocmask (SIG_SETMASK, &oldMask, NULL) != 0)
 674     {
 675         status = -1;
 676     }
 677     goto out;
 678
 679 out_restore_sigquit_and_sigint:
 680     (void) rpmsqEnable(-SIGQUIT, NULL);
 681 out_restore_sigint:
 682     (void) rpmsqEnable(-SIGINT, NULL);
 683 out:
 684     (void) DO_UNLOCK ();
 685     return status;
 686 }