home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / UTIL / WWIVE / VOTEEDIT.C < prev    next >
Text File  |  1992-06-16  |  4KB  |  176 lines
  1. /*****************************************************************************
  2.  
  3.                 WWIV Version 4
  4.                     Copyright (C) 1988-1991 by Wayne Bell
  5.  
  6. Distribution of the source code for WWIV, in any form, modified or unmodified,
  7. without PRIOR, WRITTEN APPROVAL by the author, is expressly prohibited.
  8. Distribution of compiled versions of WWIV is limited to copies compiled BY
  9. THE AUTHOR.  Distribution of any copies of WWIV not compiled by the author
  10. is expressly prohibited.
  11.  
  12.  
  13. *****************************************************************************/
  14.  
  15.  
  16.  
  17. #include "vars.h"
  18.  
  19. #pragma hdrstop
  20.  
  21.  
  22.  
  23. void print_quests(int f)
  24. {
  25.   char s[100];
  26.   int i,abort;
  27.   votingrec v;
  28.  
  29.   abort=0;
  30.   for (i=1; (i<=20) && (abort==0); i++) {
  31.     lseek(f,((long) (i-1)) * sizeof(votingrec), SEEK_SET);
  32.     read(f,(void *)&v,sizeof(votingrec));
  33.     sprintf(s,"7[1%2d7]3:5 %s",i,
  34.       v.numanswers?v.question:"7>>> 1NO QUESTION 7<<<");
  35.     pla(s,&abort);
  36.   }
  37.   nl();
  38.   if (abort)
  39.     nl();
  40. }
  41.  
  42.  
  43. void set_question(int f, int ii)
  44. {
  45.   votingrec v,v1;
  46.   int i,i1,i2;
  47.   char s[81];
  48.   userrec u;
  49.   voting_response vr;
  50.  
  51.   pl("1Enter new question7, 5<3C5/3R5> 1for none1.");
  52.   outstr("3:5 ");
  53.   inputl(s,75);
  54.   strcpy(v.question,s);
  55.   v.numanswers=0;
  56.   vr.numresponses=0;
  57.   vr.response[0]='X';
  58.   vr.response[1]=0;
  59.   for (i=0; i<20; i++)
  60.     v.responses[i]=vr;
  61.   while ((v.numanswers<19) && (s[0])) {
  62.     npr("7[1%d7]3:5 ",v.numanswers+1);
  63.     inputl(s,63);
  64.     strcpy(vr.response,s);
  65.     vr.numresponses=0;
  66.     v.responses[v.numanswers]=vr;
  67.     if (s[0])
  68.       ++v.numanswers;
  69.   }
  70.   lseek(f,((long) (ii)) * sizeof(votingrec), SEEK_SET);
  71.   write(f,(void *)(&v),sizeof(votingrec));
  72.   lseek(f,((long) (ii)) * sizeof(votingrec), SEEK_SET);
  73.   read(f,(void *)(&v1),sizeof(votingrec));
  74.   close(f);
  75.   if (v.numanswers)
  76.     questused[ii]=1;
  77.   else
  78.     questused[ii]=0;
  79.  
  80.   read_user(1,&u);
  81.   i1=number_userrecs();
  82.   for (i=1; i<=i1; i++) {
  83.     read_user(i,&u);
  84.     u.votes[ii]=0;
  85.     write_user(i,&u);
  86.   }
  87.   close_user();
  88. }
  89.  
  90.  
  91. void ivotes()
  92. {
  93.   int i,f,abort,n,done;
  94.   char s[81];
  95.   votingrec v;
  96.  
  97.   close_user();
  98.   sprintf(s,"%sVOTING.DAT",syscfg.datadir);
  99.   f=open(s,O_RDWR | O_BINARY | O_CREAT, S_IREAD | S_IWRITE);
  100.   n=(int) (filelength(f) / sizeof(votingrec)) -1;
  101.   if (n<20) {
  102.     v.question[0]=0;
  103.     v.numanswers=0;
  104.     for (i=n; i<20; i++)
  105.       write(f,(void *)&v,sizeof(votingrec));
  106.   }
  107.   done=0;
  108.   do {
  109.     print_quests(f);
  110.     nl();
  111.     prt(1,"Which 5(1Q3=1Quit5) 7? ");
  112.     input(s,2);
  113.     if (strcmp(s,"Q")==0)
  114.       done=1;
  115.     i=atoi(s);
  116.     if ((i>0) && (i<21)) {
  117.       set_question(f,i-1);
  118.       sprintf(s,"%sVOTING.DAT",syscfg.datadir);
  119.       f=open(s,O_RDWR | O_BINARY | O_CREAT, S_IREAD | S_IWRITE);
  120.     }
  121.   } while ((!done) && (!hangup));
  122.   close(f);
  123. }
  124.  
  125.  
  126. void voteprint()
  127. {
  128.   int f,f1,i,i1,i2,i3,nu;
  129.   char s[81],s1[81],s2[81];
  130.   votingrec v;
  131.   char *x;
  132.   userrec u;
  133.  
  134.   read_user(1,&u);
  135.   nu=number_userrecs();
  136.   if ((x=malloca(20*(2+nu)))==NULL)
  137.     return;
  138.   for (i=0; i<nu; i++) {
  139.     read_user(i,&u);
  140.     for (i1=0; i1<20; i1++)
  141.       x[i1+i*20]=u.votes[i1];
  142.   }
  143.   close_user();
  144.   sprintf(s,"%sVOTING.TXT",syscfg.gfilesdir);
  145.   f=open(s,O_RDWR | O_BINARY | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
  146.   sprintf(s,"%sVOTING.DAT",syscfg.datadir);
  147.   f1=open(s,O_RDWR | O_BINARY);
  148.   sprintf(s,"Voting results as of %s\r\n\r\n",date());
  149.   write(f,(void *)s,strlen(s));
  150.  
  151.   for (i=0; i<20; i++) {
  152.     lseek(f1,((long)i)*sizeof(votingrec),SEEK_SET);
  153.     read(f1,(void *)&v,sizeof(votingrec));
  154.     if (v.numanswers) {
  155.       pl(v.question);
  156.       sprintf(s,"\r\n%s\r\n",v.question);
  157.       write(f,s,strlen(s));
  158.       for (i1=0; i1<v.numanswers; i1++) {
  159.     sprintf(s,"     %s\r\n",v.responses[i1].response);
  160.     write(f,s,strlen(s));
  161.     for (i2=0; i2<status.users; i2++)
  162.           if (x[i+20*smallist[i2].number]==i1+1) {
  163.         sprintf(s,"          %s #%d\r\n",smallist[i2].name,smallist[i2].number);
  164.         write(f,s,strlen(s));
  165.       }
  166.       }
  167.     }
  168.   }
  169.  
  170.   close(f1);
  171.   close(f);
  172.   farfree(x);
  173. }
  174.  
  175.  
  176.