DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download
Index: T c

⟦70de4982e⟧ TextFile

    Length: 732 (0x2dc)
    Types: TextFile
    Names: »chkok.c«

Derivation

└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
    └─⟦this⟧ »EUUGD18/General/Empire.V/V1.1/EMPSUBS/chkok.c«

TextFile

#define D_SECTDES
#define D_SCTSTR
#define D_FILES
#include        <stdio.h>
#include        "empdef.h"

chkok(message)
char    *message;
{
        register        i;
        char    jnk[80];

        if( sect.sct_desig != S_HIWAY ) goto X160;
        if( sect.sct_chkpt != 0 ) goto X160;
X26:    
        return(0);
X32:    
        printf("Checkpoint▶07◀!\tcode:");
        fflush(stdout);
        signal(02, 01);
        sread(jnk, 10);
        i = atoi(jnk);
        printf("\n");
        if( i == sect.sct_chkpt ) goto X26;
        printf("Permission denied\n");
        if( i == 0 ) goto X176;
        return(-2);
X160:   
        if( sect.sct_chkpt != 0 ) goto X32;
        printf("%s", message);
X176:   
        return(-1);
}