granicus.if.org Git - apache/blob - server/util_ebcdic.c

   1 /* ====================================================================
   2  * The Apache Software License, Version 1.1
   3  *
   4  * Copyright (c) 2000 The Apache Software Foundation.  All rights
   5  * reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  *
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  *
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in
  16  *    the documentation and/or other materials provided with the
  17  *    distribution.
  18  *
  19  * 3. The end-user documentation included with the redistribution,
  20  *    if any, must include the following acknowledgment:
  21  *       "This product includes software developed by the
  22  *        Apache Software Foundation (http://www.apache.org/)."
  23  *    Alternately, this acknowledgment may appear in the software itself,
  24  *    if and wherever such third-party acknowledgments normally appear.
  25  *
  26  * 4. The names "Apache" and "Apache Software Foundation" must
  27  *    not be used to endorse or promote products derived from this
  28  *    software without prior written permission. For written
  29  *    permission, please contact apache@apache.org.
  30  *
  31  * 5. Products derived from this software may not be called "Apache",
  32  *    nor may "Apache" appear in their name, without prior written
  33  *    permission of the Apache Software Foundation.
  34  *
  35  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
  36  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  37  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  38  * DISCLAIMED.  IN NO EVENT SHALL THE APACHE SOFTWARE FOUNDATION OR
  39  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  40  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  41  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
  42  * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
  43  * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
  44  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
  45  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  46  * SUCH DAMAGE.
  47  * ====================================================================
  48  *
  49  * This software consists of voluntary contributions made by many
  50  * individuals on behalf of the Apache Software Foundation.  For more
  51  * information on the Apache Software Foundation, please see
  52  * <http://www.apache.org/>.
  53  *
  54  * Portions of this software are based upon public domain software
  55  * originally written at the National Center for Supercomputing Applications,
  56  * University of Illinois, Urbana-Champaign.
  57  */
  58
  59 #include "ap_config.h"
  60
  61 #ifdef CHARSET_EBCDIC
  62
  63 #include "httpd.h"
  64 #include "http_log.h"
  65 #include "http_core.h"
  66 #include "util_ebcdic.h"
  67
  68 ap_xlate_t *ap_hdrs_to_ascii, *ap_hdrs_from_ascii;
  69 ap_xlate_t *ap_locale_to_ascii, *ap_locale_from_ascii;
  70
  71 ap_status_t ap_init_ebcdic(ap_pool_t *pool)
  72 {
  73     ap_status_t rv;
  74     char buf[80];
  75
  76     rv = ap_xlate_open(&ap_hdrs_to_ascii, "ISO8859-1", APR_DEFAULT_CHARSET, pool);
  77     if (rv) {
  78         ap_log_error(APLOG_MARK, APLOG_ERR, rv, NULL,
  79                      "ap_xlate_open() failed");
  80         return rv;
  81     }
  82
  83     rv = ap_xlate_open(&ap_hdrs_from_ascii, APR_DEFAULT_CHARSET, "ISO8859-1", pool);
  84     if (rv) {
  85         ap_log_error(APLOG_MARK, APLOG_ERR, rv, NULL,
  86                      "ap_xlate_open() failed");
  87         return rv;
  88     }
  89
  90     ap_locale_to_ascii = ap_hdrs_to_ascii; /* TODO: "ISO8859-1" to APR_LOCALE_CHARSET */
  91     ap_locale_from_ascii = ap_hdrs_from_ascii; /* TODO: APR_LOCALE_CHARSET to "ISO8859-1" */
  92
  93     rv = ap_MD5InitEBCDIC(ap_hdrs_to_ascii);
  94     if (rv) {
  95         ap_log_error(APLOG_MARK, APLOG_ERR, rv, NULL,
  96                      "ap_MD5InitEBCDIC() failed");
  97         return rv;
  98     }
  99
 100     rv = ap_base64init_ebcdic(ap_hdrs_to_ascii, ap_hdrs_from_ascii);
 101     if (rv) {
 102         ap_log_error(APLOG_MARK, APLOG_ERR, rv, NULL,
 103                      "ap_base64init_ebcdic() failed");
 104         return rv;
 105     }
 106
 107     rv = ap_SHA1InitEBCDIC(ap_hdrs_to_ascii);
 108     if (rv) {
 109         ap_log_error(APLOG_MARK, APLOG_ERR, rv, NULL,
 110                      "ap_SHA1InitEBCDIC() failed");
 111         return rv;
 112     }
 113
 114     return APR_SUCCESS;
 115 }
 116
 117 #define ASCIITEXT_MAGIC_TYPE_PREFIX "text/x-ascii-" /* Text files whose content-type starts with this are passed thru unconverted */
 118
 119 /* Check the Content-Type to decide if conversion is needed */
 120 ap_xlate_t *ap_checkconv(struct request_rec *r)
 121 {
 122     int convert_to_ascii;
 123     const char *type;
 124     ap_xlate_t *zero = NULL;
 125
 126     /* To make serving of "raw ASCII text" files easy (they serve faster
 127      * since they don't have to be converted from EBCDIC), a new
 128      * "magic" type prefix was invented: text/x-ascii-{plain,html,...}
 129      * If we detect one of these content types here, we simply correct
 130      * the type to the real text/{plain,html,...} type. Otherwise, we
 131      * set a flag that translation is required later on.
 132      */
 133
 134     type = (r->content_type == NULL) ? ap_default_type(r) : r->content_type;
 135
 136     /* If no content type is set then treat it as (ebcdic) text/plain */
 137     convert_to_ascii = (type == NULL);
 138
 139     /* Conversion is applied to text/ files only, if ever. */
 140     if (type && (strncasecmp(type, "text/", 5) == 0 ||
 141                  strncasecmp(type, "message/", 8) == 0)) {
 142         if (strncasecmp(type, ASCIITEXT_MAGIC_TYPE_PREFIX,
 143                         sizeof(ASCIITEXT_MAGIC_TYPE_PREFIX)-1) == 0)
 144             r->content_type = ap_pstrcat(r->pool, "text/",
 145                                          type+sizeof(ASCIITEXT_MAGIC_TYPE_PREFIX)-1,
 146                                          NULL);
 147         else
 148             /* translate EBCDIC to ASCII */
 149             convert_to_ascii = 1;
 150     }
 151     /* Enable conversion if it's a text document */
 152     if (convert_to_ascii) {
 153         ap_bsetopt(r->connection->client, BO_WXLATE, &ap_locale_to_ascii);
 154     }
 155     else {
 156         ap_bsetopt(r->connection->client, BO_WXLATE, &zero);
 157     }
 158
 159     return convert_to_ascii ? ap_locale_to_ascii : NULL;
 160 }
 161
 162 #endif /* CHARSET_EBCDIC */