home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / Dloads / OTHERUTI / WWIV412S.ZIP / VOTEEDIT.C < prev    next >
C/C++ Source or Header  |  1990-07-25  |  5KB  |  213 lines
  1.  
  2. /*****************************************************************************
  3.  
  4.                 WWIV Version 4
  5.               Copyright (C) 1988 by Wayne Bell
  6.  
  7. Distribution of the source code for WWIV, in any form, modified or unmodified,
  8. without PRIOR, WRITTEN APPROVAL by the author, is expressly prohibited.
  9. Distribution of compiled versions of WWIV is limited to copies compiled BY
  10. THE AUTHOR.  Distribution of any copies of WWIV not compiled by the author
  11. is expressly prohibited.
  12.  
  13.  
  14. *****************************************************************************/
  15.  
  16.  
  17.  
  18. #include "vardec.h"
  19. #include "fcns.h"
  20. #include <string.h>
  21. #include <stdlib.h>
  22. #include <stdio.h>
  23. #include <io.h>
  24. #include <fcntl.h>
  25. #include <sys\stat.h>
  26. #include <time.h>
  27.  
  28.  
  29. extern subboardrec subboards[32];
  30. extern directoryrec directories[64];
  31. extern int num_subs, num_dirs,hangup,userfile,echo,useron,wfc,userfile,usernum;
  32. extern int incom,fwaiting;
  33. extern configrec syscfg;
  34. extern statusrec status;
  35. extern char ctypes[NUM_CTYPES][18];
  36. extern char cdir[81];
  37. extern userrec thisuser;
  38. extern int numextrn, numchain;
  39. extern chainfilerec *chains;
  40. extern externalrec *externs;
  41. extern unsigned char agemin,agemax,slmin,slmax,dslmin,dslmax,ressex;
  42. extern int daysmin,daysmax,lecho,helpl;
  43. extern unsigned short arres,darres,resres;
  44. extern int questused[20];
  45. extern unsigned char realsl;
  46.  
  47. extern smalrec *smallist;
  48.  
  49.  
  50. void print_quests(int f)
  51. {
  52.   char s[100];
  53.   int i,abort;
  54.   votingrec v;
  55.  
  56.   abort=0;
  57.   for (i=1; (i<=20) && (abort==0); i++) {
  58.     lseek(f,((long) (i-1)) * sizeof(votingrec), SEEK_SET);
  59.     read(f,(void *)&v,sizeof(votingrec));
  60.     s[0]=32;
  61.     if (i<10)
  62.       itoa(i,&s[1],10);
  63.     else
  64.       itoa(i,&s[0],10);
  65.     strcat(s,": ");
  66.     if (v.numanswers)
  67.       strcat(s,v.question);
  68.     else
  69.       strcat(s,">>> NO QUESTION <<<");
  70.     pla(s,&abort);
  71.   }
  72.   nl();
  73.   if (abort)
  74.     nl();
  75. }
  76.  
  77.  
  78. void set_question(int f, int ii)
  79. {
  80.   votingrec v,v1;
  81.   int i,i1,i2;
  82.   char s[81];
  83.   userrec u;
  84.   voting_response vr;
  85.  
  86.   pl("Enter new question, <C/R> for none.");
  87.   outstr(": ");
  88.   inputl(s,75);
  89.   strcpy(v.question,s);
  90.   v.numanswers=0;
  91.   vr.numresponses=0;
  92.   vr.response[0]='X';
  93.   vr.response[1]=0;
  94.   for (i=0; i<20; i++)
  95.     v.responses[i]=vr;
  96.   while ((v.numanswers<19) && (s[0])) {
  97.     itoa(v.numanswers+1,s,10);
  98.     strcat(s,": ");
  99.     outstr(s);
  100.     inputl(s,63);
  101.     strcpy(vr.response,s);
  102.     vr.numresponses=0;
  103.     v.responses[v.numanswers]=vr;
  104.     if (s[0])
  105.       ++v.numanswers;
  106.   }
  107.   lseek(f,((long) (ii)) * sizeof(votingrec), SEEK_SET);
  108.   write(f,(void *)(&v),sizeof(votingrec));
  109.   lseek(f,((long) (ii)) * sizeof(votingrec), SEEK_SET);
  110.   read(f,(void *)(&v1),sizeof(votingrec));
  111.   close(f);
  112.   if (v.numanswers)
  113.     questused[ii]=1;
  114.   else
  115.     questused[ii]=0;
  116.  
  117.   read_user(1,&u);
  118.   i1=(int) (filelength(userfile)/sizeof(userrec)) -1;
  119.   for (i=1; i<=i1; i++) {
  120.     read_user(i,&u);
  121.     u.votes[ii]=0;
  122.     write_user(i,&u);
  123.   }
  124.   close_user();
  125. }
  126.  
  127.  
  128. void ivotes()
  129. {
  130.   int i,f,abort,n,done;
  131.   char s[81];
  132.   votingrec v;
  133.  
  134.   close_user();
  135.   sprintf(s,"%sVOTING.DAT",syscfg.datadir);
  136.   f=open(s,O_RDWR | O_BINARY | O_CREAT, S_IREAD | S_IWRITE);
  137.   n=(int) (filelength(f) / sizeof(votingrec)) -1;
  138.   if (n<20) {
  139.     v.question[0]=0;
  140.     v.numanswers=0;
  141.     for (i=n; i<20; i++)
  142.       write(f,(void *)&v,sizeof(votingrec));
  143.   }
  144.   done=0;
  145.   do {
  146.     print_quests(f);
  147.     nl();
  148.     prt(2,"Which (Q=Quit) ? ");
  149.     input(s,2);
  150.     if (strcmp(s,"Q")==0)
  151.       done=1;
  152.     i=atoi(s);
  153.     if ((i>0) && (i<21)) {
  154.       set_question(f,i-1);
  155.       sprintf(s,"%sVOTING.DAT",syscfg.datadir);
  156.       f=open(s,O_RDWR | O_BINARY | O_CREAT, S_IREAD | S_IWRITE);
  157.     }
  158.   } while ((!done) && (!hangup));
  159.   close(f);
  160. }
  161.  
  162.  
  163. void voteprint()
  164. {
  165.   int f,f1,i,i1,i2,i3,nu;
  166.   char s[81],s1[81],s2[81];
  167.   votingrec v;
  168.   char *x;
  169.   userrec u;
  170.  
  171.   read_user(1,&u);
  172.   nu=filelength(userfile)/sizeof(userrec);
  173.   if ((x=malloca(20*(2+nu)))==NULL)
  174.     return;
  175.   for (i=0; i<nu; i++) {
  176.     read_user(i,&u);
  177.     for (i1=0; i1<20; i1++)
  178.       x[i1+i*20]=u.votes[i1];
  179.   }
  180.   close_user();
  181.   sprintf(s,"%svoting.txt",syscfg.gfilesdir);
  182.   f=open(s,O_RDWR | O_BINARY | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
  183.   sprintf(s,"%svoting.dat",syscfg.datadir);
  184.   f1=open(s,O_RDWR | O_BINARY);
  185.   sprintf(s,"Voting results as of %s\r\n\r\n",date());
  186.   write(f,(void *)s,strlen(s));
  187.  
  188.   for (i=0; i<20; i++) {
  189.     lseek(f1,((long)i)*sizeof(votingrec),SEEK_SET);
  190.     read(f1,(void *)&v,sizeof(votingrec));
  191.     if (v.numanswers) {
  192.       pl(v.question);
  193.       sprintf(s,"\r\n%s\r\n",v.question);
  194.       write(f,s,strlen(s));
  195.       for (i1=0; i1<v.numanswers; i1++) {
  196.     sprintf(s,"     %s\r\n",v.responses[i1].response);
  197.     write(f,s,strlen(s));
  198.     for (i2=0; i2<status.users; i2++)
  199.           if (x[i+20*smallist[i2].number]==i1+1) {
  200.         sprintf(s,"          %s #%d\r\n",smallist[i2].name,smallist[i2].number);
  201.         write(f,s,strlen(s));
  202.       }
  203.       }
  204.     }
  205.   }
  206.  
  207.   close(f1);
  208.   close(f);
  209.   farfree(x);
  210. }
  211.  
  212.  
  213.