Basically, I wanted to be able to make a dump to a FILE*, and not have
[openssl.git] / crypto / bio / b_dump.c
index 0f61768360140e8ceb1f691189e5ddd206a7ef97..a07b79437f3f8cac1da617118b51c7130ea9f6af 100644 (file)
 #define DUMP_WIDTH     16
 #define DUMP_WIDTH_LESS_INDENT(i) (DUMP_WIDTH-((i-(i>6?6:i)+3)/4))
 
-int BIO_dump(BIO *bio, const char *s, int len)
+int BIO_dump_cb(int (*cb)(const void *data, size_t len, void *u),
+       void *u, const char *s, int len)
        {
-       return BIO_dump_indent(bio, s, len, 0);
+       return BIO_dump_indent_cb(cb, u, s, len, 0);
        }
 
-int BIO_dump_indent(BIO *bio, const char *s, int len, int indent)
+int BIO_dump_indent_cb(int (*cb)(const void *data, size_t len, void *u),
+       void *u, const char *s, int len, int indent)
        {
        int ret=0;
        char buf[288+1],tmp[20],str[128+1];
        int i,j,rows,trc;
        unsigned char ch;
        int dump_width;
-       
+
        trc=0;
-       
+
 #ifdef TRUNCATE
-       for(; (len > 0) && ((s[len-1] == ' ') || (s[len-1] == '\0')); len--) 
+       for(; (len > 0) && ((s[len-1] == ' ') || (s[len-1] == '\0')); len--)
                trc++;
 #endif
 
@@ -96,7 +98,7 @@ int BIO_dump_indent(BIO *bio, const char *s, int len, int indent)
                memset(str,' ',indent);
                }
        str[indent]='\0';
-       
+
        dump_width=DUMP_WIDTH_LESS_INDENT(indent);
        rows=(len/dump_width);
        if ((rows*dump_width)<len)
@@ -104,49 +106,82 @@ int BIO_dump_indent(BIO *bio, const char *s, int len, int indent)
        for(i=0;i<rows;i++)
                {
                buf[0]='\0';    /* start with empty string */
-               strcpy(buf,str);
-               sprintf(tmp,"%04x - ",i*dump_width);
-               strcat(buf,tmp);
+               BUF_strlcpy(buf,str,sizeof buf);
+               BIO_snprintf(tmp,sizeof tmp,"%04x - ",i*dump_width);
+               BUF_strlcat(buf,tmp,sizeof buf);
                for(j=0;j<dump_width;j++)
                        {
                        if (((i*dump_width)+j)>=len)
                                {
-                               strcat(buf,"   ");
+                               BUF_strlcat(buf,"   ",sizeof buf);
                                }
                        else
                                {
                                ch=((unsigned char)*(s+i*dump_width+j)) & 0xff;
-                               sprintf(tmp,"%02x%c",ch,j==7?'-':' ');
-                               strcat(buf,tmp);
+                               BIO_snprintf(tmp,sizeof tmp,"%02x%c",ch,
+                                       j==7?'-':' ');
+                               BUF_strlcat(buf,tmp,sizeof buf);
                                }
                        }
-               strcat(buf,"  ");
+               BUF_strlcat(buf,"  ",sizeof buf);
                for(j=0;j<dump_width;j++)
                        {
                        if (((i*dump_width)+j)>=len)
                                break;
                        ch=((unsigned char)*(s+i*dump_width+j)) & 0xff;
 #ifndef CHARSET_EBCDIC
-                       sprintf(tmp,"%c",((ch>=' ')&&(ch<='~'))?ch:'.');
+                       BIO_snprintf(tmp,sizeof tmp,"%c",
+                               ((ch>=' ')&&(ch<='~'))?ch:'.');
 #else
-                       sprintf(tmp,"%c",((ch>=os_toascii[' '])&&(ch<=os_toascii['~']))
+                       BIO_snprintf(tmp,sizeof tmp,"%c",
+                               ((ch>=os_toascii[' '])&&(ch<=os_toascii['~']))
                                ? os_toebcdic[ch]
                                : '.');
 #endif
-                       strcat(buf,tmp);
+                       BUF_strlcat(buf,tmp,sizeof buf);
                        }
-               strcat(buf,"\n");
-               /* if this is the last call then update the ddt_dump thing so that
-                * we will move the selection point in the debug window 
+               BUF_strlcat(buf,"\n",sizeof buf);
+               /* if this is the last call then update the ddt_dump thing so
+                * that we will move the selection point in the debug window
                 */
-               ret+=BIO_write(bio,(char *)buf,strlen(buf));
+               ret+=cb((void *)buf,strlen(buf),u);
                }
 #ifdef TRUNCATE
        if (trc > 0)
                {
-               sprintf(buf,"%s%04x - <SPACES/NULS>\n",str,len+trc);
-               ret+=BIO_write(bio,(char *)buf,strlen(buf));
+               BIO_snprintf(buf,sizeof buf,"%s%04x - <SPACES/NULS>\n",str,
+                       len+trc);
+               ret+=cb((void *)buf,strlen(buf),u);
                }
 #endif
        return(ret);
        }
+
+#ifndef OPENSSL_NO_FP_API
+static int write_fp(const void *data, size_t len, void *fp)
+       {
+       return fwrite(data, len, 1, (FILE *)fp);
+       }
+int BIO_dump_fp(FILE *fp, const char *s, int len)
+       {
+       return BIO_dump_cb(write_fp, fp, s, len);
+       }
+int BIO_dump_indent_fp(FILE *fp, const char *s, int len, int indent)
+       {
+       return BIO_dump_indent_cb(write_fp, fp, s, len, indent);
+       }
+#endif
+
+static int write_bio(const void *data, size_t len, void *bp)
+       {
+       return BIO_write((BIO *)bp, (const char *)data, len);
+       }
+int BIO_dump(BIO *bp, const char *s, int len)
+       {
+       return BIO_dump_cb(write_bio, bp, s, len);
+       }
+int BIO_dump_indent(BIO *bp, const char *s, int len, int indent)
+       {
+       return BIO_dump_indent_cb(write_bio, bp, s, len, indent);
+       }
+