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 t

⟦89d2ad8d7⟧ TextFile

    Length: 934 (0x3a6)
    Types: TextFile
    Names: »turn.c«

Derivation

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

TextFile

#define D_TELSTR
#define D_FILES
#include        "empdef.h"

turn()
{
        register char   *cp;
        char    buf[512], *getstar();

        cp = getstar(argp[1], "on, off or message? ");
        switch( *(cp+1) ) {
        case 'n':
                unlink(downfil);
                telf = creat(upfil, 0600);
                printf("on ");
                break;
        case 'f':
                unlink(upfil);
                telf = creat(downfil, 0600);
                printf("off ");
                break;
        default:
                telf = creat(upfil, 0600);
                break;
        }
        time(&tgm.tel_date);
        if( (tgm.tel_length = getele("The World", buf, argp[2]) + 1) <=  0 ) {
                printf("Ignored");
                return(SYN_RETURN);
        }
        write(telf, &tgm, sizeof(tgm));
        write(telf, buf, tgm.tel_length);
        close(telf);
        return(NORM_RETURN);
}