Libc-997.1.1.tar.gz

[apple/libc.git] / stdio / xprintf_comp.c

diff --git a/stdio/xprintf_comp.c b/stdio/xprintf_comp.c
new file mode 100644 (file)
index 0000000..6f5b549
--- /dev/null
+++ b/stdio/xprintf_comp.c
@@ -0,0 +1,86 @@
+/*
+ * Copyright (c) 2012 Apple Inc. All rights reserved.
+ *
+ * @APPLE_LICENSE_HEADER_START@
+ * 
+ * This file contains Original Code and/or Modifications of Original Code
+ * as defined in and that are subject to the Apple Public Source License
+ * Version 2.0 (the 'License'). You may not use this file except in
+ * compliance with the License. Please obtain a copy of the License at
+ * http://www.opensource.apple.com/apsl/ and read it before using this
+ * file.
+ * 
+ * The Original Code and all software distributed under the License are
+ * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
+ * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
+ * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
+ * Please see the License for the specific language governing rights and
+ * limitations under the License.
+ * 
+ * @APPLE_LICENSE_HEADER_END@
+ */
+
+#include <xlocale_private.h>
+#include <printf.h>
+#include <pthread.h>
+#include <stdlib.h>
+#include <string.h>
+#include <errno.h>
+#include "xprintf_domain.h"
+#include "xprintf_private.h"
+
+void
+free_printf_comp(printf_comp_t pc)
+{
+    if(!pc) return;
+    XL_RELEASE(pc->loc);
+#ifdef XPRINTF_PERF
+    arrayfree(pc->pa);
+    free(pc->pa);
+    arrayfree(pc->aa);
+    free(pc->aa);
+    arrayfree(pc->ua);
+    free(pc->ua);
+#else /* !XPRINTF_PERF */
+    free(pc->pi);
+    free(pc->argt);
+    free(pc->args);
+#endif /* !XPRINTF_PERF */
+    pthread_mutex_destroy(&pc->mutex);
+    free(pc);
+}
+
+printf_comp_t
+new_printf_comp(printf_domain_t restrict domain, locale_t loc, const char * restrict fmt)
+{
+    int ret, saverrno;
+    printf_comp_t restrict pc;
+
+    if(!domain) {
+       errno = EINVAL;
+       return NULL;
+    }
+    pc = MALLOC(sizeof(*pc) + strlen(fmt) + 1);
+    if(!pc) return NULL;
+    bzero(pc, sizeof(*pc));
+    pc->mutex = (pthread_mutex_t)PTHREAD_MUTEX_INITIALIZER;
+    pc->fmt = (const char *)(pc + 1);
+    strcpy((char *)pc->fmt, fmt);
+    DEFAULT_CURRENT_LOCALE(loc);
+    XL_RETAIN(loc);
+    pc->loc = loc;
+    xprintf_domain_init();
+    pthread_rwlock_rdlock(&domain->rwlock);
+    ret = __printf_comp(pc, domain);
+    saverrno = errno;
+    pthread_rwlock_unlock(&domain->rwlock);
+    if(ret < 0) {
+       XL_RELEASE(loc);
+       pthread_mutex_destroy(&pc->mutex);
+       free(pc);
+       errno = saverrno;
+       return NULL;
+    }
+    return pc;
+}