1 /* Licensed to the Apache Software Foundation (ASF) under one or more
2 * contributor license agreements. See the NOTICE file distributed with
3 * this work for additional information regarding copyright ownership.
4 * The ASF licenses this file to You under the Apache License, Version 2.0
5 * (the "License"); you may not use this file except in compliance with
6 * the License. You may obtain a copy of the License at
8 * http://www.apache.org/licenses/LICENSE-2.0
10 * Unless required by applicable law or agreed to in writing, software
11 * distributed under the License is distributed on an "AS IS" BASIS,
12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 * See the License for the specific language governing permissions and
14 * limitations under the License.
17 #include "ajp_header.h"
20 APLOG_USE_MODULE(proxy_ajp);
22 static const char *response_trans_headers[] = {
36 static const char *long_res_header_for_sc(int sc)
38 const char *rc = NULL;
40 if(sc <= SC_RES_HEADERS_NUM && sc > 0) {
41 rc = response_trans_headers[sc - 1];
47 #define UNKNOWN_METHOD (-1)
49 static int sc_for_req_header(const char *header_name)
52 apr_size_t len = strlen(header_name);
53 const char *p = header_name;
56 /* ACCEPT-LANGUAGE is the longest header
57 * that is of interest.
59 if (len < 4 || len > 15)
60 return UNKNOWN_METHOD;
63 header[i++] = apr_toupper(*p++);
69 if (memcmp(p, "CCEPT", 5) == 0) {
72 else if (header[6] == '-') {
74 if (strcmp(p, "CHARSET") == 0)
75 return SC_ACCEPT_CHARSET;
76 else if (strcmp(p, "ENCODING") == 0)
77 return SC_ACCEPT_ENCODING;
78 else if (strcmp(p, "LANGUAGE") == 0)
79 return SC_ACCEPT_LANGUAGE;
81 return UNKNOWN_METHOD;
84 return UNKNOWN_METHOD;
86 else if (strcmp(p, "UTHORIZATION") == 0)
87 return SC_AUTHORIZATION;
89 return UNKNOWN_METHOD;
92 if(strcmp(p, "OOKIE2") == 0)
94 else if (strcmp(p, "OOKIE") == 0)
96 else if(strcmp(p, "ONNECTION") == 0)
98 else if(strcmp(p, "ONTENT-TYPE") == 0)
99 return SC_CONTENT_TYPE;
100 else if(strcmp(p, "ONTENT-LENGTH") == 0)
101 return SC_CONTENT_LENGTH;
103 return UNKNOWN_METHOD;
106 if(strcmp(p, "OST") == 0)
109 return UNKNOWN_METHOD;
112 if(strcmp(p, "RAGMA") == 0)
115 return UNKNOWN_METHOD;
118 if(strcmp(p, "EFERER") == 0)
121 return UNKNOWN_METHOD;
124 if(strcmp(p, "SER-AGENT") == 0)
125 return SC_USER_AGENT;
127 return UNKNOWN_METHOD;
130 return UNKNOWN_METHOD;
136 /* Apache method number to SC methods transform table */
137 static const unsigned char sc_for_req_method_table[] = {
153 SC_M_VERSION_CONTROL,
162 SC_M_BASELINE_CONTROL,
167 static int sc_for_req_method_by_id(request_rec *r)
169 int method_id = r->method_number;
170 if (method_id < 0 || method_id > M_INVALID) {
171 return UNKNOWN_METHOD;
173 else if (r->header_only) {
177 return sc_for_req_method_table[method_id] ?
178 sc_for_req_method_table[method_id] : UNKNOWN_METHOD;
186 AJPV13_REQUEST/AJPV14_REQUEST=
187 request_prefix (1) (byte)
197 num_headers*(req_header_name header_value)
199 ?context (byte)(string)
200 ?servlet_path (byte)(string)
201 ?remote_user (byte)(string)
202 ?auth_type (byte)(string)
203 ?query_string (byte)(string)
204 ?jvm_route (byte)(string)
205 ?ssl_cert (byte)(string)
206 ?ssl_cipher (byte)(string)
207 ?ssl_session (byte)(string)
208 ?ssl_key_size (byte)(int) via JkOptions +ForwardKeySize
209 request_terminator (byte)
210 ?body content_length*(var binary)
214 static apr_status_t ajp_marshal_into_msgb(ajp_msg_t *msg,
219 apr_uint32_t i, num_headers = 0;
222 const char *session_route, *envvar;
223 const apr_array_header_t *arr = apr_table_elts(r->subprocess_env);
224 const apr_table_entry_t *elts = (const apr_table_entry_t *)arr->elts;
226 ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, r->server,
227 "Into ajp_marshal_into_msgb");
229 if ((method = sc_for_req_method_by_id(r)) == UNKNOWN_METHOD) {
230 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
231 "ajp_marshal_into_msgb - No such method %s",
233 return AJP_EBAD_METHOD;
236 is_ssl = (apr_byte_t) ap_proxy_conn_is_https(r->connection);
238 if (r->headers_in && apr_table_elts(r->headers_in)) {
239 const apr_array_header_t *t = apr_table_elts(r->headers_in);
240 num_headers = t->nelts;
243 remote_host = (char *)ap_get_remote_host(r->connection, r->per_dir_config, REMOTE_HOST, NULL);
247 if (ajp_msg_append_uint8(msg, CMD_AJP13_FORWARD_REQUEST) ||
248 ajp_msg_append_uint8(msg, (apr_byte_t) method) ||
249 ajp_msg_append_string(msg, r->protocol) ||
250 ajp_msg_append_string(msg, uri->path) ||
251 ajp_msg_append_string(msg, r->connection->remote_ip) ||
252 ajp_msg_append_string(msg, remote_host) ||
253 ajp_msg_append_string(msg, ap_get_server_name(r)) ||
254 ajp_msg_append_uint16(msg, (apr_uint16_t)r->connection->local_addr->port) ||
255 ajp_msg_append_uint8(msg, is_ssl) ||
256 ajp_msg_append_uint16(msg, (apr_uint16_t) num_headers)) {
258 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
259 "ajp_marshal_into_msgb: "
260 "Error appending the message begining");
264 for (i = 0 ; i < num_headers ; i++) {
266 const apr_array_header_t *t = apr_table_elts(r->headers_in);
267 const apr_table_entry_t *elts = (apr_table_entry_t *)t->elts;
269 if ((sc = sc_for_req_header(elts[i].key)) != UNKNOWN_METHOD) {
270 if (ajp_msg_append_uint16(msg, (apr_uint16_t)sc)) {
271 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
272 "ajp_marshal_into_msgb: "
273 "Error appending the header name");
274 return AJP_EOVERFLOW;
278 if (ajp_msg_append_string(msg, elts[i].key)) {
279 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
280 "ajp_marshal_into_msgb: "
281 "Error appending the header name");
282 return AJP_EOVERFLOW;
286 if (ajp_msg_append_string(msg, elts[i].val)) {
287 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
288 "ajp_marshal_into_msgb: "
289 "Error appending the header value");
290 return AJP_EOVERFLOW;
292 ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, r->server,
293 "ajp_marshal_into_msgb: Header[%d] [%s] = [%s]",
294 i, elts[i].key, elts[i].val);
297 /* XXXX need to figure out how to do this
299 if (ajp_msg_append_uint8(msg, SC_A_SECRET) ||
300 ajp_msg_append_string(msg, s->secret)) {
301 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
302 "Error ajp_marshal_into_msgb - "
303 "Error appending secret");
310 if (ajp_msg_append_uint8(msg, SC_A_REMOTE_USER) ||
311 ajp_msg_append_string(msg, r->user)) {
312 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
313 "ajp_marshal_into_msgb: "
314 "Error appending the remote user");
315 return AJP_EOVERFLOW;
318 if (r->ap_auth_type) {
319 if (ajp_msg_append_uint8(msg, SC_A_AUTH_TYPE) ||
320 ajp_msg_append_string(msg, r->ap_auth_type)) {
321 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
322 "ajp_marshal_into_msgb: "
323 "Error appending the auth type");
324 return AJP_EOVERFLOW;
327 /* XXXX ebcdic (args converted?) */
329 if (ajp_msg_append_uint8(msg, SC_A_QUERY_STRING) ||
330 ajp_msg_append_string(msg, uri->query)) {
331 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
332 "ajp_marshal_into_msgb: "
333 "Error appending the query string");
334 return AJP_EOVERFLOW;
337 if ((session_route = apr_table_get(r->notes, "session-route"))) {
338 if (ajp_msg_append_uint8(msg, SC_A_JVM_ROUTE) ||
339 ajp_msg_append_string(msg, session_route)) {
340 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
341 "ajp_marshal_into_msgb: "
342 "Error appending the jvm route");
343 return AJP_EOVERFLOW;
346 /* XXX: Is the subprocess_env a right place?
347 * <Location /examples>
348 * ProxyPass ajp://remote:8009/servlets-examples
349 * SetEnv SSL_SESSION_ID CUSTOM_SSL_SESSION_ID
353 * Only lookup SSL variables if we are currently running HTTPS.
354 * Furthermore ensure that only variables get set in the AJP message
355 * that are not NULL and not empty.
358 if ((envvar = ap_proxy_ssl_val(r->pool, r->server, r->connection, r,
359 AJP13_SSL_CLIENT_CERT_INDICATOR))
361 if (ajp_msg_append_uint8(msg, SC_A_SSL_CERT)
362 || ajp_msg_append_string(msg, envvar)) {
363 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
364 "ajp_marshal_into_msgb: "
365 "Error appending the SSL certificates");
366 return AJP_EOVERFLOW;
370 if ((envvar = ap_proxy_ssl_val(r->pool, r->server, r->connection, r,
371 AJP13_SSL_CIPHER_INDICATOR))
373 if (ajp_msg_append_uint8(msg, SC_A_SSL_CIPHER)
374 || ajp_msg_append_string(msg, envvar)) {
375 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
376 "ajp_marshal_into_msgb: "
377 "Error appending the SSL ciphers");
378 return AJP_EOVERFLOW;
382 if ((envvar = ap_proxy_ssl_val(r->pool, r->server, r->connection, r,
383 AJP13_SSL_SESSION_INDICATOR))
385 if (ajp_msg_append_uint8(msg, SC_A_SSL_SESSION)
386 || ajp_msg_append_string(msg, envvar)) {
387 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
388 "ajp_marshal_into_msgb: "
389 "Error appending the SSL session");
390 return AJP_EOVERFLOW;
394 /* ssl_key_size is required by Servlet 2.3 API */
395 if ((envvar = ap_proxy_ssl_val(r->pool, r->server, r->connection, r,
396 AJP13_SSL_KEY_SIZE_INDICATOR))
399 if (ajp_msg_append_uint8(msg, SC_A_SSL_KEY_SIZE)
400 || ajp_msg_append_uint16(msg, (unsigned short) atoi(envvar))) {
401 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
402 "Error ajp_marshal_into_msgb - "
403 "Error appending the SSL key size");
408 /* Forward the remote port information, which was forgotten
409 * from the builtin data of the AJP 13 protocol.
410 * Since the servlet spec allows to retrieve it via getRemotePort(),
411 * we provide the port to the Tomcat connector as a request
412 * attribute. Modern Tomcat versions know how to retrieve
413 * the remote port from this attribute.
416 const char *key = SC_A_REQ_REMOTE_PORT;
417 char *val = apr_itoa(r->pool, r->connection->remote_addr->port);
418 if (ajp_msg_append_uint8(msg, SC_A_REQ_ATTRIBUTE) ||
419 ajp_msg_append_string(msg, key) ||
420 ajp_msg_append_string(msg, val)) {
421 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
422 "ajp_marshal_into_msgb: "
423 "Error appending attribute %s=%s",
425 return AJP_EOVERFLOW;
428 /* Use the environment vars prefixed with AJP_
429 * and pass it to the header striping that prefix.
431 for (i = 0; i < (apr_uint32_t)arr->nelts; i++) {
432 if (!strncmp(elts[i].key, "AJP_", 4)) {
433 if (ajp_msg_append_uint8(msg, SC_A_REQ_ATTRIBUTE) ||
434 ajp_msg_append_string(msg, elts[i].key + 4) ||
435 ajp_msg_append_string(msg, elts[i].val)) {
436 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
437 "ajp_marshal_into_msgb: "
438 "Error appending attribute %s=%s",
439 elts[i].key, elts[i].val);
440 return AJP_EOVERFLOW;
445 if (ajp_msg_append_uint8(msg, SC_A_ARE_DONE)) {
446 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
447 "ajp_marshal_into_msgb: "
448 "Error appending the message end");
449 return AJP_EOVERFLOW;
452 ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, r->server,
453 "ajp_marshal_into_msgb: Done");
458 AJPV13_RESPONSE/AJPV14_RESPONSE:=
463 num_headers*(res_header_name header_value)
465 terminator boolean <! -- recycle connection or not -->
468 sc_req_header_name | (string)
471 sc_res_header_name | (string)
478 body length*(var binary)
482 static int addit_dammit(void *v, const char *key, const char *val)
484 apr_table_addn(v, key, val);
488 static apr_status_t ajp_unmarshal_response(ajp_msg_t *msg,
490 proxy_dir_conf *dconf)
495 apr_uint16_t num_headers;
498 rc = ajp_msg_get_uint16(msg, &status);
500 if (rc != APR_SUCCESS) {
501 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
502 "ajp_unmarshal_response: Null status");
507 rc = ajp_msg_get_string(msg, &ptr);
508 if (rc == APR_SUCCESS) {
509 #if APR_CHARSET_EBCDIC /* copy only if we have to */
510 ptr = apr_pstrdup(r->pool, ptr);
511 ap_xlate_proto_from_ascii(ptr, strlen(ptr));
513 r->status_line = apr_psprintf(r->pool, "%d %s", status, ptr);
515 r->status_line = NULL;
518 ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, r->server,
519 "ajp_unmarshal_response: status = %d", status);
521 rc = ajp_msg_get_uint16(msg, &num_headers);
522 if (rc == APR_SUCCESS) {
523 apr_table_t *save_table;
525 /* First, tuck away all already existing cookies */
527 * Could optimize here, but just in case we want to
528 * also save other headers, keep this logic.
530 save_table = apr_table_make(r->pool, num_headers + 2);
531 apr_table_do(addit_dammit, save_table, r->headers_out,
533 r->headers_out = save_table;
535 r->headers_out = NULL;
539 ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, r->server,
540 "ajp_unmarshal_response: Number of headers is = %d",
543 for(i = 0 ; i < (int) num_headers ; i++) {
545 const char *stringname;
547 rc = ajp_msg_peek_uint16(msg, &name);
548 if (rc != APR_SUCCESS) {
552 if ((name & 0XFF00) == 0XA000) {
553 ajp_msg_get_uint16(msg, &name);
554 stringname = long_res_header_for_sc(name);
555 if (stringname == NULL) {
556 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
557 "ajp_unmarshal_response: "
560 return AJP_EBAD_HEADER;
564 rc = ajp_msg_get_string(msg, &stringname);
565 if (rc != APR_SUCCESS) {
566 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
567 "ajp_unmarshal_response: "
571 ap_xlate_proto_from_ascii(stringname, strlen(stringname));
574 rc = ajp_msg_get_string(msg, &value);
575 if (rc != APR_SUCCESS) {
576 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
577 "ajp_unmarshal_response: "
578 "Null header value");
582 /* Set-Cookie need additional processing */
583 if (!strcasecmp(stringname, "Set-Cookie")) {
584 value = ap_proxy_cookie_reverse_map(r, dconf, value);
586 /* Location, Content-Location, URI and Destination need additional
588 else if (!strcasecmp(stringname, "Location")
589 || !strcasecmp(stringname, "Content-Location")
590 || !strcasecmp(stringname, "URI")
591 || !strcasecmp(stringname, "Destination"))
593 value = ap_proxy_location_reverse_map(r, dconf, value);
596 ap_xlate_proto_from_ascii(value, strlen(value));
597 ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, r->server,
598 "ajp_unmarshal_response: Header[%d] [%s] = [%s]",
599 i, stringname, value);
601 apr_table_add(r->headers_out, stringname, value);
603 /* Content-type needs an additional handling */
604 if (strcasecmp(stringname, "Content-Type") == 0) {
605 /* add corresponding filter */
606 ap_set_content_type(r, apr_pstrdup(r->pool, value));
607 ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, r->server,
608 "ajp_unmarshal_response: ap_set_content_type done");
616 * Build the ajp header message and send it
618 apr_status_t ajp_send_header(apr_socket_t *sock,
626 rc = ajp_msg_create(r->pool, buffsize, &msg);
627 if (rc != APR_SUCCESS) {
628 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
629 "ajp_send_header: ajp_msg_create failed");
633 rc = ajp_marshal_into_msgb(msg, r, uri);
634 if (rc != APR_SUCCESS) {
635 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
636 "ajp_send_header: ajp_marshal_into_msgb failed");
640 rc = ajp_ilink_send(sock, msg);
641 if (rc != APR_SUCCESS) {
642 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
643 "ajp_send_header: ajp_ilink_send failed");
651 * Read the ajp message and return the type of the message.
653 apr_status_t ajp_read_header(apr_socket_t *sock,
662 rc = ajp_msg_reuse(*msg);
663 if (rc != APR_SUCCESS) {
664 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
665 "ajp_read_header: ajp_msg_reuse failed");
670 rc = ajp_msg_create(r->pool, buffsize, msg);
671 if (rc != APR_SUCCESS) {
672 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
673 "ajp_read_header: ajp_msg_create failed");
678 rc = ajp_ilink_receive(sock, *msg);
679 if (rc != APR_SUCCESS) {
680 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
681 "ajp_read_header: ajp_ilink_receive failed");
684 rc = ajp_msg_peek_uint8(*msg, &result);
685 ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, r->server,
686 "ajp_read_header: ajp_ilink_received %02x", result);
690 /* parse the msg to read the type */
691 int ajp_parse_type(request_rec *r, ajp_msg_t *msg)
694 ajp_msg_peek_uint8(msg, &result);
695 ap_log_error(APLOG_MARK, APLOG_DEBUG, 0, r->server,
696 "ajp_parse_type: got %02x", result);
700 /* parse the header */
701 apr_status_t ajp_parse_header(request_rec *r, proxy_dir_conf *conf,
707 rc = ajp_msg_get_uint8(msg, &result);
708 if (rc != APR_SUCCESS) {
709 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
710 "ajp_parse_headers: ajp_msg_get_byte failed");
713 if (result != CMD_AJP13_SEND_HEADERS) {
714 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
715 "ajp_parse_headers: wrong type 0x%02x expecting 0x%02x",
716 result, CMD_AJP13_SEND_HEADERS);
717 return AJP_EBAD_HEADER;
719 return ajp_unmarshal_response(msg, r, conf);
722 /* parse the body and return data address and length */
723 apr_status_t ajp_parse_data(request_rec *r, ajp_msg_t *msg,
724 apr_uint16_t *len, char **ptr)
728 apr_uint16_t expected_len;
730 rc = ajp_msg_get_uint8(msg, &result);
731 if (rc != APR_SUCCESS) {
732 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
733 "ajp_parse_data: ajp_msg_get_byte failed");
736 if (result != CMD_AJP13_SEND_BODY_CHUNK) {
737 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
738 "ajp_parse_data: wrong type 0x%02x expecting 0x%02x",
739 result, CMD_AJP13_SEND_BODY_CHUNK);
740 return AJP_EBAD_HEADER;
742 rc = ajp_msg_get_uint16(msg, len);
743 if (rc != APR_SUCCESS) {
747 * msg->len contains the complete length of the message including all
748 * headers. So the expected length for a CMD_AJP13_SEND_BODY_CHUNK is
749 * msg->len minus the sum of
750 * AJP_HEADER_LEN : The length of the header to every AJP message.
751 * AJP_HEADER_SZ_LEN : The header giving the size of the chunk.
752 * 1 : The CMD_AJP13_SEND_BODY_CHUNK indicator byte (0x03).
753 * 1 : The last byte of this message always seems to be
754 * 0x00 and is not part of the chunk.
756 expected_len = msg->len - (AJP_HEADER_LEN + AJP_HEADER_SZ_LEN + 1 + 1);
757 if (*len != expected_len) {
758 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
759 "ajp_parse_data: Wrong chunk length. Length of chunk is %i,"
760 " expected length is %i.", *len, expected_len);
761 return AJP_EBAD_HEADER;
763 *ptr = (char *)&(msg->buf[msg->pos]);
767 /* Check the reuse flag in CMD_AJP13_END_RESPONSE */
768 apr_status_t ajp_parse_reuse(request_rec *r, ajp_msg_t *msg,
774 rc = ajp_msg_get_uint8(msg, &result);
775 if (rc != APR_SUCCESS) {
776 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
777 "ajp_parse_reuse: ajp_msg_get_byte failed");
780 if (result != CMD_AJP13_END_RESPONSE) {
781 ap_log_error(APLOG_MARK, APLOG_ERR, 0, r->server,
782 "ajp_parse_reuse: wrong type 0x%02x expecting 0x%02x",
783 result, CMD_AJP13_END_RESPONSE);
784 return AJP_EBAD_HEADER;
786 return ajp_msg_get_uint8(msg, reuse);
790 * Allocate a msg to send data
792 apr_status_t ajp_alloc_data_msg(apr_pool_t *pool, char **ptr, apr_size_t *len,
797 if ((rc = ajp_msg_create(pool, *len, msg)) != APR_SUCCESS)
800 *ptr = (char *)&((*msg)->buf[6]);
807 * Send the data message
809 apr_status_t ajp_send_data_msg(apr_socket_t *sock,
810 ajp_msg_t *msg, apr_size_t len)
813 msg->buf[4] = (apr_byte_t)((len >> 8) & 0xFF);
814 msg->buf[5] = (apr_byte_t)(len & 0xFF);
816 msg->len += len + 2; /* + 1 XXXX where is '\0' */
818 return ajp_ilink_send(sock, msg);