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
33void
34free_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
54printf_comp_t
55new_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}
87