/*
    ENV.C
    Version 1
    29.03.92
*/

#include <stdio.h>
#include <stdlib.h>

#define         NIL             (void *)0L

char    Nichts[] = "<NIL>";

const char *pruefe_argument( const char *argument )
/*
        Unterprogramm zum Pruefen eines Strings
        Prueft voher auf Gueltigkeit des Zeigers
        Wenn der Zeiger nicht gueltig ist wird
        ein Zeiger auf den Text '<NIL>'zurueckgegebeben
*/ 
{
        if ( argument == (char *)0L )
                argument = Nichts;
        return ( argument );
}

int     main (
                int           anzahl_der_argumente,
                const char    *feld_der_argumente[],
                const char    *feld_der_umgebung[]
        )
{
        int     index;

        if ( anzahl_der_argumente <= 0 ) {
                printf( " Unmoeglicher Fehler, Anzahl <= 0\n" );
                exit( 1 );
        };

        /* Der Parameter im Feld 0 ist der Programm-Name */
        printf( " Programm-Name: \"%s\"\n", 
                        pruefe_argument( feld_der_argumente[ 0 ] )
                                        );

        /* dann folgen die Parameter */
        for ( index = 1; index < anzahl_der_argumente; index ++ ) {
                printf( " %2d. Parameter: \"%s\"\n", index,
                                pruefe_argument( feld_der_argumente[ index ] )
                        );
        };

        /* dann folgen die Umgebungs Variablen */
        for ( index = 0; feld_der_umgebung[ index ] != NIL ; index ++ ) {
                printf( "%3d. Enviroment: \"%s\"\n", index + 1,
                                feld_der_umgebung[ index ]
                        );
        };
                
        return 0;
}

/* ENDE DER DATEI */