httpd-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From di...@hyperreal.org
Subject cvs commit: apache-1.3/src/ap ap_base64.c
Date Sun, 08 Aug 1999 16:12:59 GMT
dirkx       99/08/08 09:12:58

  Added:       src/ap   ap_base64.c
  Log:
  disk full
  
  Revision  Changes    Path
  1.1                  apache-1.3/src/ap/ap_base64.c
  
  Index: ap_base64.c
  ===================================================================
  /* ====================================================================
   * Copyright (c) 1995-1999 The Apache Group.  All rights reserved.
   *
   * Redistribution and use in source and binary forms, with or without
   * modification, are permitted provided that the following conditions
   * are met:
   *
   * 1. Redistributions of source code must retain the above copyright
   *    notice, this list of conditions and the following disclaimer.
   *
   * 2. Redistributions in binary form must reproduce the above copyright
   *    notice, this list of conditions and the following disclaimer in
   *    the documentation and/or other materials provided with the
   *    distribution.
   *
   * 3. All advertising materials mentioning features or use of this
   *    software must display the following acknowledgment:
   *    "This product includes software developed by the Apache Group
   *    for use in the Apache HTTP server project (http://www.apache.org/)."
   *
   * 4. The names "Apache Server" and "Apache Group" must not be used to
   *    endorse or promote products derived from this software without
   *    prior written permission. For written permission, please contact
   *    apache@apache.org.
   *
   * 5. Products derived from this software may not be called "Apache"
   *    nor may "Apache" appear in their names without prior written
   *    permission of the Apache Group.
   *
   * 6. Redistributions of any form whatsoever must retain the following
   *    acknowledgment:
   *    "This product includes software developed by the Apache Group
   *    for use in the Apache HTTP server project (http://www.apache.org/)."
   *
   * THIS SOFTWARE IS PROVIDED BY THE APACHE GROUP ``AS IS'' AND ANY
   * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
   * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE APACHE GROUP OR
   * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
   * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
   * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
   * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
   * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
   * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
   * OF THE POSSIBILITY OF SUCH DAMAGE.
   * ====================================================================
   *
   * This software consists of voluntary contributions made by many
   * individuals on behalf of the Apache Group and was originally based
   * on public domain software written at the National Center for
   * Supercomputing Applications, University of Illinois, Urbana-Champaign.
   * For more information on the Apache Group and the Apache HTTP server
   * project, please see <http://www.apache.org/>.
   *
   */
  
  /* * base64 encoder/decoder. Origianly part of main/util.c
   * but moved here so that support/ab and ap_sha1.c could
   * use it. This mean (re)moving the ap_palloc()s. And adding
   * ugly 'len' functions. Which is quite a nasty cost.
   */
  
  #include <string.h>
  
  #include "ap_config.h"
  #include "ap.h"
  
  #ifdef CHARSET_EBCDIC
  #include "ebcdic.h"
  #endif				/* CHARSET_EBCDIC */
  
  /* aaaack but it's fast and const should make it shared text page. */
  static const unsigned char pr2six[256] =
  {
  #ifndef CHARSET_EBCDIC
      /* ASCII table */
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 62, 64, 64, 64, 63, 52, 53, 54,
      55, 56, 57, 58, 59, 60, 61, 64, 64, 64, 64, 64, 64, 64, 0, 1, 2, 3,
      4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21,
      22, 23, 24, 25, 64, 64, 64, 64, 64, 64, 26, 27, 28, 29, 30, 31, 32,
      33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49,
      50, 51, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64
  #else /*CHARSET_EBCDIC*/
      /* EBCDIC table */
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 62, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 63, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64, 26, 27, 28, 29, 30, 31, 32, 33, 34, 64, 64, 64, 64, 64, 64,
      64, 35, 36, 37, 38, 39, 40, 41, 42, 43, 64, 64, 64, 64, 64, 64,
      64, 64, 44, 45, 46, 47, 48, 49, 50, 51, 64, 64, 64, 64, 64, 64,
      64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
      64,  0,  1,  2,  3,  4,  5,  6,  7,  8, 64, 64, 64, 64, 64, 64,
      64,  9, 10, 11, 12, 13, 14, 15, 16, 17, 64, 64, 64, 64, 64, 64,
      64, 64, 18, 19, 20, 21, 22, 23, 24, 25, 64, 64, 64, 64, 64, 64,
      52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 64, 64, 64, 64, 64, 64,
  #endif /*CHARSET_EBCDIC*/
  };
  
  API_EXPORT(int) ap_uudecode_len(const char *bufcoded)
  {
      int nbytesdecoded;
      register const unsigned char *bufin;
      register int nprbytes;
  
      bufin = (const unsigned char *) bufcoded;
      while (pr2six[*(bufin++)] <= 63);
  
      nprbytes = (bufin - (const unsigned char *) bufcoded) - 1;
      nbytesdecoded = ((nprbytes + 3) / 4) * 3;
  
      return nbytesdecoded + 1;
  }
  
  API_EXPORT(int) ap_uudecode(char *bufplain, const char *bufcoded)
  {
  #ifdef CHARSET_EBCDIC
      int i;
  #endif				/* CHARSET_EBCDIC */
      int len;
      
      len = ap_uudecode_binary((unsigned char *) bufplain, bufcoded);
  #ifdef CHARSET_EBCDIC
      for (i=0; i<len; i++)
  	bufplain[i] = os_toebcdic[bufplain[i]];
  #endif				/* CHARSET_EBCDIC */
      return len;
  }
  
  /* This is the same as ap_uudecode() except on EBCDIC machines, where
   * the conversion of the output to ebcdic is left out.
   */
  API_EXPORT(int) ap_uudecode_binary(unsigned char *bufplain,
  				   const char *bufcoded)
  {
      int nbytesdecoded;
      register const unsigned char *bufin;
      register unsigned char *bufout;
      register int nprbytes;
  
      bufin = (const unsigned char *) bufcoded;
      while (pr2six[*(bufin++)] <= 63);
      nprbytes = (bufin - (const unsigned char *) bufcoded) - 1;
      nbytesdecoded = ((nprbytes + 3) / 4) * 3;
  
      bufout = (unsigned char *) bufplain;
      bufin = (const unsigned char *) bufcoded;
  
      while (nprbytes > 4) {
  	*(bufout++) =
  	    (unsigned char) (pr2six[*bufin] << 2 | pr2six[bufin[1]] >> 4);
  	*(bufout++) =
  	    (unsigned char) (pr2six[bufin[1]] << 4 | pr2six[bufin[2]] >> 2);
  	*(bufout++) =
  	    (unsigned char) (pr2six[bufin[2]] << 6 | pr2six[bufin[3]]);
  	bufin += 4;
  	nprbytes -= 4;
      }
  
      /* Note: (nprbytes == 1) would be an error, so just ingore that case */
      if (nprbytes > 1) {
  	*(bufout++) =
  	    (unsigned char) (pr2six[*bufin] << 2 | pr2six[bufin[1]] >> 4);
      }
      if (nprbytes > 2) {
  	*(bufout++) =
  	    (unsigned char) (pr2six[bufin[1]] << 4 | pr2six[bufin[2]] >> 2);
      }
      if (nprbytes > 3) {
  	*(bufout++) =
  	    (unsigned char) (pr2six[bufin[2]] << 6 | pr2six[bufin[3]]);
      }
  
      *(bufout++) = '\0';
      nbytesdecoded -= (4 - nprbytes) & 3;
      return nbytesdecoded;
  }
  
  static const char basis_64[] =
  "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
  
  API_EXPORT(int) ap_uuencode_len(int len)
  {
      return ((len + 2) / 3 * 4) + 1;
  }
  
  API_EXPORT(int) ap_uuencode(char *encoded, const char *string, int len)
  {
  #ifndef CHARSET_EBCDIC
      return ap_uuencode_binary(encoded, (const unsigned char *) string, len);
  #else				/* CHARSET_EBCDIC */
      int i;
      char *p;
  
      p = encoded;
      for (i = 0; i < len - 2; i += 3) {
  	*p++ = basis_64[(os_toascii[string[i]] >> 2) & 0x3F];
  	*p++ = basis_64[((os_toascii[string[i]] & 0x3) << 4) | ((int) (os_toascii[string[i
+ 1]] & 0xF0) >> 4)];
  	*p++ = basis_64[((os_toascii[string[i + 1]] & 0xF) << 2) | ((int) (os_toascii[string[i
+ 2]] & 0xC0) >> 6)];
  	*p++ = basis_64[os_toascii[string[i + 2]] & 0x3F];
      }
      if (i < len) {
  	*p++ = basis_64[(os_toascii[string[i]] >> 2) & 0x3F];
  	if (i == (len - 1)) {
  	    *p++ = basis_64[((os_toascii[string[i]] & 0x3) << 4)];
  	    *p++ = '=';
  	}
  	else {
  	    *p++ = basis_64[((os_toascii[string[i]] & 0x3) << 4) | ((int) (os_toascii[string[i
+ 1]] & 0xF0) >> 4)];
  	    *p++ = basis_64[((os_toascii[string[i + 1]] & 0xF) << 2)];
  	}
  	*p++ = '=';
      }
  
      *p++ = '\0';
      return p - encoded;
  #endif				/* CHARSET_EBCDIC */
  }
  
  /* This is the same as ap_uuencode() except on EBCDIC machines, where
   * the conversion of the input to ascii is left out.
   */
  API_EXPORT(int) ap_uuencode_binary(char *encoded, const unsigned char *string,
  				   int len)
  {
      int i;
      char *p;
  
      p = encoded;
      for (i = 0; i < len - 2; i += 3) {
  	*p++ = basis_64[(string[i] >> 2) & 0x3F];
  	*p++ = basis_64[((string[i] & 0x3) << 4) | ((int) (string[i + 1] & 0xF0)
>> 4)];
  	*p++ = basis_64[((string[i + 1] & 0xF) << 2) | ((int) (string[i + 2] & 0xC0)
>> 6)];
  	*p++ = basis_64[string[i + 2] & 0x3F];
      }
      if (i < len) {
  	*p++ = basis_64[(string[i] >> 2) & 0x3F];
  	if (i == (len - 1)) {
  	    *p++ = basis_64[((string[i] & 0x3) << 4)];
  	    *p++ = '=';
  	}
  	else {
  	    *p++ = basis_64[((string[i] & 0x3) << 4) | ((int) (string[i + 1] & 0xF0)
>> 4)];
  	    *p++ = basis_64[((string[i + 1] & 0xF) << 2)];
  	}
  	*p++ = '=';
      }
  
      *p++ = '\0';
      return p - encoded;
  }
  
  
  

Mime
View raw message