stdio/xprintf_comp.c

   1 /*
   2  * Copyright (c) 2012 Apple Inc. All rights reserved.
   3  *
   4  * @APPLE_LICENSE_HEADER_START@
   5  *
   6  * This file contains Original Code and/or Modifications of Original Code
   7  * as defined in and that are subject to the Apple Public Source License
   8  * Version 2.0 (the 'License'). You may not use this file except in
   9  * compliance with the License. Please obtain a copy of the License at
  10  * http://www.opensource.apple.com/apsl/ and read it before using this
  11  * file.
  12  *
  13  * The Original Code and all software distributed under the License are
  14  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  15  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  16  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  18  * Please see the License for the specific language governing rights and
  19  * limitations under the License.
  20  *
  21  * @APPLE_LICENSE_HEADER_END@
  22  */
  23
  24 #include <xlocale_private.h>
  25 #include <printf.h>
  26 #include <pthread.h>
  27 #include <stdlib.h>
  28 #include <string.h>
  29 #include <errno.h>
  30 #include "xprintf_domain.h"
  31 #include "xprintf_private.h"
  32
  33 void
  34 free_printf_comp(printf_comp_t pc)
  35 {
  36     if(!pc) return;
  37     XL_RELEASE(pc->loc);
  38 #ifdef XPRINTF_PERF
  39     arrayfree(pc->pa);
  40     free(pc->pa);
  41     arrayfree(pc->aa);
  42     free(pc->aa);
  43     arrayfree(pc->ua);
  44     free(pc->ua);
  45 #else /* !XPRINTF_PERF */
  46     free(pc->pi);
  47     free(pc->argt);
  48     free(pc->args);
  49 #endif /* !XPRINTF_PERF */
  50     pthread_mutex_destroy(&pc->mutex);
  51     free(pc);
  52 }
  53
  54 printf_comp_t
  55 new_printf_comp(printf_domain_t restrict domain, locale_t loc, const char * restrict fmt)
  56 {
  57     int ret, saverrno;
  58     printf_comp_t restrict pc;
  59
  60     if(!domain) {
  61         errno = EINVAL;
  62         return NULL;
  63     }
  64     pc = MALLOC(sizeof(*pc) + strlen(fmt) + 1);
  65     if(!pc) return NULL;
  66     bzero(pc, sizeof(*pc));
  67     pc->mutex = (pthread_mutex_t)PTHREAD_MUTEX_INITIALIZER;
  68     pc->fmt = (const char *)(pc + 1);
  69     strcpy((char *)pc->fmt, fmt);
  70     DEFAULT_CURRENT_LOCALE(loc);
  71     XL_RETAIN(loc);
  72     pc->loc = loc;
  73     xprintf_domain_init();
  74     pthread_rwlock_rdlock(&domain->rwlock);
  75     ret = __printf_comp(pc, domain);
  76     saverrno = errno;
  77     pthread_rwlock_unlock(&domain->rwlock);
  78     if(ret < 0) {
  79         XL_RELEASE(loc);
  80         pthread_mutex_destroy(&pc->mutex);
  81         free(pc);
  82         errno = saverrno;
  83         return NULL;
  84     }
  85     return pc;
  86 }