lib/ipc/common.c

   1 /*
   2  * Copyright (c) 2009 Kungliga Tekniska Högskolan
   3  * (Royal Institute of Technology, Stockholm, Sweden).
   4  * All rights reserved.
   5  *
   6  * Portions Copyright (c) 2009 Apple Inc. All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  *
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  *
  15  * 2. Redistributions in binary form must reproduce the above copyright
  16  *    notice, this list of conditions and the following disclaimer in the
  17  *    documentation and/or other materials provided with the distribution.
  18  *
  19  * 3. Neither the name of the Institute nor the names of its contributors
  20  *    may be used to endorse or promote products derived from this software
  21  *    without specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
  24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
  27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  33  * SUCH DAMAGE.
  34  */
  35
  36 #include "hi_locl.h"
  37 #ifdef HAVE_GCD
  38 #include <dispatch/dispatch.h>
  39 #else
  40 #include "heim_threads.h"
  41 #endif
  42
  43 struct heim_icred {
  44     uid_t uid;
  45     gid_t gid;
  46     pid_t pid;
  47     pid_t session;
  48 };
  49
  50 void
  51 heim_ipc_free_cred(heim_icred cred)
  52 {
  53     free(cred);
  54 }
  55
  56 uid_t
  57 heim_ipc_cred_get_uid(heim_icred cred)
  58 {
  59     return cred->uid;
  60 }
  61
  62 gid_t
  63 heim_ipc_cred_get_gid(heim_icred cred)
  64 {
  65     return cred->gid;
  66 }
  67
  68 pid_t
  69 heim_ipc_cred_get_pid(heim_icred cred)
  70 {
  71     return cred->pid;
  72 }
  73
  74 pid_t
  75 heim_ipc_cred_get_session(heim_icred cred)
  76 {
  77     return cred->session;
  78 }
  79
  80
  81 int
  82 _heim_ipc_create_cred(uid_t uid, gid_t gid, pid_t pid, pid_t session, heim_icred *cred)
  83 {
  84     *cred = calloc(1, sizeof(**cred));
  85     if (*cred == NULL)
  86         return ENOMEM;
  87     (*cred)->uid = uid;
  88     (*cred)->gid = gid;
  89     (*cred)->pid = pid;
  90     (*cred)->session = session;
  91     return 0;
  92 }
  93
  94 #ifndef HAVE_GCD
  95 struct heim_isemaphore {
  96     HEIMDAL_MUTEX mutex;
  97     pthread_cond_t cond;
  98     long counter;
  99 };
 100 #endif
 101
 102 heim_isemaphore
 103 heim_ipc_semaphore_create(long value)
 104 {
 105 #ifdef HAVE_GCD
 106     return (heim_isemaphore)dispatch_semaphore_create(value);
 107 #else
 108     heim_isemaphore s = malloc(sizeof(*s));
 109     if (s == NULL)
 110         return NULL;
 111     HEIMDAL_MUTEX_init(&s->mutex);
 112     pthread_cond_init(&s->cond, NULL);
 113     s->counter = value;
 114     return s;
 115 #endif
 116 }
 117
 118 long
 119 heim_ipc_semaphore_wait(heim_isemaphore s, time_t t)
 120 {
 121 #ifdef HAVE_GCD
 122     uint64_t timeout;
 123     if (t == HEIM_IPC_WAIT_FOREVER)
 124         timeout = DISPATCH_TIME_FOREVER;
 125     else
 126         timeout = (uint64_t)t * NSEC_PER_SEC;
 127
 128     return dispatch_semaphore_wait((dispatch_semaphore_t)s, timeout);
 129 #else
 130     HEIMDAL_MUTEX_lock(&s->mutex);
 131     /* if counter hits below zero, we get to wait */
 132     if (--s->counter < 0) {
 133         int ret;
 134
 135         if (t == HEIM_IPC_WAIT_FOREVER)
 136             ret = pthread_cond_wait(&s->cond, &s->mutex);
 137         else {
 138             struct timespec ts;
 139             ts.tv_sec = t;
 140             ts.tv_nsec = 0;
 141             ret = pthread_cond_timedwait(&s->cond, &s->mutex, &ts);
 142         }
 143         if (ret) {
 144             HEIMDAL_MUTEX_unlock(&s->mutex);
 145             return errno;
 146         }
 147     }
 148     HEIMDAL_MUTEX_unlock(&s->mutex);
 149
 150     return 0;
 151 #endif
 152 }
 153
 154 long
 155 heim_ipc_semaphore_signal(heim_isemaphore s)
 156 {
 157 #ifdef HAVE_GCD
 158     return dispatch_semaphore_signal((dispatch_semaphore_t)s);
 159 #else
 160     int wakeup;
 161     HEIMDAL_MUTEX_lock(&s->mutex);
 162     wakeup = (++s->counter == 0) ;
 163     HEIMDAL_MUTEX_unlock(&s->mutex);
 164     if (wakeup)
 165         pthread_cond_signal(&s->cond);
 166     return 0;
 167 #endif
 168 }
 169
 170 void
 171 heim_ipc_semaphore_release(heim_isemaphore s)
 172 {
 173 #ifdef HAVE_GCD
 174     return dispatch_release((dispatch_semaphore_t)s);
 175 #else
 176     HEIMDAL_MUTEX_lock(&s->mutex);
 177     if (s->counter != 0)
 178         abort();
 179     HEIMDAL_MUTEX_unlock(&s->mutex);
 180     HEIMDAL_MUTEX_destroy(&s->mutex);
 181     pthread_cond_destroy(&s->cond);
 182     free(s);
 183 #endif
 184 }
 185
 186 void
 187 heim_ipc_free_data(heim_idata *data)
 188 {
 189     if (data->data)
 190         free(data->data);
 191     data->data = NULL;
 192     data->length = 0;
 193 }