Back to index

lightning-sunbird  0.9+nobinonly
idtest.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 
00050 /* idtest.c - ber decoding test program using isode libraries */
00051 
00052 #include <stdio.h>
00053 #include <psap.h>
00054 #include <quipu/attr.h>
00055 
00056 static usage( char *name )
00057 {
00058        fprintf( stderr, "usage: %s\n", name );
00059 }
00060 
00061 main( int argc, char **argv )
00062 {
00063        PE     pe;
00064        PS     psin, psout, pserr;
00065 
00066        /* read the pe from standard in */
00067        if ( (psin = ps_alloc( std_open )) == NULLPS ) {
00068               perror( "ps_alloc" );
00069               exit( 1 );
00070        }
00071        if ( std_setup( psin, stdin ) == NOTOK ) {
00072               perror( "std_setup" );
00073               exit( 1 );
00074        }
00075        /* write the pe to standard out */
00076        if ( (psout = ps_alloc( std_open )) == NULLPS ) {
00077               perror( "ps_alloc" );
00078               exit( 1 );
00079        }
00080        if ( std_setup( psout, stdout ) == NOTOK ) {
00081               perror( "std_setup" );
00082               exit( 1 );
00083        }
00084        /* pretty print it to standard error */
00085        if ( (pserr = ps_alloc( std_open )) == NULLPS ) {
00086               perror( "ps_alloc" );
00087               exit( 1 );
00088        }
00089        if ( std_setup( pserr, stderr ) == NOTOK ) {
00090               perror( "std_setup" );
00091               exit( 1 );
00092        }
00093 
00094        while ( (pe = ps2pe( psin )) != NULLPE ) {
00095               pe2pl( pserr, pe );
00096               pe2ps( psout, pe );
00097        }
00098 
00099        exit( 0 );
00100 }