rubbos/app/httpd-2.0.64/server/util_md5.c

   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
   7  *
   8  *     http://www.apache.org/licenses/LICENSE-2.0
   9  *
  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.
  15  */
  16
  17 /************************************************************************
  18  * NCSA HTTPd Server
  19  * Software Development Group
  20  * National Center for Supercomputing Applications
  21  * University of Illinois at Urbana-Champaign
  22  * 605 E. Springfield, Champaign, IL 61820
  23  * httpd@ncsa.uiuc.edu
  24  *
  25  * Copyright  (C)  1995, Board of Trustees of the University of Illinois
  26  *
  27  ************************************************************************
  28  *
  29  * md5.c: NCSA HTTPd code which uses the md5c.c RSA Code
  30  *
  31  *  Original Code Copyright (C) 1994, Jeff Hostetler, Spyglass, Inc.
  32  *  Portions of Content-MD5 code Copyright (C) 1993, 1994 by Carnegie Mellon
  33  *     University (see Copyright below).
  34  *  Portions of Content-MD5 code Copyright (C) 1991 Bell Communications
  35  *     Research, Inc. (Bellcore) (see Copyright below).
  36  *  Portions extracted from mpack, John G. Myers - jgm+@cmu.edu
  37  *  Content-MD5 Code contributed by Martin Hamilton (martin@net.lut.ac.uk)
  38  *
  39  */
  40
  41
  42
  43 /* md5.c --Module Interface to MD5. */
  44 /* Jeff Hostetler, Spyglass, Inc., 1994. */
  45
  46 #include "ap_config.h"
  47 #include "apr_portable.h"
  48 #include "apr_strings.h"
  49 #include "httpd.h"
  50 #include "util_md5.h"
  51 #include "util_ebcdic.h"
  52
  53 AP_DECLARE(char *) ap_md5_binary(apr_pool_t *p, const unsigned char *buf, int length)
  54 {
  55     const char *hex = "0123456789abcdef";
  56     apr_md5_ctx_t my_md5;
  57     unsigned char hash[MD5_DIGESTSIZE];
  58     char *r, result[33]; /* (MD5_DIGESTSIZE * 2) + 1 */
  59     int i;
  60
  61     /*
  62      * Take the MD5 hash of the string argument.
  63      */
  64
  65     apr_md5_init(&my_md5);
  66 #if APR_CHARSET_EBCDIC
  67     apr_md5_set_xlate(&my_md5, ap_hdrs_to_ascii);
  68 #endif
  69     apr_md5_update(&my_md5, buf, (unsigned int)length);
  70     apr_md5_final(hash, &my_md5);
  71
  72     for (i = 0, r = result; i < MD5_DIGESTSIZE; i++) {
  73         *r++ = hex[hash[i] >> 4];
  74         *r++ = hex[hash[i] & 0xF];
  75     }
  76     *r = '\0';
  77
  78     return apr_pstrndup(p, result, MD5_DIGESTSIZE*2);
  79 }
  80
  81 AP_DECLARE(char *) ap_md5(apr_pool_t *p, const unsigned char *string)
  82 {
  83     return ap_md5_binary(p, string, (int) strlen((char *)string));
  84 }
  85
  86 /* these portions extracted from mpack, John G. Myers - jgm+@cmu.edu */
  87
  88 /* (C) Copyright 1993,1994 by Carnegie Mellon University
  89  * All Rights Reserved.
  90  *
  91  * Permission to use, copy, modify, distribute, and sell this software
  92  * and its documentation for any purpose is hereby granted without
  93  * fee, provided that the above copyright notice appear in all copies
  94  * and that both that copyright notice and this permission notice
  95  * appear in supporting documentation, and that the name of Carnegie
  96  * Mellon University not be used in advertising or publicity
  97  * pertaining to distribution of the software without specific,
  98  * written prior permission.  Carnegie Mellon University makes no
  99  * representations about the suitability of this software for any
 100  * purpose.  It is provided "as is" without express or implied
 101  * warranty.
 102  *
 103  * CARNEGIE MELLON UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO
 104  * THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
 105  * AND FITNESS, IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY BE LIABLE
 106  * FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 107  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
 108  * AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
 109  * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
 110  * SOFTWARE.
 111  */
 112
 113 /*
 114  * Copyright (c) 1991 Bell Communications Research, Inc. (Bellcore)
 115  *
 116  * Permission to use, copy, modify, and distribute this material
 117  * for any purpose and without fee is hereby granted, provided
 118  * that the above copyright notice and this permission notice
 119  * appear in all copies, and that the name of Bellcore not be
 120  * used in advertising or publicity pertaining to this
 121  * material without the specific, prior written permission
 122  * of an authorized representative of Bellcore.  BELLCORE
 123  * MAKES NO REPRESENTATIONS ABOUT THE ACCURACY OR SUITABILITY
 124  * OF THIS MATERIAL FOR ANY PURPOSE.  IT IS PROVIDED "AS IS",
 125  * WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES.
 126  */
 127
 128 static char basis_64[] =
 129 "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
 130
 131 AP_DECLARE(char *) ap_md5contextTo64(apr_pool_t *a, apr_md5_ctx_t *context)
 132 {
 133     unsigned char digest[18];
 134     char *encodedDigest;
 135     int i;
 136     char *p;
 137
 138     encodedDigest = (char *) apr_pcalloc(a, 25 * sizeof(char));
 139
 140     apr_md5_final(digest, context);
 141     digest[sizeof(digest) - 1] = digest[sizeof(digest) - 2] = 0;
 142
 143     p = encodedDigest;
 144     for (i = 0; i < sizeof(digest); i += 3) {
 145         *p++ = basis_64[digest[i] >> 2];
 146         *p++ = basis_64[((digest[i] & 0x3) << 4) | ((int) (digest[i + 1] & 0xF0) >> 4)];
 147         *p++ = basis_64[((digest[i + 1] & 0xF) << 2) | ((int) (digest[i + 2] & 0xC0) >> 6)];
 148         *p++ = basis_64[digest[i + 2] & 0x3F];
 149     }
 150     *p-- = '\0';
 151     *p-- = '=';
 152     *p-- = '=';
 153     return encodedDigest;
 154 }
 155
 156 AP_DECLARE(char *) ap_md5digest(apr_pool_t *p, apr_file_t *infile)
 157 {
 158     apr_md5_ctx_t context;
 159     unsigned char buf[1000];
 160     long length = 0;
 161     apr_size_t nbytes;
 162     apr_off_t offset = 0L;
 163
 164     apr_md5_init(&context);
 165     nbytes = sizeof(buf);
 166     while (apr_file_read(infile, buf, &nbytes) == APR_SUCCESS) {
 167         length += nbytes;
 168         apr_md5_update(&context, buf, nbytes);
 169     }
 170     apr_file_seek(infile, APR_SET, &offset);
 171     return ap_md5contextTo64(p, &context);
 172 }
 173