OSDN Git Service

* Added New Features.
[modchxj/mod_chxj.git] / src / chxj_img_conv_format.c
index 79402f0..5063a66 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * Copyright (C) 2005-2008 Atsushi Konno All rights reserved.
+ * Copyright (C) 2005-2009 Atsushi Konno All rights reserved.
  * Copyright (C) 2005 QSDN,Inc. All rights reserved.
  *
  * Licensed under the Apache License, Version 2.0 (the "License");
@@ -15,6 +15,7 @@
  * limitations under the License.
  */
 #include <libgen.h>
+#include <limits.h>
 #include "mod_chxj.h"
 #include "chxj_img_conv_format.h"
 #include "chxj_specified_device.h"
@@ -23,8 +24,7 @@
 #include "chxj_apply_convrule.h"
 #include "chxj_url_encode.h"
 #include "qs_parse_string.h"
-
-#include <limits.h>
+#include "chxj_preg_replace.h"
 
 #include "http_core.h"
 
@@ -38,7 +38,7 @@
     ap_log_rerror(APLOG_MARK,APLOG_DEBUG, 0, r,"%s %s %d %s\n",__FILE__,(__func__),__LINE__,description); \
     description=(char *) MagickRelinquishMemory(description); \
     DestroyMagickWand(magick_wand); \
-  }while(1
+  } while(0
 
 typedef enum img_conv_mode_t {
   IMG_CONV_MODE_NORMAL = 0,
@@ -94,7 +94,6 @@ static device_table v_ignore_spec = {
   96,
   65536,
   NULL,
-  "SJIS",
 };
 
 /*----------------------------------------------------------------------------*/
@@ -138,14 +137,14 @@ static unsigned short  AU_CRC_TBL[256] = {
 /*----------------------------------------------------------------------------*/
 /* Download page for AU                                                       */
 /*----------------------------------------------------------------------------*/
-static const charHDML_FIRST_PAGE = 
+static const char *HDML_FIRST_PAGE = 
   "<HDML VERSION=3.0 TTL=0 PUBLIC=TRUE>\r\n"
   "  <NODISPLAY>\r\n"
   "    <ACTION TYPE=ACCEPT TASK=GOSUB DEST=\"device:data/dnld?url=%s&name=%s%s&size=%ld&disposition=%s&title=%s\">\r\n"
   "  </NODISPLAY>\r\n"
   "</HDML>\r\n";
 
-static const charHDML_SUCCESS_PAGE =
+static const char *HDML_SUCCESS_PAGE =
   "<HDML VERSION=3.0 TTL=0 PUBLIC=TRUE>\r\n"
   "  <DISPLAY>\r\n"
   "    <ACTION TYPE=ACCEPT TASK=RETURN>\r\n"
@@ -153,7 +152,7 @@ static const char* HDML_SUCCESS_PAGE =
   "  </DISPLAY>\r\n"
   "<HDML>\r\n";
 
-static const charHDML_FAIL_PAGE =
+static const char *HDML_FAIL_PAGE =
   "<HDML VERSION=3.0 TTL=0 PUBLIC=TRUE>\r\n"
   "  <DISPLAY>\r\n"
   "    <ACTION TYPE=ACCEPT TASK=RETURN>\r\n"
@@ -161,28 +160,33 @@ static const char* HDML_FAIL_PAGE =
   "  </DISPLAY>\r\n"
   "<HDML>\r\n";
 
+static ap_regex_t *v_docomo_serial_pattern1 = NULL;
+static ap_regex_t *v_docomo_serial_pattern2 = NULL;
+static ap_regex_t *v_docomo_serial_pattern3 = NULL;
+static ap_regex_t *v_softbank_serial_pattern1 = NULL;
+
 /*----------------------------------------------------------------------------*/
 /* Prototype declaration                                                      */
 /*----------------------------------------------------------------------------*/
-static char *s_create_workfile(request_rec *, 
-                               mod_chxj_config *, 
-                               const char *,
-                               query_string_param_t *);
-
-static apr_status_t s_create_cache_file(request_rec  *r, 
-                                        const char   *tmpfile, 
-                                        device_table *spec,
-                                        apr_finfo_t  *st,
-                                        query_string_param_tqsp,
-                                        mod_chxj_config       *conf);
-
-static apr_status_t s_send_cache_file(  device_table          *spec,
-                                        query_string_param_t  *query_string,
-                                        request_rec           *r,
-                                        const char            *tmpfile);
-
-static apr_status_t s_send_original_file(request_rec* r,
-                                         const charoriginalfile);
+static char *s_create_workfile_name(request_rec *, 
+                                    mod_chxj_config *, 
+                                    const char *,
+                                    query_string_param_t *);
+
+static apr_status_t s_create_cache_file(request_rec          *r, 
+                                        const char           *tmpfile, 
+                                        device_table         *spec,
+                                        apr_finfo_t          *st,
+                                        query_string_param_t *qsp,
+                                        mod_chxj_config      *conf);
+
+static apr_status_t s_send_cache_file(device_table          *spec,
+                                      query_string_param_t  *query_string,
+                                      request_rec           *r,
+                                      const char            *tmpfile);
+
+static apr_status_t s_send_original_file(request_rec *r, 
+                                         const char  *originalfile);
 
 static apr_status_t s_header_only_cache_file(device_table         *spec, 
                                              query_string_param_t *query_string, 
@@ -191,11 +195,10 @@ static apr_status_t s_header_only_cache_file(device_table         *spec,
 
 static query_string_param_t *s_get_query_string_param(request_rec *r);
 
-static unsigned short s_add_crc(const char *writedata, 
-                                apr_size_t witebyte);
+static unsigned short s_add_crc(const char *writedata, apr_size_t witebyte);
 
-static MagickWand *s_fixup_size(MagickWand *, 
-                                request_rec *r, 
+static MagickWand *s_fixup_size(MagickWand   *, 
+                                request_rec  *r, 
                                 device_table *spec, 
                                 query_string_param_t *qsp);
 
@@ -203,26 +206,30 @@ static MagickWand *s_fixup_color(MagickWand *magick_wand,
                                  request_rec *r, 
                                  device_table *spec, 
                                  img_conv_mode_t mode);
-static MagickWand *s_fixup_depth(MagickWand *magick_wand, 
-                                 request_rec *r, device_table *spec);
+static MagickWand *s_fixup_depth(MagickWandmagick_wand, 
+                                 request_rec* r, device_table* spec);
 static MagickWand *s_img_down_sizing(MagickWand *magick_wand, 
                                 request_rec *r, device_table *spec);
 
-static MagickWand *s_add_copyright(MagickWand    *magick_wand,
-                                   request_rec   *r,
-                                   device_table  *spec);
+static MagickWand *s_add_copyright(MagickWand *magick_wand,
+                                   request_rec *r,
+                                   device_table *spec);
 
-static char *s_create_blob_data(request_rec           *r,
-                                device_table          *spec,
-                                query_string_param_t  *qsp,
-                                char                  *indata,
-                                apr_size_t            *len);
+static char *s_create_blob_data(request_rec *r,
+                                device_table *spec,
+                                query_string_param_t *qsp,
+                                char *indata,
+                                apr_size_t *len);
 
-static int s_img_conv_format_from_file(request_rec           *r, 
-                                       mod_chxj_config       *conf, 
-                                       const char            *user_agent,
-                                       query_string_param_t  *qsp,
-                                       device_table          *spec);
+static int s_img_conv_format_from_file(request_rec          *r, 
+                                       mod_chxj_config      *conf, 
+                                       const char           *user_agent,
+                                       query_string_param_t *qsp,
+                                       device_table         *spec);
+static int s_convert_to_jpeg(MagickWand *magick_wand, request_rec *r, device_table *spec);
+static int s_convert_to_png(MagickWand *maigck_wand, request_rec *r, device_table *spec);
+static int s_convert_to_gif(MagickWand *magick_wand, request_rec *r, device_table *spec);
+static int s_convert_to_bmp(MagickWand *magick_wand, request_rec *r, device_table *spec);
 
 
 
@@ -237,25 +244,22 @@ chxj_img_conv_format_handler(request_rec *r)
 
   DBG(r, "start chxj_img_conv_format_handler()");
   
-  if ((*r->handler != 'c' && *r->handler != 'C') 
-  ||  (strcasecmp(r->handler, "chxj-picture")
-  &&  strcasecmp(r->handler, "chxj-qrcode"))) {
+  if (r->handler && !STRCASEEQ('c','C',"chxj-picture",r->handler) && !STRCASEEQ('c','C',"chxj-qrcode",r->handler)) {
     DBG(r, "end chxj_img_conv_format_handler()");
     return DECLINED;
   }
 
   qsp = s_get_query_string_param(r);
-  conf = ap_get_module_config(r->per_dir_config, &chxj_module);
+  conf = chxj_get_module_config(r->per_dir_config, &chxj_module);
   if (conf == NULL) {
     DBG(r, "end chxj_img_conv_format_handler() conf is null");
     return DECLINED;
   }
 
-  if (strcasecmp(r->handler, "chxj-qrcode") == 0 &&  conf->image == CHXJ_IMG_OFF) {
+  if (STRCASEEQ('c','C',"chxj-qrcode",r->handler) && conf->image == CHXJ_IMG_OFF) {
     return DECLINED;
   }
 
-
   /*------------------------------------------------------------------------*/
   /* get UserAgent from http header                                         */
   /*------------------------------------------------------------------------*/
@@ -285,10 +289,6 @@ chxj_img_conv_format_handler(request_rec *r)
   DBG(r,"found device_name=[%s]", spec->device_name);
   DBG(r,"User-Agent=[%s]", user_agent);
 
-#if 0
-  if (spec->width == 0 || spec->heigh == 0)
-    return DECLINED;
-#endif
 
   return s_img_conv_format_from_file(r, conf, user_agent, qsp, spec);
 }
@@ -315,7 +315,7 @@ chxj_convert_image(request_rec *r, const char **src, apr_size_t *len)
 
   DBG(r, "start chxj_convert_image()");
 
-  conv_check = (char *)apr_table_get(r->headers_in, "CHXJ_IMG_CONV");
+  conv_check = (char*)apr_table_get(r->headers_in, "CHXJ_IMG_CONV");
   if (conv_check) {
     DBG(r, "end chxj_exchnage_image() already convert.");
     return NULL;
@@ -323,7 +323,7 @@ chxj_convert_image(request_rec *r, const char **src, apr_size_t *len)
 
 
   qsp = s_get_query_string_param(r);
-  conf = ap_get_module_config(r->per_dir_config, &chxj_module);
+  conf = chxj_get_module_config(r->per_dir_config, &chxj_module);
   if (conf == NULL) {
     DBG(r, "end chxj_convert_image()");
     return NULL;
@@ -365,13 +365,14 @@ chxj_convert_image(request_rec *r, const char **src, apr_size_t *len)
   return dst;
 }
 
+
 static int
 s_img_conv_format_from_file(
-                request_rec           *r, 
-                mod_chxj_config       *conf, 
-                const char            *user_agent,
-                query_string_param_t  *qsp,
-                device_table          *spec)
+                request_rec          *r, 
+                mod_chxj_config      *conf, 
+                const char           *user_agent,
+                query_string_param_t *qsp,
+                device_table         *spec)
 {
   apr_status_t   rv;
   apr_finfo_t    st;
@@ -380,8 +381,8 @@ s_img_conv_format_from_file(
   int            try_count;
 
   if (spec->html_spec_type == CHXJ_SPEC_UNKNOWN) {
-    /*
-     * If ``ua'' parameter is specified, it must be CHXJ_SPEC_HTML.
+    /* 
+     * If ``ua'' parameter is specified, it must be CHXJ_SPEC_HTML. 
      */
     return s_send_original_file(r, r->filename);
   }
@@ -389,17 +390,18 @@ s_img_conv_format_from_file(
   /*--------------------------------------------------------------------------*/
   /* Create Workfile Name                                                     */
   /*--------------------------------------------------------------------------*/
-  tmpfile = s_create_workfile(r, conf, user_agent, qsp);
+  tmpfile = s_create_workfile_name(r, conf, user_agent, qsp);
   DBG(r,"workfile=[%s]", tmpfile);
 
   rv = apr_stat(&st, r->filename, APR_FINFO_MIN, r->pool);
   if (rv != APR_SUCCESS)
     return HTTP_NOT_FOUND;
 
+  apr_table_setn(r->headers_in, "CHXJ_IMG_CONV", "done");
   try_count = CACHE_RETRY_COUNT;
   do {
     rv = apr_stat(&cache_st, tmpfile, APR_FINFO_MIN, r->pool);
-
+  
     if (rv != APR_SUCCESS || cache_st.ctime < st.mtime) {
       /*------------------------------------------------------------------------*/
       /* It tries to make the cash file when it doesn't exist or there is       */
@@ -409,7 +411,7 @@ s_img_conv_format_from_file(
       if (rv != OK)
         return rv;
     }
-
+  
     DBG(r,"color=[%d]", spec->color);
     if (! r->header_only)  {
       rv = s_send_cache_file(spec, qsp,r, tmpfile);
@@ -422,12 +424,11 @@ s_img_conv_format_from_file(
       DBG(r, "recheck wait... try_count[%d]", try_count);
       apr_sleep(CACHE_RECHECK_WAIT);
     }
-  } while (try_count--);
+  } while (try_count--); 
   if (try_count <= 0) {
     WRN(r, "cache retry failure....");
     WRN(r, "cache file was deleted...");
   }
-  apr_table_setn(r->headers_in, "CHXJ_IMG_CONV", "done");
 
   DBG(r,"end chxj_img_conv_format");
 
@@ -449,20 +450,19 @@ s_create_cache_file(request_rec          *r,
   unsigned short     crc;
   img_conv_mode_t    mode = qsp->mode;
 
-  char               *writedata = NULL;
-  char               *readdata  = NULL;
-
-  apr_file_t         *fout;
-  apr_file_t         *fin;
+  char *writedata = NULL;
+  char *readdata  = NULL;
 
-  MagickWand         *magick_wand;
+  apr_file_t  *fout;
+  apr_file_t  *fin;
+  apr_finfo_t cache_dir_st;
 
-  apr_finfo_t        cache_dir_st;
+  MagickWand *magick_wand;
+  int        img_count;
 
-  if ((*r->handler == 'c' || *r->handler == 'C') 
-      &&  strcasecmp(r->handler, "chxj-qrcode") == 0) {
+  if (STRCASEEQ('c','C',"chxj-qrcode",r->handler)) {
     /*------------------------------------------------------------------------*/
-    /* QRCODEÍѤΥե¡¥¤¥ë¤Î¾ì¹ç                                               */
+    /* QRCODE用のファイルの場合                                               */
     /*------------------------------------------------------------------------*/
     Doc       doc;
     Node      *root;
@@ -492,7 +492,7 @@ s_create_cache_file(request_rec          *r,
   }
   else {
     /*------------------------------------------------------------------------*/
-    /* Ä̾ï¤Î¥¤¥á¡¼¥¸¥Õ¥¡¥¤¥ë¤Î¾ì¹ç                                           */
+    /* 通常のイメージファイルの場合                                           */
     /*------------------------------------------------------------------------*/
     rv = apr_file_open(&fin, 
                     r->filename, 
@@ -522,15 +522,40 @@ s_create_cache_file(request_rec          *r,
     return HTTP_NOT_FOUND;
   }
 
+  /*------------------*/
+  /* for AnimationGIF */
+  /*------------------*/
+  img_count = MagickGetNumberImages(magick_wand);
+  DBG(r, "REQ[%X] img_count is [%d]", (unsigned int)(apr_size_t)r, img_count);
+  if (img_count > 1) {
+    MagickSetImageIndex(magick_wand, 0);
+    MagickWand *magick_wand2 = MagickGetImage(magick_wand);
+    DestroyMagickWand(magick_wand);
+    magick_wand = magick_wand2;
+  }
+
+  if (MagickStripImage(magick_wand) == MagickFalse) {
+    ERR(r, "mod_chxj: strip image failure.");
+    EXIT_MAGICK_ERROR();
+    return HTTP_NOT_FOUND;
+  }
+
   if (spec->html_spec_type != CHXJ_SPEC_UNKNOWN) {
-    /*
-     * The size of the image is changed.
-     */
-    DBG(r,"call s_fixup_size()");
-  
-    if ((magick_wand = s_fixup_size(magick_wand, r, spec, qsp)) == NULL) 
-      return HTTP_NOT_FOUND;
+    int oldw = MagickGetImageWidth(magick_wand);
+    int oldh = MagickGetImageHeight(magick_wand);
+    int done_fixup_size = 0;
+    if ((qsp->mode == IMG_CONV_MODE_WALLPAPER && spec->wp_width < oldw && spec->wp_heigh < oldh)
+      || (qsp->mode != IMG_CONV_MODE_WALLPAPER && spec->width < oldw && spec->heigh < oldh)) {
+      /*
+       * The size of the image is changed.
+       */
+      DBG(r,"call s_fixup_size()");
   
+      if ((magick_wand = s_fixup_size(magick_wand, r, spec, qsp)) == NULL) 
+        return HTTP_NOT_FOUND;
+
+      done_fixup_size = 1;
+    }
     /*
      * The colors of the image is changed.
      */
@@ -548,104 +573,69 @@ s_create_cache_file(request_rec          *r,
       return HTTP_NOT_FOUND;
   
   
-  
-    DBG(r,"start convert and compression");
-  
-    if (spec->available_jpeg) {
-      if (MagickSetImageCompression(magick_wand,JPEGCompression) == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
-      }
-  
-      if (MagickSetImageFormat(magick_wand, "jpg") == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
-      }
-  
-      if (MagickStripImage(magick_wand) == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
-      }
-  
-      if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL)
+    if (! done_fixup_size) {
+      /*
+       * The size of the image is changed.
+       */
+      DBG(r,"call s_fixup_size()");
+      if ((magick_wand = s_fixup_size(magick_wand, r, spec, qsp)) == NULL) 
         return HTTP_NOT_FOUND;
-  
-      r->content_type = apr_psprintf(r->pool, "image/jpeg");
-      DBG(r,"convert to jpg");
     }
-    else
-    if (spec->available_png) {
-  
-      if (MagickSetImageCompression(magick_wand,ZipCompression) == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
+
+    char *nowFormat = MagickGetImageFormat(magick_wand);
+    int fixFormatFlag = 0;
+    if (nowFormat) {
+      if (STRCASEEQ('g','G',"gif",nowFormat)) {
+        if (spec->available_gif) {
+          if (s_convert_to_gif(magick_wand, r, spec)) {
+            return HTTP_NOT_FOUND;
+          }
+          fixFormatFlag = 1;
+        }
       }
-  
-      if (MagickSetImageFormat(magick_wand, "png") == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
+      else if (STRCASEEQ('j','J',"jpg",nowFormat)||STRCASEEQ('j','J',"jpeg",nowFormat)) {
+        if (spec->available_jpeg) {
+          if (s_convert_to_jpeg(magick_wand, r, spec)) {
+            return HTTP_NOT_FOUND;
+          }
+          fixFormatFlag = 1;
+        }
       }
-  
-      if (MagickStripImage(magick_wand) == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
+      else if (STRCASEEQ('p','P',"png",nowFormat)) {
+        if (spec->available_png) {
+          if (s_convert_to_png(magick_wand, r, spec)) {
+            return HTTP_NOT_FOUND;
+          }
+          fixFormatFlag = 1;
+        }
       }
-  
-      if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL) 
-        return HTTP_NOT_FOUND;
-  
-      r->content_type = apr_psprintf(r->pool, "image/png");
-      DBG(r, "convert to png");
     }
-    else
-    if (spec->available_gif) {
-  
-      if (MagickSetImageCompression(magick_wand,LZWCompression) == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
-      }
-  
-      if (MagickSetImageFormat(magick_wand, "gif") == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
-      }
+
+    DBG(r,"start convert and compression");
   
-      if (MagickStripImage(magick_wand) == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
+    if (! fixFormatFlag) {
+      if (spec->available_jpeg) {
+        if (s_convert_to_jpeg(magick_wand, r, spec)) {
+          return HTTP_NOT_FOUND;
+        }
       }
-  
-      if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL) 
-        return HTTP_NOT_FOUND;
-  
-      r->content_type = apr_psprintf(r->pool, "image/gif");
-  
-      DBG(r,"convert to gif");
-    }
-    else
-    if (spec->available_bmp2 || spec->available_bmp4) {
-  
-      if (MagickSetImageCompression(magick_wand,NoCompression) == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
+      else if (spec->available_gif) {
+        if (s_convert_to_gif(magick_wand, r, spec)) {
+          return HTTP_NOT_FOUND;
+        }  
       }
+      else if (spec->available_png) {
+        if (s_convert_to_png(magick_wand, r, spec)) {
+          return HTTP_NOT_FOUND;
+        }  
   
-      if (MagickSetImageFormat(magick_wand, "bmp") == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
       }
-  
-      if (MagickStripImage(magick_wand) == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return HTTP_NOT_FOUND;
+      else
+      if (spec->available_bmp2 || spec->available_bmp4) { 
+        if (s_convert_to_bmp(magick_wand, r, spec)) {
+          return HTTP_NOT_FOUND;
+        }
       }
-  
-      if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL) 
-        return HTTP_NOT_FOUND;
-  
-      r->content_type = apr_psprintf(r->pool, "image/bmp");
-  
-      DBG(r, "convert to bmp(unsupported)");
     }
   
     /*
@@ -657,7 +647,7 @@ s_create_cache_file(request_rec          *r,
       return HTTP_NOT_FOUND;
   }
   else {
-    char *fmt;
+    charfmt;
     fmt = MagickGetImageFormat(magick_wand);
     if (fmt == NULL) {
       if (MagickSetImageFormat(magick_wand, "jpg") == MagickFalse) {
@@ -686,7 +676,7 @@ s_create_cache_file(request_rec          *r,
     }
   }
 
-  writedata = (char *)MagickGetImageBlob(magick_wand, &writebyte);
+  writedata = (char*)MagickGetImageBlob(magick_wand, &writebyte);
 
   if (! writebyte) {
     DestroyMagickWand(magick_wand);
@@ -696,13 +686,13 @@ s_create_cache_file(request_rec          *r,
   }
 
   DBG(r, "end convert and compression");
-
+  
   /* check limit */
-  /* XXX:START - I will rewrite it when leaving. */
   rv = apr_stat(&cache_dir_st, conf->image_cache_dir, APR_FINFO_MIN, r->pool);
   if (rv != APR_SUCCESS) {
     DestroyMagickWand(magick_wand);
     ERR(r,"dir stat error.[%s]", conf->image_cache_dir);
+    if (writedata) free(writedata);
     return HTTP_INTERNAL_SERVER_ERROR;
   }
   
@@ -715,12 +705,12 @@ s_create_cache_file(request_rec          *r,
     int found_file = 0;
     unsigned long max_size = (! conf->image_cache_limit) ? DEFAULT_IMAGE_CACHE_LIMIT : conf->image_cache_limit;
     char *delete_file_name;
-    DBG(r, "conf->image_cache_limit:[%lu] max_size:[%lu]", conf->image_cache_limit, max_size);
 
     rv = apr_dir_open(&dir, conf->image_cache_dir, r->pool);
     if (rv != APR_SUCCESS) { 
       DestroyMagickWand(magick_wand);
       ERR(r,"dir open error.[%s]", conf->image_cache_dir);
+      if (writedata) free(writedata);
       return HTTP_INTERNAL_SERVER_ERROR;
     }
     memset(&dcf, 0, sizeof(apr_finfo_t));
@@ -733,8 +723,7 @@ s_create_cache_file(request_rec          *r,
       }
       if (dirf.name && strcmp(dirf.name, ".") != 0 && strcmp(dirf.name, "..") != 0) {
         total_size += (unsigned long)dirf.size;
-        DBG(r, "dirf.name=[%s] dirf.size=[%ld] dirf.atime=[%lld]", 
-               dirf.name, (long)dirf.size, (long long int)dirf.atime);
+        DBG(r, "dirf.name=[%s] dirf.size=[%ld] dirf.atime=[%lld]", dirf.name, (long)dirf.size, (long long int)dirf.atime);
         if (dcf.atime >= dirf.atime) {
           memcpy(&dcf, &dirf, sizeof(apr_finfo_t));
         }
@@ -747,21 +736,22 @@ s_create_cache_file(request_rec          *r,
       break;
     }
     if (found_file == 0 && writebyte >= max_size) {
-      ERR(r, "================================================");
+      ERR(r, "==========================================");
       ERR(r, "cache space is too small...");
-      ERR(r, "At least the same size as %luByte is necessary for me.", (unsigned long)writebyte);
+      ERR(r, "At least the same size as %luByte is necessary for me.", (unsigned long)writebyte); 
       ERR(r, "Please specify the ChxjImageCacheLimit that is larger than now value. ");
-      ERR(r, "================================================");
+      ERR(r, "==========================================");
+      if (writedata) free(writedata);
       return HTTP_INTERNAL_SERVER_ERROR;
     }
-    DBG(r, "Image Cache dir is full. total_size:[%lu] max_size:[%lu]", 
-           total_size + writebyte, max_size);
+    DBG(r, "Image Cache dir is full. total_size:[%lu] max_size:[%lu]", total_size + writebyte, max_size);
     /* search delete candidate */
     delete_file_name = apr_psprintf(r->pool, "%s/%s", conf->image_cache_dir, dcf.name);
-    DBG(r, "delete image cache target:[%s] atime:[%lld]", delete_file_name, dcf.atime);
+    DBG(r, "delete image cache target:[%s] atime:[%lld]", delete_file_name, (long long int)dcf.atime);
     rv = apr_file_remove(delete_file_name, r->pool);
     if (rv != APR_SUCCESS) {
       ERR(r, "cache file delete failure.[%s]", delete_file_name);
+      if (writedata) free(writedata);
       return HTTP_INTERNAL_SERVER_ERROR;
     }
     DBG(r, "deleted image cache target:[%s]", delete_file_name);
@@ -770,8 +760,7 @@ s_create_cache_file(request_rec          *r,
       break;
     }
   }
-  /* XXX:END - I will rewrite it when leaving. */
-  
+
   /* to cache */
   rv = apr_file_open(&fout, tmpfile,
                   APR_WRITE| APR_CREATE | APR_BINARY | APR_SHARELOCK ,APR_OS_DEFAULT,
@@ -779,6 +768,7 @@ s_create_cache_file(request_rec          *r,
   if (rv != APR_SUCCESS) {
     DestroyMagickWand(magick_wand);
     ERR(r,"file open error.[%s]", tmpfile);
+    if (writedata) free(writedata);
     return HTTP_INTERNAL_SERVER_ERROR;
   }
 
@@ -786,6 +776,7 @@ s_create_cache_file(request_rec          *r,
   if (rv != APR_SUCCESS) {
     DestroyMagickWand(magick_wand);
     apr_file_close(fout);
+    if (writedata) free(writedata);
     return HTTP_INTERNAL_SERVER_ERROR;
   }
 
@@ -800,17 +791,20 @@ s_create_cache_file(request_rec          *r,
     rv = apr_file_putc((crc >> 8)  & 0xff, fout);
     if (rv != APR_SUCCESS) {
       DestroyMagickWand(magick_wand);
+      if (writedata) free(writedata);
       return HTTP_INTERNAL_SERVER_ERROR;
     }
 
     rv = apr_file_putc( crc        & 0xff, fout);
     if (rv != APR_SUCCESS) {
       DestroyMagickWand(magick_wand);
+      if (writedata) free(writedata);
       return HTTP_INTERNAL_SERVER_ERROR;
     }
   }
 
   DestroyMagickWand(magick_wand);
+  if (writedata) free(writedata);
 
   rv = apr_file_close(fout);
   if (rv != APR_SUCCESS) {
@@ -822,154 +816,251 @@ s_create_cache_file(request_rec          *r,
 }
 
 
-static char *
-s_create_blob_data(request_rec   *r, 
-                   device_table  *spec, 
-                   query_string_param_t *qsp,
-                   char        *indata,
-                   apr_size_t  *len)
+static int
+s_convert_to_jpeg(MagickWand *magick_wand, request_rec *r, device_table *spec) 
 {
-  apr_size_t         writebyte;
-  unsigned short     crc;
-  img_conv_mode_t    mode = qsp->mode;
+  if (MagickSetImageCompression(magick_wand,JPEGCompression) == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
+  }
+  
+  if (MagickSetImageFormat(magick_wand, "jpg") == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
+  }
+  
+  if (MagickStripImage(magick_wand) == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
+  }
+  
+  if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL)
+    return -1;
+  
+  r->content_type = apr_psprintf(r->pool, "image/jpeg");
+  ap_set_content_type(r, "image/jpeg");
+  DBG(r,"convert to jpg");
+  return 0;
+}
 
-  char               *writedata = NULL;
-  char               *dst       = NULL;
 
-  MagickWand         *magick_wand;
+static int
+s_convert_to_png(MagickWand *magick_wand, request_rec *r, device_table *spec)
+{
+  if (MagickSetImageCompression(magick_wand,ZipCompression) == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
+  }
+  
+  if (MagickSetImageFormat(magick_wand, "png") == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
+  }
+  
+  if (MagickStripImage(magick_wand) == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
+  }
+  
+  if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL) 
+    return -1;
+  
+  r->content_type = apr_psprintf(r->pool, "image/png");
+  ap_set_content_type(r, "image/png");
+  DBG(r, "convert to png");
+  return 0;
+}
 
-  magick_wand = NewMagickWand();
 
-  if (MagickReadImageBlob(magick_wand,indata, *len) == MagickFalse) {
-    ERR(r,"MagickReadImageBlob failure. indata[%s] len[%d]", indata, *len);
+static int
+s_convert_to_gif(MagickWand *magick_wand, request_rec *r, device_table *spec)
+{
+  if (MagickSetImageCompression(magick_wand,LZWCompression) == MagickFalse) {
     EXIT_MAGICK_ERROR();
-    return NULL;
+    return -1;
+  }
+  
+  if (MagickSetImageFormat(magick_wand, "gif") == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
+  }
+  
+  if (MagickStripImage(magick_wand) == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
   }
+  
+  if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL) 
+    return -1;
+  
+  r->content_type = apr_psprintf(r->pool, "image/gif");
+  ap_set_content_type(r, "image/gif");
+  
+  DBG(r,"convert to gif");
+  return 0;
+}
 
-  /*
-   * The size of the image is changed.
-   */
-  DBG(r, "call s_fixup_size()");
 
-  if ((magick_wand = s_fixup_size(magick_wand, r, spec, qsp)) == NULL)
-    return NULL;
+static int
+s_convert_to_bmp(MagickWand *magick_wand, request_rec *r, device_table *spec)
+{
+  if (MagickSetImageCompression(magick_wand,NoCompression) == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
+  }
+  
+  if (MagickSetImageFormat(magick_wand, "bmp") == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
+  }
+  
+  if (MagickStripImage(magick_wand) == MagickFalse) {
+    EXIT_MAGICK_ERROR();
+    return -1;
+  }
+  
+  if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL) 
+    return -1;
+  
+  r->content_type = apr_psprintf(r->pool, "image/bmp");
+  ap_set_content_type(r, "image/bmp");
+  
+  DBG(r, "convert to bmp(unsupported)");
+  return 0;
+}
 
-  /*
-   * The colors of the image is changed.
-   */
-  DBG(r, "call s_fixup_color()");
 
-  if ((magick_wand = s_fixup_color(magick_wand, r,spec, mode)) == NULL)
-    return NULL;
+static char *
+s_create_blob_data(request_rec          *r, 
+                   device_table         *spec, 
+                   query_string_param_t *qsp,
+                   char                 *indata,
+                   apr_size_t           *len)
+{
+  apr_size_t         writebyte;
+  unsigned short     crc;
+  img_conv_mode_t    mode = qsp->mode;
 
-  /*
-   * DEPTH of the image is changed.
-   */
+  char *writedata = NULL;
+  char *dst       = NULL;
+  MagickWand *magick_wand;
 
-  DBG(r,"call s_fixup_depth()");
+  magick_wand = NewMagickWand();
 
-  if ((magick_wand = s_fixup_depth(magick_wand, r, spec)) == NULL)
+  if (MagickReadImageBlob(magick_wand,indata, *len) == MagickFalse) {
+    EXIT_MAGICK_ERROR();
     return NULL;
+  }
 
+  if (MagickStripImage(magick_wand) == MagickFalse) {
+    ERR(r, "mod_chxj: strip image failure.");
+    EXIT_MAGICK_ERROR();
+    return NULL;
+  }
 
+  {
+    int oldw = MagickGetImageWidth(magick_wand);
+    int oldh = MagickGetImageHeight(magick_wand);
+    int done_fixup_size = 0;
+    if ((qsp->mode == IMG_CONV_MODE_WALLPAPER && spec->wp_width < oldw && spec->wp_heigh < oldh)
+      || (qsp->mode != IMG_CONV_MODE_WALLPAPER && spec->width < oldw && spec->heigh < oldh)) {
+      /*
+       * The size of the image is changed.
+       */
+      DBG(r,"call s_fixup_size()");
 
-  DBG(r,"start convert and compression");
-
-  if (spec->available_jpeg) {
-    if (MagickSetImageCompression(magick_wand,JPEGCompression) == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
-    }
+      if ((magick_wand = s_fixup_size(magick_wand, r, spec, qsp)) == NULL) {
+        EXIT_MAGICK_ERROR();
+        return NULL;
+      }
 
-    if (MagickSetImageFormat(magick_wand, "jpg") == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
+      done_fixup_size = 1;
     }
+    /*
+     * The colors of the image is changed.
+     */
+    DBG(r,"call s_fixup_color()");
 
-    if (MagickStripImage(magick_wand) == MagickFalse) {
+    if ((magick_wand = s_fixup_color(magick_wand, r,spec, mode)) == NULL) {
       EXIT_MAGICK_ERROR();
       return NULL;
     }
 
-    if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL)
-      return NULL;
-
-    r->content_type = apr_psprintf(r->pool, "image/jpeg");
+    /*
+     * DEPTH of the image is changed.
+     */
+    DBG(r,"call s_fixup_depth()");
 
-    DBG(r, "convert to jpg");
-  }
-  else
-  if (spec->available_png) {
-    if (MagickSetImageCompression(magick_wand,ZipCompression) == MagickFalse) {
+    if ((magick_wand = s_fixup_depth(magick_wand, r, spec)) == NULL) {
       EXIT_MAGICK_ERROR();
       return NULL;
     }
 
-    if (MagickSetImageFormat(magick_wand, "png") == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
-    }
 
-    if (MagickStripImage(magick_wand) == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
+    if (! done_fixup_size) {
+      /*
+       * The size of the image is changed.
+       */
+      DBG(r,"call s_fixup_size()");
+      if ((magick_wand = s_fixup_size(magick_wand, r, spec, qsp)) == NULL) {
+        EXIT_MAGICK_ERROR();
+        return NULL;
+      }
     }
-
-    if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL)
-      return NULL;
-
-    r->content_type = apr_psprintf(r->pool, "image/png");
-
-    DBG(r,"convert to png");
   }
-  else
-  if (spec->available_gif) {
 
-    if (MagickSetImageCompression(magick_wand,LZWCompression) == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
+  char *nowFormat = MagickGetImageFormat(magick_wand);
+  int fixFormatFlag = 0;
+  if (nowFormat) {
+    if (STRCASEEQ('g','G',"gif",nowFormat)) {
+      if (spec->available_gif) {
+        if (s_convert_to_gif(magick_wand, r, spec)) {
+          return NULL;
+        }
+        fixFormatFlag = 1;
+      }
     }
-
-    if (MagickSetImageFormat(magick_wand, "gif") == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
+    else if (STRCASEEQ('j','J',"jpg",nowFormat)||STRCASEEQ('j','J',"jpeg",nowFormat)) {
+      if (spec->available_jpeg) {
+        if (s_convert_to_jpeg(magick_wand, r, spec)) {
+          return NULL;
+        }
+        fixFormatFlag = 1;
+      }
     }
-
-    if (MagickStripImage(magick_wand) == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
+    else if (STRCASEEQ('p','P',"png",nowFormat)) {
+      if (spec->available_png) {
+        if (s_convert_to_png(magick_wand, r, spec)) {
+          return NULL;
+        }
+        fixFormatFlag = 1;
+      }
     }
+  }
 
-    if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL)
-      return NULL;
-
-    r->content_type = apr_psprintf(r->pool, "image/gif");
+  DBG(r,"start convert and compression");
 
-    DBG(r,"convert to gif");
-  }
-  else
-  if (spec->available_bmp2 || spec->available_bmp4) {
-    if (MagickSetImageCompression(magick_wand,NoCompression) == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
+  if (!fixFormatFlag) {
+    if (spec->available_jpeg) {
+      if (s_convert_to_jpeg(magick_wand, r, spec)) {
+        return NULL;
+      }
     }
-
-    if (MagickSetImageFormat(magick_wand, "bmp") == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
+    else if (spec->available_png) {
+      if (s_convert_to_png(magick_wand, r, spec)) {
+        return NULL;
+      }
     }
-
-    if (MagickStripImage(magick_wand) == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
+    else if (spec->available_gif) {
+      if (s_convert_to_gif(magick_wand, r, spec)) {
+        return NULL;
+      }
+    }
+    else if (spec->available_bmp2 || spec->available_bmp4) {
+      if (s_convert_to_bmp(magick_wand, r, spec)) {
+        return NULL;
+      }
     }
-
-    if ((magick_wand = s_img_down_sizing(magick_wand, r, spec)) == NULL)
-      return NULL;
-
-    r->content_type = apr_psprintf(r->pool, "image/bmp");
-
-    DBG(r,"convert to bmp(unsupported)");
   }
   /*--------------------------------------------------------------------------*/
   /* Add Comment (Copyright and so on.)                                       */
@@ -1013,9 +1104,9 @@ s_create_blob_data(request_rec   *r,
 
 
 static MagickWand *
-s_fixup_size(MagickWand *magick_wand, 
-             request_rec *r, 
-             device_table *spec, 
+s_fixup_size(MagickWand           *magick_wand, 
+             request_rec          *r, 
+             device_table         *spec, 
              query_string_param_t *qsp)
 {
   img_conv_mode_t mode = qsp->mode;
@@ -1095,6 +1186,9 @@ s_fixup_size(MagickWand *magick_wand,
     break;
   }
 
+  if (neww == 0) neww = 1;
+  if (newh == 0) newh = 1;
+
   if (spec->html_spec_type != CHXJ_SPEC_UNKNOWN) {
     DBG(r,"convert width=[%d --> %d]", oldw, neww);
     DBG(r,"convert heigh=[%d --> %d]", oldh, newh);
@@ -1173,6 +1267,13 @@ s_fixup_color(MagickWand *magick_wand, request_rec *r, device_table *spec, img_c
     return magick_wand;
   }
 
+  unsigned long colors = MagickGetImageColors(magick_wand);
+  DBG(r, "now color:[%ld] spec->color:[%ld]", colors, (unsigned long)spec->color);
+  if (colors < (unsigned long)spec->color) {
+    DBG(r, "Pass s_fixup_color proc. color:[%ld] spec->color:[%d]", colors, spec->color);
+    return magick_wand;
+  }
+
   if (spec->color >= 256) {
 
     DBG(r,"call MagickQuantizeImage() spec->color=[%d]",spec->color);
@@ -1278,7 +1379,7 @@ s_fixup_depth(MagickWand *magick_wand, request_rec *r, device_table *spec)
 static MagickWand *
 s_add_copyright(MagickWand *magick_wand, request_rec *r, device_table *spec)
 {
-  mod_chxj_config *conf = ap_get_module_config(r->per_dir_config, &chxj_module);
+  mod_chxj_config *conf = chxj_get_module_config(r->per_dir_config, &chxj_module);
 
   if (spec->html_spec_type == CHXJ_SPEC_UNKNOWN) {
     DBG(r, "Pass add_copiright proc");
@@ -1289,7 +1390,8 @@ s_add_copyright(MagickWand *magick_wand, request_rec *r, device_table *spec)
 
     DBG(r, "Add COPYRIGHT [%s]", conf->image_copyright);
 
-    if (spec->html_spec_type == CHXJ_SPEC_Jhtml) {
+    if (spec->html_spec_type == CHXJ_SPEC_Jhtml
+    ||  spec->html_spec_type == CHXJ_SPEC_Jxhtml) {
       apr_table_setn(r->headers_out, "x-jphone-copyright", "no-transfer");
       if (MagickCommentImage(magick_wand, 
                              apr_psprintf(r->pool, 
@@ -1325,57 +1427,68 @@ on_error:
   return NULL;
 }
 
-
 static MagickWand *
 s_img_down_sizing(MagickWand *magick_wand, request_rec *r, device_table *spec)
 {
   MagickBooleanType  status;
-  unsigned long quality = 70;
-  apr_size_t    writebyte = 0;
-  char          *writedata;
-  apr_size_t    prev_size = 0;
-  int           revers_flag = 0;
-
+  unsigned long      quality = 70;
+  apr_size_t         writebyte = 0;
+  char               *writedata;
+  apr_size_t         prev_size = 0;
+  int                revers_flag = 0;
+  char               *fmt;
+  int                fmt_type = 0;
+  
   writedata = (char *)MagickGetImageBlob(magick_wand, &writebyte);
   prev_size = writebyte;
 
-  do {
-    if (MagickSetImageCompressionQuality(magick_wand, quality) == MagickFalse) {
-      EXIT_MAGICK_ERROR();
-      return NULL;
-    }
-
-    writedata = (char *)MagickGetImageBlob(magick_wand, &writebyte);
-    if (writebyte >= prev_size || revers_flag) {
-      DBG(r, "quality=[%ld] size=[%d]", (long)quality, (int)writebyte);
-      revers_flag = 1;
-      quality += 10;
-      if (quality > 100) {
-        if (MagickSetImageCompression(magick_wand,NoCompression) == MagickFalse) {
-          EXIT_MAGICK_ERROR();
-          return NULL;
+  
+  fmt = MagickGetImageFormat(magick_wand);
+  if (fmt) {
+    if (STRCASEEQ('j','J',"jpg",fmt)) fmt_type = 1;
+    if (STRCASEEQ('p','P',"png",fmt)) fmt_type = 2;
+    if (STRCASEEQ('g','G',"gif",fmt)) fmt_type = 3;
+    if (STRCASEEQ('b','B',"bmp",fmt)) fmt_type = 4;
+  }
+  if (fmt_type == 1) {
+    do {
+      if (MagickSetImageCompressionQuality(magick_wand, quality) == MagickFalse) {
+        EXIT_MAGICK_ERROR();
+        return NULL;
+      }
+  
+      writedata = (char*)MagickGetImageBlob(magick_wand, &writebyte);
+      if (writebyte >= prev_size || revers_flag) {
+        DBG(r, "quality=[%ld] size=[%d]", (long)quality, (int)writebyte);
+        revers_flag = 1;
+        quality += 10;
+        if (quality > 100) {
+          if (MagickSetImageCompression(magick_wand,NoCompression) == MagickFalse) {
+            EXIT_MAGICK_ERROR();
+            return NULL;
+          }
+          break;
         }
-        break;
+        prev_size = writebyte;
+        continue;
       }
-      prev_size = writebyte;
-      continue;
+  
+      DBG(r, "quality=[%ld] size=[%d]", (long)quality, (int)writebyte);
+  
+      if (spec->cache == 0)
+        break;
+  
+      if (writebyte <= (unsigned int)spec->cache)
+        break;
+  
+      quality -= 10;
+  
+      if (quality == 0 || quality > 100)
+        break;
+  
     }
-
-    DBG(r, "quality=[%ld] size=[%d]", (long)quality, (int)writebyte);
-
-    if (spec->cache == 0)
-      break;
-
-    if (writebyte <= (unsigned int)spec->cache)
-      break;
-
-    quality -= 10;
-
-    if (quality == 0 || quality > 100)
-      break;
-
+    while (1);
   }
-  while (1);
 
 
   if (spec->cache > 0 
@@ -1400,6 +1513,7 @@ s_img_down_sizing(MagickWand *magick_wand, request_rec *r, device_table *spec)
 
       if (now_color <= 2) break;
 
+
       if (now_color >= 8) {
         status = MagickQuantizeImage(magick_wand,
                              now_color,
@@ -1421,12 +1535,12 @@ s_img_down_sizing(MagickWand *magick_wand, request_rec *r, device_table *spec)
         EXIT_MAGICK_ERROR();
         return NULL;
       }
-
-      if (MagickSetImageDepth(magick_wand, depth) == MagickFalse) {
-        EXIT_MAGICK_ERROR();
-        return NULL;
+      if (fmt_type != 2) {
+        if (MagickSetImageDepth(magick_wand, depth) == MagickFalse) {
+          EXIT_MAGICK_ERROR();
+          return NULL;
+        }
       }
-
       writedata = (char*)MagickGetImageBlob(magick_wand, &writebyte);
 
       DBG(r,"now_color=[%ld] size=[%d]", (long)now_color, (int)writebyte);
@@ -1440,12 +1554,9 @@ s_img_down_sizing(MagickWand *magick_wand, request_rec *r, device_table *spec)
   return magick_wand;
 }
 
+
 static apr_status_t 
-s_send_cache_file(
-  device_table *spec, 
-  query_string_param_t *query_string, 
-  request_rec *r, 
-  const char *tmpfile)
+s_send_cache_file(device_table *UNUSED(spec), query_string_param_t *query_string, request_rec *r, const char *tmpfile)
 {
   apr_status_t rv;
   apr_finfo_t  st;
@@ -1462,35 +1573,51 @@ s_send_cache_file(
   DBG(r, "offset:[%ld]", query_string->offset);
   DBG(r, "count:[%ld]",  query_string->count);
 
-  if (spec->available_jpeg) {
-    r->content_type = apr_psprintf(r->pool, "image/jpeg");
-  }
-  else
-  if (spec->available_png) {
-    r->content_type = apr_psprintf(r->pool, "image/png");
-  }
-  else
-  if (spec->available_gif) {
-    r->content_type = apr_psprintf(r->pool, "image/gif");
-  }
-  else
-  if (spec->available_bmp2 || spec->available_bmp4) {
-    r->content_type = apr_psprintf(r->pool, "image/bmp");
-  }
-
   if (query_string->mode != IMG_CONV_MODE_EZGET && query_string->name == NULL) {
     contentLength = apr_psprintf(r->pool, "%d", (int)st.size);
     apr_table_setn(r->headers_out, "Content-Length", (const char*)contentLength);
   
     DBG(r,"Content-Length:[%d]", (int)st.size);
-
+    MagickWand *magick_wand = NewMagickWand();
+    if (MagickReadImage(magick_wand,tmpfile) == MagickFalse) {
+      EXIT_MAGICK_ERROR();
+      return HTTP_NOT_FOUND;
+    }
+    if (MagickStripImage(magick_wand) == MagickFalse) {
+      ERR(r, "mod_chxj: strip image failure.");
+      EXIT_MAGICK_ERROR();
+      return HTTP_NOT_FOUND;
+    }
+    char *nowFormat = MagickGetImageFormat(magick_wand);
+    DestroyMagickWand(magick_wand);
+    if (nowFormat) {
+      if (STRCASEEQ('j','J',"jpeg",nowFormat) || STRCASEEQ('j','J',"jpg",nowFormat)) {
+        DBG(r, "detect cache file => jpg.");
+        ap_set_content_type(r, "image/jpeg");
+      }
+      else if (STRCASEEQ('p','P',"png", nowFormat)) {
+        DBG(r, "detect cache file => png.");
+        ap_set_content_type(r, "image/png");
+      }
+      else if (STRCASEEQ('g','G',"gif", nowFormat)) {
+        DBG(r, "detect cache file => gif.");
+        ap_set_content_type(r, "image/gif");
+      }
+      else if (STRCASEEQ('b','B',"bmp", nowFormat)) {
+        DBG(r, "detect cache file => bmp.");
+        ap_set_content_type(r, "image/bmp");
+      }
+      else {
+        ERR(r, "detect unknown file");
+        return HTTP_NOT_FOUND;
+      }
+    }
     rv = apr_file_open(&fout, tmpfile, 
       APR_READ | APR_BINARY, APR_OS_DEFAULT, r->pool);
     if (rv != APR_SUCCESS) {
-      DBG(r, "tmpfile open failed[%s]", tmpfile);
+      DBG(r, "cache file open failed[%s]", tmpfile);
       return HTTP_NOT_FOUND;
     }
-
     ap_send_fd(fout, r, 0, st.size, &sendbyte);
     apr_file_close(fout);
     ap_rflush(r);
@@ -1502,40 +1629,40 @@ s_send_cache_file(
     name[strlen(name)-4] = 0;
     if (strcasecmp(r->content_type, "image/jpeg") == 0) {
 
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
       ap_rprintf(r, HDML_FIRST_PAGE, r->uri, name, ".jpg", (long)st.size, "devjaww", name);
     }
     else
     if (strcasecmp(r->content_type, "image/bmp") == 0) {
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
       ap_rprintf(r, HDML_FIRST_PAGE, r->uri, name, ".bmp", (long)st.size, "devabm", name);
     }
     else
     if (strcasecmp(r->content_type, "image/png") == 0) {
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
       ap_rprintf(r, HDML_FIRST_PAGE, r->uri, name, ".png", (long)st.size, "dev8aww", name);
     }
     else
     if (strcasecmp(r->content_type, "image/gif") == 0) {
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
       ap_rprintf(r, HDML_FIRST_PAGE, r->uri, name, ".gif", (long)st.size, "devgi0z", name);
     }
   }
   else
   if (query_string->mode == IMG_CONV_MODE_WALLPAPER && query_string->name != NULL) {
     if (query_string->count == -1 && query_string->offset == -1) {
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
       ap_rprintf(r, HDML_SUCCESS_PAGE);
       ap_rflush(r);
     }
     else
     if (query_string->count == -2 && query_string->offset == -1) {
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
       ap_rprintf(r, HDML_FAIL_PAGE);
       ap_rflush(r);
     }
     else { 
-      ap_set_content_type(r, "application/x-up-download");
+      chxj_set_content_type(r, "application/x-up-download");
       contentLength = apr_psprintf(r->pool, "%ld", query_string->count);
       apr_table_setn(r->headers_out, "Content-Length", (const char*)contentLength);
   
@@ -1560,19 +1687,19 @@ s_send_cache_file(
 }
 
 
-static apr_status_t
-s_send_original_file(request_rec* r, const char* originalfile)
+static apr_status_t 
+s_send_original_file(request_rec *r, const char *originalfile)
 {
   apr_status_t rv;
   apr_finfo_t  st;
-  apr_file_t*  fout;
+  apr_file_t   *fout;
   apr_size_t   sendbyte = 0;
 
   rv = apr_stat(&st, originalfile, APR_FINFO_MIN, r->pool);
   if (rv != APR_SUCCESS)
     return HTTP_NOT_FOUND;
 
-  rv = apr_file_open(&fout, originalfile,
+  rv = apr_file_open(&fout, originalfile, 
     APR_READ | APR_BINARY, APR_OS_DEFAULT, r->pool);
   if (rv != APR_SUCCESS) {
     DBG(r, "originalfile open failed[%s]", originalfile);
@@ -1583,17 +1710,13 @@ s_send_original_file(request_rec* r, const char* originalfile)
   apr_file_close(fout);
   ap_rflush(r);
   DBG(r, "send file data[%d]byte", (int)sendbyte);
-
+  
   return OK;
 }
 
 
 static apr_status_t 
-s_header_only_cache_file(
-  device_table *spec,
-  query_string_param_t *query_string, 
-  request_rec *r,
-  const char *tmpfile)
+s_header_only_cache_file(device_table *UNUSED(spec), query_string_param_t *query_string, request_rec *r, const char *tmpfile)
 {
   apr_status_t rv;
   apr_finfo_t  st;
@@ -1608,60 +1731,79 @@ s_header_only_cache_file(
   DBG(r, "offset:[%ld]", query_string->offset);
   DBG(r, "count:[%ld]",  query_string->count);
 
-  if (spec->available_jpeg) {
-    r->content_type = apr_psprintf(r->pool, "image/jpeg");
-  }
-  else
-  if (spec->available_png) {
-    r->content_type = apr_psprintf(r->pool, "image/png");
-  }
-  else
-  if (spec->available_gif) {
-    r->content_type = apr_psprintf(r->pool, "image/gif");
-  }
-  else
-  if (spec->available_bmp2 || spec->available_bmp4) {
-    r->content_type = apr_psprintf(r->pool, "image/bmp");
-  }
-
   if (query_string->mode != IMG_CONV_MODE_EZGET && query_string->name == NULL) {
     contentLength = apr_psprintf(r->pool, "%d", (int)st.size);
     apr_table_setn(r->headers_out, "Content-Length", (const char*)contentLength);
+
+    MagickWand *magick_wand = NewMagickWand();
+    if (MagickReadImage(magick_wand,tmpfile) == MagickFalse) {
+      EXIT_MAGICK_ERROR();
+      return HTTP_NOT_FOUND;
+    }
+    if (MagickStripImage(magick_wand) == MagickFalse) {
+      ERR(r, "mod_chxj: strip image failure.");
+      EXIT_MAGICK_ERROR();
+      return HTTP_NOT_FOUND;
+    }
+    char *nowFormat = MagickGetImageFormat(magick_wand);
+    DestroyMagickWand(magick_wand);
+    if (nowFormat) {
+      if (STRCASEEQ('j','J',"jpeg",nowFormat) || STRCASEEQ('j','J',"jpg",nowFormat)) {
+        DBG(r, "detect cache file => jpg.");
+        ap_set_content_type(r, "image/jpeg");
+      }
+      else if (STRCASEEQ('p','P',"png", nowFormat)) {
+        DBG(r, "detect cache file => png.");
+        ap_set_content_type(r, "image/png");
+      }
+      else if (STRCASEEQ('g','G',"gif", nowFormat)) {
+        DBG(r, "detect cache file => gif.");
+        ap_set_content_type(r, "image/gif");
+      }
+      else if (STRCASEEQ('b','B',"bmp", nowFormat)) {
+        DBG(r, "detect cache file => bmp.");
+        ap_set_content_type(r, "image/bmp");
+      }
+      else {
+        ERR(r, "detect unknown file");
+        return HTTP_NOT_FOUND;
+      }
+    }
   
     DBG(r,"Content-Length:[%d]", (int)st.size);
   }
   else
   if (query_string->mode == IMG_CONV_MODE_EZGET) {
-    charname = apr_pstrdup(r->pool, basename(r->filename));
+    char *name = apr_pstrdup(r->pool, basename(r->filename));
     name[strlen(name)-4] = 0;
     if (strcasecmp(r->content_type, "image/jpeg") == 0) {
 
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
     }
     else
     if (strcasecmp(r->content_type, "image/bmp") == 0) {
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
     }
     else
     if (strcasecmp(r->content_type, "image/png") == 0) {
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
     }
     else
     if (strcasecmp(r->content_type, "image/gif") == 0) {
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
     }
   }
   else
   if (query_string->mode == IMG_CONV_MODE_WALLPAPER && query_string->name != NULL) {
     if (query_string->count == -1 && query_string->offset == -1) {
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
     }
     else
     if (query_string->count == -2 && query_string->offset == -1) {
-      ap_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
+      chxj_set_content_type(r, "text/x-hdml; charset=Shift_JIS");
     }
     else { 
-      ap_set_content_type(r, "application/x-up-download");
+      chxj_set_content_type(r, "application/x-up-download");
       contentLength = apr_psprintf(r->pool, "%ld", query_string->count);
       apr_table_setn(r->headers_out, "Content-Length", (const char*)contentLength);
   
@@ -1673,34 +1815,68 @@ s_header_only_cache_file(
 }
 
 
+static void 
+s_init_serial_pattern(apr_pool_t *p)
+{
+  if (!v_docomo_serial_pattern1) {
+    v_docomo_serial_pattern1 = chxj_compile_for_preg_replace(p, "/ser[^;\\)]+");
+  }  
+  if (!v_docomo_serial_pattern2) {
+    v_docomo_serial_pattern2 = chxj_compile_for_preg_replace(p, ";ser[^;\\)]+");
+  }  
+  if (!v_docomo_serial_pattern3) {
+    v_docomo_serial_pattern3 = chxj_compile_for_preg_replace(p, ";icc[^;\\)]+");
+  }  
+  if (!v_softbank_serial_pattern1) {
+    v_softbank_serial_pattern1 = chxj_compile_for_preg_replace(p, "/SN[0-9a-zA-Z][0-9a-zA-Z][0-9a-zA-Z][0-9a-zA-Z][0-9a-zA-Z][0-9a-zA-Z][0-9a-zA-Z][0-9a-zA-Z][0-9a-zA-Z][0-9a-zA-Z][0-9a-zA-Z] ");
+  }  
+}
+
+
 static char *
-s_create_workfile(
-  request_rec *r, 
-  mod_chxj_config *conf, 
-  const char *user_agent, 
-  query_string_param_t *qsp)
+s_create_workfile_name(
+                request_rec          *r, 
+                mod_chxj_config      *conf, 
+                const char           *user_agent, 
+                query_string_param_t *qsp)
 {
-  int ii;
-  int jj;
-  int len;
+  int  ii;
+  int  jj;
+  int  len;
   char *w = apr_palloc(r->pool, 256);
   char *fname;
+  char *new_user_agent;
+
+  s_init_serial_pattern(r->server->process->pool);
+
+  /* for DoCoMo */
+  new_user_agent = chxj_preg_replace(r->pool, v_docomo_serial_pattern1, "", user_agent);
+  new_user_agent = chxj_preg_replace(r->pool, v_docomo_serial_pattern2, "", new_user_agent);
+  new_user_agent = chxj_preg_replace(r->pool, v_docomo_serial_pattern3, "", new_user_agent);
+
+  /* for SoftBank */
+  new_user_agent = chxj_preg_replace(r->pool, v_softbank_serial_pattern1, " ", new_user_agent);
+
+  DBG(r, "old user_agent:[%s] ==> new user_agent:[%s]", user_agent, new_user_agent);
+
 
   memset(w, 0, 256);
   switch (qsp->mode) {
   case IMG_CONV_MODE_THUMBNAIL:
-    fname = apr_psprintf(r->pool, "%s.%s.thumbnail", r->filename, user_agent);
+    fname = apr_psprintf(r->pool, "%s.%s.thumbnail", r->filename, new_user_agent);
     DBG(r, "mode=thumbnail [%s]", fname);
     break;
+
   case IMG_CONV_MODE_WALLPAPER:
   case IMG_CONV_MODE_EZGET:
-    fname = apr_psprintf(r->pool, "%s.%s.wallpaper", r->filename, user_agent);
+    fname = apr_psprintf(r->pool, "%s.%s.wallpaper", r->filename, new_user_agent);
     DBG(r, "mode=WallPaper [%s]", fname);
     break;
+
   case IMG_CONV_MODE_NORMAL:
   default:
 
-    fname = apr_psprintf(r->pool, "%s.%s", r->filename, user_agent);
+    fname = apr_psprintf(r->pool, "%s.%s", r->filename, new_user_agent);
 
     if (qsp->width)
       fname = apr_psprintf(r->pool, "%s.w%d", fname, qsp->width);
@@ -1752,23 +1928,23 @@ s_add_crc(const char *writedata, apr_size_t writebyte)
 int
 chxj_trans_name(request_rec *r)
 {
-  const char *ccp;
-  char *docroot;
-  int len;
-  apr_finfo_t st;
-  apr_status_t rv;
+  const char      *ccp;
+  char            *docroot;
+  int             len;
+  apr_finfo_t     st;
+  apr_status_t    rv;
   mod_chxj_config *conf;
-  int ii;
-  char *ext[] = {
+  int             ii;
+  char            *ext[] = {
           "jpg",
           "jpeg",
           "png",
           "bmp",
           "gif",
-          "qrc",    /* QRCode½ÐÎÏÍÑ¥Õ¥¡¥¤¥ë¤Î³ÈÄ¥»Ò */
+          "qrc",    /* QRCode出力用ファイルの拡張子 */
           "",
   };
-  char     *fname;
+  char     *fname = NULL;
   char     *idx;
   char     *filename_sv;
   int      do_ext_check = TRUE;
@@ -1776,7 +1952,7 @@ chxj_trans_name(request_rec *r)
 
   DBG(r, "start chxj_trans_name()");
 
-  conf = ap_get_module_config(r->per_dir_config, &chxj_module);
+  conf = chxj_get_module_config(r->per_dir_config, &chxj_module);
 
   if (conf == NULL) {
     DBG(r, "end chxj_trans_name() conf is null[%s]", r->uri);
@@ -1815,8 +1991,8 @@ chxj_trans_name(request_rec *r)
 
 
   if (r->server->path 
-      &&  *filename_sv == *r->server->path 
-      &&  strncmp(filename_sv, r->server->path, r->server->pathlen) == 0)
+  &&  *filename_sv == *r->server->path 
+  &&  strncmp(filename_sv, r->server->path, r->server->pathlen) == 0)
     filename_sv = apr_pstrcat(r->pool, docroot, (filename_sv + r->server->pathlen), NULL);
   else
     filename_sv = apr_pstrcat(r->pool, docroot, filename_sv, NULL);
@@ -1825,7 +2001,7 @@ chxj_trans_name(request_rec *r)
 
   do_ext_check = TRUE;
   for (ii=0; ii<7-1; ii++) {
-    char *pos = strrchr(filename_sv, '.');
+    charpos = strrchr(filename_sv, '.');
     if (pos && pos++) {
       if (strcasecmp(pos, ext[ii]) == 0) {
         do_ext_check = FALSE;
@@ -1859,7 +2035,7 @@ chxj_trans_name(request_rec *r)
     return DECLINED;
   }
   for (ii=0; ii<7-1; ii++) {
-    char *pos = strrchr(fname, '.');
+    charpos = strrchr(fname, '.');
     if (pos && pos++) {
       if (strcasecmp(pos, ext[ii]) == 0) {
         next_ok = TRUE;
@@ -1888,6 +2064,7 @@ chxj_trans_name(request_rec *r)
 }
 
 
+
 /**
  * It converts it from QUERYSTRING.
  *