1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/ossrv/ssl/libcrypto/src/crypto/bio/b_dump.c Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,193 @@
1.4 +/* crypto/bio/b_dump.c */
1.5 +/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
1.6 + * All rights reserved.
1.7 + *
1.8 + * This package is an SSL implementation written
1.9 + * by Eric Young (eay@cryptsoft.com).
1.10 + * The implementation was written so as to conform with Netscapes SSL.
1.11 + *
1.12 + * This library is free for commercial and non-commercial use as long as
1.13 + * the following conditions are aheared to. The following conditions
1.14 + * apply to all code found in this distribution, be it the RC4, RSA,
1.15 + * lhash, DES, etc., code; not just the SSL code. The SSL documentation
1.16 + * included with this distribution is covered by the same copyright terms
1.17 + * except that the holder is Tim Hudson (tjh@cryptsoft.com).
1.18 + *
1.19 + * Copyright remains Eric Young's, and as such any Copyright notices in
1.20 + * the code are not to be removed.
1.21 + * If this package is used in a product, Eric Young should be given attribution
1.22 + * as the author of the parts of the library used.
1.23 + * This can be in the form of a textual message at program startup or
1.24 + * in documentation (online or textual) provided with the package.
1.25 + *
1.26 + * Redistribution and use in source and binary forms, with or without
1.27 + * modification, are permitted provided that the following conditions
1.28 + * are met:
1.29 + * 1. Redistributions of source code must retain the copyright
1.30 + * notice, this list of conditions and the following disclaimer.
1.31 + * 2. Redistributions in binary form must reproduce the above copyright
1.32 + * notice, this list of conditions and the following disclaimer in the
1.33 + * documentation and/or other materials provided with the distribution.
1.34 + * 3. All advertising materials mentioning features or use of this software
1.35 + * must display the following acknowledgement:
1.36 + * "This product includes cryptographic software written by
1.37 + * Eric Young (eay@cryptsoft.com)"
1.38 + * The word 'cryptographic' can be left out if the rouines from the library
1.39 + * being used are not cryptographic related :-).
1.40 + * 4. If you include any Windows specific code (or a derivative thereof) from
1.41 + * the apps directory (application code) you must include an acknowledgement:
1.42 + * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
1.43 + *
1.44 + * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
1.45 + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
1.46 + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
1.47 + * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
1.48 + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
1.49 + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
1.50 + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
1.51 + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
1.52 + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
1.53 + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
1.54 + * SUCH DAMAGE.
1.55 + *
1.56 + * The licence and distribution terms for any publically available version or
1.57 + * derivative of this code cannot be changed. i.e. this code cannot simply be
1.58 + * copied and put under another distribution licence
1.59 + * [including the GNU Public Licence.]
1.60 + */
1.61 +
1.62 +/*
1.63 + * Stolen from tjh's ssl/ssl_trc.c stuff.
1.64 + */
1.65 +/*
1.66 + © Portions copyright (c) 2006 Nokia Corporation. All rights reserved.
1.67 + */
1.68 +#include <stdio.h>
1.69 +#include "cryptlib.h"
1.70 +#include "bio_lcl.h"
1.71 +
1.72 +#define TRUNCATE
1.73 +#define DUMP_WIDTH 16
1.74 +#define DUMP_WIDTH_LESS_INDENT(i) (DUMP_WIDTH-((i-(i>6?6:i)+3)/4))
1.75 +
1.76 +EXPORT_C int BIO_dump_cb(int (*cb)(const void *data, size_t len, void *u),
1.77 + void *u, const char *s, int len)
1.78 + {
1.79 + return BIO_dump_indent_cb(cb, u, s, len, 0);
1.80 + }
1.81 +
1.82 +EXPORT_C int BIO_dump_indent_cb(int (*cb)(const void *data, size_t len, void *u),
1.83 + void *u, const char *s, int len, int indent)
1.84 + {
1.85 + int ret=0;
1.86 +#ifndef SYMBIAN
1.87 + char buf[288+1],tmp[20],str[128+1];
1.88 +#else
1.89 + char buf[188+1],tmp[20],str[128+1];
1.90 +#endif
1.91 + int i,j,rows,trc;
1.92 + unsigned char ch;
1.93 + int dump_width;
1.94 +
1.95 + trc=0;
1.96 +
1.97 +#ifdef TRUNCATE
1.98 + for(; (len > 0) && ((s[len-1] == ' ') || (s[len-1] == '\0')); len--)
1.99 + trc++;
1.100 +#endif
1.101 +
1.102 + if (indent < 0)
1.103 + indent = 0;
1.104 + if (indent)
1.105 + {
1.106 + if (indent > 128) indent=128;
1.107 + memset(str,' ',indent);
1.108 + }
1.109 + str[indent]='\0';
1.110 +
1.111 + dump_width=DUMP_WIDTH_LESS_INDENT(indent);
1.112 + rows=(len/dump_width);
1.113 + if ((rows*dump_width)<len)
1.114 + rows++;
1.115 + for(i=0;i<rows;i++)
1.116 + {
1.117 + buf[0]='\0'; /* start with empty string */
1.118 + BUF_strlcpy(buf,str,sizeof buf);
1.119 + BIO_snprintf(tmp,sizeof tmp,"%04x - ",i*dump_width);
1.120 + BUF_strlcat(buf,tmp,sizeof buf);
1.121 + for(j=0;j<dump_width;j++)
1.122 + {
1.123 + if (((i*dump_width)+j)>=len)
1.124 + {
1.125 + BUF_strlcat(buf," ",sizeof buf);
1.126 + }
1.127 + else
1.128 + {
1.129 + ch=((unsigned char)*(s+i*dump_width+j)) & 0xff;
1.130 + BIO_snprintf(tmp,sizeof tmp,"%02x%c",ch,
1.131 + j==7?'-':' ');
1.132 + BUF_strlcat(buf,tmp,sizeof buf);
1.133 + }
1.134 + }
1.135 + BUF_strlcat(buf," ",sizeof buf);
1.136 + for(j=0;j<dump_width;j++)
1.137 + {
1.138 + if (((i*dump_width)+j)>=len)
1.139 + break;
1.140 + ch=((unsigned char)*(s+i*dump_width+j)) & 0xff;
1.141 +#ifndef CHARSET_EBCDIC
1.142 + BIO_snprintf(tmp,sizeof tmp,"%c",
1.143 + ((ch>=' ')&&(ch<='~'))?ch:'.');
1.144 +#else
1.145 + BIO_snprintf(tmp,sizeof tmp,"%c",
1.146 + ((ch>=os_toascii[' '])&&(ch<=os_toascii['~']))
1.147 + ? os_toebcdic[ch]
1.148 + : '.');
1.149 +#endif
1.150 + BUF_strlcat(buf,tmp,sizeof buf);
1.151 + }
1.152 + BUF_strlcat(buf,"\n",sizeof buf);
1.153 + /* if this is the last call then update the ddt_dump thing so
1.154 + * that we will move the selection point in the debug window
1.155 + */
1.156 + ret+=cb((void *)buf,strlen(buf),u);
1.157 + }
1.158 +#ifdef TRUNCATE
1.159 + if (trc > 0)
1.160 + {
1.161 + BIO_snprintf(buf,sizeof buf,"%s%04x - <SPACES/NULS>\n",str,
1.162 + len+trc);
1.163 + ret+=cb((void *)buf,strlen(buf),u);
1.164 + }
1.165 +#endif
1.166 + return(ret);
1.167 + }
1.168 +
1.169 +#ifndef OPENSSL_NO_FP_API
1.170 +static int write_fp(const void *data, size_t len, void *fp)
1.171 + {
1.172 + return UP_fwrite(data, len, 1, fp);
1.173 + }
1.174 +EXPORT_C int BIO_dump_fp(FILE *fp, const char *s, int len)
1.175 + {
1.176 + return BIO_dump_cb(write_fp, fp, s, len);
1.177 + }
1.178 +EXPORT_C int BIO_dump_indent_fp(FILE *fp, const char *s, int len, int indent)
1.179 + {
1.180 + return BIO_dump_indent_cb(write_fp, fp, s, len, indent);
1.181 + }
1.182 +#endif
1.183 +
1.184 +static int write_bio(const void *data, size_t len, void *bp)
1.185 + {
1.186 + return BIO_write((BIO *)bp, (const char *)data, len);
1.187 + }
1.188 +EXPORT_C int BIO_dump(BIO *bp, const char *s, int len)
1.189 + {
1.190 + return BIO_dump_cb(write_bio, bp, s, len);
1.191 + }
1.192 +EXPORT_C int BIO_dump_indent(BIO *bp, const char *s, int len, int indent)
1.193 + {
1.194 + return BIO_dump_indent_cb(write_bio, bp, s, len, indent);
1.195 + }
1.196 +