1 /* dtest.c - lber decoding test program */
3 * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
4 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
7 * Copyright (c) 1990 Regents of the University of Michigan.
10 * Redistribution and use in source and binary forms are permitted
11 * provided that this notice is preserved and that due credit is given
12 * to the University of Michigan at Ann Arbor. The name of the University
13 * may not be used to endorse or promote products derived from this
14 * software without specific prior written permission. This software
15 * is provided ``as is'' without express or implied warranty.
23 #include <ac/string.h>
24 #include <ac/socket.h>
25 #include <ac/unistd.h>
33 static void usage( char *name )
35 fprintf( stderr, "usage: %s fmt\n", name );
39 main( int argc, char **argv )
44 unsigned long tag, len;
49 /* enable debugging */
54 return( EXIT_FAILURE );
62 sb = ber_sockbuf_alloc_fd( fileno(stdin) );
64 if( (ber = ber_alloc_t(LBER_USE_DER)) == NULL ) {
65 perror( "ber_alloc_t" );
66 return( EXIT_FAILURE );
69 if(( tag = ber_get_next( sb, &len, ber) ) == LBER_ERROR ) {
70 perror( "ber_get_next" );
71 return( EXIT_FAILURE );
74 printf("decode: message tag 0x%lx and length %ld\n",
77 for( s = argv[1]; *s; s++ ) {
83 printf("decode: format %s\n", fmt );
85 rc = ber_scanf( ber, fmt, &buf[0], &len );
87 if( rc == LBER_ERROR ) {
88 perror( "ber_scanf" );
89 return( EXIT_FAILURE );
93 if(( tag = ber_get_next( sb, &len, ber) ) == LBER_ERROR ) {
94 perror( "ber_get_next" );
95 return( EXIT_FAILURE );
98 printf("decode: message tag 0x%lx and length %ld\n",
101 ber_sockbuf_free( sb );
102 return( EXIT_SUCCESS );