Back to index

lightning-sunbird  0.9+nobinonly
dtest.c
Go to the documentation of this file.
00001 /* ***** BEGIN LICENSE BLOCK *****
00002  * Version: MPL 1.1/GPL 2.0/LGPL 2.1
00003  *
00004  * The contents of this file are subject to the Mozilla Public License Version
00005  * 1.1 (the "License"); you may not use this file except in compliance with
00006  * the License. You may obtain a copy of the License at
00007  * http://www.mozilla.org/MPL/
00008  *
00009  * Software distributed under the License is distributed on an "AS IS" basis,
00010  * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
00011  * for the specific language governing rights and limitations under the
00012  * License.
00013  *
00014  * The Original Code is Mozilla Communicator client code, released
00015  * March 31, 1998.
00016  *
00017  * The Initial Developer of the Original Code is
00018  * Netscape Communications Corporation.
00019  * Portions created by the Initial Developer are Copyright (C) 1998-1999
00020  * the Initial Developer. All Rights Reserved.
00021  *
00022  * Contributor(s):
00023  *
00024  * Alternatively, the contents of this file may be used under the terms of
00025  * either the GNU General Public License Version 2 or later (the "GPL"), or
00026  * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
00027  * in which case the provisions of the GPL or the LGPL are applicable instead
00028  * of those above. If you wish to allow use of your version of this file only
00029  * under the terms of either the GPL or the LGPL, and not to allow others to
00030  * use your version of this file under the terms of the MPL, indicate your
00031  * decision by deleting the provisions above and replace them with the notice
00032  * and other provisions required by the GPL or the LGPL. If you do not delete
00033  * the provisions above, a recipient may use your version of this file under
00034  * the terms of any one of the MPL, the GPL or the LGPL.
00035  *
00036  * ***** END LICENSE BLOCK ***** */
00037 
00038 /*
00039  * Copyright (c) 1990 Regents of the University of Michigan.
00040  * All rights reserved.
00041  *
00042  * Redistribution and use in source and binary forms are permitted
00043  * provided that this notice is preserved and that due credit is given
00044  * to the University of Michigan at Ann Arbor. The name of the University
00045  * may not be used to endorse or promote products derived from this
00046  * software without specific prior written permission. This software
00047  * is provided ``as is'' without express or implied warranty.
00048  */
00049 /* dtest.c - lber decoding test program */
00050 
00051 #include <stdio.h>
00052 #include <string.h>
00053 #ifdef MACOS
00054 #include <stdlib.h>
00055 #include <console.h>
00056 #else /* MACOS */
00057 #ifdef _WIN32
00058 #include <windows.h>
00059 #else
00060 #include <sys/types.h>
00061 #include <sys/socket.h>
00062 #endif /* _WIN32 */
00063 #endif /* MACOS */
00064 #include "lber.h"
00065 
00066 int
00067 SSL_Recv( int s, char *b, unsigned l, int dummy )
00068 {
00069        return( read( s, b, l ) );
00070 }
00071 
00072 SSL_Send( int s, char *b, unsigned l, int dummy )
00073 {
00074        return( write( s, b, l ) );
00075 }
00076 
00077 static void usage( char *name )
00078 {
00079        fprintf( stderr, "usage: %s < berfile\n", name );
00080 }
00081 
00082 main( int argc, char **argv )
00083 {
00084        long          i, fd;
00085        unsigned long len;
00086        int           tag;
00087        BerElement    *ber;
00088        Sockbuf              *sb;
00089        extern int    lber_debug;
00090 
00091        lber_debug = 255;
00092        if ( argc > 1 ) {
00093               usage( argv[0] );
00094               exit( 1 );
00095        }
00096 
00097        sb = ber_sockbuf_alloc();
00098        fd = 0;
00099        ber_sockbuf_set_option( sb, LBER_SOCKBUF_OPT_DESC, &fd );
00100 
00101        if ( (ber = der_alloc()) == NULL ) {
00102               perror( "ber_alloc" );
00103               exit( 1 );
00104        }
00105 
00106        if ( (tag = ber_get_next( sb, &len, ber )) == LBER_ERROR ) {
00107               perror( "ber_get_next" );
00108               exit( 1 );
00109        }
00110        printf( "message has tag 0x%x and length %ld\n", tag, len );
00111 
00112        return( 0 );
00113 }