BSD 4_1_snap development

[unix-history] / usr / src / games / mille / varpush.c

# include       "mille.h"

int     read(), write();

/*
*      push variables around via the routine func() on the file
* channel file.  func() is either read or write.
*/
varpush(file, func)
reg int file;
reg int (*func)(); {

       int     temp;

       (*func)(file, &Debug, sizeof Debug);
       (*func)(file, &Finished, sizeof Finished);
       (*func)(file, &Order, sizeof Order);
       (*func)(file, &End, sizeof End);
       (*func)(file, &On_exit, sizeof On_exit);
       (*func)(file, &Handstart, sizeof Handstart);
       (*func)(file, &Numgos, sizeof Numgos);
       (*func)(file,  Numseen, sizeof Numseen);
       (*func)(file, &Play, sizeof Play);
       (*func)(file, &Window, sizeof Window);
       (*func)(file,  Deck, sizeof Deck);
       (*func)(file, &Discard, sizeof Discard);
       (*func)(file,  Player, sizeof Player);
       if (func == read) {
               read(file, &temp, sizeof temp);
               Topcard = &Deck[temp];
               if (Debug) {
                       char    buf[80];
over:
                       printf("Debug file:");
                       gets(buf);
                       if ((outf = fopen(buf, "w")) == NULL) {
                               perror(buf);
                               goto over;
                       }
                       if (strcmp(buf, "/dev/null") != 0)
                               setbuf(outf, 0);
               }
       }
       else {
               temp = Topcard - Deck;
               write(file, &temp, sizeof temp);
       }
}