src/mod_chxj.c

   1 /*
   2  * Copyright (C) 2005-2009 Atsushi Konno All rights reserved.
   3  * Copyright (C) 2005 QSDN,Inc. All rights reserved.
   4  *
   5  * Licensed under the Apache License, Version 2.0 (the "License");
   6  * you may not use this file except in compliance with the License.
   7  * You may obtain a copy of the License at
   8  *
   9  *     http://www.apache.org/licenses/LICENSE-2.0
  10  *
  11  * Unless required by applicable law or agreed to in writing, software
  12  * distributed under the License is distributed on an "AS IS" BASIS,
  13  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  14  * See the License for the specific language governing permissions and
  15  * limitations under the License.
  16  */
  17 #include <unistd.h>
  18 #include <string.h>
  19 #include <limits.h>
  20 #include <errno.h>
  21
  22 #include "httpd.h"
  23 #include "http_config.h"
  24 #include "http_core.h"
  25 #include "http_protocol.h"
  26 #include "http_log.h"
  27 #include "ap_config.h"
  28 #include "apr_strings.h"
  29 #include "util_filter.h"
  30 #include "apr_buckets.h"
  31 #include "apr_lib.h"
  32 #include "apr_tables.h"
  33 #include "apr_dso.h"
  34 #include "apr_general.h"
  35 #include "apr_pools.h"
  36
  37 #include "mod_chxj.h"
  38 #include "chxj_encoding.h"
  39 #include "qs_ignore_sp.h"
  40 #include "qs_log.h"
  41 #include "qs_malloc.h"
  42 #include "qs_parse_attr.h"
  43 #include "qs_parse_file.h"
  44 #include "qs_parse_string.h"
  45 #include "qs_parse_tag.h"
  46 #include "chxj_load_device_data.h"
  47 #include "chxj_load_emoji_data.h"
  48 #include "chxj_specified_device.h"
  49 #include "chxj_tag_util.h"
  50 #include "chxj_xhtml_mobile_1_0.h"
  51 #include "chxj_hdml.h"
  52 #include "chxj_chtml10.h"
  53 #include "chxj_chtml20.h"
  54 #include "chxj_chtml30.h"
  55 #include "chxj_chtml40.h"
  56 #include "chxj_chtml50.h"
  57 #include "chxj_jhtml.h"
  58 #include "chxj_jxhtml.h"
  59 #include "chxj_img_conv_format.h"
  60 #include "chxj_qr_code.h"
  61 #include "chxj_encoding.h"
  62 #include "chxj_apply_convrule.h"
  63 #include "chxj_cookie.h"
  64 #include "chxj_url_encode.h"
  65 #include "chxj_str_util.h"
  66 #if defined(USE_MYSQL_COOKIE)
  67 #  include "chxj_mysql.h"
  68 #endif
  69 #include "chxj_serf.h"
  70 #include "chxj_add_device_env.h"
  71 #include "chxj_header_inf.h"
  72 #include "chxj_jreserved_tag.h"
  73
  74
  75 #define CHXJ_VERSION_PREFIX PACKAGE_NAME "/"
  76 #define CHXJ_VERSION        PACKAGE_VERSION
  77 #define CHXJ_POST_MAX       (0x1000000)
  78
  79 converter_t convert_routine[] = {
  80   {
  81     /* CHXJ_SPEC_UNKNOWN          */
  82     .converter            = NULL,
  83     .encoder              = NULL,
  84     .emoji_only_converter = NULL,
  85   },
  86   {
  87     /* CHXJ_SPEC_Chtml_1_0        */
  88     .converter            = chxj_convert_chtml10,
  89     .encoder              = chxj_encoding,
  90     .emoji_only_converter = chxj_chtml10_emoji_only_converter,
  91   },
  92   {
  93     /* CHXJ_SPEC_Chtml_2_0        */
  94     .converter            = chxj_convert_chtml20,
  95     .encoder              = chxj_encoding,
  96     .emoji_only_converter = chxj_chtml20_emoji_only_converter,
  97   },
  98   {
  99     /* CHXJ_SPEC_Chtml_3_0        */
 100     .converter            = chxj_convert_chtml30,
 101     .encoder              = chxj_encoding,
 102     .emoji_only_converter = chxj_chtml30_emoji_only_converter,
 103   },
 104   {
 105     /* CHXJ_SPEC_Chtml_4_0        */
 106     .converter            = chxj_convert_chtml40,
 107     .encoder              = chxj_encoding,
 108     .emoji_only_converter = chxj_chtml40_emoji_only_converter,
 109   },
 110   {
 111     /* CHXJ_SPEC_Chtml_5_0        */
 112     .converter            = chxj_convert_chtml50,
 113     .encoder              = chxj_encoding,
 114     .emoji_only_converter = chxj_chtml50_emoji_only_converter,
 115   },
 116   {
 117     /* CHXJ_SPEC_Chtml_6_0        */
 118     .converter            = chxj_convert_chtml50,
 119     .encoder              = chxj_encoding,
 120     .emoji_only_converter = chxj_chtml50_emoji_only_converter,
 121   },
 122   {
 123     /* CHXJ_SPEC_Chtml_7_0        */
 124     .converter            = chxj_convert_chtml50,
 125     .encoder              = chxj_encoding,
 126     .emoji_only_converter = chxj_chtml50_emoji_only_converter,
 127   },
 128   {
 129     /* CHXJ_SPEC_XHtml_Mobile_1_0 */
 130     .converter            = chxj_convert_xhtml_mobile_1_0,
 131     .encoder              = chxj_encoding,
 132     .emoji_only_converter = chxj_xhtml_emoji_only_converter,
 133   },
 134   {
 135     /* CHXJ_SPEC_Hdml             */
 136     .converter            = chxj_convert_hdml,
 137     .encoder              = chxj_encoding,
 138     .emoji_only_converter = NULL,
 139   },
 140   {
 141     /* CHXJ_SPEC_Jhtml            */
 142     .converter            = chxj_convert_jhtml,
 143     .encoder              = chxj_encoding,
 144     .emoji_only_converter = chxj_jhtml_emoji_only_converter,
 145   },
 146   {
 147     /* CHXJ_SPEC_Jxhtml            */
 148     .converter            = chxj_convert_jxhtml,
 149     .encoder              = chxj_encoding,
 150     .emoji_only_converter = chxj_jxhtml_emoji_only_converter,
 151   },
 152   {
 153     /* CHXJ_SPEC_HTML             */
 154     .converter = NULL,
 155     .encoder  = NULL,
 156     .emoji_only_converter = NULL,
 157   },
 158 };
 159
 160 static int chxj_convert_input_header(request_rec *r,chxjconvrule_entry *entryp, device_table *spec);
 161 static void s_convert_guid_parameter_to_header(request_rec *r, const char *param, device_table *spec);
 162 static void s_add_cookie_id_if_has_location_header(request_rec *r, cookie_t *cookie);
 163 static void s_clear_cookie_header(request_rec *r, device_table *spec);
 164 static void s_add_no_cache_headers(request_rec *r, chxjconvrule_entry  *entryp);
 165
 166 /**
 167  * Only when User-Agent is specified, the User-Agent header is camouflaged.
 168  *
 169  * @param r   [i]
 170  */
 171 static apr_status_t
 172 chxj_headers_fixup(request_rec *r)
 173 {
 174   mod_chxj_config*    dconf;
 175   chxjconvrule_entry* entryp;
 176   char*               user_agent;
 177   device_table*       spec;
 178   char                *contentType;
 179   char                *contentLength;
 180
 181   DBG(r, "REQ[%X] start chxj_headers_fixup()", (unsigned int)(apr_size_t)r);
 182   if (r->main) {
 183     DBG(r, "REQ[%X] detect internal redirect.", (unsigned int)(apr_size_t)r);
 184     DBG(r, "REQ[%X] end chxj_headers_fixup()",  (unsigned int)(apr_size_t)r);
 185     return DECLINED;
 186   }
 187
 188   dconf = chxj_get_module_config(r->per_dir_config, &chxj_module);
 189
 190   user_agent = (char*)apr_table_get(r->headers_in, HTTP_USER_AGENT);
 191   spec = chxj_specified_device(r, user_agent);
 192
 193   contentType = (char *)apr_table_get(r->headers_in, "Content-Type");
 194   if (contentType
 195       && strncasecmp("multipart/form-data", contentType, 19) == 0) {
 196     DBG(r, "REQ[%X] detect multipart/form-data ==> no target", (unsigned int)(apr_size_t)r);
 197     DBG(r, "REQ[%X] end chxj_headers_fixup()", (unsigned int)(apr_size_t)r);
 198     return DECLINED;
 199   }
 200
 201
 202   switch(spec->html_spec_type) {
 203   case CHXJ_SPEC_Chtml_1_0:
 204   case CHXJ_SPEC_Chtml_2_0:
 205   case CHXJ_SPEC_Chtml_3_0:
 206   case CHXJ_SPEC_Chtml_4_0:
 207   case CHXJ_SPEC_Chtml_5_0:
 208   case CHXJ_SPEC_Chtml_6_0:
 209   case CHXJ_SPEC_Chtml_7_0:
 210   case CHXJ_SPEC_XHtml_Mobile_1_0:
 211   case CHXJ_SPEC_Hdml:
 212   case CHXJ_SPEC_Jhtml:
 213   case CHXJ_SPEC_Jxhtml:
 214     entryp = chxj_apply_convrule(r, dconf->convrules);
 215     if (! entryp) {
 216       DBG(r, "REQ[%X] end chxj_headers_fixup() (no pattern)", (unsigned int)(apr_size_t)r);
 217       return DECLINED;
 218     }
 219     if (!(entryp->action & CONVRULE_ENGINE_ON_BIT) && !(entryp->action & CONVRULE_COOKIE_ONLY_BIT)) {
 220       DBG(r, "REQ[%X] end chxj_headers_fixup() (engine off)", (unsigned int)(apr_size_t)r);
 221       return DECLINED;
 222     }
 223     if (entryp->action & CONVRULE_EMOJI_ONLY_BIT) {
 224       DBG(r, "REQ[%X] end chxj_headers_fixup() (emoji only)", (unsigned int)(apr_size_t)r);
 225       return DECLINED;
 226     }
 227
 228     apr_table_setn(r->headers_in,
 229                    CHXJ_HTTP_USER_AGENT,
 230                    user_agent);
 231
 232     if (entryp->user_agent)
 233       apr_table_setn(r->headers_in,
 234                      HTTP_USER_AGENT,
 235                      entryp->user_agent);
 236     /*
 237      * this clear process must do before chxj_convert_input_header function.
 238      */
 239     if ((entryp->action & CONVRULE_COOKIE_ON_BIT) || (entryp->action & CONVRULE_COOKIE_ONLY_BIT)) {
 240       if (r->method_number == M_POST) {
 241         if (! apr_table_get(r->headers_in, "X-Chxj-Forward")) {
 242           s_clear_cookie_header(r, spec);
 243         }
 244       }
 245       else {
 246         s_clear_cookie_header(r, spec);
 247       }
 248     }
 249
 250     chxj_convert_input_header(r,entryp, spec);
 251
 252     break;
 253
 254   default:
 255     DBG(r, "REQ[%X] end chxj_headers_fixup() (not mobile) spec->device_name[%s] User-Agent:[%s]", (unsigned int)(apr_size_t)r, spec->device_name, user_agent);
 256     return DECLINED;
 257
 258   }
 259
 260
 261   if (r->method_number == M_POST) {
 262     if (! apr_table_get(r->headers_in, "X-Chxj-Forward")) {
 263         DBG(r, "REQ[%X] set Input handler old:[%s] proxyreq:[%d] uri:[%s] filename:[%s]", (unsigned int)(apr_size_t)r, r->handler, r->proxyreq, r->uri, r->filename);
 264         r->proxyreq = PROXYREQ_NONE;
 265         r->handler = apr_psprintf(r->pool, "chxj-input-handler");
 266     }
 267     else {
 268       char *client_ip = (char *)apr_table_get(r->headers_in, CHXJ_HEADER_ORIG_CLIENT_IP);
 269       if (client_ip) {
 270         if (dconf->post_log) {
 271           apr_table_setn(r->subprocess_env, dconf->post_log, dconf->post_log);
 272         }
 273         else {
 274           apr_table_setn(r->subprocess_env, "chxj-post-log", "chxj-post-log");
 275         }
 276         apr_sockaddr_t *address = NULL;
 277         apr_status_t rv = apr_sockaddr_info_get(&address, ap_get_server_name(r), APR_UNSPEC, ap_get_server_port(r), 0, r->pool);
 278         if (rv != APR_SUCCESS) {
 279           char buf[256];
 280           ERR(r, "REQ[%X] %s:%d apr_sockaddr_info_get() failed: rv:[%d|%s]", (unsigned int)(apr_size_t)r, APLOG_MARK, rv, apr_strerror(rv, buf, 256));
 281           DBG(r, "REQ[%X] end chxj_headers_fixup()", (unsigned int)(apr_size_t)r);
 282           return DECLINED;
 283         }
 284         char *addr;
 285         if (dconf->forward_server_ip) {
 286           addr = dconf->forward_server_ip;
 287         }
 288         else {
 289           apr_sockaddr_ip_get(&addr, address);
 290         }
 291         DBG(r, "REQ[%X] Client IP:[%s] vs Orig Client IP:[%s] vs Server IP:[%s]", (unsigned int)(apr_size_t)r, r->connection->remote_ip, client_ip, addr);
 292         if (strcmp(addr, r->connection->remote_ip) == 0) {
 293           r->connection->remote_ip = apr_pstrdup(r->connection->pool, client_ip);
 294         }
 295         if (! apr_table_get(r->headers_in, "Content-Length")) {
 296           contentLength = (char *)apr_table_get(r->headers_in, "X-Chxj-Content-Length");
 297           if (contentLength) {
 298             apr_table_set(r->headers_in, "Content-Length", contentLength);
 299           }
 300         }
 301       }
 302     }
 303   }
 304
 305   chxj_add_device_env(r, spec);
 306
 307   DBG(r, "REQ[%X] end chxj_headers_fixup()", (unsigned int)(apr_size_t)r);
 308
 309   return DECLINED;
 310 }
 311
 312
 313 static void
 314 s_clear_cookie_header(request_rec *r, device_table *spec)
 315 {
 316   DBG(r, "REQ[%X] start s_clear_cookie_header()", TO_ADDR(r));
 317   switch(spec->html_spec_type) {
 318   case CHXJ_SPEC_Chtml_1_0:
 319   case CHXJ_SPEC_Chtml_2_0:
 320   case CHXJ_SPEC_Chtml_3_0:
 321   case CHXJ_SPEC_Chtml_4_0:
 322   case CHXJ_SPEC_Chtml_5_0:
 323   case CHXJ_SPEC_Chtml_6_0:
 324   case CHXJ_SPEC_Chtml_7_0:
 325   case CHXJ_SPEC_XHtml_Mobile_1_0:
 326   case CHXJ_SPEC_Jhtml:
 327     apr_table_unset(r->headers_in, "Cookie");
 328     break;
 329   default:
 330     break;
 331   }
 332   DBG(r, "REQ[%X] end   s_clear_cookie_header()", TO_ADDR(r));
 333 }
 334
 335
 336 /**
 337  * It converts it from CHTML into XXML corresponding to each model.
 338  *
 339  * @param r   [i]
 340  * @param src [i]   It is former HTML character string.
 341  * @param len [i/o] It is length of former HTML character string.
 342  */
 343 static char *
 344 chxj_convert(request_rec *r, const char **src, apr_size_t *len, device_table *spec, const char *ua, cookie_t **cookiep)
 345 {
 346   char                *user_agent;
 347   char                *dst;
 348   char                *tmp;
 349   cookie_t            *cookie;
 350   mod_chxj_config     *dconf;
 351   chxjconvrule_entry  *entryp;
 352
 353   DBG(r,"REQ[%X] start of chxj_convert() input:[%.*s]", (unsigned int)(apr_size_t)r, (int)*len, *src);
 354   dst  = apr_pstrcat(r->pool, (char *)*src, NULL);
 355
 356   dconf = chxj_get_module_config(r->per_dir_config, &chxj_module);
 357
 358
 359   entryp = chxj_apply_convrule(r, dconf->convrules);
 360
 361   if (!entryp || (!(entryp->action & CONVRULE_ENGINE_ON_BIT) && !(entryp->action & CONVRULE_COOKIE_ONLY_BIT))) {
 362     DBG(r,"REQ[%X] end of chxj_convert()", (unsigned int)(apr_size_t)r);
 363     return (char *)*src;
 364   }
 365
 366
 367   /*------------------------------------------------------------------------*/
 368   /* get UserAgent from http header                                         */
 369   /*------------------------------------------------------------------------*/
 370   if (entryp->user_agent)
 371     user_agent = (char *)apr_table_get(r->headers_in, CHXJ_HTTP_USER_AGENT);
 372   else
 373     user_agent = (char *)apr_table_get(r->headers_in, HTTP_USER_AGENT);
 374
 375   DBG(r,"REQ[%X] User-Agent:[%s]", (unsigned int)(apr_size_t)r, user_agent);
 376   DBG(r,"REQ[%X] content type is %s", (unsigned int)(apr_size_t)r, r->content_type);
 377
 378
 379   if (  ! STRNCASEEQ('t','T', "text/html", r->content_type, sizeof("text/html")-1)
 380     &&  ! STRNCASEEQ('a','A', "application/xhtml+xml", r->content_type, sizeof("application/xhtml+xml")-1)) {
 381     DBG(r,"REQ[%X] no convert. content type is %s", (unsigned int)(apr_size_t)r, r->content_type);
 382     DBG(r,"REQ[%X] end of chxj_convert()", (unsigned int)(apr_size_t)r);
 383     return (char *)*src;
 384   }
 385
 386   if (ua && user_agent && strcasecmp(user_agent, ua) != 0) {
 387     /* again */
 388     spec = chxj_specified_device(r, user_agent);
 389   }
 390
 391   /*
 392    * save cookie.
 393    */
 394   cookie = NULL;
 395   if ((entryp->action & CONVRULE_COOKIE_ON_BIT
 396       && !(entryp->action & CONVRULE_EMOJI_ONLY_BIT)
 397       && !(entryp->action & CONVRULE_ENVINFO_ONLY_BIT))
 398       || (entryp->action & CONVRULE_COOKIE_ONLY_BIT)) {
 399     switch(spec->html_spec_type) {
 400     case CHXJ_SPEC_Chtml_1_0:
 401     case CHXJ_SPEC_Chtml_2_0:
 402     case CHXJ_SPEC_Chtml_3_0:
 403     case CHXJ_SPEC_Chtml_4_0:
 404     case CHXJ_SPEC_Chtml_5_0:
 405     case CHXJ_SPEC_Chtml_6_0:
 406     case CHXJ_SPEC_Chtml_7_0:
 407     case CHXJ_SPEC_XHtml_Mobile_1_0:
 408     case CHXJ_SPEC_Jhtml:
 409       cookie = chxj_save_cookie(r);
 410       break;
 411     default:
 412       break;
 413     }
 414   }
 415
 416   if (!r->header_only) {
 417     if ((entryp->action & CONVRULE_COOKIE_ONLY_BIT) && cookie) {
 418       dst = chxj_cookie_only_mode(r, *src, (apr_size_t *)len, cookie);
 419     }
 420     else {
 421       tmp = NULL;
 422       if (convert_routine[spec->html_spec_type].encoder)
 423         tmp = convert_routine[spec->html_spec_type].encoder(r,
 424                                                             *src,
 425                                                             (apr_size_t *)len);
 426
 427       if (entryp->action & CONVRULE_EMOJI_ONLY_BIT) {
 428         if (tmp) {
 429           tmp = chxj_node_convert_chxjif_only(r, spec, (const char*)tmp, (apr_size_t *)len);
 430         }
 431         else {
 432           tmp = chxj_node_convert_chxjif_only(r, spec, (const char *)*src, (apr_size_t *)len);
 433         }
 434         if (convert_routine[spec->html_spec_type].emoji_only_converter) {
 435           dst = convert_routine[spec->html_spec_type].emoji_only_converter(r,spec, tmp,*len);
 436           if (dst != NULL) {
 437             *len = strlen(dst);
 438           }
 439           else {
 440             dst = apr_palloc(r->pool, 1);
 441             *dst = 0;
 442             *len = 0;
 443           }
 444         }
 445         DBG(r, "REQ[%X] end of chxj_convert()(emoji only)", (unsigned int)(apr_size_t)r);
 446       }
 447
 448       if (   !(entryp->action & CONVRULE_EMOJI_ONLY_BIT)
 449           && !(entryp->action & CONVRULE_ENVINFO_ONLY_BIT)) {
 450         if (convert_routine[spec->html_spec_type].converter) {
 451           if (tmp)
 452             dst = convert_routine[spec->html_spec_type].converter(r,
 453                                                                   spec,
 454                                                                   tmp,
 455                                                                   *len,
 456                                                                   len,
 457                                                                   entryp,
 458                                                                   cookie);
 459           else
 460             dst = convert_routine[spec->html_spec_type].converter(r,
 461                                                                   spec,
 462                                                                   *src,
 463                                                                   *len,
 464                                                                   len,
 465                                                                   entryp,
 466                                                                   cookie);
 467         }
 468       }
 469     }
 470   }
 471   ap_set_content_length(r, *len);
 472
 473   if (*len == 0) {
 474     dst = apr_psprintf(r->pool, "\n");
 475     *len = 1;
 476   }
 477   dst[*len] = 0;
 478   if (cookie) {
 479     *cookiep = cookie;
 480   }
 481
 482
 483   DBG(r, "REQ[%X] end of chxj_convert()", (unsigned int)(apr_size_t)r);
 484
 485   return dst;
 486 }
 487
 488
 489 /**
 490  * convert GUID parameter.
 491  *
 492  */
 493 static void
 494 s_convert_guid_parameter_to_header(request_rec *r, const char *param, device_table *spec)
 495 {
 496   DBG(r, "REQ[%X] start s_convert_guid_parameter() param:[%s]", (unsigned int)(apr_size_t)r, param);
 497   if (strcasecmp(param, "guid") == 0) {
 498     switch(spec->html_spec_type) {
 499     case CHXJ_SPEC_XHtml_Mobile_1_0:
 500       do {
 501         char *x_up_subno = (char *)apr_table_get(r->headers_in, "x-up-subno");
 502         if (x_up_subno) {
 503           apr_table_setn(r->headers_in, "X-DCMGUID", x_up_subno);
 504         }
 505       } while(0);
 506       break;
 507     case CHXJ_SPEC_Jhtml:
 508     case CHXJ_SPEC_Jxhtml:
 509       do {
 510         char *x_jphone_uid = (char *)apr_table_get(r->headers_in, "x-jphone-uid");
 511         if (x_jphone_uid) {
 512           apr_table_setn(r->headers_in, "X-DCMGUID", x_jphone_uid);
 513         }
 514       } while(0);
 515       break;
 516     default:
 517       break;
 518     }
 519   }
 520   DBG(r, "REQ[%X] end s_convert_guid_parameter()", (unsigned int)(apr_size_t)r);
 521 }
 522
 523 /**
 524  * It converts it from HEADER.
 525  *
 526  * @param r   [i]
 527  */
 528 static int
 529 chxj_convert_input_header(request_rec *r,chxjconvrule_entry *entryp, device_table *spec)
 530 {
 531
 532   char       *buff;
 533   char       *buff_pre;
 534   apr_size_t urilen;
 535   char       *result;
 536   char       *pair;
 537   char       *name;
 538   char       *value;
 539   char       *pstate;
 540   char       *vstate;
 541   cookie_t   *cookie = NULL;
 542   int        no_update_flag = 0;
 543
 544   DBG(r, "REQ[%X] start chxj_convert_input_header()", (unsigned int)(apr_size_t)r);
 545
 546   if (! r->args) {
 547     DBG(r, "REQ[%X] r->args=[null]", (unsigned int)(apr_size_t)r);
 548     DBG(r, "REQ[%X] end   chxj_convert_input_header()", (unsigned int)(apr_size_t)r);
 549     return 0;
 550   }
 551   urilen = strlen(r->args);
 552
 553   result = qs_alloc_zero_byte_string(r->pool);
 554
 555   buff_pre = apr_pstrdup(r->pool, r->args);
 556
 557   for (;;) {
 558     char *pair_sv;
 559
 560     pair = apr_strtok(buff_pre, "&", &pstate);
 561     if (pair == NULL)
 562       break;
 563
 564     buff_pre = NULL;
 565
 566     pair_sv = apr_pstrdup(r->pool, pair);
 567
 568     name  = apr_strtok(pair, "=", &vstate);
 569     value = apr_strtok(NULL, "=", &vstate);
 570     if (! name) continue;
 571     if (strcasecmp(name, CHXJ_COOKIE_NOUPDATE_PARAM) == 0 || strcasecmp(name, chxj_url_encode(r->pool, CHXJ_COOKIE_NOUPDATE_PARAM)) == 0) {
 572       DBG(r, "REQ[%X] found cookie no update parameter", (unsigned int)(apr_size_t)r);
 573       no_update_flag++;
 574     }
 575   }
 576
 577   buff = apr_pstrdup(r->pool, r->args);
 578   DBG(r, "REQ[%X] r->args=[%s]", (unsigned int)(apr_size_t)r, buff);
 579
 580   /* _chxj_dmy */
 581   /* _chxj_c_ */
 582   /* _chxj_r_ */
 583   /* _chxj_s_ */
 584   for (;;) {
 585     char *pair_sv;
 586
 587     pair = apr_strtok(buff, "&", &pstate);
 588     if (pair == NULL)
 589       break;
 590
 591     buff = NULL;
 592
 593     pair_sv = apr_pstrdup(r->pool, pair);
 594
 595     name  = apr_strtok(pair, "=", &vstate);
 596     value = apr_strtok(NULL, "=", &vstate);
 597     if (! name) continue;
 598     name = chxj_safe_to_jreserved_tag(r, name);
 599     if (strncasecmp(name, "_chxj", 5) != 0 && strncasecmp(name, "%5Fchxj", sizeof("%5Fchxj")-1) != 0) {
 600       if (strlen(result) != 0)
 601         result = apr_pstrcat(r->pool, result, "&", NULL);
 602
 603       if (strcasecmp(entryp->encoding, "NONE") != 0) {
 604         apr_size_t dlen;
 605         char *dvalue;
 606         char *dname;
 607
 608         if (value && *value != 0) {
 609           value = chxj_url_decode(r->pool, value);
 610           dlen   = strlen(value);
 611           DBG(r, "************ before encoding[%s]", value);
 612
 613           dvalue = chxj_rencoding(r, value, &dlen);
 614           dvalue = chxj_url_encode(r->pool, dvalue);
 615
 616           DBG(r, "************ after encoding[%s]", dvalue);
 617         }
 618         else {
 619           dvalue = "";
 620         }
 621
 622         if (name && *name != 0) {
 623           name = chxj_url_decode(r->pool, name);
 624           dlen = strlen(name);
 625           dname = chxj_rencoding(r, name, &dlen);
 626           dname = chxj_url_encode(r->pool, dname);
 627         }
 628         else {
 629           dname = "";
 630         }
 631         s_convert_guid_parameter_to_header(r, dname, spec);
 632         result = apr_pstrcat(r->pool, result, dname, "=", dvalue, NULL);
 633       }
 634       else {
 635         s_convert_guid_parameter_to_header(r, name, spec);
 636         if (strcmp(name, pair_sv) != 0) {
 637           result = apr_pstrcat(r->pool, result, name, "=", value, NULL);
 638         }
 639         else {
 640           result = apr_pstrcat(r->pool, result, name, NULL);
 641         }
 642       }
 643     }
 644     else
 645     if ( (strncasecmp(name, "_chxj_c_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fc%5F", sizeof("%5Fchxj%5Fc%5F")-1) == 0)
 646       || (strncasecmp(name, "_chxj_r_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fr%5F", sizeof("%5Fchxj%5Fr%5F")-1) == 0)
 647       || (strncasecmp(name, "_chxj_s_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fs%5F", sizeof("%5Fchxj%5Fs%5F")-1) == 0)) {
 648       if (value == NULL)
 649         continue;
 650
 651       if (strlen(value) == 0)
 652         continue;
 653
 654       if (strlen(result) != 0)
 655         result = apr_pstrcat(r->pool, result, "&", NULL);
 656
 657       result = apr_pstrcat(r->pool, result, &name[8], "=", value, NULL);
 658     }
 659     else
 660     if (strcasecmp(name, CHXJ_COOKIE_PARAM) == 0 || strcasecmp(name, "%5Fchxj%5Fcc") == 0) {
 661       if (! cookie) {
 662         apr_table_unset(r->headers_in, "Cookie");
 663         DBG(r, "REQ[%X] found cookie parameter[%s]",    (unsigned int)(apr_size_t)r, value);
 664         DBG(r, "REQ[%X] call start chxj_load_cookie()", (unsigned int)(apr_size_t)r);
 665         cookie_lock_t *lock = chxj_cookie_lock(r);
 666         cookie = chxj_load_cookie(r, value);
 667         DBG(r, "REQ[%X] call end   chxj_load_cookie()", (unsigned int)(apr_size_t)r);
 668         if (! no_update_flag && cookie) {
 669           cookie = chxj_update_cookie(r, cookie);
 670         }
 671         chxj_cookie_unlock(r, lock);
 672       }
 673       if (cookie && cookie->cookie_id) {
 674         if (strlen(result) != 0)
 675           result = apr_pstrcat(r->pool, result, "&", NULL);
 676         result = apr_pstrcat(r->pool, result, name, "=", cookie->cookie_id, NULL);
 677       }
 678     }
 679     else
 680     if (strcasecmp(name, CHXJ_COOKIE_NOUPDATE_PARAM) == 0) {
 681       if (strlen(result) != 0)
 682         result = apr_pstrcat(r->pool, result, "&", NULL);
 683       result = apr_pstrcat(r->pool, result, name, "=", value, NULL);
 684     }
 685   }
 686   apr_table_setn(r->headers_in, "X-Chxj-Cookie-No-Update", "true");
 687   if (! no_update_flag) {
 688     result = apr_pstrcat(r->pool, result, "&_chxj_nc=true", NULL);
 689   }
 690   r->args = result;
 691
 692   DBG(r, "REQ[%X] result r->args=[%s]",               (unsigned int)(apr_size_t)r, r->args);
 693   DBG(r, "REQ[%X] end   chxj_convert_input_header()", (unsigned int)(apr_size_t)r);
 694   return 0;
 695 }
 696
 697
 698 /**
 699  * It converts it from POSTDATA .
 700  *
 701  * @param r   [i]
 702  * @param src [i]   It is POSTDATA character string.
 703  * @param len [i/o] It is length of former HTML character string.
 704  */
 705 static char *
 706 chxj_input_convert(
 707   request_rec         *r,
 708   const char          **src,
 709   apr_size_t          *len,
 710   chxjconvrule_entry  *entryp,
 711   device_table        *spec)
 712 {
 713   char     *pair;
 714   char     *name;
 715   char     *value;
 716   char     *pstate;
 717   char     *vstate;
 718   char     *s;
 719   char     *result;
 720   cookie_t *cookie = NULL;
 721   char     *buff_pre;
 722   int      no_update_flag = 0;
 723   apr_size_t ii;
 724   apr_size_t ilen = 0;
 725   apr_pool_t *pool;
 726
 727   DBG(r, "REQ[%X] start of chxj_input_convert()", (unsigned int)(apr_size_t)r);
 728
 729   if (! *src) {
 730     DBG(r, "REQ[%X] end of chxj_input_convert() (input is null)", (unsigned int)(apr_size_t)r);
 731     return apr_pstrdup(r->pool, "");
 732   }
 733
 734   apr_pool_create(&pool, r->pool);
 735
 736   s        = apr_pstrdup(pool, *src);
 737   ilen     = strlen(s);
 738   buff_pre = apr_pstrdup(pool, *src);
 739
 740   result   = qs_alloc_zero_byte_string(pool);
 741
 742   DBG(r, "REQ[%X] +-------------------------------------------------------------------+", (unsigned int)(apr_size_t)r);
 743   DBG(r, "REQ[%X] | BEFORE input convert source                                       |", (unsigned int)(apr_size_t)r);
 744   DBG(r, "REQ[%X] +-------------------------------------------------------------------+", (unsigned int)(apr_size_t)r);
 745   for (ii=0; ii<ilen-64; ii+=64) {
 746     DBG(r, "REQ[%X] | [%-*.*s] |", (unsigned int)(apr_size_t)r, 64, 64, &s[ii]);
 747     if (ilen < 64) {
 748       break;
 749     }
 750   }
 751   if (ilen >= 64 && ((ilen-64) % 64 != 0)) {
 752     DBG(r, "REQ[%X] | [%-*.*s] |", (unsigned int)(apr_size_t)r, 64, 64, &s[ii]);
 753   }
 754   DBG(r, "REQ[%X] +--------------------------------------------------------------------+", (unsigned int)(apr_size_t)r);
 755
 756   for (;;) {
 757     char *pair_sv;
 758
 759     pair = apr_strtok(buff_pre, "&", &pstate);
 760     if (pair == NULL)
 761       break;
 762
 763     buff_pre = NULL;
 764
 765     pair_sv = apr_pstrdup(pool, pair);
 766
 767     name  = apr_strtok(pair, "=", &vstate);
 768     value = apr_strtok(NULL, "=", &vstate);
 769     if (! name) continue;
 770     if (strcasecmp(name, CHXJ_COOKIE_NOUPDATE_PARAM) == 0 || strcasecmp(name, chxj_url_encode(r->pool, CHXJ_COOKIE_NOUPDATE_PARAM)) == 0) {
 771       DBG(r, "REQ[%X] found cookie no update parameter", (unsigned int)(apr_size_t)r);
 772       no_update_flag++;
 773     }
 774   }
 775
 776   /* _chxj_dmy */
 777   /* _chxj_c_ */
 778   /* _chxj_r_ */
 779   /* _chxj_s_ */
 780   for (;;) {
 781     pair = apr_strtok(s, "&", &pstate);
 782     if (pair == NULL)
 783       break;
 784     s = NULL;
 785
 786     name  = apr_strtok(pair, "=", &vstate);
 787     value = apr_strtok(NULL, "=", &vstate);
 788     if (! name) continue;
 789     name  = chxj_safe_to_jreserved_tag(r, name);
 790
 791     if (strncasecmp(name, "_chxj", 5) != 0 && strncasecmp(name, "%5Fchxj", sizeof("%5Fchxj")-1) != 0) {
 792       if (strlen(result) != 0)
 793         result = apr_pstrcat(pool, result, "&", NULL);
 794
 795       if (strcasecmp(entryp->encoding, "NONE") != 0) {
 796         apr_size_t dlen;
 797         char *dvalue;
 798         char *dname;
 799
 800         if (value && *value != 0) {
 801           value = chxj_url_decode(pool, value);
 802           dlen   = strlen(value);
 803           dvalue = chxj_rencoding(r, value, &dlen);
 804           dvalue = chxj_url_encode(pool, dvalue);
 805         }
 806         else {
 807           dvalue = "";
 808         }
 809
 810         if (name && *name != 0) {
 811           name = chxj_url_decode(pool, name);
 812           dlen = strlen(name);
 813           dname = chxj_rencoding(r, name, &dlen);
 814           dname = chxj_url_encode(pool, dname);
 815         }
 816         else {
 817           dname = "";
 818         }
 819
 820
 821         result = apr_pstrcat(pool, result, dname, "=", dvalue, NULL);
 822       }
 823       else {
 824         result = apr_pstrcat(pool, result, name, "=", value, NULL);
 825       }
 826     }
 827     else
 828     if ( (strncasecmp(name, "_chxj_c_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fc%5F", sizeof("%5Fchxj%5Fc%5F")-1) == 0)
 829       || (strncasecmp(name, "_chxj_r_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fr%5F", sizeof("%5Fchxj%5Fr%5F")-1) == 0)
 830       || (strncasecmp(name, "_chxj_s_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fs%5F", sizeof("%5Fchxj%5Fs%5F")-1) == 0)) {
 831       if (value == NULL)
 832         continue;
 833
 834       if (strlen(value) == 0)
 835         continue;
 836
 837       if (strlen(result) != 0)
 838         result = apr_pstrcat(pool, result, "&", NULL);
 839
 840       if (strcasecmp(entryp->encoding, "NONE") != 0 && value && strlen(value)) {
 841         apr_size_t dlen;
 842         char       *dvalue;
 843
 844         dlen   = strlen(value);
 845         value = chxj_url_decode(pool, value);
 846         dvalue = chxj_rencoding(r, value, &dlen);
 847         dvalue = chxj_url_encode(pool,dvalue);
 848         result = apr_pstrcat(pool, result, &name[8], "=", dvalue, NULL);
 849
 850       }
 851       else {
 852         result = apr_pstrcat(pool, result, &name[8], "=", value, NULL);
 853       }
 854     }
 855     else
 856     if (strcasecmp(name, CHXJ_COOKIE_PARAM) == 0 || strcasecmp(name, "%5Fchxj%5Fcc") == 0) {
 857       if (! cookie) {
 858         apr_table_unset(r->headers_in, "Cookie");
 859         DBG(r, "REQ[%X] found cookie parameter[%s]",    (unsigned int)(apr_size_t)r, value);
 860         DBG(r, "REQ[%X] call start chxj_load_cookie()", (unsigned int)(apr_size_t)r);
 861         cookie_lock_t *lock = chxj_cookie_lock(r);
 862         cookie = chxj_load_cookie(r, value);
 863         DBG(r, "REQ[%X] call end   chxj_load_cookie()", (unsigned int)(apr_size_t)r);
 864         if (! no_update_flag && cookie) {
 865           cookie = chxj_update_cookie(r, cookie);
 866         }
 867         chxj_cookie_unlock(r, lock);
 868       }
 869       if (cookie && cookie->cookie_id) {
 870         if (strlen(result) != 0)
 871           result = apr_pstrcat(pool, result, "&", NULL);
 872         result = apr_pstrcat(pool, result, name, "=", cookie->cookie_id, NULL);
 873       }
 874     }
 875     else
 876     if (strcasecmp(name, CHXJ_COOKIE_NOUPDATE_PARAM) == 0) {
 877       if (strlen(result) != 0)
 878         result = apr_pstrcat(pool, result, "&", NULL);
 879       result = apr_pstrcat(pool, result, name, "=", value, NULL);
 880     }
 881     else
 882     if ( strncasecmp(name, CHXJ_QUERY_STRING_PARAM_PREFIX,     sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX)-1) == 0) {
 883       apr_size_t dlen;
 884       char*      dvalue;
 885       dlen   = strlen(value);
 886       if (dlen && value) {
 887         value = chxj_url_decode(pool, value);
 888         dvalue = chxj_rencoding(r, value, &dlen);
 889         dvalue = chxj_url_encode(pool,dvalue);
 890         if (r->args && strlen(r->args) > 0) {
 891           r->args = apr_pstrcat(pool, r->args, "&", &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX)-1], "=", dvalue, NULL);
 892         }
 893         else {
 894           r->args = apr_pstrcat(pool, &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX)-1], "=", dvalue, NULL);
 895         }
 896         s_convert_guid_parameter_to_header(r, &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX)-1], spec);
 897       }
 898     }
 899     else
 900     if (strncasecmp(name, CHXJ_QUERY_STRING_PARAM_PREFIX_ENC, sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX_ENC)-1) == 0) {
 901       apr_size_t dlen;
 902       char*      dvalue;
 903       dlen   = strlen(value);
 904       if (dlen && value) {
 905         value = chxj_url_decode(pool, value);
 906         dvalue = chxj_rencoding(r, value, &dlen);
 907         dvalue = chxj_url_encode(pool,dvalue);
 908         if (r->args && strlen(r->args) > 0) {
 909           r->args = apr_pstrcat(pool, r->args, "&", &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX_ENC)-1], "=", dvalue, NULL);
 910         }
 911         else {
 912           r->args = apr_pstrcat(pool, &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX_ENC)-1], "=", dvalue, NULL);
 913         }
 914         s_convert_guid_parameter_to_header(r, &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX_ENC)-1], spec);
 915       }
 916     }
 917     DBG(r, "REQ[%X] ************************ name:[%s]", (unsigned int)(apr_size_t)r, name);
 918   }
 919   *len = strlen(result);
 920   apr_table_setn(r->headers_in, "X-Chxj-Cookie-No-Update", "true");
 921   if (! no_update_flag) {
 922     result = apr_pstrcat(pool, result, "&_chxj_nc=true", NULL);
 923   }
 924
 925   DBG(r, "REQ[%X] AFTER input convert result = [%s]", (unsigned int)(apr_size_t)r, result);
 926   DBG(r, "REQ[%X] end chxj_input_convert()", (unsigned int)(apr_size_t)r);
 927
 928   return result;
 929 }
 930
 931
 932 /**
 933  * The received data is returned to the filter.
 934  *
 935  * @param f    [i/o] It is a filter.
 936  * @param data [i]   It is data returned to the filter.
 937  * @param len  [i]   It is length of the data returned to the filter.
 938  */
 939 static apr_status_t
 940 pass_data_to_filter(ap_filter_t *f, const char *data,
 941                                         apr_size_t len)
 942 {
 943   request_rec         *r = f->r;
 944   conn_rec            *c = r->connection;
 945   apr_status_t        rv;
 946   apr_bucket_brigade  *bb;
 947   apr_bucket          *b;
 948
 949   DBG(r, "REQ[%X] start pass_data_to_filter()", (unsigned int)(apr_size_t)r);
 950
 951   chxj_header_inf_clear(r);
 952
 953   bb = apr_brigade_create(r->pool, c->bucket_alloc);
 954   b  = apr_bucket_transient_create(data, len, c->bucket_alloc);
 955
 956   APR_BRIGADE_INSERT_TAIL(bb, b);
 957   b = apr_bucket_eos_create(f->c->bucket_alloc);
 958   APR_BRIGADE_INSERT_TAIL(bb, b);
 959
 960   rv = ap_pass_brigade(f->next, bb);
 961   if (rv != APR_SUCCESS) {
 962     DBG(r, "REQ[%X] end pass_data_to_filter() (apr_pass_brigade)", (unsigned int)(apr_size_t)r);
 963     return rv;
 964   }
 965
 966   DBG(r, "REQ[%X] end pass_data_to_filter()", (unsigned int)(apr_size_t)r);
 967
 968   return rv;
 969 }
 970
 971
 972 /**
 973  * Add No Cache Header
 974  */
 975 static void
 976 s_add_no_cache_headers(request_rec *r, chxjconvrule_entry  *entryp)
 977 {
 978   if (entryp->action & CONVRULE_NOCACHE_ON_BIT) {
 979     apr_table_unset(r->headers_out,     "Pragma");
 980     apr_table_unset(r->err_headers_out, "Pragma");
 981     apr_table_unset(r->headers_out,     "Expires");
 982     apr_table_unset(r->err_headers_out, "Expires");
 983     apr_table_unset(r->headers_out,     "Cache-Control");
 984     apr_table_unset(r->err_headers_out, "Cache-Control");
 985
 986     apr_table_setn(r->err_headers_out, "Pragma", "no-cache");
 987     apr_table_setn(r->err_headers_out, "Expires", "Thu, 01 Jan 1970 00:00:00 GMT");
 988     apr_table_setn(r->err_headers_out, "Cache-Control", "no-cache, no-store");
 989   }
 990 }
 991
 992
 993 /**
 994  * It is the main loop of the output filter.
 995  *
 996  * @param f   [i/o] It is a filter.
 997  * @param bb  [i]
 998  */
 999 static apr_status_t
1000 chxj_output_filter(ap_filter_t *f, apr_bucket_brigade *bb)
1001 {
1002   request_rec         *r;
1003   apr_status_t        rv;
1004   apr_bucket          *b;
1005   const char          *data;
1006   char                *user_agent = NULL;
1007   apr_size_t          len;
1008   mod_chxj_ctx        *ctx = (mod_chxj_ctx *)f->ctx;
1009   cookie_t            *cookie = NULL;
1010   mod_chxj_config     *dconf;
1011   chxjconvrule_entry  *entryp = NULL;
1012   device_table        *spec = NULL;
1013   apr_pool_t          *pool;
1014
1015   r  = f->r;
1016   DBG(f->r, "REQ[%X] start of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1017   rv = APR_SUCCESS;
1018
1019   apr_pool_create(&pool, r->pool);
1020
1021   entryp = ctx->entryp;
1022   spec   = ctx->spec;
1023   dconf  = chxj_get_module_config(r->per_dir_config, &chxj_module);
1024
1025
1026   if (apr_table_get(r->headers_out, "Location") || apr_table_get(r->err_headers_out, "Location")) {
1027     DBG(r, "REQ[%X] found Location header", TO_ADDR(r));
1028     if ((entryp->action & CONVRULE_COOKIE_ON_BIT) || (entryp->action & CONVRULE_COOKIE_ONLY_BIT)) {
1029       cookie_lock_t *lock = NULL;
1030       DBG(r, "REQ[%X] entryp->action == COOKIE_ON_BIT", TO_ADDR(r));
1031       switch(spec->html_spec_type) {
1032       case CHXJ_SPEC_Chtml_1_0:
1033       case CHXJ_SPEC_Chtml_2_0:
1034       case CHXJ_SPEC_Chtml_3_0:
1035       case CHXJ_SPEC_Chtml_4_0:
1036       case CHXJ_SPEC_Chtml_5_0:
1037       case CHXJ_SPEC_Chtml_6_0:
1038       case CHXJ_SPEC_Chtml_7_0:
1039       case CHXJ_SPEC_XHtml_Mobile_1_0:
1040       case CHXJ_SPEC_Jhtml:
1041         lock = chxj_cookie_lock(r);
1042         cookie = chxj_save_cookie(r);
1043         s_add_cookie_id_if_has_location_header(r, cookie);
1044         chxj_cookie_unlock(r, lock);
1045         break;
1046       default:
1047         break;
1048       }
1049     }
1050     if (! ap_is_HTTP_REDIRECT(r->status)) {
1051       r->status = HTTP_MOVED_TEMPORARILY;
1052     }
1053     s_add_no_cache_headers(r, entryp);
1054     /* must not send body. */
1055     rv = pass_data_to_filter(f, "", 0);
1056     DBG(f->r, "REQ[%X] end of chxj_output_filter()", TO_ADDR(r));
1057     return rv;
1058   }
1059
1060
1061   if (r->content_type) {
1062     if (! STRNCASEEQ('t','T',"text/html",r->content_type, sizeof("text/html")-1)
1063     &&  ! STRNCASEEQ('t','T',"text/xml", r->content_type, sizeof("text/xml")-1)
1064     &&  ! STRNCASEEQ('a','A',"application/xhtml+xml", r->content_type, sizeof("application/xhtml+xml")-1)
1065     &&  ! (dconf->image == CHXJ_IMG_ON
1066           && ! apr_table_get(r->headers_in, "CHXJ_IMG_CONV")
1067           && STRNCASEEQ('i','I',"image/",  r->content_type, sizeof("image/") -1)
1068           && ( STRCASEEQ('j','J',"jpeg",            &r->content_type[6])         /* JPEG */
1069             || STRCASEEQ('j','J',"jp2",             &r->content_type[6])         /* JPEG2000 */
1070             || STRCASEEQ('j','J',"jpeg2000",        &r->content_type[6])         /* JPEG2000 */
1071             || STRCASEEQ('j','J',"jpeg2000-image",  &r->content_type[6])         /* JPEG2000 */
1072             || STRCASEEQ('x','X',"x-jpeg2000-image",&r->content_type[6])         /* JPEG2000 */
1073             || STRCASEEQ('x','X',"x-ms-bmp",        &r->content_type[6])         /* BMP */
1074             || STRCASEEQ('p','P',"png",             &r->content_type[6])         /* PNG */
1075             || STRCASEEQ('x','X',"x-png",           &r->content_type[6])         /* PNG */
1076             || STRCASEEQ('g','G',"gif",             &r->content_type[6])))) {     /* GIF */
1077
1078       DBG(r, "REQ[%X] not convert content-type:[%s] dconf->image:[%d]", (unsigned int)(apr_size_t)r, r->content_type, dconf->image);
1079       if (entryp->action & CONVRULE_COOKIE_ON_BIT) {
1080         cookie_lock_t *lock = NULL;
1081         DBG(r, "REQ[%X] entryp->action == COOKIE_ON_BIT", (unsigned int)(apr_size_t)r);
1082         switch(spec->html_spec_type) {
1083         case CHXJ_SPEC_Chtml_1_0:
1084         case CHXJ_SPEC_Chtml_2_0:
1085         case CHXJ_SPEC_Chtml_3_0:
1086         case CHXJ_SPEC_Chtml_4_0:
1087         case CHXJ_SPEC_Chtml_5_0:
1088         case CHXJ_SPEC_Chtml_6_0:
1089         case CHXJ_SPEC_Chtml_7_0:
1090         case CHXJ_SPEC_XHtml_Mobile_1_0:
1091         case CHXJ_SPEC_Jhtml:
1092           lock = chxj_cookie_lock(r);
1093           cookie = chxj_save_cookie(r);
1094           s_add_cookie_id_if_has_location_header(r, cookie);
1095           chxj_cookie_unlock(r, lock);
1096           break;
1097         default:
1098           break;
1099         }
1100       }
1101       if (apr_table_get(r->headers_out, "Location") || apr_table_get(r->err_headers_out, "Location")) {
1102         if (! ap_is_HTTP_REDIRECT(r->status)) {
1103           r->status = HTTP_MOVED_TEMPORARILY;
1104         }
1105       }
1106       s_add_no_cache_headers(r, entryp);
1107       ap_pass_brigade(f->next, bb);
1108       DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1109       return APR_SUCCESS;
1110     }
1111   }
1112   else {
1113     DBG(r, "REQ[%X] not convert content-type:[(null)]", (unsigned int)(apr_size_t)r);
1114     ap_pass_brigade(f->next, bb);
1115     DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1116     return APR_SUCCESS;
1117   }
1118
1119
1120   for (b = APR_BRIGADE_FIRST(bb);
1121        b != APR_BRIGADE_SENTINEL(bb);
1122        b = APR_BUCKET_NEXT(b)) {
1123
1124     if (apr_bucket_read(b, &data, &len, APR_BLOCK_READ) == APR_SUCCESS) {
1125       DBG(r, "REQ[%X] read data[%.*s]",(unsigned int)(apr_size_t)r, (int)len, data);
1126
1127       /*--------------------------------------------------------------------*/
1128       /* append data                                                        */
1129       /*--------------------------------------------------------------------*/
1130       char *tmp;
1131       DBG(r, "append data start");
1132       ctx = (mod_chxj_ctx *)f->ctx;
1133
1134       if (len > 0) {
1135         tmp = apr_palloc(r->pool, ctx->len);
1136         memcpy(tmp, ctx->buffer, ctx->len);
1137
1138         ctx->buffer = apr_palloc(pool, ctx->len + len);
1139
1140         memcpy(ctx->buffer, tmp, ctx->len);
1141         memcpy(&ctx->buffer[ctx->len], data, len);
1142
1143         ctx->len += len;
1144       }
1145       DBG(r, "REQ[%X] append data end", (unsigned int)(apr_size_t)r);
1146     }
1147
1148     if (APR_BUCKET_IS_EOS(b)) {
1149
1150       DBG(r, "REQ[%X] eos", (unsigned int)(apr_size_t)r);
1151       /*----------------------------------------------------------------------*/
1152       /* End Of File                                                          */
1153       /*----------------------------------------------------------------------*/
1154       if (ctx) {
1155         cookie_lock_t *lock = NULL;
1156         ctx = (mod_chxj_ctx *)f->ctx;
1157
1158         DBG(r, "REQ[%X] content_type=[%s]", (unsigned int)(apr_size_t)r, r->content_type);
1159         lock = chxj_cookie_lock(r);
1160
1161         if (spec->html_spec_type != CHXJ_SPEC_UNKNOWN
1162             && r->content_type
1163             && (STRNCASEEQ('a','A',"application/xhtml+xml", r->content_type, sizeof("application/xhtml+xml")-1)
1164             ||  STRNCASEEQ('t','T',"text/html", r->content_type, sizeof("text/html")-1))) {
1165           DBG(r, "REQ[%X] detect convert target:[%s]", (unsigned int)(apr_size_t)r, r->content_type);
1166
1167           if (ctx->len) {
1168             char *tmp;
1169
1170             tmp = apr_palloc(pool, ctx->len + 1);
1171
1172             memset(tmp, 0, ctx->len + 1);
1173             memcpy(tmp, ctx->buffer, ctx->len);
1174
1175             ctx->buffer = chxj_convert(r,
1176                                        (const char **)&tmp,
1177                                        (apr_size_t *)&ctx->len,
1178                                        spec,
1179                                        user_agent, &cookie);
1180
1181           }
1182           else {
1183             ctx->buffer = apr_psprintf(r->pool, "\n");
1184             ctx->len += 1;
1185             ctx->buffer = chxj_convert(r,
1186                                        (const char **)&ctx->buffer,
1187                                        (apr_size_t *)&ctx->len,
1188                                        spec,
1189                                        user_agent, &cookie);
1190
1191           }
1192         }
1193         if (r->content_type
1194             && *(char *)r->content_type == 't'
1195             && strncmp(r->content_type, "text/xml",   8) == 0) {
1196           DBG(r, "REQ[%X] text/XML", (unsigned int)(apr_size_t)r);
1197
1198           Doc       doc;
1199           Node      *root;
1200           Node      *child;
1201           qr_code_t qrcode;
1202           int       sts;
1203
1204           memset(&doc,    0, sizeof(Doc));
1205           memset(&qrcode, 0, sizeof(qr_code_t));
1206           doc.r = r;
1207           doc.parse_mode  = PARSE_MODE_CHTML;
1208           qrcode.doc      = &doc;
1209           qrcode.r        = r;
1210
1211           qs_init_malloc(&doc);
1212
1213           root = qs_parse_string(&doc, ctx->buffer, ctx->len);
1214
1215           sts = 0;
1216           for (child = qs_get_child_node(&doc,root);
1217                child ;
1218                child = qs_get_next_node(&doc,child)) {
1219             char *name = qs_get_node_name(&doc,child);
1220             if (strcasecmp("qrcode",name) == 0) {
1221               sts++;
1222               break;
1223             }
1224           }
1225           qs_all_free(&doc,QX_LOGMARK);
1226           if (sts) {
1227             r->handler = apr_psprintf(r->pool, "chxj-qrcode");
1228             chxj_qrcode_node_to_qrcode(&qrcode, root);
1229             sts = chxj_qrcode_create_image_data(&qrcode, &ctx->buffer, &ctx->len);
1230             if (sts != OK) {
1231               ERR(r, "REQ[%X] qrcode create failed.", (unsigned int)(apr_size_t)r);
1232               chxj_cookie_unlock(r, lock);
1233               DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1234               return sts;
1235             }
1236             r->content_type = apr_psprintf(r->pool, "image/jpeg");
1237           }
1238         }
1239
1240         if (spec->html_spec_type != CHXJ_SPEC_UNKNOWN
1241             && r->content_type
1242             && ( *r->content_type == 'i' || *r->content_type == 'I')
1243             && dconf->image == CHXJ_IMG_ON
1244             && strncasecmp("image/", r->content_type, 6) == 0
1245             && ( STRCASEEQ('j','J',"jpeg",            &r->content_type[6])         /* JPEG */
1246               || STRCASEEQ('j','J',"jp2",             &r->content_type[6])         /* JPEG2000 */
1247               || STRCASEEQ('j','J',"jpeg2000",        &r->content_type[6])         /* JPEG2000 */
1248               || STRCASEEQ('j','J',"jpeg2000-image",  &r->content_type[6])         /* JPEG2000 */
1249               || STRCASEEQ('x','X',"x-jpeg2000-image",&r->content_type[6])         /* JPEG2000 */
1250               || STRCASEEQ('p','P',"png",             &r->content_type[6])         /* PNG */
1251               || STRCASEEQ('x','X',"x-png",           &r->content_type[6])         /* PNG */
1252               || STRCASEEQ('x','X',"x-ms-bmp",     &r->content_type[6])         /* BMP */
1253               || STRCASEEQ('g','G',"gif",             &r->content_type[6]))) {     /* GIF */
1254           DBG(r, "REQ[%X] detect convert target:[%s]", (unsigned int)(apr_size_t)r, r->content_type);
1255           if (ctx->len) {
1256             char *tmp;
1257
1258             tmp = apr_palloc(pool, ctx->len + 1);
1259
1260             memset(tmp, 0, ctx->len + 1);
1261             memcpy(tmp, ctx->buffer, ctx->len);
1262             ctx->buffer =
1263               chxj_convert_image(r,
1264                                   (const char **)&tmp,
1265                                   (apr_size_t *)&ctx->len);
1266             if (ctx->buffer == NULL) {
1267               ctx->buffer = tmp;
1268             }
1269           }
1270         }
1271
1272         apr_table_unset(r->headers_out, "Content-Length");
1273         apr_table_unset(r->err_headers_out, "Content-Length");
1274         ap_set_content_length(r, (apr_off_t)ctx->len);
1275
1276
1277         if (ctx->len > 0) {
1278           DBG(r, "REQ[%X] call pass_data_to_filter()", (unsigned int)(apr_size_t)r);
1279           s_add_cookie_id_if_has_location_header(r, cookie);
1280           if (apr_table_get(r->headers_out, "Location") || apr_table_get(r->err_headers_out, "Location")) {
1281             if (! ap_is_HTTP_REDIRECT(r->status)) {
1282               r->status = HTTP_MOVED_TEMPORARILY;
1283             }
1284           }
1285           if (ctx->len && ap_is_HTTP_REDIRECT(r->status)) {
1286             ctx->buffer = apr_pstrdup(pool, "");
1287             ctx->len    = 0;
1288             ap_set_content_length(r, (apr_off_t)ctx->len);
1289           }
1290           chxj_cookie_unlock(r,lock);
1291           s_add_no_cache_headers(r, entryp);
1292           rv = pass_data_to_filter(f,
1293                                    (const char *)ctx->buffer,
1294                                    (apr_size_t)ctx->len);
1295         }
1296         else {
1297           ctx->buffer = apr_pstrdup(pool, "");
1298           ctx->len    = 0;
1299           ap_set_content_length(r, (apr_off_t)ctx->len);
1300           chxj_cookie_unlock(r, lock);
1301           s_add_no_cache_headers(r, entryp);
1302           rv = pass_data_to_filter(f,
1303                                    (const char *)ctx->buffer,
1304                                    (apr_size_t)ctx->len);
1305         }
1306         DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1307         return rv;
1308       }
1309       else {
1310         DBG(r, "REQ[%X] SAVE COOKIE[%x]", (unsigned int)(apr_size_t)r, entryp->action);
1311
1312         /*
1313          * save cookie.
1314          */
1315         if (entryp->action & CONVRULE_COOKIE_ON_BIT) {
1316           cookie_lock_t *lock = NULL;
1317           DBG(r, "REQ[%X] entryp->action == COOKIE_ON_BIT", (unsigned int)(apr_size_t)r);
1318           switch(spec->html_spec_type) {
1319           case CHXJ_SPEC_Chtml_1_0:
1320           case CHXJ_SPEC_Chtml_2_0:
1321           case CHXJ_SPEC_Chtml_3_0:
1322           case CHXJ_SPEC_Chtml_4_0:
1323           case CHXJ_SPEC_Chtml_5_0:
1324           case CHXJ_SPEC_Chtml_6_0:
1325           case CHXJ_SPEC_Chtml_7_0:
1326           case CHXJ_SPEC_XHtml_Mobile_1_0:
1327           case CHXJ_SPEC_Jhtml:
1328             lock = chxj_cookie_lock(r);
1329             cookie = chxj_save_cookie(r);
1330             /*
1331              * Location Header Check to add cookie parameter.
1332              */
1333             s_add_cookie_id_if_has_location_header(r, cookie);
1334             chxj_cookie_unlock(r, lock);
1335             apr_table_unset(r->headers_out, "Set-Cookie");
1336             apr_table_unset(r->err_headers_out, "Set-Cookie");
1337             break;
1338
1339           default:
1340             break;
1341           }
1342         }
1343         if (apr_table_get(r->headers_out, "Location") || apr_table_get(r->err_headers_out, "Location")) {
1344           if (! ap_is_HTTP_REDIRECT(r->status)) {
1345             r->status = HTTP_MOVED_TEMPORARILY;
1346           }
1347         }
1348         apr_table_setn(r->headers_out, "Content-Length", "0");
1349         DBG(r, "REQ[%X] call pass_data_to_filter()", (unsigned int)(apr_size_t)r);
1350         s_add_no_cache_headers(r, entryp);
1351         rv = pass_data_to_filter(f, (const char *)"", (apr_size_t)0);
1352         DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1353         return rv;
1354       }
1355     }
1356   }
1357   apr_brigade_destroy(bb);
1358
1359   DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1360
1361   return APR_SUCCESS;
1362 }
1363
1364 /**
1365  * Add Cookie_id if it has location header.
1366  */
1367 static void
1368 s_add_cookie_id_if_has_location_header(request_rec *r, cookie_t *cookie)
1369 {
1370   char *location_header = (char *)apr_table_get(r->headers_out, "Location");
1371   if (! location_header) {
1372     location_header = (char *)apr_table_get(r->err_headers_out, "Location");
1373   }
1374   if (cookie && location_header) {
1375     DBG(r, "REQ[%X] Location Header=[%s]", (unsigned int)(apr_size_t)r, location_header);
1376     location_header = chxj_add_cookie_parameter(r,
1377                                                 location_header,
1378                                                 cookie);
1379     apr_table_unset(r->headers_out, "Location");
1380     apr_table_setn(r->headers_out, "Location", location_header);
1381     DBG(r, "REQ[%X] Location Header=[%s]", (unsigned int)(apr_size_t)r, location_header);
1382     if (!ap_is_HTTP_REDIRECT(r->status)) {
1383       r->status = HTTP_MOVED_TEMPORARILY;
1384     }
1385   }
1386 }
1387
1388 /**
1389  * It is the main loop of the input filter handler.
1390  *
1391  */
1392 static apr_status_t
1393 chxj_input_handler(request_rec *r)
1394 {
1395   mod_chxj_config     *dconf;
1396   chxjconvrule_entry  *entryp = NULL;
1397   device_table        *spec   = NULL;
1398   char                *post_data = NULL;
1399   apr_size_t          post_data_len = 0;
1400   char                *response;
1401   char                *user_agent;
1402   apr_pool_t          *pool;
1403   apr_size_t          ii;
1404   int                 response_code = 0;
1405
1406   DBG(r, "start of chxj_input_handler()");
1407
1408   if (strcasecmp(r->handler, "chxj-input-handler")) {
1409     DBG(r, "end chxj_input_handler()");
1410     return DECLINED;
1411   }
1412   apr_pool_create(&pool, r->pool);
1413
1414   dconf      = chxj_get_module_config(r->per_dir_config, &chxj_module);
1415   user_agent = (char*)apr_table_get(r->headers_in, CHXJ_HTTP_USER_AGENT);
1416   if (!user_agent) {
1417     user_agent = (char*)apr_table_get(r->headers_in, HTTP_USER_AGENT);
1418   }
1419   spec       = chxj_specified_device(r, user_agent);
1420   entryp     = chxj_apply_convrule(r, dconf->convrules);
1421
1422   post_data = apr_pstrdup(pool, "");
1423   if (ap_setup_client_block(r, REQUEST_CHUNKED_DECHUNK) == OK) {
1424     if (ap_should_client_block(r)) {
1425       while (post_data_len < CHXJ_POST_MAX) {
1426 #define BUFSZ (256)
1427         char buffer[BUFSZ];
1428         int read_bytes = ap_get_client_block(r, buffer, BUFSZ-1);
1429         if (read_bytes<=0) {
1430           break;
1431         }
1432         buffer[read_bytes] = '\0';
1433         post_data = apr_pstrcat(pool, post_data, buffer, NULL);
1434         post_data_len += read_bytes;
1435 #undef BUFSZ
1436       }
1437     }
1438   }
1439
1440   /*
1441    * now convert.
1442    */
1443   if (post_data_len > 0) {
1444     post_data = chxj_input_convert(r, (const char**)&post_data, (apr_size_t*)&post_data_len, entryp, spec);
1445     DBG(r, "(in:exchange)POSTDATA:[%s]", post_data);
1446   }
1447
1448   char *url_path;
1449   if (dconf->forward_url_base) {
1450     url_path = apr_psprintf(pool, "%s%s", dconf->forward_url_base, r->uri);
1451   }
1452   else {
1453     url_path = apr_psprintf(pool, "%s://%s:%d%s", chxj_apache_run_http_scheme(r), ap_get_server_name(r), ap_get_server_port(r), r->uri);
1454   }
1455   if (r->args) {
1456     url_path = apr_pstrcat(pool, url_path, "?", r->args, NULL);
1457   }
1458   DBG(r, "==> new url_path:[%s]", url_path);
1459
1460   apr_size_t res_len;
1461   apr_table_setn(r->headers_in, CHXJ_HEADER_ORIG_CLIENT_IP, r->connection->remote_ip);
1462   apr_table_unset(r->headers_in, "Content-Length");
1463   apr_table_setn(r->headers_in, "Content-Length", apr_psprintf(pool, "%" APR_SIZE_T_FMT, post_data_len));
1464   response = chxj_serf_post(r, pool, url_path, post_data, post_data_len, 1, &res_len, &response_code);
1465   DBG(r, "REQ[%X] -------------------------------------------------------", (unsigned int)(apr_size_t)r);
1466   DBG(r, "REQ[%X] response length:[%" APR_SIZE_T_FMT "]", (unsigned int)(apr_size_t)r, res_len);
1467   for (ii=0; ii<res_len/64; ii++) {
1468     DBG(r, "REQ[%X] response:[%.*s]", (unsigned int)(apr_size_t)r, 64, &response[ii*64]);
1469   }
1470   DBG(r, "REQ[%X] -------------------------------------------------------", (unsigned int)(apr_size_t)r);
1471
1472   char *chunked;
1473   if ((chunked = (char *)apr_table_get(r->headers_out, "Transfer-Encoding")) != NULL) {
1474     if (strcasecmp(chunked, "chunked") == 0) {
1475       r->chunked = 1;
1476       apr_table_unset(r->headers_out, "Transfer-Encoding");
1477     }
1478   }
1479   if (ap_is_HTTP_ERROR(response_code)) {
1480     DBG(r, "REQ[%X] end of chxj_input_handler() (HTTP-ERROR received. response code:[%d])", (unsigned int)(apr_size_t)r, response_code);
1481     return response_code;
1482   }
1483   {
1484     apr_pool_t *wpool;
1485     apr_pool_create(&wpool, r->pool);
1486     apr_bucket_brigade *bb;
1487     apr_bucket *e;
1488     apr_status_t rv;
1489     conn_rec *c = r->connection;
1490
1491     bb = apr_brigade_create(wpool, c->bucket_alloc);
1492     e  = apr_bucket_transient_create(response, res_len, c->bucket_alloc);
1493     APR_BRIGADE_INSERT_TAIL(bb, e);
1494     e = apr_bucket_eos_create(c->bucket_alloc);
1495     APR_BRIGADE_INSERT_TAIL(bb, e);
1496     if ((rv = ap_pass_brigade(r->output_filters, bb)) != APR_SUCCESS) {
1497       ERR(r, "REQ[%X] %s:%d failed ap_pass_brigade()", (unsigned int)(apr_size_t)r, APLOG_MARK);
1498       return rv;
1499     }
1500     apr_brigade_cleanup(bb);
1501   }
1502
1503   DBG(r, "REQ[%X] end of chxj_input_handler()", (unsigned int)(apr_size_t)r);
1504   return APR_SUCCESS;
1505 }
1506
1507 static mod_chxj_global_config *
1508 chxj_global_config_create(apr_pool_t *pool, server_rec *s)
1509 {
1510   mod_chxj_global_config *conf;
1511
1512   SDBG(s, "start chxj_global_config_create()");
1513
1514   /*--------------------------------------------------------------------------*/
1515   /* allocate an own subpool which survives server restarts                   */
1516   /*--------------------------------------------------------------------------*/
1517   conf = (mod_chxj_global_config *)apr_palloc(pool,
1518                   sizeof(mod_chxj_global_config));
1519 #if 0
1520   conf->cookie_db_lock = NULL;
1521 #endif
1522   SDBG(s, "end   chxj_global_config_create()");
1523
1524   return conf;
1525 }
1526
1527
1528 /**
1529  * initialize chxj module
1530  */
1531 static int
1532 chxj_init_module(apr_pool_t *p,
1533                  apr_pool_t *UNUSED(plog),
1534                  apr_pool_t *UNUSED(ptemp),
1535                  server_rec *s)
1536 {
1537   void *user_data;
1538   apr_status_t rv;
1539
1540   SDBG(s, "start chxj_init_module()");
1541
1542   apr_pool_userdata_get(&user_data, CHXJ_MOD_CONFIG_KEY, s->process->pool);
1543   SDBG(s, " ");
1544   if (user_data == NULL) {
1545     SDBG(s, " ");
1546     /*
1547      * dummy user_data set.
1548      */
1549     apr_pool_userdata_set(
1550       (const void *)(1),
1551       CHXJ_MOD_CONFIG_KEY,
1552       apr_pool_cleanup_null,
1553       s->process->pool);
1554     SDBG(s, "end  chxj_init_module()");
1555     return OK;
1556   }
1557
1558   ap_add_version_component(p, CHXJ_VERSION_PREFIX CHXJ_VERSION);
1559
1560   if ((rv = apr_proc_mutex_create(&global_cookie_mutex, NULL,  APR_LOCK_FCNTL, s->process->pool)) != APR_SUCCESS) {
1561     char errstr[255];
1562     SERR(s, "%s:%d end chxj_init_module(). mutex create failure.(%d:%s)",APLOG_MARK, rv,apr_strerror(rv,errstr,255));
1563     return HTTP_INTERNAL_SERVER_ERROR;
1564   }
1565
1566   SDBG(s, "end  chxj_init_module()");
1567
1568   return OK;
1569 }
1570
1571
1572 static void
1573 chxj_child_init(apr_pool_t *UNUSED(p), server_rec *s)
1574 {
1575   apr_status_t rv;
1576   SDBG(s, "start chxj_child_init()");
1577   if ((rv = apr_proc_mutex_child_init(&global_cookie_mutex, NULL, s->process->pool)) != APR_SUCCESS) {
1578     char errstr[255];
1579     SERR(s, "%s:%d ERROR end chxj_init_module(). mutex create failure.(%d:%s)", APLOG_MARK, rv,apr_strerror(rv,errstr,255));
1580   }
1581   SDBG(s, "end   chxj_child_init()");
1582 }
1583
1584
1585 /**
1586  * A set structure of each server is generated.
1587  *
1588  * @param p
1589  * @param s
1590  */
1591 static void *
1592 chxj_config_server_create(apr_pool_t *p, server_rec *s)
1593 {
1594   mod_chxj_global_config *gc;
1595
1596   gc = chxj_global_config_create(p,s);
1597
1598   return gc;
1599 }
1600
1601
1602 static int
1603 chxj_translate_name(request_rec *r)
1604 {
1605   DBG(r, "REQ[%X] =======================================================================", (unsigned int)(apr_size_t)r);
1606   DBG(r, "REQ[%X] ", (unsigned int)(apr_size_t)r);
1607   DBG(r, "REQ[%X] START REQUEST (uri:[%s] args:[%s])", (unsigned int)(apr_size_t)r, r->unparsed_uri, r->args ? r->args : "");
1608   DBG(r, "REQ[%X] METHOD [%s]", TO_ADDR(r), r->method);
1609   DBG(r, "REQ[%X] ", (unsigned int)(apr_size_t)r);
1610   DBG(r, "REQ[%X] =======================================================================", (unsigned int)(apr_size_t)r);
1611 #if 0
1612   return chxj_trans_name(r);
1613 #else
1614   return DECLINED;
1615 #endif
1616 }
1617
1618
1619 static void
1620 chxj_insert_filter(request_rec *r)
1621 {
1622   char                *user_agent;
1623   device_table        *spec;
1624   mod_chxj_config     *dconf;
1625   chxjconvrule_entry  *entryp;
1626   mod_chxj_ctx        *ctx;
1627   apr_status_t        rv;
1628   char                *contentType;
1629
1630   DBG(r, "REQ[%X] start chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1631
1632   dconf = chxj_get_module_config(r->per_dir_config, &chxj_module);
1633
1634   /* we get User-Agent from CHXJ_HTTP_USER_AGENT header if any */
1635   user_agent = (char *)apr_table_get(r->headers_in, CHXJ_HTTP_USER_AGENT);
1636   if (!user_agent) {
1637     user_agent = (char*)apr_table_get(r->headers_in, HTTP_USER_AGENT);
1638   }
1639
1640   contentType = (char *)apr_table_get(r->headers_in, "Content-Type");
1641   if (contentType
1642       && strncasecmp("multipart/form-data", contentType, 19) == 0) {
1643     DBG(r, "REQ[%X] detect multipart/form-data ==> no target", (apr_size_t)(unsigned int)r);
1644     DBG(r, "REQ[%X] end chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1645     return;
1646   }
1647
1648   spec = chxj_specified_device(r, user_agent);
1649   entryp = chxj_apply_convrule(r, dconf->convrules);
1650   if (!entryp) {
1651     DBG(r, "REQ[%X] end chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1652     return;
1653   }
1654   ctx = apr_palloc(r->pool, sizeof(*ctx));
1655   memset(ctx, 0, sizeof(*ctx));
1656   if ((rv = apr_pool_create(&ctx->pool, r->pool)) != APR_SUCCESS) {
1657     ERR(r, "%s:%d: failed: new pool create. rv:[%d]", __FILE__,__LINE__,rv);
1658     DBG(r, "REQ:[%X] end chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1659     return;
1660   }
1661   ctx->entryp = entryp;
1662   ctx->spec   = spec;
1663   ctx->buffer = apr_palloc(ctx->pool, 1);
1664   ctx->buffer[0] = 0;
1665
1666   if (!entryp || (!(entryp->action & CONVRULE_ENGINE_ON_BIT) && !(entryp->action & CONVRULE_COOKIE_ONLY_BIT))) {
1667     DBG(r,"REQ[%X] EngineOff", (unsigned int)(apr_size_t)r);
1668     DBG(r, "REQ[%X] end chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1669     return;
1670   }
1671
1672   switch(spec->html_spec_type) {
1673   case CHXJ_SPEC_Chtml_1_0:
1674   case CHXJ_SPEC_Chtml_2_0:
1675   case CHXJ_SPEC_Chtml_3_0:
1676   case CHXJ_SPEC_Chtml_4_0:
1677   case CHXJ_SPEC_Chtml_5_0:
1678   case CHXJ_SPEC_Chtml_6_0:
1679   case CHXJ_SPEC_Chtml_7_0:
1680   case CHXJ_SPEC_XHtml_Mobile_1_0:
1681   case CHXJ_SPEC_Hdml:
1682   case CHXJ_SPEC_Jhtml:
1683   case CHXJ_SPEC_Jxhtml:
1684     break;
1685
1686   default:
1687     DBG(r, "REQ[%X] end chxj_insert_filter() Unknown spec type(%d).", (unsigned int)(apr_size_t)r, spec->html_spec_type);
1688     return;
1689   }
1690
1691
1692   if (! apr_table_get(r->headers_in, "X-Chxj-Forward")) {
1693     ap_add_output_filter("chxj_output_filter", ctx, r, r->connection);
1694     DBG(r, "REQ[%X] added Output Filter", (unsigned int)(apr_size_t)r);
1695   }
1696
1697   DBG(r, "REQ[%X] end chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1698 }
1699
1700
1701 /**
1702  * The hook is registered.
1703  *
1704  * @param p
1705  */
1706 static void
1707 chxj_register_hooks(apr_pool_t *UNUSED(p))
1708 {
1709   ap_hook_post_config(chxj_init_module,
1710                       NULL,
1711                       NULL,
1712                       APR_HOOK_REALLY_FIRST);
1713   ap_hook_child_init(chxj_child_init,
1714                      NULL,
1715                      NULL,
1716                      APR_HOOK_REALLY_FIRST);
1717   ap_register_output_filter (
1718                       "chxj_output_filter",
1719                       chxj_output_filter,
1720                       NULL,
1721                       AP_FTYPE_RESOURCE);
1722   ap_hook_insert_filter(chxj_insert_filter, NULL, NULL, APR_HOOK_MIDDLE);
1723   ap_hook_handler(chxj_img_conv_format_handler, NULL, NULL, APR_HOOK_MIDDLE);
1724   ap_hook_handler(chxj_qr_code_handler, NULL, NULL, APR_HOOK_MIDDLE);
1725   ap_hook_handler(chxj_input_handler, NULL, NULL, APR_HOOK_MIDDLE);
1726   ap_hook_translate_name(chxj_translate_name, NULL, NULL, APR_HOOK_MIDDLE);
1727   ap_hook_fixups(chxj_headers_fixup, NULL, NULL, APR_HOOK_FIRST);
1728 }
1729
1730
1731 /**
1732  * A set structure according to the directory is generated.
1733  *
1734  * @param p
1735  * @param arg
1736  */
1737 static void *
1738 chxj_create_per_dir_config(apr_pool_t *p, char *arg)
1739 {
1740   mod_chxj_config *conf;
1741
1742   conf = apr_pcalloc(p, sizeof(mod_chxj_config));
1743   conf->device_data_file = NULL;
1744   conf->devices          = NULL;
1745   conf->emoji_data_file  = NULL;
1746   conf->emoji            = NULL;
1747   conf->emoji_tail       = NULL;
1748   conf->image            = CHXJ_IMG_NONE;
1749   conf->image_cache_dir  = apr_psprintf(p, "%s",DEFAULT_IMAGE_CACHE_DIR);
1750   conf->image_cache_limit = 0;
1751   conf->server_side_encoding = NULL;
1752   conf->cookie_db_dir    = NULL;
1753   conf->cookie_timeout   = 0;
1754   conf->cookie_store_type = COOKIE_STORE_TYPE_NONE;
1755   conf->cookie_lazy_mode  = 0;
1756   conf->cookie_dbm_type  = NULL;
1757 #if defined(USE_MYSQL_COOKIE)
1758   memset((void *)&conf->mysql, 0, sizeof(mysql_t));
1759   conf->mysql.port       = MYSQL_PORT;
1760   conf->mysql.host       = NULL;
1761 #endif
1762 #if defined(USE_MEMCACHE_COOKIE)
1763   memset((void *)&conf->memcache, 0, sizeof(memcache_t));
1764   conf->memcache.host    = NULL;
1765   conf->memcache.port    = 0;
1766 #endif
1767   conf->forward_url_base = NULL;
1768   conf->forward_server_ip = NULL;
1769   conf->allowed_cookie_domain = NULL;
1770   conf->post_log              = NULL;
1771
1772   if (arg == NULL) {
1773     conf->dir                  = NULL;
1774   }
1775   else {
1776     conf->dir                  = apr_pcalloc(p, strlen(arg)+1);
1777     memset(conf->dir, 0, strlen(arg)+1);
1778     strcpy(conf->dir, arg);
1779   }
1780   conf->convrules   = apr_array_make(p, 2, sizeof(chxjconvrule_entry));
1781
1782   /* Default is copyleft */
1783   conf->image_copyright = NULL;
1784
1785   return conf;
1786 }
1787
1788
1789 /*
1790  *  Merge per-directory CHXJ configurations
1791  */
1792 static void *
1793 chxj_merge_per_dir_config(apr_pool_t *p, void *basev, void *addv)
1794 {
1795   mod_chxj_config *base;
1796   mod_chxj_config *add;
1797   mod_chxj_config *mrg;
1798
1799   base = (mod_chxj_config *)basev;
1800   add  = (mod_chxj_config *)addv;
1801   mrg  = (mod_chxj_config *)apr_palloc(p, sizeof(mod_chxj_config));
1802
1803   mrg->device_data_file = NULL;
1804   mrg->devices          = NULL;
1805   mrg->emoji_data_file  = NULL;
1806   mrg->image            = CHXJ_IMG_NONE;
1807   mrg->image_cache_dir  = NULL;
1808   mrg->image_copyright  = NULL;
1809   mrg->image_cache_limit  = 0;
1810   mrg->emoji            = NULL;
1811   mrg->emoji_tail       = NULL;
1812   mrg->new_line_type    = NLTYPE_NIL;
1813   mrg->forward_url_base = NULL;
1814   mrg->forward_server_ip = NULL;
1815   mrg->allowed_cookie_domain = NULL;
1816   mrg->post_log         = NULL;
1817   mrg->cookie_dbm_type  = NULL;
1818
1819   mrg->dir = apr_pstrdup(p, add->dir);
1820
1821   if (! add->device_data_file) {
1822     mrg->devices = base->devices;
1823     mrg->device_data_file = apr_pstrdup(p, base->device_data_file);
1824   }
1825   else {
1826     mrg->devices = add->devices;
1827     mrg->device_data_file = apr_pstrdup(p, add->device_data_file);
1828   }
1829
1830   if (! add->emoji_data_file) {
1831     mrg->emoji = base->emoji;
1832     mrg->emoji_tail = base->emoji_tail;
1833     mrg->emoji_data_file = apr_pstrdup(p, base->emoji_data_file);
1834   }
1835   else {
1836     mrg->emoji = add->emoji;
1837     mrg->emoji_tail = add->emoji_tail;
1838     mrg->emoji_data_file = apr_pstrdup(p, add->emoji_data_file);
1839   }
1840
1841   if (add->image == CHXJ_IMG_NONE) {
1842     mrg->image = base->image;
1843   }
1844   else {
1845     mrg->image = add->image;
1846   }
1847
1848   if (strcasecmp(add->image_cache_dir ,DEFAULT_IMAGE_CACHE_DIR)==0) {
1849     mrg->image_cache_dir = apr_pstrdup(p, base->image_cache_dir);
1850   }
1851   else {
1852     mrg->image_cache_dir = apr_pstrdup(p, add->image_cache_dir);
1853   }
1854
1855   if (add->image_cache_limit) {
1856     mrg->image_cache_limit = add->image_cache_limit;
1857   }
1858   else {
1859     mrg->image_cache_limit = base->image_cache_limit;
1860   }
1861
1862   if (add->image_copyright)
1863     mrg->image_copyright = apr_pstrdup(p, add->image_copyright);
1864   else
1865     mrg->image_copyright = apr_pstrdup(p, base->image_copyright);
1866
1867   if (add->server_side_encoding) {
1868     mrg->server_side_encoding = apr_pstrdup(p, add->server_side_encoding);
1869   }
1870   else
1871   if (base->server_side_encoding) {
1872     mrg->server_side_encoding = apr_pstrdup(p, base->server_side_encoding);
1873   }
1874   else {
1875     mrg->server_side_encoding = apr_pstrdup(p, DEFAULT_SERVER_SIDE_ENCODING);
1876   }
1877
1878   mrg->convrules    = apr_array_append(p, add->convrules, base->convrules);
1879
1880   if (add->cookie_db_dir) {
1881     mrg->cookie_db_dir = apr_pstrdup(p, add->cookie_db_dir);
1882   }
1883   else
1884   if (base->cookie_db_dir) {
1885     mrg->cookie_db_dir = apr_pstrdup(p, base->cookie_db_dir);
1886   }
1887   else {
1888     mrg->cookie_db_dir = NULL;
1889   }
1890
1891   if (add->cookie_timeout) {
1892     mrg->cookie_timeout   = add->cookie_timeout;
1893   }
1894   else
1895   if (base->cookie_db_dir) {
1896     mrg->cookie_timeout   = base->cookie_timeout;
1897   }
1898   else {
1899     mrg->cookie_timeout   = 0;
1900   }
1901
1902 #if defined(USE_MYSQL_COOKIE)
1903   if (add->mysql.host) {
1904     mrg->mysql.host = apr_pstrdup(p, add->mysql.host);
1905   }
1906   else if (base->mysql.host) {
1907     mrg->mysql.host = apr_pstrdup(p, base->mysql.host);
1908   }
1909   else {
1910     mrg->mysql.host = NULL;
1911   }
1912   if (add->mysql.port) {
1913     mrg->mysql.port = add->mysql.port;
1914   }
1915   else if (base->mysql.port) {
1916     mrg->mysql.port = base->mysql.port;
1917   }
1918   else {
1919     mrg->mysql.port = 0;
1920   }
1921
1922   if (add->mysql.database) {
1923     mrg->mysql.database = apr_pstrdup(p, add->mysql.database);
1924   }
1925   else if (base->mysql.database) {
1926     mrg->mysql.database = apr_pstrdup(p, base->mysql.database);
1927   }
1928   else {
1929     mrg->mysql.database = NULL;
1930   }
1931
1932   if (add->mysql.username) {
1933     mrg->mysql.username = apr_pstrdup(p, add->mysql.username);
1934   }
1935   else if (base->mysql.username) {
1936     mrg->mysql.username = apr_pstrdup(p, base->mysql.username);
1937   }
1938   else {
1939     mrg->mysql.username = NULL;
1940   }
1941
1942   if (add->mysql.password) {
1943     mrg->mysql.password = apr_pstrdup(p, add->mysql.password);
1944   }
1945   else if (base->mysql.password) {
1946     mrg->mysql.password = apr_pstrdup(p, base->mysql.password);
1947   }
1948   else {
1949     mrg->mysql.password = NULL;
1950   }
1951
1952   if (add->mysql.tablename) {
1953     mrg->mysql.tablename = apr_pstrdup(p, add->mysql.tablename);
1954   }
1955   else if (base->mysql.tablename) {
1956     mrg->mysql.tablename = apr_pstrdup(p, base->mysql.tablename);
1957   }
1958   else {
1959     mrg->mysql.tablename = NULL;
1960   }
1961
1962   if (add->mysql.socket_path) {
1963     mrg->mysql.socket_path = apr_pstrdup(p, add->mysql.socket_path);
1964   }
1965   else if (base->mysql.socket_path) {
1966     mrg->mysql.socket_path = apr_pstrdup(p, base->mysql.socket_path);
1967   }
1968   else {
1969     mrg->mysql.socket_path = NULL;
1970   }
1971
1972   if (add->mysql.charset) {
1973     mrg->mysql.charset = apr_pstrdup(p, add->mysql.charset);
1974   }
1975   else if (base->mysql.charset) {
1976     mrg->mysql.charset = apr_pstrdup(p, base->mysql.charset);
1977   }
1978   else {
1979     mrg->mysql.charset = NULL;
1980   }
1981 #endif
1982 #if defined(USE_MEMCACHE_COOKIE)
1983   if (add->memcache.host) {
1984     mrg->memcache.host = apr_pstrdup(p, add->memcache.host);
1985   }
1986   else if (base->memcache.host) {
1987     mrg->memcache.host = apr_pstrdup(p, base->memcache.host);
1988   }
1989   else {
1990     mrg->memcache.host = NULL;
1991   }
1992   if (add->memcache.port) {
1993     mrg->memcache.port = add->memcache.port;
1994   }
1995   else if (base->memcache.port) {
1996     mrg->memcache.port = base->memcache.port;
1997   }
1998   else {
1999     mrg->memcache.port = 0;
2000   }
2001 #endif
2002   if (add->cookie_store_type) {
2003     mrg->cookie_store_type = add->cookie_store_type;
2004   }
2005   else if (base->cookie_store_type) {
2006     mrg->cookie_store_type = base->cookie_store_type;
2007   }
2008   else {
2009     mrg->cookie_store_type = COOKIE_STORE_TYPE_NONE;
2010   }
2011   if (add->cookie_lazy_mode) {
2012     mrg->cookie_lazy_mode = add->cookie_lazy_mode;
2013   }
2014   else if (base->cookie_lazy_mode) {
2015     mrg->cookie_lazy_mode = base->cookie_lazy_mode;
2016   }
2017   else {
2018     mrg->cookie_lazy_mode = 0;
2019   }
2020   if (add->new_line_type) {
2021     mrg->new_line_type = add->new_line_type;
2022   }
2023   else if (base->new_line_type) {
2024     mrg->new_line_type = base->new_line_type;
2025   }
2026   else {
2027     mrg->new_line_type = NLTYPE_NIL;
2028   }
2029
2030   if (add->forward_url_base) {
2031     mrg->forward_url_base = add->forward_url_base;
2032   }
2033   else if (base->forward_url_base) {
2034     mrg->forward_url_base = base->forward_url_base;
2035   }
2036
2037   if (add->allowed_cookie_domain) {
2038     mrg->allowed_cookie_domain = add->allowed_cookie_domain;
2039   }
2040   else {
2041     mrg->allowed_cookie_domain = base->allowed_cookie_domain;
2042   }
2043   if (add->post_log) {
2044     mrg->post_log = add->post_log;
2045   }
2046   else {
2047     mrg->post_log = base->post_log;
2048   }
2049   if (add->cookie_dbm_type) {
2050     mrg->cookie_dbm_type = add->cookie_dbm_type;
2051   }
2052   else {
2053     mrg->cookie_dbm_type = base->cookie_dbm_type;
2054   }
2055   return mrg;
2056 }
2057
2058
2059 static int
2060 chxj_command_parse_take5(
2061   const char *arg,
2062   char       **prm1,
2063   char       **prm2,
2064   char       **prm3,
2065   char       **prm4,
2066   char       **prm5)
2067 {
2068   int  isquoted;
2069   char *strp;
2070
2071   strp = (char *)arg;
2072
2073   for (;*strp == ' '||*strp == '\t'; strp++) ;
2074
2075   isquoted = 0;
2076   if (*strp == '"') {
2077     isquoted = 1;
2078     strp++;
2079   }
2080
2081   *prm1 = strp;
2082
2083   for (; *strp != '\0'; strp++) {
2084     if ((isquoted && (*strp == ' ' || *strp == '\t'))
2085     ||  (*strp == '\\' && (*(strp+1) == ' ' || *(strp+1) == '\t'))) {
2086       strp++;
2087       continue;
2088     }
2089
2090     if ((!isquoted && (*strp == ' ' || *strp == '\t'))
2091     ||  (isquoted  && *strp == '"'))
2092       break;
2093   }
2094
2095   if (! *strp) {
2096     *prm2 = strp;
2097     *prm3 = strp;
2098     *prm4 = strp;
2099     *prm5 = strp;
2100     return 1;
2101   }
2102
2103   *strp++ = '\0';
2104
2105   for (;*strp == ' '||*strp == '\t'; strp++) ;
2106
2107   isquoted = 0;
2108   if (*strp == '"') {
2109     isquoted = 1;
2110     strp++;
2111   }
2112
2113   *prm2 = strp;
2114   for (; *strp != '\0'; strp++) {
2115     if ((isquoted && (*strp == ' ' || *strp == '\t'))
2116     ||  (*strp == '\\' && (*(strp+1) == ' ' || *(strp+1) == '\t'))) {
2117       strp++;
2118       continue;
2119     }
2120
2121     if ((!isquoted && (*strp == ' ' || *strp == '\t'))
2122     ||  (isquoted  && *strp == '"'))
2123       break;
2124   }
2125
2126   if (! *strp) {
2127     *prm3 = strp;
2128     *prm4 = strp;
2129     *prm5 = strp;
2130     return 0;
2131   }
2132
2133   *strp++ = '\0';
2134
2135   for (;*strp == ' '||*strp == '\t'; strp++);
2136
2137   isquoted = 0;
2138   if (*strp == '"') {
2139     isquoted = 1;
2140     strp++;
2141   }
2142   *prm3 = strp;
2143   for (; *strp != '\0'; strp++) {
2144     if ((isquoted && (*strp == ' ' || *strp == '\t'))
2145     ||  (*strp == '\\' && (*(strp+1) == ' ' || *(strp+1) == '\t'))) {
2146       strp++;
2147       continue;
2148     }
2149
2150     if ((!isquoted && (*strp == ' ' || *strp == '\t'))
2151     ||  (isquoted  && *strp == '"'))
2152       break;
2153   }
2154
2155   if (! *strp) {
2156     *prm4 = strp;
2157     *prm5 = strp;
2158     return 0;
2159   }
2160
2161   *strp++ = '\0';
2162
2163   for (;*strp == ' '||*strp == '\t'; strp++);
2164
2165   isquoted = 0;
2166   if (*strp == '"') {
2167     isquoted = 1;
2168     strp++;
2169   }
2170   *prm4 = strp;
2171   for (; *strp != '\0'; strp++) {
2172     if ((isquoted && (*strp == ' ' || *strp == '\t'))
2173     ||  (*strp == '\\' && (*(strp+1) == ' ' || *(strp+1) == '\t'))) {
2174       strp++;
2175       continue;
2176     }
2177
2178     if ((!isquoted && (*strp == ' ' || *strp == '\t'))
2179     ||  (isquoted  && *strp == '"'))
2180       break;
2181   }
2182
2183   if (! *strp) {
2184     *prm5 = strp;
2185     return 0;
2186   }
2187
2188   *strp++ = '\0';
2189
2190   for (;*strp == ' '||*strp == '\t'; strp++);
2191
2192   isquoted = 0;
2193   if (*strp == '"') {
2194     isquoted = 1;
2195     strp++;
2196   }
2197   *prm5 = strp;
2198   for (; *strp != '\0'; strp++) {
2199     if ((isquoted && (*strp == ' ' || *strp == '\t'))
2200     ||  (*strp == '\\' && (*(strp+1) == ' ' || *(strp+1) == '\t'))) {
2201       strp++;
2202       continue;
2203     }
2204
2205     if ((!isquoted && (*strp == ' ' || *strp == '\t'))
2206     ||  (isquoted  && *strp == '"'))
2207       break;
2208   }
2209   *strp = '\0';
2210
2211   return 0;
2212 }
2213
2214
2215 /**
2216  * The device definition file is loaded.
2217  *
2218  * @param arg     [i]   The name of the device definition file is specified.
2219  * @param mconfig [i/o] The pointer to a set structure is specified.
2220  * @param parms   [i]
2221  */
2222 static const char *
2223 cmd_load_device_data(cmd_parms *parms, void *mconfig, const char *arg)
2224 {
2225   mod_chxj_config  *conf;
2226   Doc              doc;
2227
2228   doc.r = NULL;
2229
2230   if (strlen(arg) > 256)
2231     return "mod_chxj: device data filename too long.";
2232
2233   conf = (mod_chxj_config *)mconfig;
2234   conf->device_data_file = apr_pstrdup(parms->pool, arg);
2235
2236   qs_init_malloc(&doc);
2237   qs_init_root_node(&doc);
2238
2239   qs_parse_file((Doc *)&doc, (const char *)arg);
2240   chxj_load_device_data(&doc,parms->pool, conf);
2241   qs_all_free(&doc, QX_LOGMARK);
2242
2243   return NULL;
2244 }
2245
2246
2247 /**
2248  * Device definition information is loaded.
2249  *
2250  * @param parms
2251  * @param arg     [i]   The name of the device definition file is specified.
2252  * @param mconfig [i/o] The pointer to a set structure is specified.
2253  * @return
2254  */
2255 static const char *
2256 cmd_load_emoji_data(cmd_parms *parms, void *mconfig, const char *arg)
2257 {
2258   mod_chxj_config *conf;
2259   char            *rtn;
2260   Doc              doc;
2261
2262   doc.r = NULL;
2263
2264
2265   if (strlen(arg) > 256)
2266     return "mod_chxj: emoji data filename too long.";
2267
2268   conf = (mod_chxj_config *)mconfig;
2269   conf->emoji_data_file = apr_pstrdup(parms->pool, arg);
2270   qs_init_malloc(&doc);
2271   qs_init_root_node(&doc);
2272
2273   qs_parse_file((Doc *)&doc, (const char *)arg);
2274
2275   rtn = chxj_load_emoji_data(&doc,parms->pool, conf);
2276
2277   qs_all_free(&doc, QX_LOGMARK);
2278
2279
2280   return rtn;
2281 }
2282
2283
2284 static const char *
2285 cmd_set_image_engine(cmd_parms * UNUSED(parms), void *mconfig, const char *arg)
2286 {
2287   mod_chxj_config *conf;
2288   Doc              doc;
2289
2290   doc.r = NULL;
2291
2292   if (strlen(arg) > 256)
2293     return "image uri is too long.";
2294
2295   conf = (mod_chxj_config*)mconfig;
2296   if (strcasecmp("ON", arg) == 0) {
2297     conf->image = CHXJ_IMG_ON;
2298   }
2299   else {
2300     conf->image = CHXJ_IMG_OFF;
2301   }
2302
2303   return NULL;
2304 }
2305
2306
2307 static const char *
2308 cmd_set_image_cache_dir(cmd_parms *parms, void *mconfig, const char *arg)
2309 {
2310   mod_chxj_config *conf;
2311   Doc              doc;
2312
2313   doc.r = NULL;
2314
2315   if (strlen(arg) > 256)
2316     return "cache dir name is too long.";
2317
2318   conf = (mod_chxj_config *)mconfig;
2319   conf->image_cache_dir = apr_pstrdup(parms->pool, arg);
2320
2321   return NULL;
2322 }
2323
2324
2325 static const char *
2326 cmd_set_image_cache_limit(cmd_parms *parms, void *mconfig, const char *arg)
2327 {
2328   mod_chxj_config *conf;
2329   Doc              doc;
2330
2331   doc.r = NULL;
2332
2333   if (strlen(arg) > IMAGE_CACHE_LIMIT_FMT_LEN)
2334     return "cache size is too long.";
2335
2336   conf = (mod_chxj_config *)mconfig;
2337   errno = 0;
2338   /*
2339    * I use strtol function because strtoul is not portable function.
2340    */
2341   conf->image_cache_limit = (unsigned long)strtol(arg, NULL, 10);
2342   switch (errno) {
2343   case EINVAL:
2344     return apr_psprintf(parms->pool, "ChxjImageCacheLimit invalid value [%s] errno:[%d]", arg, errno);
2345   case ERANGE:
2346     return apr_psprintf(parms->pool, "ChxjImageCacheLimit Out of range [%s] errno:[%d]", arg, errno);
2347   default:
2348     break;
2349   }
2350   return NULL;
2351 }
2352
2353
2354 static const char *
2355 cmd_set_image_copyright(cmd_parms *parms, void *mconfig, const char *arg)
2356 {
2357   mod_chxj_config *conf;
2358   Doc              doc;
2359
2360   doc.r = NULL;
2361
2362   if (strlen(arg) > 256)
2363     return "Copyright Flag is too long.";
2364
2365   conf = (mod_chxj_config *)mconfig;
2366   conf->image_copyright = apr_pstrdup(parms->pool, arg);
2367
2368   return NULL;
2369 }
2370
2371
2372 static const char *
2373 cmd_convert_rule(cmd_parms *cmd, void *mconfig, const char *arg)
2374 {
2375   int                 mode;
2376   ap_regex_t          *regexp;
2377   mod_chxj_config     *dconf;
2378   chxjconvrule_entry  *newrule;
2379   char                *prm1;
2380   char                *prm2;
2381   char                *prm3;
2382   char                *prm4;
2383   char                *prm5;
2384   char                *pstate;
2385   char                *action;
2386   char                *pp;
2387
2388   dconf = (mod_chxj_config *)mconfig;
2389
2390   if (strlen(arg) > 4096)
2391     return "mod_chxj: ChxjConvertRule: is too long.";
2392
2393   dconf = (mod_chxj_config *)mconfig;
2394   if (dconf->convrules == NULL)
2395     dconf->convrules   = apr_array_make(cmd->pool,
2396                                         2,
2397                                         sizeof(chxjconvrule_entry));
2398
2399   newrule = apr_array_push(dconf->convrules);
2400
2401   newrule->flags  = 0;
2402   newrule->action = 0;
2403
2404   if (chxj_command_parse_take5(arg, &prm1, &prm2, &prm3, &prm4, &prm5))
2405     return "ChxjConvertRule: bad argument line";
2406
2407   newrule->pattern = apr_pstrdup(cmd->pool, prm1);
2408
2409   /* Parse action */
2410   for (;;) {
2411     if ((action = apr_strtok(prm2, ",", &pstate)) == NULL)
2412       break;
2413     prm2 = NULL;
2414     switch(*action) {
2415     case 'e':
2416     case 'E':
2417       if (strcasecmp(CONVRULE_ENGINE_ON_CMD, action) == 0) {
2418         newrule->action |= CONVRULE_ENGINE_ON_BIT;
2419       }
2420       else
2421       if (strcasecmp(CONVRULE_ENGINE_OFF_CMD, action) == 0) {
2422         newrule->action |= CONVRULE_ENGINE_OFF_BIT;
2423       }
2424       else
2425       if (strcasecmp(CONVRULE_EMOJI_ONLY_CMD, action) == 0) {
2426         newrule->action |= CONVRULE_EMOJI_ONLY_BIT;
2427       }
2428       else
2429       if (strcasecmp(CONVRULE_ENVINFO_ONLY_CMD, action) == 0) {
2430         newrule->action |= CONVRULE_ENVINFO_ONLY_BIT;
2431       }
2432       break;
2433
2434     case 'C':
2435     case 'c':
2436       if (strcasecmp(CONVRULE_COOKIE_ON_CMD, action) == 0) {
2437         newrule->action |= CONVRULE_COOKIE_ON_BIT;
2438       }
2439       else if (strcasecmp(CONVRULE_COOKIE_ONLY_CMD, action) == 0) {
2440         newrule->action |= CONVRULE_COOKIE_ONLY_BIT;
2441       }
2442       break;
2443
2444     case 'J':
2445     case 'j':
2446       if (strcasecmp(CONVRULE_JRCONV_OFF_CMD, action) == 0) {
2447         newrule->action |= CONVRULE_JRCONV_OFF_BIT;
2448       }
2449       break;
2450
2451     case 'N':
2452     case 'n':
2453       if (strcasecmp(CONVRULE_NOCACHE_ON_CMD, action) == 0) {
2454         newrule->action |= CONVRULE_NOCACHE_ON_BIT;
2455       }
2456       break;
2457
2458     case 'Q':
2459     case 'q':
2460       if (strcasecmp(CONVRULE_QSCONV_OFF_CMD, action) == 0) {
2461         newrule->action |= CONVRULE_QSCONV_OFF_BIT;
2462       }
2463       break;
2464
2465     case 'Z':
2466     case 'z':
2467       if (strcasecmp(CONVRULE_Z2H_ON_CMD, action) == 0) {
2468         newrule->action |= CONVRULE_Z2H_ON_BIT;
2469       }
2470       else
2471       if (strcasecmp(CONVRULE_Z2H_OFF_CMD, action) == 0) {
2472         newrule->action |= CONVRULE_Z2H_OFF_BIT;
2473       }
2474       else
2475       if (strcasecmp(CONVRULE_Z2H_ALPHA_ON_CMD, action) == 0) {
2476         newrule->action |= CONVRULE_Z2H_ALPHA_ON_BIT;
2477       }
2478       else
2479       if (strcasecmp(CONVRULE_Z2H_ALPHA_OFF_CMD, action) == 0) {
2480         newrule->action |= CONVRULE_Z2H_ALPHA_OFF_BIT;
2481       }
2482       else
2483       if (strcasecmp(CONVRULE_Z2H_NUM_ON_CMD, action) == 0) {
2484         newrule->action |= CONVRULE_Z2H_NUM_ON_BIT;
2485       }
2486       else
2487       if (strcasecmp(CONVRULE_Z2H_NUM_OFF_CMD, action) == 0) {
2488         newrule->action |= CONVRULE_Z2H_NUM_OFF_BIT;
2489       }
2490       else
2491       if (strcasecmp(CONVRULE_Z2H_ALL_ON_CMD, action) == 0) {
2492         newrule->action |= CONVRULE_Z2H_ON_BIT | CONVRULE_Z2H_ALPHA_ON_BIT | CONVRULE_Z2H_NUM_ON_BIT;
2493       }
2494       else
2495       if (strcasecmp(CONVRULE_Z2H_NUM_OFF_CMD, action) == 0) {
2496         newrule->action |= CONVRULE_Z2H_OFF_BIT | CONVRULE_Z2H_ALPHA_OFF_BIT | CONVRULE_Z2H_NUM_OFF_BIT;
2497       }
2498       break;
2499
2500     default:
2501       break;
2502     }
2503   }
2504
2505   pp = prm1;
2506   if (*pp == '!') {
2507     newrule->flags |= CONVRULE_FLAG_NOTMATCH;
2508     pp++;
2509   }
2510
2511   mode = AP_REG_EXTENDED;
2512   if ((regexp = ap_pregcomp((apr_pool_t *)cmd->pool, (const char *)pp, mode)) == NULL)
2513     return "RewriteRule: cannot compile regular expression ";
2514
2515   newrule->regexp = regexp;
2516   if (*prm3)
2517     newrule->encoding = apr_pstrdup(cmd->pool, prm3);
2518   else
2519     newrule->encoding = apr_pstrdup(cmd->pool, "none");
2520
2521   newrule->pc_flag = CONVRULE_PC_FLAG_OFF_BIT;
2522   if (*prm4)
2523     if (strcasecmp(CONVRULE_PC_FLAG_ON_CMD, prm4) == 0)
2524       newrule->pc_flag = CONVRULE_PC_FLAG_ON_BIT;
2525
2526   newrule->user_agent = NULL;
2527   if (*prm5)
2528     newrule->user_agent = apr_pstrdup(cmd->pool, prm5);
2529
2530   return NULL;
2531 }
2532
2533
2534 static const char *
2535 cmd_set_cookie_dir(
2536   cmd_parms   *cmd,
2537   void        *mconfig,
2538   const char  *arg)
2539 {
2540   mod_chxj_config *dconf;
2541
2542
2543   if (strlen(arg) > 4096)
2544     return "mod_chxj: ChxjCookieDir is too long.";
2545
2546   dconf = (mod_chxj_config *)mconfig;
2547
2548   dconf->cookie_db_dir = apr_pstrdup(cmd->pool, arg);
2549
2550   return NULL;
2551 }
2552
2553
2554 static const char *
2555 cmd_set_cookie_timeout(
2556   cmd_parms   *UNUSED(cmd),
2557   void        *mconfig,
2558   const char  *arg)
2559 {
2560   mod_chxj_config *dconf;
2561
2562   if (strlen(arg) > 4096)
2563     return "mod_chxj: ChxjCookieTimeout is too long.";
2564
2565   if (chxj_chk_numeric(arg) != 0)
2566     return "mod_chxj: ChxjCookieTimeout is not numeric.";
2567
2568   dconf = (mod_chxj_config *)mconfig;
2569
2570   dconf->cookie_timeout = atoi(arg);
2571
2572   return NULL;
2573 }
2574
2575
2576 #if defined(USE_MYSQL_COOKIE)
2577 static const char *
2578 cmd_set_cookie_mysql_database(
2579   cmd_parms   *cmd,
2580   void        *mconfig,
2581   const char  *arg)
2582 {
2583   mod_chxj_config  *dconf;
2584
2585   if (strlen(arg) > 255)
2586     return "mod_chxj: ChxjCookieMysqlDatabase is too long.";
2587
2588   dconf = (mod_chxj_config *)mconfig;
2589
2590   dconf->mysql.database = apr_pstrdup(cmd->pool, arg);
2591
2592   return NULL;
2593 }
2594
2595
2596 static const char *
2597 cmd_set_cookie_mysql_username(
2598   cmd_parms   *cmd,
2599   void        *mconfig,
2600   const char  *arg)
2601 {
2602   mod_chxj_config  *dconf;
2603
2604   if (strlen(arg) > 255)
2605     return "mod_chxj: ChxjCookieMysqlUsername is too long.";
2606
2607   dconf = (mod_chxj_config *)mconfig;
2608
2609   dconf->mysql.username = apr_pstrdup(cmd->pool, arg);
2610
2611   return NULL;
2612 }
2613
2614
2615 static const char *
2616 cmd_set_cookie_mysql_password(
2617   cmd_parms   *cmd,
2618   void        *mconfig,
2619   const char  *arg)
2620 {
2621   mod_chxj_config  *dconf;
2622
2623   if (strlen(arg) > 255)
2624     return "mod_chxj: ChxjCookieMysqlPassword is too long.";
2625
2626   dconf = (mod_chxj_config *)mconfig;
2627
2628   dconf->mysql.password = apr_pstrdup(cmd->pool, arg);
2629
2630   return NULL;
2631 }
2632
2633
2634 static const char *
2635 cmd_set_cookie_mysql_table_name(
2636   cmd_parms   *cmd,
2637   void        *mconfig,
2638   const char  *arg)
2639 {
2640   mod_chxj_config  *dconf;
2641
2642   if (strlen(arg) > 255)
2643     return "mod_chxj: ChxjCookieMysqlTableName is too long.";
2644
2645   dconf = (mod_chxj_config *)mconfig;
2646
2647   dconf->mysql.tablename = apr_pstrdup(cmd->pool, arg);
2648
2649   return NULL;
2650 }
2651
2652 static const char *
2653 cmd_set_cookie_mysql_port(
2654   cmd_parms   *UNUSED(cmd),
2655   void        *mconfig,
2656   const char  *arg)
2657 {
2658   mod_chxj_config *dconf;
2659
2660   if (strlen(arg) > 255)
2661     return "mod_chxj: ChxjCookieMysqlPort is too long.";
2662
2663   dconf = (mod_chxj_config *)mconfig;
2664
2665   if (chxj_chk_numeric(arg) != 0)
2666     return "mod_chxj: ChxjCookieMysqlPort is not numeric.";
2667
2668   dconf = (mod_chxj_config *)mconfig;
2669
2670   dconf->mysql.port = chxj_atoi(arg);
2671
2672   return NULL;
2673 }
2674
2675
2676 static const char *
2677 cmd_set_cookie_mysql_host(
2678   cmd_parms   *cmd,
2679   void        *mconfig,
2680   const char  *arg)
2681 {
2682   mod_chxj_config  *dconf;
2683
2684   if (strlen(arg) > 255)
2685     return "mod_chxj: ChxjCookieMysqlHost is too long.";
2686
2687   dconf = (mod_chxj_config *)mconfig;
2688
2689   dconf->mysql.host = apr_pstrdup(cmd->pool, arg);
2690
2691   return NULL;
2692 }
2693
2694
2695 static const char *
2696 cmd_set_cookie_mysql_socket_path(
2697   cmd_parms   *cmd,
2698   void        *mconfig,
2699   const char  *arg)
2700 {
2701   mod_chxj_config  *dconf;
2702
2703   if (strlen(arg) > 4096)
2704     return "mod_chxj: ChxjCookieMysqlSocketPath is too long.";
2705
2706   dconf = (mod_chxj_config *)mconfig;
2707
2708   dconf->mysql.socket_path = apr_pstrdup(cmd->pool, arg);
2709
2710   return NULL;
2711 }
2712
2713
2714 static const char *
2715 cmd_set_cookie_mysql_charset(
2716   cmd_parms   *cmd,
2717   void        *mconfig,
2718   const char  *arg)
2719 {
2720   mod_chxj_config  *dconf;
2721
2722   if (strlen(arg) > 255)
2723     return "mod_chxj: ChxjCookieMysqlCharset is too long.";
2724
2725   dconf = (mod_chxj_config *)mconfig;
2726
2727   dconf->mysql.charset = apr_pstrdup(cmd->pool, arg);
2728
2729   return NULL;
2730 }
2731 #endif
2732 #if defined(USE_MEMCACHE_COOKIE)
2733 static const char *
2734 cmd_set_cookie_memcache_port(
2735   cmd_parms   *UNUSED(cmd),
2736   void        *mconfig,
2737   const char  *arg)
2738 {
2739   mod_chxj_config *dconf;
2740
2741   if (strlen(arg) > 255)
2742     return "mod_chxj: ChxjCookieMemcachePort is too long.";
2743
2744   dconf = (mod_chxj_config *)mconfig;
2745
2746   if (chxj_chk_numeric(arg) != 0)
2747     return "mod_chxj: ChxjCookieMemcachePort is not numeric.";
2748
2749   dconf = (mod_chxj_config *)mconfig;
2750
2751   dconf->memcache.port = (apr_port_t)chxj_atoi(arg);
2752
2753   return NULL;
2754 }
2755
2756
2757 static const char *
2758 cmd_set_cookie_memcache_host(
2759   cmd_parms   *cmd,
2760   void        *mconfig,
2761   const char  *arg)
2762 {
2763   mod_chxj_config  *dconf;
2764
2765   if (strlen(arg) > 255)
2766     return "mod_chxj: ChxjCookieMemcacheHost is too long.";
2767
2768   dconf = (mod_chxj_config *)mconfig;
2769
2770   dconf->memcache.host = apr_pstrdup(cmd->pool, arg);
2771
2772   return NULL;
2773 }
2774 #endif
2775
2776 static const char *
2777 cmd_set_cookie_lazy_mode(
2778   cmd_parms   *UNUSED(cmd),
2779   void        *mconfig,
2780   const char  *arg)
2781 {
2782   mod_chxj_config  *dconf;
2783
2784   if (strlen(arg) > 255)
2785     return "mod_chxj: ChxjCookieLazyMode is too long.";
2786
2787   dconf = (mod_chxj_config *)mconfig;
2788
2789   if (strcasecmp("TRUE",arg) == 0) {
2790     dconf->cookie_lazy_mode = COOKIE_LAZY_ON;
2791   }
2792   else {
2793     dconf->cookie_lazy_mode = COOKIE_LAZY_OFF;
2794   }
2795
2796   return NULL;
2797 }
2798
2799 static const char *
2800 cmd_set_cookie_store_type(
2801   cmd_parms   *UNUSED(cmd),
2802   void        *mconfig,
2803   const char  *arg)
2804 {
2805   mod_chxj_config  *dconf;
2806
2807   if (strlen(arg) > 255)
2808     return "mod_chxj: ChxjCookieStoreType is too long.";
2809
2810   dconf = (mod_chxj_config *)mconfig;
2811
2812   if (strcasecmp(CHXJ_COOKIE_STORE_TYPE_DBM, arg) == 0) {
2813     dconf->cookie_store_type = COOKIE_STORE_TYPE_DBM;
2814   }
2815   else if (strcasecmp(CHXJ_COOKIE_STORE_TYPE_MYSQL, arg) == 0) {
2816     dconf->cookie_store_type = COOKIE_STORE_TYPE_MYSQL;
2817   }
2818   else if (strcasecmp(CHXJ_COOKIE_STORE_TYPE_MEMCACHE, arg) == 0) {
2819     dconf->cookie_store_type = COOKIE_STORE_TYPE_MEMCACHE;
2820   }
2821   else {
2822     dconf->cookie_store_type = COOKIE_STORE_TYPE_NONE;
2823   }
2824
2825   return NULL;
2826 }
2827
2828 static const char *
2829 cmd_set_forward_url_base(
2830   cmd_parms   *cmd,
2831   void        *mconfig,
2832   const char  *arg)
2833 {
2834  mod_chxj_config *dconf;
2835
2836   if (strlen(arg) > 255)
2837     return "mod_chxj: ChxjForwardUrlBase is too long.";
2838
2839   dconf = (mod_chxj_config *)mconfig;
2840
2841   dconf->forward_url_base = apr_pstrdup(cmd->pool, arg);
2842
2843   return NULL;
2844 }
2845
2846 static const char *
2847 cmd_set_forward_server_ip(
2848   cmd_parms   *cmd,
2849   void        *mconfig,
2850   const char  *arg)
2851 {
2852   mod_chxj_config *dconf;
2853
2854   if (strlen(arg) > 255)
2855     return "mod_chxj: ChxjForwardServerIp is too long.";
2856
2857   dconf = (mod_chxj_config *)mconfig;
2858
2859   dconf->forward_server_ip = apr_pstrdup(cmd->pool, arg);
2860
2861   return NULL;
2862 }
2863
2864 static const char *
2865 cmd_allowed_cookie_domain(
2866   cmd_parms   *cmd,
2867   void        *mconfig,
2868   const char  *arg)
2869 {
2870   mod_chxj_config *dconf;
2871
2872   if (strlen(arg) > 255)
2873     return "mod_chxj: ChxjAllowedCookieDomain is too long.";
2874
2875   dconf = (mod_chxj_config *)mconfig;
2876
2877   dconf->allowed_cookie_domain = apr_pstrdup(cmd->pool, arg);
2878
2879   return NULL;
2880 }
2881
2882 static const char *
2883 cmd_set_new_line_type(
2884   cmd_parms   *UNUSED(cmd),
2885   void        *mconfig,
2886   const char  *arg)
2887 {
2888   mod_chxj_config  *dconf;
2889   if (strlen(arg) > 255)
2890     return "mod_chxj: ChxjNewLineType is too long.";
2891
2892   dconf = (mod_chxj_config *)mconfig;
2893
2894   if (strcasecmp(CHXJ_NEW_LINE_TYPE_CRLF, arg) == 0) {
2895     dconf->new_line_type = NLTYPE_CRLF;
2896   }
2897   else if (strcasecmp(CHXJ_NEW_LINE_TYPE_LF, arg) == 0) {
2898     dconf->new_line_type = NLTYPE_LF;
2899   }
2900   else if (strcasecmp(CHXJ_NEW_LINE_TYPE_CR, arg) == 0) {
2901     dconf->new_line_type = NLTYPE_CR;
2902   }
2903   else if (strcasecmp(CHXJ_NEW_LINE_TYPE_NONE, arg) == 0) {
2904     dconf->new_line_type = NLTYPE_NONE;
2905   }
2906   else {
2907     return "mod_chxj: invalid value (ChxjNewLineType)";
2908   }
2909   return NULL;
2910 }
2911
2912 static const char *
2913 cmd_post_log_env(
2914   cmd_parms   *cmd,
2915   void        *mconfig,
2916   const char  *arg)
2917 {
2918   mod_chxj_config  *dconf;
2919   if (strlen(arg) > 255)
2920     return "mod_chxj: ChxjPostLogEnv is too long.";
2921
2922   dconf = (mod_chxj_config *)mconfig;
2923
2924   dconf->post_log = apr_pstrdup(cmd->pool, arg);
2925
2926   return NULL;
2927 }
2928
2929 static const char *
2930 cmd_cookie_dbm_type(
2931   cmd_parms   *cmd,
2932   void        *mconfig,
2933   const char  *arg)
2934 {
2935   mod_chxj_config  *dconf;
2936   if (strlen(arg) > 255)
2937     return "mod_chxj: ChxjCookieDbmType is too long.";
2938
2939   dconf = (mod_chxj_config *)mconfig;
2940
2941   dconf->cookie_dbm_type = apr_pstrdup(cmd->pool, arg);
2942
2943   return NULL;
2944 }
2945
2946
2947 static const command_rec cmds[] = {
2948   AP_INIT_TAKE1(
2949     "ChxjLoadDeviceData",
2950     cmd_load_device_data,
2951     NULL,
2952     OR_ALL,
2953     "Load Device Data"),
2954   AP_INIT_TAKE1(
2955     "ChxjLoadEmojiData",
2956     cmd_load_emoji_data,
2957     NULL,
2958     OR_ALL,
2959     "Load Emoji Data"),
2960   AP_INIT_TAKE1(
2961     "ChxjImageEngine",
2962     cmd_set_image_engine,
2963     NULL,
2964     OR_ALL,
2965     "Convert Target URI"),
2966   AP_INIT_TAKE1(
2967     "ChxjImageCacheDir",
2968     cmd_set_image_cache_dir,
2969     NULL,
2970     OR_ALL,
2971     "Image Cache Directory"),
2972   AP_INIT_TAKE1(
2973     "ChxjImageCacheLimit",
2974     cmd_set_image_cache_limit,
2975     NULL,
2976     OR_ALL,
2977     "Image Cache Limit"),
2978   AP_INIT_TAKE1(
2979     "ChxjImageCopyright",
2980     cmd_set_image_copyright,
2981     NULL,
2982     OR_ALL,
2983     "Copyright Flag"),
2984   AP_INIT_RAW_ARGS(
2985     "ChxjConvertRule",
2986     cmd_convert_rule,
2987     NULL,
2988     OR_FILEINFO,
2989     "an URL-applied regexp-pattern and a substitution URL"),
2990   AP_INIT_TAKE1(
2991     "ChxjCookieDir",
2992     cmd_set_cookie_dir,
2993     NULL,
2994     OR_ALL,
2995     "save cookie.db directory."),
2996   AP_INIT_TAKE1(
2997     "ChxjCookieTimeout",
2998     cmd_set_cookie_timeout,
2999     NULL,
3000     OR_ALL,
3001     "The compulsion time-out time of the cookie is specified. "),
3002   AP_INIT_TAKE1(
3003     "ChxjCookieStoreType",
3004     cmd_set_cookie_store_type,
3005     NULL,
3006     OR_ALL,
3007     "It specifies preserving of the cookie ahead. (DBM/MYSQL/MEMCACHE)"),
3008   AP_INIT_TAKE1(
3009     "ChxjCookieLazyMode",
3010     cmd_set_cookie_lazy_mode,
3011     NULL,
3012     OR_ALL,
3013     "OneTimeID is negligently done. (TRUE/FALSE)"),
3014 #if defined(USE_MYSQL_COOKIE)
3015   AP_INIT_TAKE1(
3016     "ChxjCookieMysqlHost",
3017     cmd_set_cookie_mysql_host,
3018     NULL,
3019     OR_ALL,
3020     "The MySQL database host used by saving Cookie"),
3021   AP_INIT_TAKE1(
3022     "ChxjCookieMysqlPort",
3023     cmd_set_cookie_mysql_port,
3024     NULL,
3025     OR_ALL,
3026     "The MySQL database port used by saving Cookie"),
3027   AP_INIT_TAKE1(
3028     "ChxjCookieMysqlDatabase",
3029     cmd_set_cookie_mysql_database,
3030     NULL,
3031     OR_ALL,
3032     "The MySQL database name used by saving Cookie"),
3033   AP_INIT_TAKE1(
3034     "ChxjCookieMysqlUsername",
3035     cmd_set_cookie_mysql_username,
3036     NULL,
3037     OR_ALL,
3038     "The MySQL username used by saving Cookie"),
3039   AP_INIT_TAKE1(
3040     "ChxjCookieMysqlPassword",
3041     cmd_set_cookie_mysql_password,
3042     NULL,
3043     OR_ALL,
3044     "The MySQL password used by saving Cookie"),
3045   AP_INIT_TAKE1(
3046     "ChxjCookieMysqlTableName",
3047     cmd_set_cookie_mysql_table_name,
3048     NULL,
3049     OR_ALL,
3050     "The MySQL table name used by saving Cookie"),
3051   AP_INIT_TAKE1(
3052     "ChxjCookieMysqlSocketPath",
3053     cmd_set_cookie_mysql_socket_path,
3054     NULL,
3055     OR_ALL,
3056     "The MySQL socket path used by saving Cookie"),
3057   AP_INIT_TAKE1(
3058     "ChxjCookieMysqlCharset",
3059     cmd_set_cookie_mysql_charset,
3060     NULL,
3061     OR_ALL,
3062     "The MySQL charset used by saving Cookie"),
3063 #endif
3064 #if defined(USE_MEMCACHE_COOKIE)
3065   AP_INIT_TAKE1(
3066     "ChxjCookieMemcacheHost",
3067     cmd_set_cookie_memcache_host,
3068     NULL,
3069     OR_ALL,
3070     "The Memcached host used by saving Cookie"),
3071   AP_INIT_TAKE1(
3072     "ChxjCookieMemcachePort",
3073     cmd_set_cookie_memcache_port,
3074     NULL,
3075     OR_ALL,
3076     "The Memcached port used by saving Cookie"),
3077 #endif
3078   AP_INIT_TAKE1(
3079     "ChxjNewLineType",
3080     cmd_set_new_line_type,
3081     NULL,
3082     OR_ALL,
3083     "HTML new line type (NONE|CRLF|LF|CR). default is CRLF"),
3084   AP_INIT_TAKE1(
3085     "ChxjForwardUrlBase",
3086     cmd_set_forward_url_base,
3087     NULL,
3088     OR_ALL,
3089     "The forward url base(default: {request protocol}://{this server}:{this server port}"),
3090   AP_INIT_TAKE1(
3091     "ChxjForwardServerIp",
3092     cmd_set_forward_server_ip,
3093     NULL,
3094     OR_ALL,
3095     "The forward server ip(default: this server ip)"),
3096   AP_INIT_TAKE1(
3097     "ChxjAllowedCookieDomain",
3098     cmd_allowed_cookie_domain,
3099     NULL,
3100     OR_ALL,
3101     "Domain that permits parameter addition for cookie besides hostname.(Default:hostname Only)"),
3102   AP_INIT_TAKE1(
3103     "ChxjPostLogEnv",
3104     cmd_post_log_env,
3105     NULL,
3106     OR_ALL,
3107     "for CustomLog directive. mod_chxj's internal POST log environment name.(Default:chxj-post-log)"),
3108   AP_INIT_TAKE1(
3109     "ChxjCookieDbmType",
3110     cmd_cookie_dbm_type,
3111     NULL,
3112     OR_ALL,
3113     "Kind of DBM used with Cookie simulator.(default|GDBM|SDBM|DB|NDBM)"),
3114   {NULL,{NULL},NULL,0,0,NULL},
3115 };
3116
3117
3118 /*----------------------------------------------------------------------------*/
3119 /* Dispatch list for API hooks                                                */
3120 /*----------------------------------------------------------------------------*/
3121 module AP_MODULE_DECLARE_DATA chxj_module = {
3122   STANDARD20_MODULE_STUFF,
3123   chxj_create_per_dir_config,          /* create per-dir    config structures */
3124   chxj_merge_per_dir_config,           /* merge  per-dir    config structures */
3125   chxj_config_server_create,           /* create per-server config structures */
3126   NULL,                                /* merge  per-server config structures */
3127   cmds,                                /* table of config file commands       */
3128   chxj_register_hooks                  /* register hooks                      */
3129 };
3130 /*
3131  * vim:ts=2 et
3132  */