2 * Copyright (C) 2005-2009 Atsushi Konno All rights reserved.
3 * Copyright (C) 2005 QSDN,Inc. All rights reserved.
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
9 * http://www.apache.org/licenses/LICENSE-2.0
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.
23 #include "http_config.h"
24 #include "http_core.h"
25 #include "http_protocol.h"
27 #include "ap_config.h"
28 #include "apr_strings.h"
29 #include "util_filter.h"
30 #include "apr_buckets.h"
32 #include "apr_tables.h"
34 #include "apr_general.h"
35 #include "apr_pools.h"
38 #include "chxj_encoding.h"
39 #include "qs_ignore_sp.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"
69 #include "chxj_serf.h"
70 #include "chxj_add_device_env.h"
71 #include "chxj_conv_z2h.h"
72 #include "chxj_header_inf.h"
73 #include "chxj_jreserved_tag.h"
76 #define CHXJ_VERSION_PREFIX PACKAGE_NAME "/"
77 #define CHXJ_VERSION PACKAGE_VERSION
78 #define CHXJ_POST_MAX (0x1000000)
80 converter_t convert_routine[] = {
82 /* CHXJ_SPEC_UNKNOWN */
85 .emoji_only_converter = NULL,
88 /* CHXJ_SPEC_Chtml_1_0 */
89 .converter = chxj_convert_chtml10,
90 .encoder = chxj_encoding,
91 .emoji_only_converter = chxj_chtml10_emoji_only_converter,
94 /* CHXJ_SPEC_Chtml_2_0 */
95 .converter = chxj_convert_chtml20,
96 .encoder = chxj_encoding,
97 .emoji_only_converter = chxj_chtml20_emoji_only_converter,
100 /* CHXJ_SPEC_Chtml_3_0 */
101 .converter = chxj_convert_chtml30,
102 .encoder = chxj_encoding,
103 .emoji_only_converter = chxj_chtml30_emoji_only_converter,
106 /* CHXJ_SPEC_Chtml_4_0 */
107 .converter = chxj_convert_chtml40,
108 .encoder = chxj_encoding,
109 .emoji_only_converter = chxj_chtml40_emoji_only_converter,
112 /* CHXJ_SPEC_Chtml_5_0 */
113 .converter = chxj_convert_chtml50,
114 .encoder = chxj_encoding,
115 .emoji_only_converter = chxj_chtml50_emoji_only_converter,
118 /* CHXJ_SPEC_Chtml_6_0 */
119 .converter = chxj_convert_chtml50,
120 .encoder = chxj_encoding,
121 .emoji_only_converter = chxj_chtml50_emoji_only_converter,
124 /* CHXJ_SPEC_Chtml_7_0 */
125 .converter = chxj_convert_chtml50,
126 .encoder = chxj_encoding,
127 .emoji_only_converter = chxj_chtml50_emoji_only_converter,
130 /* CHXJ_SPEC_XHtml_Mobile_1_0 */
131 .converter = chxj_convert_xhtml_mobile_1_0,
132 .encoder = chxj_encoding,
133 .emoji_only_converter = chxj_xhtml_emoji_only_converter,
137 .converter = chxj_convert_hdml,
138 .encoder = chxj_encoding,
139 .emoji_only_converter = NULL,
142 /* CHXJ_SPEC_Jhtml */
143 .converter = chxj_convert_jhtml,
144 .encoder = chxj_encoding,
145 .emoji_only_converter = chxj_jhtml_emoji_only_converter,
148 /* CHXJ_SPEC_Jxhtml */
149 .converter = chxj_convert_jxhtml,
150 .encoder = chxj_encoding,
151 .emoji_only_converter = chxj_jxhtml_emoji_only_converter,
157 .emoji_only_converter = NULL,
161 static int chxj_convert_input_header(request_rec *r,chxjconvrule_entry *entryp, device_table *spec);
162 static void s_convert_guid_parameter_to_header(request_rec *r, const char *param, device_table *spec);
163 static void s_add_cookie_id_if_has_location_header(request_rec *r, cookie_t *cookie);
164 static void s_clear_cookie_header(request_rec *r, device_table *spec);
165 static void s_add_no_cache_headers(request_rec *r, chxjconvrule_entry *entryp);
168 * Only when User-Agent is specified, the User-Agent header is camouflaged.
173 chxj_headers_fixup(request_rec *r)
175 mod_chxj_config* dconf;
176 chxjconvrule_entry* entryp;
182 DBG(r, "REQ[%X] start chxj_headers_fixup()", (unsigned int)(apr_size_t)r);
184 DBG(r, "REQ[%X] detect internal redirect.", (unsigned int)(apr_size_t)r);
185 DBG(r, "REQ[%X] end chxj_headers_fixup()", (unsigned int)(apr_size_t)r);
189 dconf = chxj_get_module_config(r->per_dir_config, &chxj_module);
191 user_agent = (char*)apr_table_get(r->headers_in, HTTP_USER_AGENT);
192 spec = chxj_specified_device(r, user_agent);
194 contentType = (char *)apr_table_get(r->headers_in, "Content-Type");
196 && strncasecmp("multipart/form-data", contentType, 19) == 0) {
197 DBG(r, "REQ[%X] detect multipart/form-data ==> no target", (unsigned int)(apr_size_t)r);
198 DBG(r, "REQ[%X] end chxj_headers_fixup()", (unsigned int)(apr_size_t)r);
201 if (r->method_number == M_POST) {
202 if (!apr_table_get(r->headers_in, "X-Chxj-Forward")) {
203 s_clear_cookie_header(r, spec);
207 s_clear_cookie_header(r, spec);
210 switch(spec->html_spec_type) {
211 case CHXJ_SPEC_Chtml_1_0:
212 case CHXJ_SPEC_Chtml_2_0:
213 case CHXJ_SPEC_Chtml_3_0:
214 case CHXJ_SPEC_Chtml_4_0:
215 case CHXJ_SPEC_Chtml_5_0:
216 case CHXJ_SPEC_Chtml_6_0:
217 case CHXJ_SPEC_Chtml_7_0:
218 case CHXJ_SPEC_XHtml_Mobile_1_0:
220 case CHXJ_SPEC_Jhtml:
221 case CHXJ_SPEC_Jxhtml:
222 entryp = chxj_apply_convrule(r, dconf->convrules);
224 DBG(r, "REQ[%X] end chxj_headers_fixup() (no pattern)", (unsigned int)(apr_size_t)r);
227 if (!(entryp->action & CONVRULE_ENGINE_ON_BIT)) {
228 DBG(r, "REQ[%X] end chxj_headers_fixup() (engine off)", (unsigned int)(apr_size_t)r);
231 if (entryp->action & CONVRULE_EMOJI_ONLY_BIT) {
232 DBG(r, "REQ[%X] end chxj_headers_fixup() (emoji only)", (unsigned int)(apr_size_t)r);
236 apr_table_setn(r->headers_in,
237 CHXJ_HTTP_USER_AGENT,
240 if (entryp->user_agent)
241 apr_table_setn(r->headers_in,
245 chxj_convert_input_header(r,entryp, spec);
250 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 if (r->method_number == M_POST) {
257 if (! apr_table_get(r->headers_in, "X-Chxj-Forward")) {
258 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);
259 r->proxyreq = PROXYREQ_NONE;
260 r->handler = apr_psprintf(r->pool, "chxj-input-handler");
263 char *client_ip = (char *)apr_table_get(r->headers_in, CHXJ_HEADER_ORIG_CLIENT_IP);
265 if (dconf->post_log) {
266 apr_table_setn(r->subprocess_env, dconf->post_log, dconf->post_log);
269 apr_table_setn(r->subprocess_env, "chxj-post-log", "chxj-post-log");
271 apr_sockaddr_t *address = NULL;
272 apr_status_t rv = apr_sockaddr_info_get(&address, ap_get_server_name(r), APR_UNSPEC, ap_get_server_port(r), 0, r->pool);
273 if (rv != APR_SUCCESS) {
275 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));
276 DBG(r, "REQ[%X] end chxj_headers_fixup()", (unsigned int)(apr_size_t)r);
280 if (dconf->forward_server_ip) {
281 addr = dconf->forward_server_ip;
284 apr_sockaddr_ip_get(&addr, address);
286 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);
287 if (strcmp(addr, r->connection->remote_ip) == 0) {
288 r->connection->remote_ip = apr_pstrdup(r->connection->pool, client_ip);
290 if (! apr_table_get(r->headers_in, "Content-Length")) {
291 contentLength = (char *)apr_table_get(r->headers_in, "X-Chxj-Content-Length");
293 apr_table_set(r->headers_in, "Content-Length", contentLength);
300 chxj_add_device_env(r, spec);
302 DBG(r, "REQ[%X] end chxj_headers_fixup()", (unsigned int)(apr_size_t)r);
309 s_clear_cookie_header(request_rec *r, device_table *spec)
311 switch(spec->html_spec_type) {
312 case CHXJ_SPEC_Chtml_1_0:
313 case CHXJ_SPEC_Chtml_2_0:
314 case CHXJ_SPEC_Chtml_3_0:
315 case CHXJ_SPEC_Chtml_4_0:
316 case CHXJ_SPEC_Chtml_5_0:
317 case CHXJ_SPEC_Chtml_6_0:
318 case CHXJ_SPEC_Chtml_7_0:
319 case CHXJ_SPEC_XHtml_Mobile_1_0:
320 case CHXJ_SPEC_Jhtml:
321 apr_table_unset(r->headers_in, "Cookie");
330 * It converts it from CHTML into XXML corresponding to each model.
333 * @param src [i] It is former HTML character string.
334 * @param len [i/o] It is length of former HTML character string.
337 chxj_convert(request_rec *r, const char **src, apr_size_t *len, device_table *spec, const char *ua, cookie_t **cookiep)
343 mod_chxj_config *dconf;
344 chxjconvrule_entry *entryp;
346 DBG(r,"REQ[%X] start of chxj_convert() input:[%.*s]", (unsigned int)(apr_size_t)r, (int)*len, *src);
347 dst = apr_pstrcat(r->pool, (char *)*src, NULL);
349 dconf = chxj_get_module_config(r->per_dir_config, &chxj_module);
352 entryp = chxj_apply_convrule(r, dconf->convrules);
354 if (!entryp || !(entryp->action & CONVRULE_ENGINE_ON_BIT)) {
355 DBG(r,"REQ[%X] end of chxj_convert()", (unsigned int)(apr_size_t)r);
360 /*------------------------------------------------------------------------*/
361 /* get UserAgent from http header */
362 /*------------------------------------------------------------------------*/
363 if (entryp->user_agent)
364 user_agent = (char *)apr_table_get(r->headers_in, CHXJ_HTTP_USER_AGENT);
366 user_agent = (char *)apr_table_get(r->headers_in, HTTP_USER_AGENT);
368 DBG(r,"REQ[%X] User-Agent:[%s]", (unsigned int)(apr_size_t)r, user_agent);
369 DBG(r,"REQ[%X] content type is %s", (unsigned int)(apr_size_t)r, r->content_type);
372 if ( ! STRNCASEEQ('t','T', "text/html", r->content_type, sizeof("text/html")-1)
373 && ! STRNCASEEQ('a','A', "application/xhtml+xml", r->content_type, sizeof("application/xhtml+xml")-1)) {
374 DBG(r,"REQ[%X] no convert. content type is %s", (unsigned int)(apr_size_t)r, r->content_type);
375 DBG(r,"REQ[%X] end of chxj_convert()", (unsigned int)(apr_size_t)r);
379 if (ua && user_agent && strcasecmp(user_agent, ua) != 0) {
381 spec = chxj_specified_device(r, user_agent);
388 if (entryp->action & CONVRULE_COOKIE_ON_BIT
389 && !(entryp->action & CONVRULE_EMOJI_ONLY_BIT)
390 && !(entryp->action & CONVRULE_ENVINFO_ONLY_BIT)) {
391 switch(spec->html_spec_type) {
392 case CHXJ_SPEC_Chtml_1_0:
393 case CHXJ_SPEC_Chtml_2_0:
394 case CHXJ_SPEC_Chtml_3_0:
395 case CHXJ_SPEC_Chtml_4_0:
396 case CHXJ_SPEC_Chtml_5_0:
397 case CHXJ_SPEC_Chtml_6_0:
398 case CHXJ_SPEC_Chtml_7_0:
399 case CHXJ_SPEC_XHtml_Mobile_1_0:
400 case CHXJ_SPEC_Jhtml:
401 cookie = chxj_save_cookie(r);
408 if (!r->header_only) {
411 if (convert_routine[spec->html_spec_type].encoder)
412 tmp = convert_routine[spec->html_spec_type].encoder(r,
416 if (entryp->action & CONVRULE_EMOJI_ONLY_BIT) {
418 tmp = chxj_node_convert_chxjif_only(r, spec, (const char*)tmp, (apr_size_t *)len);
421 tmp = chxj_node_convert_chxjif_only(r, spec, (const char *)*src, (apr_size_t *)len);
423 if (convert_routine[spec->html_spec_type].emoji_only_converter) {
424 dst = convert_routine[spec->html_spec_type].emoji_only_converter(r,spec, tmp,*len);
429 dst = apr_palloc(r->pool, 1);
434 DBG(r, "REQ[%X] end of chxj_convert()(emoji only)", (unsigned int)(apr_size_t)r);
437 if ( !(entryp->action & CONVRULE_EMOJI_ONLY_BIT)
438 && !(entryp->action & CONVRULE_ENVINFO_ONLY_BIT)) {
439 if (convert_routine[spec->html_spec_type].converter) {
441 dst = convert_routine[spec->html_spec_type].converter(r,
449 dst = convert_routine[spec->html_spec_type].converter(r,
459 dst = chxj_conv_z2h(r, dst, len, entryp);
464 ap_set_content_length(r, *len);
467 dst = apr_psprintf(r->pool, "\n");
476 DBG(r, "REQ[%X] end of chxj_convert()", (unsigned int)(apr_size_t)r);
483 * convert GUID parameter.
487 s_convert_guid_parameter_to_header(request_rec *r, const char *param, device_table *spec)
489 DBG(r, "REQ[%X] start s_convert_guid_parameter() param:[%s]", (unsigned int)(apr_size_t)r, param);
490 if (strcasecmp(param, "guid") == 0) {
491 switch(spec->html_spec_type) {
492 case CHXJ_SPEC_XHtml_Mobile_1_0:
494 char *x_up_subno = (char *)apr_table_get(r->headers_in, "x-up-subno");
496 apr_table_setn(r->headers_in, "X-DCMGUID", x_up_subno);
500 case CHXJ_SPEC_Jhtml:
501 case CHXJ_SPEC_Jxhtml:
503 char *x_jphone_uid = (char *)apr_table_get(r->headers_in, "x-jphone-uid");
505 apr_table_setn(r->headers_in, "X-DCMGUID", x_jphone_uid);
513 DBG(r, "REQ[%X] end s_convert_guid_parameter()", (unsigned int)(apr_size_t)r);
517 * It converts it from HEADER.
522 chxj_convert_input_header(request_rec *r,chxjconvrule_entry *entryp, device_table *spec)
534 cookie_t *cookie = NULL;
535 int no_update_flag = 0;
537 DBG(r, "REQ[%X] start chxj_convert_input_header()", (unsigned int)(apr_size_t)r);
540 DBG(r, "REQ[%X] r->args=[null]", (unsigned int)(apr_size_t)r);
541 DBG(r, "REQ[%X] end chxj_convert_input_header()", (unsigned int)(apr_size_t)r);
544 urilen = strlen(r->args);
546 result = qs_alloc_zero_byte_string(r->pool);
548 buff_pre = apr_pstrdup(r->pool, r->args);
553 pair = apr_strtok(buff_pre, "&", &pstate);
559 pair_sv = apr_pstrdup(r->pool, pair);
561 name = apr_strtok(pair, "=", &vstate);
562 value = apr_strtok(NULL, "=", &vstate);
563 if (! name) continue;
564 if (strcasecmp(name, CHXJ_COOKIE_NOUPDATE_PARAM) == 0 || strcasecmp(name, chxj_url_encode(r->pool, CHXJ_COOKIE_NOUPDATE_PARAM)) == 0) {
565 DBG(r, "REQ[%X] found cookie no update parameter", (unsigned int)(apr_size_t)r);
570 buff = apr_pstrdup(r->pool, r->args);
571 DBG(r, "REQ[%X] r->args=[%s]", (unsigned int)(apr_size_t)r, buff);
580 pair = apr_strtok(buff, "&", &pstate);
586 pair_sv = apr_pstrdup(r->pool, pair);
588 name = apr_strtok(pair, "=", &vstate);
589 value = apr_strtok(NULL, "=", &vstate);
590 if (! name) continue;
591 name = chxj_safe_to_jreserved_tag(r, name);
592 if (strncasecmp(name, "_chxj", 5) != 0 && strncasecmp(name, "%5Fchxj", sizeof("%5Fchxj")-1) != 0) {
593 if (strlen(result) != 0)
594 result = apr_pstrcat(r->pool, result, "&", NULL);
596 if (strcasecmp(entryp->encoding, "NONE") != 0) {
601 if (value && *value != 0) {
602 value = chxj_url_decode(r->pool, value);
603 dlen = strlen(value);
604 DBG(r, "************ before encoding[%s]", value);
606 dvalue = chxj_rencoding(r, value, &dlen);
607 dvalue = chxj_url_encode(r->pool, dvalue);
609 DBG(r, "************ after encoding[%s]", dvalue);
615 if (name && *name != 0) {
616 name = chxj_url_decode(r->pool, name);
618 dname = chxj_rencoding(r, name, &dlen);
619 dname = chxj_url_encode(r->pool, dname);
624 s_convert_guid_parameter_to_header(r, dname, spec);
625 result = apr_pstrcat(r->pool, result, dname, "=", dvalue, NULL);
628 s_convert_guid_parameter_to_header(r, name, spec);
629 if (strcmp(name, pair_sv) != 0) {
630 result = apr_pstrcat(r->pool, result, name, "=", value, NULL);
633 result = apr_pstrcat(r->pool, result, name, NULL);
638 if ( (strncasecmp(name, "_chxj_c_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fc%5F", sizeof("%5Fchxj%5Fc%5F")-1) == 0)
639 || (strncasecmp(name, "_chxj_r_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fr%5F", sizeof("%5Fchxj%5Fr%5F")-1) == 0)
640 || (strncasecmp(name, "_chxj_s_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fs%5F", sizeof("%5Fchxj%5Fs%5F")-1) == 0)) {
644 if (strlen(value) == 0)
647 if (strlen(result) != 0)
648 result = apr_pstrcat(r->pool, result, "&", NULL);
650 result = apr_pstrcat(r->pool, result, &name[8], "=", value, NULL);
653 if (strcasecmp(name, CHXJ_COOKIE_PARAM) == 0 || strcasecmp(name, "%5Fchxj%5Fcc") == 0) {
655 apr_table_unset(r->headers_in, "Cookie");
656 DBG(r, "REQ[%X] found cookie parameter[%s]", (unsigned int)(apr_size_t)r, value);
657 DBG(r, "REQ[%X] call start chxj_load_cookie()", (unsigned int)(apr_size_t)r);
658 cookie_lock_t *lock = chxj_cookie_lock(r);
659 cookie = chxj_load_cookie(r, value);
660 DBG(r, "REQ[%X] call end chxj_load_cookie()", (unsigned int)(apr_size_t)r);
661 if (! no_update_flag && cookie) {
662 cookie = chxj_update_cookie(r, cookie);
664 chxj_cookie_unlock(r, lock);
666 if (cookie && cookie->cookie_id) {
667 if (strlen(result) != 0)
668 result = apr_pstrcat(r->pool, result, "&", NULL);
669 result = apr_pstrcat(r->pool, result, name, "=", cookie->cookie_id, NULL);
673 if (strcasecmp(name, CHXJ_COOKIE_NOUPDATE_PARAM) == 0) {
674 if (strlen(result) != 0)
675 result = apr_pstrcat(r->pool, result, "&", NULL);
676 result = apr_pstrcat(r->pool, result, name, "=", value, NULL);
679 apr_table_setn(r->headers_in, "X-Chxj-Cookie-No-Update", "true");
680 if (! no_update_flag) {
681 result = apr_pstrcat(r->pool, result, "&_chxj_nc=true", NULL);
685 DBG(r, "REQ[%X] result r->args=[%s]", (unsigned int)(apr_size_t)r, r->args);
686 DBG(r, "REQ[%X] end chxj_convert_input_header()", (unsigned int)(apr_size_t)r);
692 * It converts it from POSTDATA .
695 * @param src [i] It is POSTDATA character string.
696 * @param len [i/o] It is length of former HTML character string.
703 chxjconvrule_entry *entryp,
713 cookie_t *cookie = NULL;
715 int no_update_flag = 0;
720 DBG(r, "REQ[%X] start of chxj_input_convert()", (unsigned int)(apr_size_t)r);
723 DBG(r, "REQ[%X] end of chxj_input_convert() (input is null)", (unsigned int)(apr_size_t)r);
724 return apr_pstrdup(r->pool, "");
727 apr_pool_create(&pool, r->pool);
729 s = apr_pstrdup(pool, *src);
731 buff_pre = apr_pstrdup(pool, *src);
733 result = qs_alloc_zero_byte_string(pool);
735 DBG(r, "REQ[%X] +-------------------------------------------------------------------+", (unsigned int)(apr_size_t)r);
736 DBG(r, "REQ[%X] | BEFORE input convert source |", (unsigned int)(apr_size_t)r);
737 DBG(r, "REQ[%X] +-------------------------------------------------------------------+", (unsigned int)(apr_size_t)r);
738 for (ii=0; ii<ilen-64; ii+=64) {
739 DBG(r, "REQ[%X] | [%-*.*s] |", (unsigned int)(apr_size_t)r, 64, 64, &s[ii]);
744 if (ilen >= 64 && ((ilen-64) % 64 != 0)) {
745 DBG(r, "REQ[%X] | [%-*.*s] |", (unsigned int)(apr_size_t)r, 64, 64, &s[ii]);
747 DBG(r, "REQ[%X] +--------------------------------------------------------------------+", (unsigned int)(apr_size_t)r);
752 pair = apr_strtok(buff_pre, "&", &pstate);
758 pair_sv = apr_pstrdup(pool, pair);
760 name = apr_strtok(pair, "=", &vstate);
761 value = apr_strtok(NULL, "=", &vstate);
762 if (! name) continue;
763 if (strcasecmp(name, CHXJ_COOKIE_NOUPDATE_PARAM) == 0 || strcasecmp(name, chxj_url_encode(r->pool, CHXJ_COOKIE_NOUPDATE_PARAM)) == 0) {
764 DBG(r, "REQ[%X] found cookie no update parameter", (unsigned int)(apr_size_t)r);
774 pair = apr_strtok(s, "&", &pstate);
779 name = apr_strtok(pair, "=", &vstate);
780 value = apr_strtok(NULL, "=", &vstate);
781 if (! name) continue;
782 name = chxj_safe_to_jreserved_tag(r, name);
784 if (strncasecmp(name, "_chxj", 5) != 0 && strncasecmp(name, "%5Fchxj", sizeof("%5Fchxj")-1) != 0) {
785 if (strlen(result) != 0)
786 result = apr_pstrcat(pool, result, "&", NULL);
788 if (strcasecmp(entryp->encoding, "NONE") != 0) {
793 if (value && *value != 0) {
794 value = chxj_url_decode(pool, value);
795 dlen = strlen(value);
796 dvalue = chxj_rencoding(r, value, &dlen);
797 dvalue = chxj_url_encode(pool, dvalue);
803 if (name && *name != 0) {
804 name = chxj_url_decode(pool, name);
806 dname = chxj_rencoding(r, name, &dlen);
807 dname = chxj_url_encode(pool, dname);
814 result = apr_pstrcat(pool, result, dname, "=", dvalue, NULL);
817 result = apr_pstrcat(pool, result, name, "=", value, NULL);
821 if ( (strncasecmp(name, "_chxj_c_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fc%5F", sizeof("%5Fchxj%5Fc%5F")-1) == 0)
822 || (strncasecmp(name, "_chxj_r_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fr%5F", sizeof("%5Fchxj%5Fr%5F")-1) == 0)
823 || (strncasecmp(name, "_chxj_s_", 8) == 0 || strncasecmp(name, "%5Fchxj%5Fs%5F", sizeof("%5Fchxj%5Fs%5F")-1) == 0)) {
827 if (strlen(value) == 0)
830 if (strlen(result) != 0)
831 result = apr_pstrcat(pool, result, "&", NULL);
833 if (strcasecmp(entryp->encoding, "NONE") != 0 && value && strlen(value)) {
837 dlen = strlen(value);
838 value = chxj_url_decode(pool, value);
839 dvalue = chxj_rencoding(r, value, &dlen);
840 dvalue = chxj_url_encode(pool,dvalue);
841 result = apr_pstrcat(pool, result, &name[8], "=", dvalue, NULL);
845 result = apr_pstrcat(pool, result, &name[8], "=", value, NULL);
849 if (strcasecmp(name, CHXJ_COOKIE_PARAM) == 0 || strcasecmp(name, "%5Fchxj%5Fcc") == 0) {
851 apr_table_unset(r->headers_in, "Cookie");
852 DBG(r, "REQ[%X] found cookie parameter[%s]", (unsigned int)(apr_size_t)r, value);
853 DBG(r, "REQ[%X] call start chxj_load_cookie()", (unsigned int)(apr_size_t)r);
854 cookie_lock_t *lock = chxj_cookie_lock(r);
855 cookie = chxj_load_cookie(r, value);
856 DBG(r, "REQ[%X] call end chxj_load_cookie()", (unsigned int)(apr_size_t)r);
857 if (! no_update_flag && cookie) {
858 cookie = chxj_update_cookie(r, cookie);
860 chxj_cookie_unlock(r, lock);
862 if (cookie && cookie->cookie_id) {
863 if (strlen(result) != 0)
864 result = apr_pstrcat(pool, result, "&", NULL);
865 result = apr_pstrcat(pool, result, name, "=", cookie->cookie_id, NULL);
869 if (strcasecmp(name, CHXJ_COOKIE_NOUPDATE_PARAM) == 0) {
870 if (strlen(result) != 0)
871 result = apr_pstrcat(pool, result, "&", NULL);
872 result = apr_pstrcat(pool, result, name, "=", value, NULL);
875 if ( strncasecmp(name, CHXJ_QUERY_STRING_PARAM_PREFIX, sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX)-1) == 0) {
878 dlen = strlen(value);
880 value = chxj_url_decode(pool, value);
881 dvalue = chxj_rencoding(r, value, &dlen);
882 dvalue = chxj_url_encode(pool,dvalue);
883 if (r->args && strlen(r->args) > 0) {
884 r->args = apr_pstrcat(pool, r->args, "&", &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX)-1], "=", dvalue, NULL);
887 r->args = apr_pstrcat(pool, &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX)-1], "=", dvalue, NULL);
889 s_convert_guid_parameter_to_header(r, &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX)-1], spec);
893 if (strncasecmp(name, CHXJ_QUERY_STRING_PARAM_PREFIX_ENC, sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX_ENC)-1) == 0) {
896 dlen = strlen(value);
898 value = chxj_url_decode(pool, value);
899 dvalue = chxj_rencoding(r, value, &dlen);
900 dvalue = chxj_url_encode(pool,dvalue);
901 if (r->args && strlen(r->args) > 0) {
902 r->args = apr_pstrcat(pool, r->args, "&", &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX_ENC)-1], "=", dvalue, NULL);
905 r->args = apr_pstrcat(pool, &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX_ENC)-1], "=", dvalue, NULL);
907 s_convert_guid_parameter_to_header(r, &name[sizeof(CHXJ_QUERY_STRING_PARAM_PREFIX_ENC)-1], spec);
910 DBG(r, "REQ[%X] ************************ name:[%s]", (unsigned int)(apr_size_t)r, name);
912 *len = strlen(result);
913 apr_table_setn(r->headers_in, "X-Chxj-Cookie-No-Update", "true");
914 if (! no_update_flag) {
915 result = apr_pstrcat(pool, result, "&_chxj_nc=true", NULL);
918 DBG(r, "REQ[%X] AFTER input convert result = [%s]", (unsigned int)(apr_size_t)r, result);
919 DBG(r, "REQ[%X] end chxj_input_convert()", (unsigned int)(apr_size_t)r);
926 * The received data is returned to the filter.
928 * @param f [i/o] It is a filter.
929 * @param data [i] It is data returned to the filter.
930 * @param len [i] It is length of the data returned to the filter.
933 pass_data_to_filter(ap_filter_t *f, const char *data,
936 request_rec *r = f->r;
937 conn_rec *c = r->connection;
939 apr_bucket_brigade *bb;
942 DBG(r, "REQ[%X] start pass_data_to_filter()", (unsigned int)(apr_size_t)r);
944 chxj_header_inf_clear(r);
946 bb = apr_brigade_create(r->pool, c->bucket_alloc);
947 b = apr_bucket_transient_create(data, len, c->bucket_alloc);
949 APR_BRIGADE_INSERT_TAIL(bb, b);
950 b = apr_bucket_eos_create(f->c->bucket_alloc);
951 APR_BRIGADE_INSERT_TAIL(bb, b);
953 rv = ap_pass_brigade(f->next, bb);
954 if (rv != APR_SUCCESS) {
955 DBG(r, "REQ[%X] end pass_data_to_filter() (apr_pass_brigade)", (unsigned int)(apr_size_t)r);
959 DBG(r, "REQ[%X] end pass_data_to_filter()", (unsigned int)(apr_size_t)r);
966 * Add No Cache Header
969 s_add_no_cache_headers(request_rec *r, chxjconvrule_entry *entryp)
971 if (entryp->action & CONVRULE_NOCACHE_ON_BIT) {
972 apr_table_unset(r->headers_out, "Pragma");
973 apr_table_unset(r->err_headers_out, "Pragma");
974 apr_table_unset(r->headers_out, "Expires");
975 apr_table_unset(r->err_headers_out, "Expires");
976 apr_table_unset(r->headers_out, "Cache-Control");
977 apr_table_unset(r->err_headers_out, "Cache-Control");
979 apr_table_setn(r->err_headers_out, "Pragma", "no-cache");
980 apr_table_setn(r->err_headers_out, "Expires", "Thu, 01 Jan 1970 00:00:00 GMT");
981 apr_table_setn(r->err_headers_out, "Cache-Control", "no-cache, no-store");
987 * It is the main loop of the output filter.
989 * @param f [i/o] It is a filter.
993 chxj_output_filter(ap_filter_t *f, apr_bucket_brigade *bb)
999 char *user_agent = NULL;
1001 mod_chxj_ctx *ctx = (mod_chxj_ctx *)f->ctx;
1002 cookie_t *cookie = NULL;
1003 mod_chxj_config *dconf;
1004 chxjconvrule_entry *entryp = NULL;
1005 device_table *spec = NULL;
1009 DBG(f->r, "REQ[%X] start of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1012 apr_pool_create(&pool, r->pool);
1014 entryp = ctx->entryp;
1016 dconf = chxj_get_module_config(r->per_dir_config, &chxj_module);
1018 if (r->content_type) {
1019 if (! STRNCASEEQ('t','T',"text/html",r->content_type, sizeof("text/html")-1)
1020 && ! STRNCASEEQ('t','T',"text/xml", r->content_type, sizeof("text/xml")-1)
1021 && ! STRNCASEEQ('a','A',"application/xhtml+xml", r->content_type, sizeof("application/xhtml+xml")-1)
1022 && ! (dconf->image == CHXJ_IMG_ON
1023 && ! apr_table_get(r->headers_in, "CHXJ_IMG_CONV")
1024 && STRNCASEEQ('i','I',"image/", r->content_type, sizeof("image/") -1)
1025 && ( STRCASEEQ('j','J',"jpeg", &r->content_type[6]) /* JPEG */
1026 || STRCASEEQ('j','J',"jp2", &r->content_type[6]) /* JPEG2000 */
1027 || STRCASEEQ('j','J',"jpeg2000", &r->content_type[6]) /* JPEG2000 */
1028 || STRCASEEQ('j','J',"jpeg2000-image", &r->content_type[6]) /* JPEG2000 */
1029 || STRCASEEQ('x','X',"x-jpeg2000-image",&r->content_type[6]) /* JPEG2000 */
1030 || STRCASEEQ('x','X',"x-ms-bmp", &r->content_type[6]) /* BMP */
1031 || STRCASEEQ('p','P',"png", &r->content_type[6]) /* PNG */
1032 || STRCASEEQ('x','X',"x-png", &r->content_type[6]) /* PNG */
1033 || STRCASEEQ('g','G',"gif", &r->content_type[6])))) { /* GIF */
1035 DBG(r, "REQ[%X] not convert content-type:[%s] dconf->image:[%d]", (unsigned int)(apr_size_t)r, r->content_type, dconf->image);
1036 if (entryp->action & CONVRULE_COOKIE_ON_BIT) {
1037 cookie_lock_t *lock = NULL;
1038 DBG(r, "REQ[%X] entryp->action == COOKIE_ON_BIT", (unsigned int)(apr_size_t)r);
1039 switch(spec->html_spec_type) {
1040 case CHXJ_SPEC_Chtml_1_0:
1041 case CHXJ_SPEC_Chtml_2_0:
1042 case CHXJ_SPEC_Chtml_3_0:
1043 case CHXJ_SPEC_Chtml_4_0:
1044 case CHXJ_SPEC_Chtml_5_0:
1045 case CHXJ_SPEC_Chtml_6_0:
1046 case CHXJ_SPEC_Chtml_7_0:
1047 case CHXJ_SPEC_XHtml_Mobile_1_0:
1048 case CHXJ_SPEC_Jhtml:
1049 lock = chxj_cookie_lock(r);
1050 cookie = chxj_save_cookie(r);
1051 s_add_cookie_id_if_has_location_header(r, cookie);
1052 chxj_cookie_unlock(r, lock);
1058 if (apr_table_get(r->headers_out, "Location") || apr_table_get(r->err_headers_out, "Location")) {
1059 if (! ap_is_HTTP_REDIRECT(r->status)) {
1060 r->status = HTTP_MOVED_TEMPORARILY;
1063 s_add_no_cache_headers(r, entryp);
1064 ap_pass_brigade(f->next, bb);
1065 DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1070 DBG(r, "REQ[%X] not convert content-type:[(null)]", (unsigned int)(apr_size_t)r);
1071 ap_pass_brigade(f->next, bb);
1072 DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1077 for (b = APR_BRIGADE_FIRST(bb);
1078 b != APR_BRIGADE_SENTINEL(bb);
1079 b = APR_BUCKET_NEXT(b)) {
1081 if (apr_bucket_read(b, &data, &len, APR_BLOCK_READ) == APR_SUCCESS) {
1082 DBG(r, "REQ[%X] read data[%.*s]",(unsigned int)(apr_size_t)r, (int)len, data);
1084 /*--------------------------------------------------------------------*/
1086 /*--------------------------------------------------------------------*/
1088 DBG(r, "append data start");
1089 ctx = (mod_chxj_ctx *)f->ctx;
1092 tmp = apr_palloc(r->pool, ctx->len);
1093 memcpy(tmp, ctx->buffer, ctx->len);
1095 ctx->buffer = apr_palloc(pool, ctx->len + len);
1097 memcpy(ctx->buffer, tmp, ctx->len);
1098 memcpy(&ctx->buffer[ctx->len], data, len);
1102 DBG(r, "REQ[%X] append data end", (unsigned int)(apr_size_t)r);
1105 if (APR_BUCKET_IS_EOS(b)) {
1107 DBG(r, "REQ[%X] eos", (unsigned int)(apr_size_t)r);
1108 /*----------------------------------------------------------------------*/
1110 /*----------------------------------------------------------------------*/
1112 cookie_lock_t *lock = NULL;
1113 ctx = (mod_chxj_ctx *)f->ctx;
1115 DBG(r, "REQ[%X] content_type=[%s]", (unsigned int)(apr_size_t)r, r->content_type);
1116 lock = chxj_cookie_lock(r);
1118 if (spec->html_spec_type != CHXJ_SPEC_UNKNOWN
1120 && (STRNCASEEQ('a','A',"application/xhtml+xml", r->content_type, sizeof("application/xhtml+xml")-1)
1121 || STRNCASEEQ('t','T',"text/html", r->content_type, sizeof("text/html")-1))) {
1122 DBG(r, "REQ[%X] detect convert target:[%s]", (unsigned int)(apr_size_t)r, r->content_type);
1127 tmp = apr_palloc(pool, ctx->len + 1);
1129 memset(tmp, 0, ctx->len + 1);
1130 memcpy(tmp, ctx->buffer, ctx->len);
1132 ctx->buffer = chxj_convert(r,
1133 (const char **)&tmp,
1134 (apr_size_t *)&ctx->len,
1136 user_agent, &cookie);
1140 ctx->buffer = apr_psprintf(r->pool, "\n");
1142 ctx->buffer = chxj_convert(r,
1143 (const char **)&ctx->buffer,
1144 (apr_size_t *)&ctx->len,
1146 user_agent, &cookie);
1151 && *(char *)r->content_type == 't'
1152 && strncmp(r->content_type, "text/xml", 8) == 0) {
1153 DBG(r, "REQ[%X] text/XML", (unsigned int)(apr_size_t)r);
1161 memset(&doc, 0, sizeof(Doc));
1162 memset(&qrcode, 0, sizeof(qr_code_t));
1164 doc.parse_mode = PARSE_MODE_CHTML;
1168 qs_init_malloc(&doc);
1170 root = qs_parse_string(&doc, ctx->buffer, ctx->len);
1173 for (child = qs_get_child_node(&doc,root);
1175 child = qs_get_next_node(&doc,child)) {
1176 char *name = qs_get_node_name(&doc,child);
1177 if (strcasecmp("qrcode",name) == 0) {
1182 qs_all_free(&doc,QX_LOGMARK);
1184 r->handler = apr_psprintf(r->pool, "chxj-qrcode");
1185 chxj_qrcode_node_to_qrcode(&qrcode, root);
1186 sts = chxj_qrcode_create_image_data(&qrcode, &ctx->buffer, &ctx->len);
1188 ERR(r, "REQ[%X] qrcode create failed.", (unsigned int)(apr_size_t)r);
1189 chxj_cookie_unlock(r, lock);
1190 DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1193 r->content_type = apr_psprintf(r->pool, "image/jpeg");
1197 if (spec->html_spec_type != CHXJ_SPEC_UNKNOWN
1199 && ( *r->content_type == 'i' || *r->content_type == 'I')
1200 && dconf->image == CHXJ_IMG_ON
1201 && strncasecmp("image/", r->content_type, 6) == 0
1202 && ( STRCASEEQ('j','J',"jpeg", &r->content_type[6]) /* JPEG */
1203 || STRCASEEQ('j','J',"jp2", &r->content_type[6]) /* JPEG2000 */
1204 || STRCASEEQ('j','J',"jpeg2000", &r->content_type[6]) /* JPEG2000 */
1205 || STRCASEEQ('j','J',"jpeg2000-image", &r->content_type[6]) /* JPEG2000 */
1206 || STRCASEEQ('x','X',"x-jpeg2000-image",&r->content_type[6]) /* JPEG2000 */
1207 || STRCASEEQ('p','P',"png", &r->content_type[6]) /* PNG */
1208 || STRCASEEQ('x','X',"x-png", &r->content_type[6]) /* PNG */
1209 || STRCASEEQ('x','X',"x-ms-bmp", &r->content_type[6]) /* BMP */
1210 || STRCASEEQ('g','G',"gif", &r->content_type[6]))) { /* GIF */
1211 DBG(r, "REQ[%X] detect convert target:[%s]", (unsigned int)(apr_size_t)r, r->content_type);
1215 tmp = apr_palloc(pool, ctx->len + 1);
1217 memset(tmp, 0, ctx->len + 1);
1218 memcpy(tmp, ctx->buffer, ctx->len);
1220 chxj_convert_image(r,
1221 (const char **)&tmp,
1222 (apr_size_t *)&ctx->len);
1223 if (ctx->buffer == NULL) {
1229 apr_table_unset(r->headers_out, "Content-Length");
1230 apr_table_unset(r->err_headers_out, "Content-Length");
1231 ap_set_content_length(r, (apr_off_t)ctx->len);
1235 DBG(r, "REQ[%X] call pass_data_to_filter()", (unsigned int)(apr_size_t)r);
1236 s_add_cookie_id_if_has_location_header(r, cookie);
1237 if (apr_table_get(r->headers_out, "Location") || apr_table_get(r->err_headers_out, "Location")) {
1238 if (! ap_is_HTTP_REDIRECT(r->status)) {
1239 r->status = HTTP_MOVED_TEMPORARILY;
1242 if (ctx->len && ap_is_HTTP_REDIRECT(r->status)) {
1243 ctx->buffer = apr_pstrdup(pool, "");
1245 ap_set_content_length(r, (apr_off_t)ctx->len);
1247 chxj_cookie_unlock(r,lock);
1248 s_add_no_cache_headers(r, entryp);
1249 rv = pass_data_to_filter(f,
1250 (const char *)ctx->buffer,
1251 (apr_size_t)ctx->len);
1254 ctx->buffer = apr_pstrdup(pool, "");
1256 ap_set_content_length(r, (apr_off_t)ctx->len);
1257 chxj_cookie_unlock(r, lock);
1258 s_add_no_cache_headers(r, entryp);
1259 rv = pass_data_to_filter(f,
1260 (const char *)ctx->buffer,
1261 (apr_size_t)ctx->len);
1263 DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1267 DBG(r, "REQ[%X] SAVE COOKIE[%x]", (unsigned int)(apr_size_t)r, entryp->action);
1272 if (entryp->action & CONVRULE_COOKIE_ON_BIT) {
1273 cookie_lock_t *lock = NULL;
1274 DBG(r, "REQ[%X] entryp->action == COOKIE_ON_BIT", (unsigned int)(apr_size_t)r);
1275 switch(spec->html_spec_type) {
1276 case CHXJ_SPEC_Chtml_1_0:
1277 case CHXJ_SPEC_Chtml_2_0:
1278 case CHXJ_SPEC_Chtml_3_0:
1279 case CHXJ_SPEC_Chtml_4_0:
1280 case CHXJ_SPEC_Chtml_5_0:
1281 case CHXJ_SPEC_Chtml_6_0:
1282 case CHXJ_SPEC_Chtml_7_0:
1283 case CHXJ_SPEC_XHtml_Mobile_1_0:
1284 case CHXJ_SPEC_Jhtml:
1285 lock = chxj_cookie_lock(r);
1286 cookie = chxj_save_cookie(r);
1288 * Location Header Check to add cookie parameter.
1290 s_add_cookie_id_if_has_location_header(r, cookie);
1291 chxj_cookie_unlock(r, lock);
1292 apr_table_unset(r->headers_out, "Set-Cookie");
1293 apr_table_unset(r->err_headers_out, "Set-Cookie");
1300 if (apr_table_get(r->headers_out, "Location") || apr_table_get(r->err_headers_out, "Location")) {
1301 if (! ap_is_HTTP_REDIRECT(r->status)) {
1302 r->status = HTTP_MOVED_TEMPORARILY;
1305 apr_table_setn(r->headers_out, "Content-Length", "0");
1306 DBG(r, "REQ[%X] call pass_data_to_filter()", (unsigned int)(apr_size_t)r);
1307 s_add_no_cache_headers(r, entryp);
1308 rv = pass_data_to_filter(f, (const char *)"", (apr_size_t)0);
1309 DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1314 apr_brigade_destroy(bb);
1316 DBG(f->r, "REQ[%X] end of chxj_output_filter()", (unsigned int)(apr_size_t)r);
1322 * Add Cookie_id if it has location header.
1325 s_add_cookie_id_if_has_location_header(request_rec *r, cookie_t *cookie)
1327 char *location_header = (char *)apr_table_get(r->headers_out, "Location");
1328 if (! location_header) {
1329 location_header = (char *)apr_table_get(r->err_headers_out, "Location");
1331 if (cookie && location_header) {
1332 DBG(r, "REQ[%X] Location Header=[%s]", (unsigned int)(apr_size_t)r, location_header);
1333 location_header = chxj_add_cookie_parameter(r,
1336 apr_table_unset(r->headers_out, "Location");
1337 apr_table_setn(r->headers_out, "Location", location_header);
1338 DBG(r, "REQ[%X] Location Header=[%s]", (unsigned int)(apr_size_t)r, location_header);
1339 if (!ap_is_HTTP_REDIRECT(r->status)) {
1340 r->status = HTTP_MOVED_TEMPORARILY;
1346 * It is the main loop of the input filter handler.
1350 chxj_input_handler(request_rec *r)
1352 mod_chxj_config *dconf;
1353 chxjconvrule_entry *entryp = NULL;
1354 device_table *spec = NULL;
1355 char *post_data = NULL;
1356 apr_size_t post_data_len = 0;
1361 int response_code = 0;
1363 DBG(r, "start of chxj_input_handler()");
1365 if (strcasecmp(r->handler, "chxj-input-handler")) {
1366 DBG(r, "end chxj_input_handler()");
1369 apr_pool_create(&pool, r->pool);
1371 dconf = chxj_get_module_config(r->per_dir_config, &chxj_module);
1372 user_agent = (char*)apr_table_get(r->headers_in, CHXJ_HTTP_USER_AGENT);
1374 user_agent = (char*)apr_table_get(r->headers_in, HTTP_USER_AGENT);
1376 spec = chxj_specified_device(r, user_agent);
1377 entryp = chxj_apply_convrule(r, dconf->convrules);
1379 post_data = apr_pstrdup(pool, "");
1380 if (ap_setup_client_block(r, REQUEST_CHUNKED_DECHUNK) == OK) {
1381 if (ap_should_client_block(r)) {
1382 while (post_data_len < CHXJ_POST_MAX) {
1385 int read_bytes = ap_get_client_block(r, buffer, BUFSZ-1);
1386 if (read_bytes<=0) {
1389 buffer[read_bytes] = '\0';
1390 post_data = apr_pstrcat(pool, post_data, buffer, NULL);
1391 post_data_len += read_bytes;
1400 if (post_data_len > 0) {
1401 post_data = chxj_input_convert(r, (const char**)&post_data, (apr_size_t*)&post_data_len, entryp, spec);
1402 DBG(r, "(in:exchange)POSTDATA:[%s]", post_data);
1406 if (dconf->forward_url_base) {
1407 url_path = apr_psprintf(pool, "%s%s", dconf->forward_url_base, r->uri);
1410 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);
1413 url_path = apr_pstrcat(pool, url_path, "?", r->args, NULL);
1415 DBG(r, "==> new url_path:[%s]", url_path);
1418 apr_table_setn(r->headers_in, CHXJ_HEADER_ORIG_CLIENT_IP, r->connection->remote_ip);
1419 apr_table_unset(r->headers_in, "Content-Length");
1420 apr_table_setn(r->headers_in, "Content-Length", apr_psprintf(pool, "%" APR_SIZE_T_FMT, post_data_len));
1421 response = chxj_serf_post(r, pool, url_path, post_data, post_data_len, 1, &res_len, &response_code);
1422 DBG(r, "REQ[%X] -------------------------------------------------------", (unsigned int)(apr_size_t)r);
1423 DBG(r, "REQ[%X] response length:[%" APR_SIZE_T_FMT "]", (unsigned int)(apr_size_t)r, res_len);
1424 for (ii=0; ii<res_len/64; ii++) {
1425 DBG(r, "REQ[%X] response:[%.*s]", (unsigned int)(apr_size_t)r, 64, &response[ii*64]);
1427 DBG(r, "REQ[%X] -------------------------------------------------------", (unsigned int)(apr_size_t)r);
1430 if ((chunked = (char *)apr_table_get(r->headers_out, "Transfer-Encoding")) != NULL) {
1431 if (strcasecmp(chunked, "chunked") == 0) {
1433 apr_table_unset(r->headers_out, "Transfer-Encoding");
1436 if (ap_is_HTTP_ERROR(response_code)) {
1437 DBG(r, "REQ[%X] end of chxj_input_handler() (HTTP-ERROR received. response code:[%d])", (unsigned int)(apr_size_t)r, response_code);
1438 return response_code;
1442 apr_pool_create(&wpool, r->pool);
1443 apr_bucket_brigade *bb;
1446 conn_rec *c = r->connection;
1448 bb = apr_brigade_create(wpool, c->bucket_alloc);
1449 e = apr_bucket_transient_create(response, res_len, c->bucket_alloc);
1450 APR_BRIGADE_INSERT_TAIL(bb, e);
1451 e = apr_bucket_eos_create(c->bucket_alloc);
1452 APR_BRIGADE_INSERT_TAIL(bb, e);
1453 if ((rv = ap_pass_brigade(r->output_filters, bb)) != APR_SUCCESS) {
1454 ERR(r, "REQ[%X] %s:%d failed ap_pass_brigade()", (unsigned int)(apr_size_t)r, APLOG_MARK);
1457 apr_brigade_cleanup(bb);
1460 DBG(r, "REQ[%X] end of chxj_input_handler()", (unsigned int)(apr_size_t)r);
1464 static mod_chxj_global_config *
1465 chxj_global_config_create(apr_pool_t *pool, server_rec *s)
1467 mod_chxj_global_config *conf;
1469 SDBG(s, "start chxj_global_config_create()");
1471 /*--------------------------------------------------------------------------*/
1472 /* allocate an own subpool which survives server restarts */
1473 /*--------------------------------------------------------------------------*/
1474 conf = (mod_chxj_global_config *)apr_palloc(pool,
1475 sizeof(mod_chxj_global_config));
1477 conf->cookie_db_lock = NULL;
1479 SDBG(s, "end chxj_global_config_create()");
1486 * initialize chxj module
1489 chxj_init_module(apr_pool_t *p,
1490 apr_pool_t *UNUSED(plog),
1491 apr_pool_t *UNUSED(ptemp),
1497 SDBG(s, "start chxj_init_module()");
1499 apr_pool_userdata_get(&user_data, CHXJ_MOD_CONFIG_KEY, s->process->pool);
1501 if (user_data == NULL) {
1504 * dummy user_data set.
1506 apr_pool_userdata_set(
1508 CHXJ_MOD_CONFIG_KEY,
1509 apr_pool_cleanup_null,
1511 SDBG(s, "end chxj_init_module()");
1515 ap_add_version_component(p, CHXJ_VERSION_PREFIX CHXJ_VERSION);
1517 if ((rv = apr_proc_mutex_create(&global_cookie_mutex, NULL, APR_LOCK_FCNTL, s->process->pool)) != APR_SUCCESS) {
1519 SERR(s, "%s:%d end chxj_init_module(). mutex create failure.(%d:%s)",APLOG_MARK, rv,apr_strerror(rv,errstr,255));
1520 return HTTP_INTERNAL_SERVER_ERROR;
1523 SDBG(s, "end chxj_init_module()");
1530 chxj_child_init(apr_pool_t *UNUSED(p), server_rec *s)
1533 SDBG(s, "start chxj_child_init()");
1534 if ((rv = apr_proc_mutex_child_init(&global_cookie_mutex, NULL, s->process->pool)) != APR_SUCCESS) {
1536 SERR(s, "%s:%d ERROR end chxj_init_module(). mutex create failure.(%d:%s)", APLOG_MARK, rv,apr_strerror(rv,errstr,255));
1538 SDBG(s, "end chxj_child_init()");
1543 * A set structure of each server is generated.
1549 chxj_config_server_create(apr_pool_t *p, server_rec *s)
1551 mod_chxj_global_config *gc;
1553 gc = chxj_global_config_create(p,s);
1560 chxj_translate_name(request_rec *r)
1562 DBG(r, "REQ[%X] =======================================================================", (unsigned int)(apr_size_t)r);
1563 DBG(r, "REQ[%X] ", (unsigned int)(apr_size_t)r);
1564 DBG(r, "REQ[%X] START REQUEST (uri:[%s] args:[%s])", (unsigned int)(apr_size_t)r, r->unparsed_uri, r->args ? r->args : "");
1565 DBG(r, "REQ[%X] METHOD [%s]", TO_ADDR(r), r->method);
1566 DBG(r, "REQ[%X] ", (unsigned int)(apr_size_t)r);
1567 DBG(r, "REQ[%X] =======================================================================", (unsigned int)(apr_size_t)r);
1569 return chxj_trans_name(r);
1577 chxj_insert_filter(request_rec *r)
1581 mod_chxj_config *dconf;
1582 chxjconvrule_entry *entryp;
1587 DBG(r, "REQ[%X] start chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1589 dconf = chxj_get_module_config(r->per_dir_config, &chxj_module);
1591 /* we get User-Agent from CHXJ_HTTP_USER_AGENT header if any */
1592 user_agent = (char *)apr_table_get(r->headers_in, CHXJ_HTTP_USER_AGENT);
1594 user_agent = (char*)apr_table_get(r->headers_in, HTTP_USER_AGENT);
1597 contentType = (char *)apr_table_get(r->headers_in, "Content-Type");
1599 && strncasecmp("multipart/form-data", contentType, 19) == 0) {
1600 DBG(r, "REQ[%X] detect multipart/form-data ==> no target", (apr_size_t)(unsigned int)r);
1601 DBG(r, "REQ[%X] end chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1605 spec = chxj_specified_device(r, user_agent);
1606 entryp = chxj_apply_convrule(r, dconf->convrules);
1608 DBG(r, "REQ[%X] end chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1611 ctx = apr_palloc(r->pool, sizeof(*ctx));
1612 memset(ctx, 0, sizeof(*ctx));
1613 if ((rv = apr_pool_create(&ctx->pool, r->pool)) != APR_SUCCESS) {
1614 ERR(r, "%s:%d: failed: new pool create. rv:[%d]", __FILE__,__LINE__,rv);
1615 DBG(r, "REQ:[%X] end chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1618 ctx->entryp = entryp;
1620 ctx->buffer = apr_palloc(ctx->pool, 1);
1623 if (!entryp || !(entryp->action & CONVRULE_ENGINE_ON_BIT)) {
1624 DBG(r,"REQ[%X] EngineOff", (unsigned int)(apr_size_t)r);
1625 DBG(r, "REQ[%X] end chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1629 switch(spec->html_spec_type) {
1630 case CHXJ_SPEC_Chtml_1_0:
1631 case CHXJ_SPEC_Chtml_2_0:
1632 case CHXJ_SPEC_Chtml_3_0:
1633 case CHXJ_SPEC_Chtml_4_0:
1634 case CHXJ_SPEC_Chtml_5_0:
1635 case CHXJ_SPEC_Chtml_6_0:
1636 case CHXJ_SPEC_Chtml_7_0:
1637 case CHXJ_SPEC_XHtml_Mobile_1_0:
1638 case CHXJ_SPEC_Hdml:
1639 case CHXJ_SPEC_Jhtml:
1640 case CHXJ_SPEC_Jxhtml:
1644 DBG(r, "REQ[%X] end chxj_insert_filter() Unknown spec type(%d).", (unsigned int)(apr_size_t)r, spec->html_spec_type);
1649 if (! apr_table_get(r->headers_in, "X-Chxj-Forward")) {
1650 ap_add_output_filter("chxj_output_filter", ctx, r, r->connection);
1651 DBG(r, "REQ[%X] added Output Filter", (unsigned int)(apr_size_t)r);
1654 DBG(r, "REQ[%X] end chxj_insert_filter()", (unsigned int)(apr_size_t)r);
1659 * The hook is registered.
1664 chxj_register_hooks(apr_pool_t *UNUSED(p))
1666 ap_hook_post_config(chxj_init_module,
1669 APR_HOOK_REALLY_FIRST);
1670 ap_hook_child_init(chxj_child_init,
1673 APR_HOOK_REALLY_FIRST);
1674 ap_register_output_filter (
1675 "chxj_output_filter",
1679 ap_hook_insert_filter(chxj_insert_filter, NULL, NULL, APR_HOOK_MIDDLE);
1680 ap_hook_handler(chxj_img_conv_format_handler, NULL, NULL, APR_HOOK_MIDDLE);
1681 ap_hook_handler(chxj_qr_code_handler, NULL, NULL, APR_HOOK_MIDDLE);
1682 ap_hook_handler(chxj_input_handler, NULL, NULL, APR_HOOK_MIDDLE);
1683 ap_hook_translate_name(chxj_translate_name, NULL, NULL, APR_HOOK_MIDDLE);
1684 ap_hook_fixups(chxj_headers_fixup, NULL, NULL, APR_HOOK_FIRST);
1689 * A set structure according to the directory is generated.
1695 chxj_create_per_dir_config(apr_pool_t *p, char *arg)
1697 mod_chxj_config *conf;
1699 conf = apr_pcalloc(p, sizeof(mod_chxj_config));
1700 conf->device_data_file = NULL;
1701 conf->devices = NULL;
1702 conf->emoji_data_file = NULL;
1704 conf->emoji_tail = NULL;
1705 conf->image = CHXJ_IMG_NONE;
1706 conf->image_cache_dir = apr_psprintf(p, "%s",DEFAULT_IMAGE_CACHE_DIR);
1707 conf->image_cache_limit = 0;
1708 conf->server_side_encoding = NULL;
1709 conf->cookie_db_dir = NULL;
1710 conf->cookie_timeout = 0;
1711 conf->cookie_store_type = COOKIE_STORE_TYPE_NONE;
1712 conf->cookie_lazy_mode = 0;
1713 #if defined(USE_MYSQL_COOKIE)
1714 memset((void *)&conf->mysql, 0, sizeof(mysql_t));
1715 conf->mysql.port = MYSQL_PORT;
1716 conf->mysql.host = NULL;
1718 #if defined(USE_MEMCACHE_COOKIE)
1719 memset((void *)&conf->memcache, 0, sizeof(memcache_t));
1720 conf->memcache.host = NULL;
1721 conf->memcache.port = 0;
1723 conf->forward_url_base = NULL;
1724 conf->forward_server_ip = NULL;
1725 conf->allowed_cookie_domain = NULL;
1726 conf->post_log = NULL;
1732 conf->dir = apr_pcalloc(p, strlen(arg)+1);
1733 memset(conf->dir, 0, strlen(arg)+1);
1734 strcpy(conf->dir, arg);
1736 conf->convrules = apr_array_make(p, 2, sizeof(chxjconvrule_entry));
1738 /* Default is copyleft */
1739 conf->image_copyright = NULL;
1746 * Merge per-directory CHXJ configurations
1749 chxj_merge_per_dir_config(apr_pool_t *p, void *basev, void *addv)
1751 mod_chxj_config *base;
1752 mod_chxj_config *add;
1753 mod_chxj_config *mrg;
1755 base = (mod_chxj_config *)basev;
1756 add = (mod_chxj_config *)addv;
1757 mrg = (mod_chxj_config *)apr_palloc(p, sizeof(mod_chxj_config));
1759 mrg->device_data_file = NULL;
1760 mrg->devices = NULL;
1761 mrg->emoji_data_file = NULL;
1762 mrg->image = CHXJ_IMG_NONE;
1763 mrg->image_cache_dir = NULL;
1764 mrg->image_copyright = NULL;
1765 mrg->image_cache_limit = 0;
1767 mrg->emoji_tail = NULL;
1768 mrg->new_line_type = NLTYPE_NIL;
1769 mrg->forward_url_base = NULL;
1770 mrg->forward_server_ip = NULL;
1771 mrg->allowed_cookie_domain = NULL;
1772 mrg->post_log = NULL;
1774 mrg->dir = apr_pstrdup(p, add->dir);
1776 if (! add->device_data_file) {
1777 mrg->devices = base->devices;
1778 mrg->device_data_file = apr_pstrdup(p, base->device_data_file);
1781 mrg->devices = add->devices;
1782 mrg->device_data_file = apr_pstrdup(p, add->device_data_file);
1785 if (! add->emoji_data_file) {
1786 mrg->emoji = base->emoji;
1787 mrg->emoji_tail = base->emoji_tail;
1788 mrg->emoji_data_file = apr_pstrdup(p, base->emoji_data_file);
1791 mrg->emoji = add->emoji;
1792 mrg->emoji_tail = add->emoji_tail;
1793 mrg->emoji_data_file = apr_pstrdup(p, add->emoji_data_file);
1796 if (add->image == CHXJ_IMG_NONE) {
1797 mrg->image = base->image;
1800 mrg->image = add->image;
1803 if (strcasecmp(add->image_cache_dir ,DEFAULT_IMAGE_CACHE_DIR)==0) {
1804 mrg->image_cache_dir = apr_pstrdup(p, base->image_cache_dir);
1807 mrg->image_cache_dir = apr_pstrdup(p, add->image_cache_dir);
1810 if (add->image_cache_limit) {
1811 mrg->image_cache_limit = add->image_cache_limit;
1814 mrg->image_cache_limit = base->image_cache_limit;
1817 if (add->image_copyright)
1818 mrg->image_copyright = apr_pstrdup(p, add->image_copyright);
1820 mrg->image_copyright = apr_pstrdup(p, base->image_copyright);
1822 if (add->server_side_encoding) {
1823 mrg->server_side_encoding = apr_pstrdup(p, add->server_side_encoding);
1826 if (base->server_side_encoding) {
1827 mrg->server_side_encoding = apr_pstrdup(p, base->server_side_encoding);
1830 mrg->server_side_encoding = apr_pstrdup(p, DEFAULT_SERVER_SIDE_ENCODING);
1833 mrg->convrules = apr_array_append(p, add->convrules, base->convrules);
1835 if (add->cookie_db_dir) {
1836 mrg->cookie_db_dir = apr_pstrdup(p, add->cookie_db_dir);
1839 if (base->cookie_db_dir) {
1840 mrg->cookie_db_dir = apr_pstrdup(p, base->cookie_db_dir);
1843 mrg->cookie_db_dir = NULL;
1846 if (add->cookie_timeout) {
1847 mrg->cookie_timeout = add->cookie_timeout;
1850 if (base->cookie_db_dir) {
1851 mrg->cookie_timeout = base->cookie_timeout;
1854 mrg->cookie_timeout = 0;
1857 #if defined(USE_MYSQL_COOKIE)
1858 if (add->mysql.host) {
1859 mrg->mysql.host = apr_pstrdup(p, add->mysql.host);
1861 else if (base->mysql.host) {
1862 mrg->mysql.host = apr_pstrdup(p, base->mysql.host);
1865 mrg->mysql.host = NULL;
1867 if (add->mysql.port) {
1868 mrg->mysql.port = add->mysql.port;
1870 else if (base->mysql.port) {
1871 mrg->mysql.port = base->mysql.port;
1874 mrg->mysql.port = 0;
1877 if (add->mysql.database) {
1878 mrg->mysql.database = apr_pstrdup(p, add->mysql.database);
1880 else if (base->mysql.database) {
1881 mrg->mysql.database = apr_pstrdup(p, base->mysql.database);
1884 mrg->mysql.database = NULL;
1887 if (add->mysql.username) {
1888 mrg->mysql.username = apr_pstrdup(p, add->mysql.username);
1890 else if (base->mysql.username) {
1891 mrg->mysql.username = apr_pstrdup(p, base->mysql.username);
1894 mrg->mysql.username = NULL;
1897 if (add->mysql.password) {
1898 mrg->mysql.password = apr_pstrdup(p, add->mysql.password);
1900 else if (base->mysql.password) {
1901 mrg->mysql.password = apr_pstrdup(p, base->mysql.password);
1904 mrg->mysql.password = NULL;
1907 if (add->mysql.tablename) {
1908 mrg->mysql.tablename = apr_pstrdup(p, add->mysql.tablename);
1910 else if (base->mysql.tablename) {
1911 mrg->mysql.tablename = apr_pstrdup(p, base->mysql.tablename);
1914 mrg->mysql.tablename = NULL;
1917 if (add->mysql.socket_path) {
1918 mrg->mysql.socket_path = apr_pstrdup(p, add->mysql.socket_path);
1920 else if (base->mysql.socket_path) {
1921 mrg->mysql.socket_path = apr_pstrdup(p, base->mysql.socket_path);
1924 mrg->mysql.socket_path = NULL;
1927 if (add->mysql.charset) {
1928 mrg->mysql.charset = apr_pstrdup(p, add->mysql.charset);
1930 else if (base->mysql.charset) {
1931 mrg->mysql.charset = apr_pstrdup(p, base->mysql.charset);
1934 mrg->mysql.charset = NULL;
1937 #if defined(USE_MEMCACHE_COOKIE)
1938 if (add->memcache.host) {
1939 mrg->memcache.host = apr_pstrdup(p, add->memcache.host);
1941 else if (base->memcache.host) {
1942 mrg->memcache.host = apr_pstrdup(p, base->memcache.host);
1945 mrg->memcache.host = NULL;
1947 if (add->memcache.port) {
1948 mrg->memcache.port = add->memcache.port;
1950 else if (base->memcache.port) {
1951 mrg->memcache.port = base->memcache.port;
1954 mrg->memcache.port = 0;
1957 if (add->cookie_store_type) {
1958 mrg->cookie_store_type = add->cookie_store_type;
1960 else if (base->cookie_store_type) {
1961 mrg->cookie_store_type = base->cookie_store_type;
1964 mrg->cookie_store_type = COOKIE_STORE_TYPE_NONE;
1966 if (add->cookie_lazy_mode) {
1967 mrg->cookie_lazy_mode = add->cookie_lazy_mode;
1969 else if (base->cookie_lazy_mode) {
1970 mrg->cookie_lazy_mode = base->cookie_lazy_mode;
1973 mrg->cookie_lazy_mode = 0;
1975 if (add->new_line_type) {
1976 mrg->new_line_type = add->new_line_type;
1978 else if (base->new_line_type) {
1979 mrg->new_line_type = base->new_line_type;
1982 mrg->new_line_type = NLTYPE_NIL;
1985 if (add->forward_url_base) {
1986 mrg->forward_url_base = add->forward_url_base;
1988 else if (base->forward_url_base) {
1989 mrg->forward_url_base = base->forward_url_base;
1992 if (add->allowed_cookie_domain) {
1993 mrg->allowed_cookie_domain = add->allowed_cookie_domain;
1996 mrg->allowed_cookie_domain = base->allowed_cookie_domain;
1998 if (add->post_log) {
1999 mrg->post_log = add->post_log;
2002 mrg->post_log = base->post_log;
2009 chxj_command_parse_take5(
2022 for (;*strp == ' '||*strp == '\t'; strp++) ;
2032 for (; *strp != '\0'; strp++) {
2033 if ((isquoted && (*strp == ' ' || *strp == '\t'))
2034 || (*strp == '\\' && (*(strp+1) == ' ' || *(strp+1) == '\t'))) {
2039 if ((!isquoted && (*strp == ' ' || *strp == '\t'))
2040 || (isquoted && *strp == '"'))
2054 for (;*strp == ' '||*strp == '\t'; strp++) ;
2063 for (; *strp != '\0'; strp++) {
2064 if ((isquoted && (*strp == ' ' || *strp == '\t'))
2065 || (*strp == '\\' && (*(strp+1) == ' ' || *(strp+1) == '\t'))) {
2070 if ((!isquoted && (*strp == ' ' || *strp == '\t'))
2071 || (isquoted && *strp == '"'))
2084 for (;*strp == ' '||*strp == '\t'; strp++);
2092 for (; *strp != '\0'; strp++) {
2093 if ((isquoted && (*strp == ' ' || *strp == '\t'))
2094 || (*strp == '\\' && (*(strp+1) == ' ' || *(strp+1) == '\t'))) {
2099 if ((!isquoted && (*strp == ' ' || *strp == '\t'))
2100 || (isquoted && *strp == '"'))
2112 for (;*strp == ' '||*strp == '\t'; strp++);
2120 for (; *strp != '\0'; strp++) {
2121 if ((isquoted && (*strp == ' ' || *strp == '\t'))
2122 || (*strp == '\\' && (*(strp+1) == ' ' || *(strp+1) == '\t'))) {
2127 if ((!isquoted && (*strp == ' ' || *strp == '\t'))
2128 || (isquoted && *strp == '"'))
2139 for (;*strp == ' '||*strp == '\t'; strp++);
2147 for (; *strp != '\0'; strp++) {
2148 if ((isquoted && (*strp == ' ' || *strp == '\t'))
2149 || (*strp == '\\' && (*(strp+1) == ' ' || *(strp+1) == '\t'))) {
2154 if ((!isquoted && (*strp == ' ' || *strp == '\t'))
2155 || (isquoted && *strp == '"'))
2165 * The device definition file is loaded.
2167 * @param arg [i] The name of the device definition file is specified.
2168 * @param mconfig [i/o] The pointer to a set structure is specified.
2172 cmd_load_device_data(cmd_parms *parms, void *mconfig, const char *arg)
2174 mod_chxj_config *conf;
2179 if (strlen(arg) > 256)
2180 return "mod_chxj: device data filename too long.";
2182 conf = (mod_chxj_config *)mconfig;
2183 conf->device_data_file = apr_pstrdup(parms->pool, arg);
2185 qs_init_malloc(&doc);
2186 qs_init_root_node(&doc);
2188 qs_parse_file((Doc *)&doc, (const char *)arg);
2189 chxj_load_device_data(&doc,parms->pool, conf);
2190 qs_all_free(&doc, QX_LOGMARK);
2197 * Device definition information is loaded.
2200 * @param arg [i] The name of the device definition file is specified.
2201 * @param mconfig [i/o] The pointer to a set structure is specified.
2205 cmd_load_emoji_data(cmd_parms *parms, void *mconfig, const char *arg)
2207 mod_chxj_config *conf;
2214 if (strlen(arg) > 256)
2215 return "mod_chxj: emoji data filename too long.";
2217 conf = (mod_chxj_config *)mconfig;
2218 conf->emoji_data_file = apr_pstrdup(parms->pool, arg);
2219 qs_init_malloc(&doc);
2220 qs_init_root_node(&doc);
2222 qs_parse_file((Doc *)&doc, (const char *)arg);
2224 rtn = chxj_load_emoji_data(&doc,parms->pool, conf);
2226 qs_all_free(&doc, QX_LOGMARK);
2234 cmd_set_image_engine(cmd_parms * UNUSED(parms), void *mconfig, const char *arg)
2236 mod_chxj_config *conf;
2241 if (strlen(arg) > 256)
2242 return "image uri is too long.";
2244 conf = (mod_chxj_config*)mconfig;
2245 if (strcasecmp("ON", arg) == 0) {
2246 conf->image = CHXJ_IMG_ON;
2249 conf->image = CHXJ_IMG_OFF;
2257 cmd_set_image_cache_dir(cmd_parms *parms, void *mconfig, const char *arg)
2259 mod_chxj_config *conf;
2264 if (strlen(arg) > 256)
2265 return "cache dir name is too long.";
2267 conf = (mod_chxj_config *)mconfig;
2268 conf->image_cache_dir = apr_pstrdup(parms->pool, arg);
2275 cmd_set_image_cache_limit(cmd_parms *parms, void *mconfig, const char *arg)
2277 mod_chxj_config *conf;
2282 if (strlen(arg) > IMAGE_CACHE_LIMIT_FMT_LEN)
2283 return "cache size is too long.";
2285 conf = (mod_chxj_config *)mconfig;
2288 * I use strtol function because strtoul is not portable function.
2290 conf->image_cache_limit = (unsigned long)strtol(arg, NULL, 10);
2293 return apr_psprintf(parms->pool, "ChxjImageCacheLimit invalid value [%s] errno:[%d]", arg, errno);
2295 return apr_psprintf(parms->pool, "ChxjImageCacheLimit Out of range [%s] errno:[%d]", arg, errno);
2304 cmd_set_image_copyright(cmd_parms *parms, void *mconfig, const char *arg)
2306 mod_chxj_config *conf;
2311 if (strlen(arg) > 256)
2312 return "Copyright Flag is too long.";
2314 conf = (mod_chxj_config *)mconfig;
2315 conf->image_copyright = apr_pstrdup(parms->pool, arg);
2322 cmd_convert_rule(cmd_parms *cmd, void *mconfig, const char *arg)
2326 mod_chxj_config *dconf;
2327 chxjconvrule_entry *newrule;
2337 dconf = (mod_chxj_config *)mconfig;
2339 if (strlen(arg) > 4096)
2340 return "mod_chxj: ChxjConvertRule: is too long.";
2342 dconf = (mod_chxj_config *)mconfig;
2343 if (dconf->convrules == NULL)
2344 dconf->convrules = apr_array_make(cmd->pool,
2346 sizeof(chxjconvrule_entry));
2348 newrule = apr_array_push(dconf->convrules);
2351 newrule->action = 0;
2353 if (chxj_command_parse_take5(arg, &prm1, &prm2, &prm3, &prm4, &prm5))
2354 return "ChxjConvertRule: bad argument line";
2356 newrule->pattern = apr_pstrdup(cmd->pool, prm1);
2360 if ((action = apr_strtok(prm2, ",", &pstate)) == NULL)
2366 if (strcasecmp(CONVRULE_ENGINE_ON_CMD, action) == 0) {
2367 newrule->action |= CONVRULE_ENGINE_ON_BIT;
2370 if (strcasecmp(CONVRULE_ENGINE_OFF_CMD, action) == 0) {
2371 newrule->action |= CONVRULE_ENGINE_OFF_BIT;
2374 if (strcasecmp(CONVRULE_EMOJI_ONLY_CMD, action) == 0) {
2375 newrule->action |= CONVRULE_EMOJI_ONLY_BIT;
2378 if (strcasecmp(CONVRULE_ENVINFO_ONLY_CMD, action) == 0) {
2379 newrule->action |= CONVRULE_ENVINFO_ONLY_BIT;
2385 if (strcasecmp(CONVRULE_COOKIE_ON_CMD, action) == 0) {
2386 newrule->action |= CONVRULE_COOKIE_ON_BIT;
2392 if (strcasecmp(CONVRULE_JRCONV_OFF_CMD, action) == 0) {
2393 newrule->action |= CONVRULE_JRCONV_OFF_BIT;
2399 if (strcasecmp(CONVRULE_NOCACHE_ON_CMD, action) == 0) {
2400 newrule->action |= CONVRULE_NOCACHE_ON_BIT;
2406 if (strcasecmp(CONVRULE_QSCONV_OFF_CMD, action) == 0) {
2407 newrule->action |= CONVRULE_QSCONV_OFF_BIT;
2413 if (strcasecmp(CONVRULE_Z2H_ON_CMD, action) == 0) {
2414 newrule->action |= CONVRULE_Z2H_ON_BIT;
2417 if (strcasecmp(CONVRULE_Z2H_OFF_CMD, action) == 0) {
2418 newrule->action |= CONVRULE_Z2H_OFF_BIT;
2421 if (strcasecmp(CONVRULE_Z2H_ALPHA_ON_CMD, action) == 0) {
2422 newrule->action |= CONVRULE_Z2H_ALPHA_ON_BIT;
2425 if (strcasecmp(CONVRULE_Z2H_ALPHA_OFF_CMD, action) == 0) {
2426 newrule->action |= CONVRULE_Z2H_ALPHA_OFF_BIT;
2429 if (strcasecmp(CONVRULE_Z2H_NUM_ON_CMD, action) == 0) {
2430 newrule->action |= CONVRULE_Z2H_NUM_ON_BIT;
2433 if (strcasecmp(CONVRULE_Z2H_NUM_OFF_CMD, action) == 0) {
2434 newrule->action |= CONVRULE_Z2H_NUM_OFF_BIT;
2437 if (strcasecmp(CONVRULE_Z2H_ALL_ON_CMD, action) == 0) {
2438 newrule->action |= CONVRULE_Z2H_ON_BIT | CONVRULE_Z2H_ALPHA_ON_BIT | CONVRULE_Z2H_NUM_ON_BIT;
2441 if (strcasecmp(CONVRULE_Z2H_NUM_OFF_CMD, action) == 0) {
2442 newrule->action |= CONVRULE_Z2H_OFF_BIT | CONVRULE_Z2H_ALPHA_OFF_BIT | CONVRULE_Z2H_NUM_OFF_BIT;
2453 newrule->flags |= CONVRULE_FLAG_NOTMATCH;
2457 mode = AP_REG_EXTENDED;
2458 if ((regexp = ap_pregcomp((apr_pool_t *)cmd->pool, (const char *)pp, mode)) == NULL)
2459 return "RewriteRule: cannot compile regular expression ";
2461 newrule->regexp = regexp;
2463 newrule->encoding = apr_pstrdup(cmd->pool, prm3);
2465 newrule->encoding = apr_pstrdup(cmd->pool, "none");
2467 newrule->pc_flag = CONVRULE_PC_FLAG_OFF_BIT;
2469 if (strcasecmp(CONVRULE_PC_FLAG_ON_CMD, prm4) == 0)
2470 newrule->pc_flag = CONVRULE_PC_FLAG_ON_BIT;
2472 newrule->user_agent = NULL;
2474 newrule->user_agent = apr_pstrdup(cmd->pool, prm5);
2486 mod_chxj_config *dconf;
2489 if (strlen(arg) > 4096)
2490 return "mod_chxj: ChxjCookieDir is too long.";
2492 dconf = (mod_chxj_config *)mconfig;
2494 dconf->cookie_db_dir = apr_pstrdup(cmd->pool, arg);
2501 cmd_set_cookie_timeout(
2502 cmd_parms *UNUSED(cmd),
2506 mod_chxj_config *dconf;
2508 if (strlen(arg) > 4096)
2509 return "mod_chxj: ChxjCookieTimeout is too long.";
2511 if (chxj_chk_numeric(arg) != 0)
2512 return "mod_chxj: ChxjCookieTimeout is not numeric.";
2514 dconf = (mod_chxj_config *)mconfig;
2516 dconf->cookie_timeout = atoi(arg);
2522 #if defined(USE_MYSQL_COOKIE)
2524 cmd_set_cookie_mysql_database(
2529 mod_chxj_config *dconf;
2531 if (strlen(arg) > 255)
2532 return "mod_chxj: ChxjCookieMysqlDatabase is too long.";
2534 dconf = (mod_chxj_config *)mconfig;
2536 dconf->mysql.database = apr_pstrdup(cmd->pool, arg);
2543 cmd_set_cookie_mysql_username(
2548 mod_chxj_config *dconf;
2550 if (strlen(arg) > 255)
2551 return "mod_chxj: ChxjCookieMysqlUsername is too long.";
2553 dconf = (mod_chxj_config *)mconfig;
2555 dconf->mysql.username = apr_pstrdup(cmd->pool, arg);
2562 cmd_set_cookie_mysql_password(
2567 mod_chxj_config *dconf;
2569 if (strlen(arg) > 255)
2570 return "mod_chxj: ChxjCookieMysqlPassword is too long.";
2572 dconf = (mod_chxj_config *)mconfig;
2574 dconf->mysql.password = apr_pstrdup(cmd->pool, arg);
2581 cmd_set_cookie_mysql_table_name(
2586 mod_chxj_config *dconf;
2588 if (strlen(arg) > 255)
2589 return "mod_chxj: ChxjCookieMysqlTableName is too long.";
2591 dconf = (mod_chxj_config *)mconfig;
2593 dconf->mysql.tablename = apr_pstrdup(cmd->pool, arg);
2599 cmd_set_cookie_mysql_port(
2600 cmd_parms *UNUSED(cmd),
2604 mod_chxj_config *dconf;
2606 if (strlen(arg) > 255)
2607 return "mod_chxj: ChxjCookieMysqlPort is too long.";
2609 dconf = (mod_chxj_config *)mconfig;
2611 if (chxj_chk_numeric(arg) != 0)
2612 return "mod_chxj: ChxjCookieMysqlPort is not numeric.";
2614 dconf = (mod_chxj_config *)mconfig;
2616 dconf->mysql.port = chxj_atoi(arg);
2623 cmd_set_cookie_mysql_host(
2628 mod_chxj_config *dconf;
2630 if (strlen(arg) > 255)
2631 return "mod_chxj: ChxjCookieMysqlHost is too long.";
2633 dconf = (mod_chxj_config *)mconfig;
2635 dconf->mysql.host = apr_pstrdup(cmd->pool, arg);
2642 cmd_set_cookie_mysql_socket_path(
2647 mod_chxj_config *dconf;
2649 if (strlen(arg) > 4096)
2650 return "mod_chxj: ChxjCookieMysqlSocketPath is too long.";
2652 dconf = (mod_chxj_config *)mconfig;
2654 dconf->mysql.socket_path = apr_pstrdup(cmd->pool, arg);
2661 cmd_set_cookie_mysql_charset(
2666 mod_chxj_config *dconf;
2668 if (strlen(arg) > 255)
2669 return "mod_chxj: ChxjCookieMysqlCharset is too long.";
2671 dconf = (mod_chxj_config *)mconfig;
2673 dconf->mysql.charset = apr_pstrdup(cmd->pool, arg);
2678 #if defined(USE_MEMCACHE_COOKIE)
2680 cmd_set_cookie_memcache_port(
2681 cmd_parms *UNUSED(cmd),
2685 mod_chxj_config *dconf;
2687 if (strlen(arg) > 255)
2688 return "mod_chxj: ChxjCookieMemcachePort is too long.";
2690 dconf = (mod_chxj_config *)mconfig;
2692 if (chxj_chk_numeric(arg) != 0)
2693 return "mod_chxj: ChxjCookieMemcachePort is not numeric.";
2695 dconf = (mod_chxj_config *)mconfig;
2697 dconf->memcache.port = (apr_port_t)chxj_atoi(arg);
2704 cmd_set_cookie_memcache_host(
2709 mod_chxj_config *dconf;
2711 if (strlen(arg) > 255)
2712 return "mod_chxj: ChxjCookieMemcacheHost is too long.";
2714 dconf = (mod_chxj_config *)mconfig;
2716 dconf->memcache.host = apr_pstrdup(cmd->pool, arg);
2723 cmd_set_cookie_lazy_mode(
2724 cmd_parms *UNUSED(cmd),
2728 mod_chxj_config *dconf;
2730 if (strlen(arg) > 255)
2731 return "mod_chxj: ChxjCookieLazyMode is too long.";
2733 dconf = (mod_chxj_config *)mconfig;
2735 if (strcasecmp("TRUE",arg) == 0) {
2736 dconf->cookie_lazy_mode = COOKIE_LAZY_ON;
2739 dconf->cookie_lazy_mode = COOKIE_LAZY_OFF;
2746 cmd_set_cookie_store_type(
2747 cmd_parms *UNUSED(cmd),
2751 mod_chxj_config *dconf;
2753 if (strlen(arg) > 255)
2754 return "mod_chxj: ChxjCookieStoreType is too long.";
2756 dconf = (mod_chxj_config *)mconfig;
2758 if (strcasecmp(CHXJ_COOKIE_STORE_TYPE_DBM, arg) == 0) {
2759 dconf->cookie_store_type = COOKIE_STORE_TYPE_DBM;
2761 else if (strcasecmp(CHXJ_COOKIE_STORE_TYPE_MYSQL, arg) == 0) {
2762 dconf->cookie_store_type = COOKIE_STORE_TYPE_MYSQL;
2764 else if (strcasecmp(CHXJ_COOKIE_STORE_TYPE_MEMCACHE, arg) == 0) {
2765 dconf->cookie_store_type = COOKIE_STORE_TYPE_MEMCACHE;
2768 dconf->cookie_store_type = COOKIE_STORE_TYPE_NONE;
2775 cmd_set_forward_url_base(
2780 mod_chxj_config *dconf;
2782 if (strlen(arg) > 255)
2783 return "mod_chxj: ChxjForwardUrlBase is too long.";
2785 dconf = (mod_chxj_config *)mconfig;
2787 dconf->forward_url_base = apr_pstrdup(cmd->pool, arg);
2793 cmd_set_forward_server_ip(
2798 mod_chxj_config *dconf;
2800 if (strlen(arg) > 255)
2801 return "mod_chxj: ChxjForwardServerIp is too long.";
2803 dconf = (mod_chxj_config *)mconfig;
2805 dconf->forward_server_ip = apr_pstrdup(cmd->pool, arg);
2811 cmd_allowed_cookie_domain(
2816 mod_chxj_config *dconf;
2818 if (strlen(arg) > 255)
2819 return "mod_chxj: ChxjAllowedCookieDomain is too long.";
2821 dconf = (mod_chxj_config *)mconfig;
2823 dconf->allowed_cookie_domain = apr_pstrdup(cmd->pool, arg);
2829 cmd_set_new_line_type(
2830 cmd_parms *UNUSED(cmd),
2834 mod_chxj_config *dconf;
2835 if (strlen(arg) > 255)
2836 return "mod_chxj: ChxjNewLineType is too long.";
2838 dconf = (mod_chxj_config *)mconfig;
2840 if (strcasecmp(CHXJ_NEW_LINE_TYPE_CRLF, arg) == 0) {
2841 dconf->new_line_type = NLTYPE_CRLF;
2843 else if (strcasecmp(CHXJ_NEW_LINE_TYPE_LF, arg) == 0) {
2844 dconf->new_line_type = NLTYPE_LF;
2846 else if (strcasecmp(CHXJ_NEW_LINE_TYPE_CR, arg) == 0) {
2847 dconf->new_line_type = NLTYPE_CR;
2849 else if (strcasecmp(CHXJ_NEW_LINE_TYPE_NONE, arg) == 0) {
2850 dconf->new_line_type = NLTYPE_NONE;
2853 return "mod_chxj: invalid value (ChxjNewLineType)";
2864 mod_chxj_config *dconf;
2865 if (strlen(arg) > 255)
2866 return "mod_chxj: ChxjPostLogEnv is too long.";
2868 dconf = (mod_chxj_config *)mconfig;
2870 dconf->post_log = apr_pstrdup(cmd->pool, arg);
2876 static const command_rec cmds[] = {
2878 "ChxjLoadDeviceData",
2879 cmd_load_device_data,
2882 "Load Device Data"),
2884 "ChxjLoadEmojiData",
2885 cmd_load_emoji_data,
2891 cmd_set_image_engine,
2894 "Convert Target URI"),
2896 "ChxjImageCacheDir",
2897 cmd_set_image_cache_dir,
2900 "Image Cache Directory"),
2902 "ChxjImageCacheLimit",
2903 cmd_set_image_cache_limit,
2906 "Image Cache Limit"),
2908 "ChxjImageCopyright",
2909 cmd_set_image_copyright,
2918 "an URL-applied regexp-pattern and a substitution URL"),
2924 "save cookie.db directory."),
2926 "ChxjCookieTimeout",
2927 cmd_set_cookie_timeout,
2930 "The compulsion time-out time of the cookie is specified. "),
2932 "ChxjCookieStoreType",
2933 cmd_set_cookie_store_type,
2936 "It specifies preserving of the cookie ahead. (DBM/MYSQL/MEMCACHE)"),
2938 "ChxjCookieLazyMode",
2939 cmd_set_cookie_lazy_mode,
2942 "OneTimeID is negligently done. (TRUE/FALSE)"),
2943 #if defined(USE_MYSQL_COOKIE)
2945 "ChxjCookieMysqlHost",
2946 cmd_set_cookie_mysql_host,
2949 "The MySQL database host used by saving Cookie"),
2951 "ChxjCookieMysqlPort",
2952 cmd_set_cookie_mysql_port,
2955 "The MySQL database port used by saving Cookie"),
2957 "ChxjCookieMysqlDatabase",
2958 cmd_set_cookie_mysql_database,
2961 "The MySQL database name used by saving Cookie"),
2963 "ChxjCookieMysqlUsername",
2964 cmd_set_cookie_mysql_username,
2967 "The MySQL username used by saving Cookie"),
2969 "ChxjCookieMysqlPassword",
2970 cmd_set_cookie_mysql_password,
2973 "The MySQL password used by saving Cookie"),
2975 "ChxjCookieMysqlTableName",
2976 cmd_set_cookie_mysql_table_name,
2979 "The MySQL table name used by saving Cookie"),
2981 "ChxjCookieMysqlSocketPath",
2982 cmd_set_cookie_mysql_socket_path,
2985 "The MySQL socket path used by saving Cookie"),
2987 "ChxjCookieMysqlCharset",
2988 cmd_set_cookie_mysql_charset,
2991 "The MySQL charset used by saving Cookie"),
2993 #if defined(USE_MEMCACHE_COOKIE)
2995 "ChxjCookieMemcacheHost",
2996 cmd_set_cookie_memcache_host,
2999 "The Memcached host used by saving Cookie"),
3001 "ChxjCookieMemcachePort",
3002 cmd_set_cookie_memcache_port,
3005 "The Memcached port used by saving Cookie"),
3009 cmd_set_new_line_type,
3012 "HTML new line type (NONE|CRLF|LF|CR). default is CRLF"),
3014 "ChxjForwardUrlBase",
3015 cmd_set_forward_url_base,
3018 "The forward url base(default: {request protocol}://{this server}:{this server port}"),
3020 "ChxjForwardServerIp",
3021 cmd_set_forward_server_ip,
3024 "The forward server ip(default: this server ip)"),
3026 "ChxjAllowedCookieDomain",
3027 cmd_allowed_cookie_domain,
3030 "Domain that permits parameter addition for cookie besides hostname.(Default:hostname Only)"),
3036 "for CustomLog directive. mod_chxj's internal POST log environment name.(Default:chxj-post-log)"),
3041 /*----------------------------------------------------------------------------*/
3042 /* Dispatch list for API hooks */
3043 /*----------------------------------------------------------------------------*/
3044 module AP_MODULE_DECLARE_DATA chxj_module = {
3045 STANDARD20_MODULE_STUFF,
3046 chxj_create_per_dir_config, /* create per-dir config structures */
3047 chxj_merge_per_dir_config, /* merge per-dir config structures */
3048 chxj_config_server_create, /* create per-server config structures */
3049 NULL, /* merge per-server config structures */
3050 cmds, /* table of config file commands */
3051 chxj_register_hooks /* register hooks */