Return to log.c CVS log

Up to [Research Unix] / researchv10no / games / trek

Annotation of researchv10no/games/trek/log.c, revision 1.1.1.1

1.1       root        1: # include "trek.h"
                      2: 
                      3: # define       LOGFILE "/usr/src/games/trek/log"
                      4: 
                      5: /**
                      6:  **    write out log
                      7:  **/
                      8: 
                      9: extern long    score();
                     10: extern CVNTAB  Skitab[];
                     11: extern CVNTAB  Lentab[];
                     12: 
                     13: char *reason[] {
                     14:        "win......",
                     15:        "time.....",
                     16:        "energy...",
                     17:        "destroyed",
                     18:        "barrier..",
                     19:        "nova.....",
                     20:        "supernova",
                     21:        "suffocate",
                     22:        "no help..",
                     23:        "too fast.",
                     24:        "burned...",
                     25:        "destruct.",
                     26:        "captured.",
                     27:        "no crew..",
                     28:        "cheating."
                     29: };
                     30: 
                     31: int    stdout;
                     32: 
                     33: long writelog(n)
                     34: int    n;
                     35: {
                     36:        register int            f, uid;
                     37:        long                    s;
                     38:        char                    *date;
                     39: 
                     40:        s=score();
                     41:        if(Game.tourn && (f=open(LOGFILE,1))>=0) {
                     42:                uid=getuid()&0377;
                     43:                date=ctime(&inittime); date[10]=0;
                     44:                lseek(f,0L,2);
                     45:                stdout=f;
                     46:                printf("%d\t%s\t%D\t%s\t%s\t%s\t%.2f%c\t%d/%d\t%d\t%d\t%d\t%d\t%d\n",
                     47:                        uid,
                     48:                        date+4,
                     49:                        s,
                     50:                        reason[n],
                     51:                        (Skitab[Game.skill-1].abrev),
                     52:                        (Lentab[Game.length].abrev),
                     53:                        Status.date-Initial.date,
                     54:                        Status.ship,
                     55:                        Game.gkillk, Game.gkillk+Status.kling,
                     56:                        Game.helps,
                     57:                        Game.killb,
                     58:                        Game.kills,
                     59:                        Game.killinhab,
                     60:                        Game.deaths
                     61:                        );
                     62:                stdout=1;
                     63:                close(f);
                     64:        }
                     65:        return(s);
                     66: }
                     67: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.