-/*\r
- * Copyright (c) 2005, Hervé Drolon, FreeImage Team\r
- * All rights reserved.\r
- *\r
- * Redistribution and use in source and binary forms, with or without\r
- * modification, are permitted provided that the following conditions\r
- * are met:\r
- * 1. Redistributions of source code must retain the above copyright\r
- * notice, this list of conditions and the following disclaimer.\r
- * 2. Redistributions in binary form must reproduce the above copyright\r
- * notice, this list of conditions and the following disclaimer in the\r
- * documentation and/or other materials provided with the distribution.\r
- *\r
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'\r
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\r
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE\r
- * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE\r
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR\r
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF\r
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS\r
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN\r
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)\r
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE\r
- * POSSIBILITY OF SUCH DAMAGE.\r
- */\r
-\r
-#include "opj_includes.h"\r
-\r
-/* ==========================================================\r
- Utility functions\r
- ==========================================================*/\r
-\r
-#ifndef WIN32\r
-static char*\r
-i2a(unsigned i, char *a, unsigned r) {\r
- if (i/r > 0) a = i2a(i/r,a,r);\r
- *a = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"[i%r];\r
- return a+1;\r
-}\r
-\r
-/** \r
- Transforms integer i into an ascii string and stores the result in a; \r
- string is encoded in the base indicated by r.\r
- @param i Number to be converted\r
- @param a String result\r
- @param r Base of value; must be in the range 2 - 36\r
- @return Returns a\r
-*/\r
-static char *\r
-_itoa(int i, char *a, int r) {\r
- r = ((r < 2) || (r > 36)) ? 10 : r;\r
- if(i < 0) {\r
- *a = '-';\r
- *i2a(-i, a+1, r) = 0;\r
- }\r
- else *i2a(i, a, r) = 0;\r
- return a;\r
-}\r
-\r
-#endif /* !WIN32 */\r
-\r
-/* ----------------------------------------------------------------------- */\r
-\r
-opj_event_mgr_t* opj_set_event_mgr(opj_common_ptr cinfo, opj_event_mgr_t *event_mgr, void *context) {\r
- if(cinfo) {\r
- opj_event_mgr_t *previous = cinfo->event_mgr;\r
- cinfo->event_mgr = event_mgr;\r
- cinfo->client_data = context;\r
- return previous;\r
- }\r
-\r
- return NULL;\r
-}\r
-\r
-bool opj_event_msg(opj_common_ptr cinfo, int event_type, const char *fmt, ...) {\r
-#define MSG_SIZE 512 /* 512 bytes should be more than enough for a short message */\r
- opj_msg_callback msg_handler = NULL;\r
-\r
- opj_event_mgr_t *event_mgr = cinfo->event_mgr;\r
- if(event_mgr != NULL) {\r
- switch(event_type) {\r
- case EVT_ERROR:\r
- msg_handler = event_mgr->error_handler;\r
- break;\r
- case EVT_WARNING:\r
- msg_handler = event_mgr->warning_handler;\r
- break;\r
- case EVT_INFO:\r
- msg_handler = event_mgr->info_handler;\r
- break;\r
- default:\r
- break;\r
- }\r
- if(msg_handler == NULL) {\r
- return false;\r
- }\r
- } else {\r
- return false;\r
- }\r
-\r
- if ((fmt != NULL) && (event_mgr != NULL)) {\r
- va_list arg;\r
- int str_length, i, j;\r
- char message[MSG_SIZE];\r
- memset(message, 0, MSG_SIZE);\r
- /* initialize the optional parameter list */\r
- va_start(arg, fmt);\r
- /* check the length of the format string */\r
- str_length = (strlen(fmt) > MSG_SIZE) ? MSG_SIZE : strlen(fmt);\r
- /* parse the format string and put the result in 'message' */\r
- for (i = 0, j = 0; i < str_length; ++i) {\r
- if (fmt[i] == '%') {\r
- if (i + 1 < str_length) {\r
- switch(tolower(fmt[i + 1])) {\r
- case '%' :\r
- message[j++] = '%';\r
- break;\r
- case 'o' : /* octal numbers */\r
- {\r
- char tmp[16];\r
- _itoa(va_arg(arg, int), tmp, 8);\r
- strcat(message, tmp);\r
- j += strlen(tmp);\r
- ++i;\r
- break;\r
- }\r
- case 'i' : /* decimal numbers */\r
- case 'd' :\r
- {\r
- char tmp[16];\r
- _itoa(va_arg(arg, int), tmp, 10);\r
- strcat(message, tmp);\r
- j += strlen(tmp);\r
- ++i;\r
- break;\r
- }\r
- case 'x' : /* hexadecimal numbers */\r
- {\r
- char tmp[16];\r
- _itoa(va_arg(arg, int), tmp, 16);\r
- strcat(message, tmp);\r
- j += strlen(tmp);\r
- ++i;\r
- break;\r
- }\r
- case 's' : /* strings */\r
- {\r
- char *tmp = va_arg(arg, char*);\r
- strcat(message, tmp);\r
- j += strlen(tmp);\r
- ++i;\r
- break;\r
- }\r
- case 'f' : /* floats */\r
- {\r
- char tmp[16];\r
- double value = va_arg(arg, double);\r
- sprintf(tmp, "%f", value);\r
- strcat(message, tmp);\r
- j += strlen(tmp);\r
- ++i;\r
- break;\r
- }\r
- };\r
- } else {\r
- message[j++] = fmt[i];\r
- }\r
- } else {\r
- message[j++] = fmt[i];\r
- };\r
- }\r
- /* deinitialize the optional parameter list */\r
- va_end(arg);\r
-\r
- /* output the message to the user program */\r
- msg_handler(message, cinfo->client_data);\r
- }\r
-\r
- return true;\r
-}\r
-\r
+/*
+ * Copyright (c) 2005, Hervé Drolon, FreeImage Team
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ * notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ * notice, this list of conditions and the following disclaimer in the
+ * documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+ * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ * POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#include "opj_includes.h"
+
+/* ==========================================================
+ Utility functions
+ ==========================================================*/
+
+#if !defined(_MSC_VER) && !defined(__MINGW32__)
+static char*
+i2a(unsigned i, char *a, unsigned r) {
+ if (i/r > 0) a = i2a(i/r,a,r);
+ *a = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"[i%r];
+ return a+1;
+}
+
+/**
+ Transforms integer i into an ascii string and stores the result in a;
+ string is encoded in the base indicated by r.
+ @param i Number to be converted
+ @param a String result
+ @param r Base of value; must be in the range 2 - 36
+ @return Returns a
+*/
+static char *
+_itoa(int i, char *a, int r) {
+ r = ((r < 2) || (r > 36)) ? 10 : r;
+ if(i < 0) {
+ *a = '-';
+ *i2a(-i, a+1, r) = 0;
+ }
+ else *i2a(i, a, r) = 0;
+ return a;
+}
+
+#endif /* !WIN32 */
+
+/* ----------------------------------------------------------------------- */
+
+opj_event_mgr_t* opj_set_event_mgr(opj_common_ptr cinfo, opj_event_mgr_t *event_mgr, void *context) {
+ if(cinfo) {
+ opj_event_mgr_t *previous = cinfo->event_mgr;
+ cinfo->event_mgr = event_mgr;
+ cinfo->client_data = context;
+ return previous;
+ }
+
+ return NULL;
+}
+
+bool opj_event_msg(opj_common_ptr cinfo, int event_type, const char *fmt, ...) {
+#define MSG_SIZE 512 /* 512 bytes should be more than enough for a short message */
+ opj_msg_callback msg_handler = NULL;
+
+ opj_event_mgr_t *event_mgr = cinfo->event_mgr;
+ if(event_mgr != NULL) {
+ switch(event_type) {
+ case EVT_ERROR:
+ msg_handler = event_mgr->error_handler;
+ break;
+ case EVT_WARNING:
+ msg_handler = event_mgr->warning_handler;
+ break;
+ case EVT_INFO:
+ msg_handler = event_mgr->info_handler;
+ break;
+ default:
+ break;
+ }
+ if(msg_handler == NULL) {
+ return false;
+ }
+ } else {
+ return false;
+ }
+
+ if ((fmt != NULL) && (event_mgr != NULL)) {
+ va_list arg;
+ int str_length, i, j;
+ char message[MSG_SIZE];
+ memset(message, 0, MSG_SIZE);
+ /* initialize the optional parameter list */
+ va_start(arg, fmt);
+ /* check the length of the format string */
+ str_length = (strlen(fmt) > MSG_SIZE) ? MSG_SIZE : strlen(fmt);
+ /* parse the format string and put the result in 'message' */
+ for (i = 0, j = 0; i < str_length; ++i) {
+ if (fmt[i] == '%') {
+ if (i + 1 < str_length) {
+ switch(tolower(fmt[i + 1])) {
+ case '%' :
+ message[j++] = '%';
+ break;
+ case 'o' : /* octal numbers */
+ {
+ char tmp[16];
+ _itoa(va_arg(arg, int), tmp, 8);
+ strcat(message, tmp);
+ j += strlen(tmp);
+ ++i;
+ break;
+ }
+ case 'i' : /* decimal numbers */
+ case 'd' :
+ {
+ char tmp[16];
+ _itoa(va_arg(arg, int), tmp, 10);
+ strcat(message, tmp);
+ j += strlen(tmp);
+ ++i;
+ break;
+ }
+ case 'x' : /* hexadecimal numbers */
+ {
+ char tmp[16];
+ _itoa(va_arg(arg, int), tmp, 16);
+ strcat(message, tmp);
+ j += strlen(tmp);
+ ++i;
+ break;
+ }
+ case 's' : /* strings */
+ {
+ char *tmp = va_arg(arg, char*);
+ strcat(message, tmp);
+ j += strlen(tmp);
+ ++i;
+ break;
+ }
+ case 'f' : /* floats */
+ {
+ char tmp[16];
+ double value = va_arg(arg, double);
+ sprintf(tmp, "%f", value);
+ strcat(message, tmp);
+ j += strlen(tmp);
+ ++i;
+ break;
+ }
+ };
+ } else {
+ message[j++] = fmt[i];
+ }
+ } else {
+ message[j++] = fmt[i];
+ };
+ }
+ /* deinitialize the optional parameter list */
+ va_end(arg);
+
+ /* output the message to the user program */
+ msg_handler(message, cinfo->client_data);
+ }
+
+ return true;
+}
+