home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / Dloads / OTHERUTI / WWIV412S.ZIP / GFILES.C < prev    next >
C/C++ Source or Header  |  1990-07-25  |  7KB  |  299 lines
  1. /*****************************************************************************
  2.  
  3.                 WWIV Version 4
  4.               Copyright (C) 1988 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 <sys\stat.h>
  18. #include <stdio.h>
  19. #include <string.h>
  20. #include <time.h>
  21. #include <stdlib.h>
  22. #include <io.h>
  23. #include <fcntl.h>
  24. #include <alloc.h>
  25. #include "vardec.h"
  26. #include "fcns.h"
  27.  
  28.  
  29. extern int hangup,checkit,okmacro,two_color,lastcon,using_modem,live_user;
  30. extern char dc[81],dcd[81],odc[81];
  31. extern char charbuffer[161];
  32. extern userrec thisuser;
  33. extern int charbufferpointer,chatting;
  34. extern int usernum,useron,num_sec,helpl;
  35. extern configrec syscfg;
  36. extern int echo;
  37. extern unsigned char realsl;
  38. extern double timeon,extratimecall;
  39. extern char curspeed[80];
  40. extern int cursub,curdir,curdloads,use_workspace,global_xx;
  41. extern usersubrec usub[32],udir[32];
  42. extern statusrec status;
  43. extern int incom,outcom,msgreadlogon;
  44. extern int fsenttoday,userfile,chatcall,mailcheck,smwcheck;
  45. extern char chatreason[81],irt[81];
  46. extern subboardrec subboards[32];
  47. extern long nscandate;
  48. extern float batchtime;
  49. extern int numbatch,numbatchdl,numed,lines_listed;
  50. extern editorrec *editors;
  51. extern gfiledirrec *gfilesec;
  52. extern char xdate[9];
  53. extern int questused[20];
  54. extern unsigned int modem_speed,com_speed;
  55. extern char ctypes[NUM_CTYPES][18];
  56.  
  57.  
  58. char *get_file(char *fn, long *len)
  59. {
  60.   int i;
  61.   char *s;
  62.  
  63.   i=open(fn,O_RDWR | O_BINARY);
  64.   if (i<0) {
  65.     *len=0L;
  66.     return(NULL);
  67.   }
  68.   if ((s=malloca(filelength(i)+50))==NULL) {
  69.     *len=0L;
  70.     close(i);
  71.     return(NULL);
  72.   }
  73.   *len=(long) read(i,(void *)s, filelength(i));
  74.   close(i);
  75.   return(s);
  76. }
  77.  
  78.  
  79. gfilerec *read_sec(int sn, int *nf)
  80. {
  81.   gfilerec *g;
  82.   int f,i;
  83.   char s[81];
  84.  
  85.   i=sizeof(gfilerec)*(gfilesec[sn].maxfiles);
  86.   if ((g=malloca((long) i))==NULL) {
  87.     *nf=0;
  88.     return(NULL);
  89.   }
  90.   sprintf(s,"%s%s.GFL",syscfg.datadir,gfilesec[sn].filename);
  91.   f=open(s,O_RDWR | O_BINARY);
  92.   if (f<0)
  93.     *nf=0;
  94.   else
  95.     *nf=read(f,(void *)g,i)/sizeof(gfilerec);
  96.   close(f);
  97.   return(g);
  98. }
  99.  
  100.  
  101. void list_sec(int *map, int nmap)
  102. {
  103.   int i,abort;
  104.   char s[81];
  105.  
  106.   abort=0;
  107.   pla("",&abort);
  108.   pla("",&abort);
  109.   pla("G-Files sections available:",&abort);
  110.   pla("",&abort);
  111.   for (i=0; (i<nmap) && (!abort) && (!hangup); i++) {
  112.     s[0]=32;
  113.     if (i<=8)
  114.       itoa(i+1,&(s[1]),10);
  115.     else
  116.       itoa(i+1,s,10);
  117.     strcat(s,". ");
  118.     strcat(s,gfilesec[map[i]].name);
  119.     pla(s,&abort);
  120.   }
  121.   nl();
  122. }
  123.  
  124.  
  125. void list_gfiles(gfilerec *g, int nf)
  126. {
  127.   int i,abort;
  128.   char s[81];
  129.  
  130.   abort=0;
  131.   pla("",&abort);
  132.   pla("",&abort);
  133.   pla("G-Files in this section:",&abort);
  134.   pla("",&abort);
  135.   if ((nf==0) && (abort==0)) {
  136.     nl();
  137.     pl("None.");
  138.     nl();
  139.   }
  140.   for (i=0; (i<nf) && (!abort) && (!hangup); i++) {
  141.     s[0]=32;
  142.     if (i<=8)
  143.       itoa(i+1,&(s[1]),10);
  144.     else
  145.       itoa(i+1,s,10);
  146.     strcat(s,". ");
  147.     strcat(s,g[i].description);
  148.     pla(s,&abort);
  149.   }
  150.   nl();
  151.   if ((!abort) && (cs())) {
  152.     pl("A. Add G-files");
  153.     pl("D. Delete G-files");
  154.     nl();
  155.   }
  156. }
  157.  
  158.  
  159. void gfile_sec(int sn)
  160. {
  161.   gfilerec *g;
  162.   int i,done,nf,i1;
  163.   char xdc[81],*ss,*ss1,s[81];
  164.  
  165.   g=read_sec(sn,&nf);
  166.   if (g==NULL)
  167.     return;
  168.   strcpy(xdc,odc);
  169.   for (i=0; i<20; i++)
  170.     odc[i]=0;
  171.   for (i=1; i<=nf/10; i++)
  172.     odc[i-1]=i+'0';
  173.   list_gfiles(g,nf);
  174.   done=0;
  175.   while ((!done) && (!hangup)) {
  176.     nl();
  177.     tleft(1);
  178.     prt(2,"Which G-file (Q=Quit) ? ");
  179.     ss=mmkey(2);
  180.     i=atoi(ss);
  181.     if (strcmp(ss,"Q")==0)
  182.       done=1;
  183.     else
  184.       if ((strcmp(ss,"A")==0) && (cs())) {
  185.     farfree(g);
  186.     fill_sec(sn);
  187.         g=read_sec(sn,&nf);
  188.         if (g==NULL)
  189.           return;
  190.         for (i=0; i<20; i++)
  191.           odc[i]=0;
  192.         for (i=1; i<=nf/10; i++)
  193.           odc[i-1]=i+'0';
  194.       } else
  195.     if ((strcmp(ss,"D")==0) && (cs())) {
  196.       nl();
  197.       prt(2,"G-file number to delete? ");
  198.           ss1=mmkey(2);
  199.       i=atoi(ss1);
  200.       if ((i>0) && (i<=nf)) {
  201.             sprintf(s,"Remove %s? ",g[i-1].description);
  202.         prt(5,s);
  203.         if (yn()) {
  204.           prt(5,"Erase file too? ");
  205.           if (yn()) {
  206.                 sprintf(s,"%s%s\\%s",syscfg.gfilesdir,
  207.                       gfilesec[sn].filename,g[i-1].filename);
  208.         unlink(s);
  209.           }
  210.               for (i1=i; i1<nf; i1++)
  211.         g[i1-1]=g[i1];
  212.           --nf;
  213.               sprintf(s,"%s%s.GFL",syscfg.datadir,gfilesec[sn].filename);
  214.               i=open(s,O_RDWR | O_BINARY | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
  215.               write(i,(void *)g,nf*sizeof(gfilerec));
  216.               close(i);
  217.               nl();
  218.           pl("Deleted.");
  219.           nl();
  220.         }
  221.       }
  222.     } else
  223.           if (strcmp(ss,"?")==0)
  224.         list_gfiles(g,nf);
  225.       else
  226.             if ((i>0) && (i<=nf)) {
  227.               sprintf(s,"%s\\%s",gfilesec[sn].filename,g[i-1].filename);
  228.           i1=printfile(s);
  229.           if (i1==0) {
  230.                 sprintf(s,"Read G-file '%s'",g[i-1].filename);
  231.             sysoplog(s);
  232.           }
  233.             }
  234.   }
  235.   farfree(g);
  236.   strcpy(odc,xdc);
  237. }
  238.  
  239.  
  240. void gfiles()
  241. {
  242.   int i,i1,i2,done,abort,map[32],nmap,ok;
  243.   char s[81],s1[81],s2[81],*ss;
  244.  
  245.   done=0;
  246.   nmap=0;
  247.   for (i=0; i<20; i++)
  248.     odc[i]=0;
  249.   for (i=0; i<num_sec; i++) {
  250.     ok=1;
  251.     if (thisuser.age<gfilesec[i].age)
  252.       ok=0;
  253.     if (thisuser.sl<gfilesec[i].sl)
  254.       ok=0;
  255.     if (((thisuser.ar & gfilesec[i].ar)==0) && (gfilesec[i].ar))
  256.       ok=0;
  257.     if (ok) {
  258.       map[nmap++]=i;
  259.       if ((nmap % 10)==0)
  260.     odc[nmap/10-1]='0'+(nmap/10);
  261.     }
  262.   }
  263.   if (nmap==0) {
  264.     nl();
  265.     pl("No G-file sections available.");
  266.     nl();
  267.     return;
  268.   }
  269.   list_sec(map,nmap);
  270.   while ((!done) && (!hangup)) {
  271.     nl();
  272.     tleft(1);
  273.     prt(2,"Which section (Q=Quit) ? ");
  274.     ss=mmkey(2);
  275.     if (strcmp(ss,"Q")==0)
  276.       done=1;
  277.     else
  278.       if (strcmp(ss,"?")==0)
  279.     list_sec(map,nmap);
  280.       else
  281.     if ((strcmp(ss,"A")==0) && (cs())) {
  282.       i1=0;
  283.       for (i=0; (i<nmap) && (!i1); i++) {
  284.         nl();
  285.         print("Now loading files for ",gfilesec[map[i]].name,"");
  286.         nl();
  287.         i1=fill_sec(map[i]);
  288.       }
  289.     } else {
  290.           i=atoi(ss);
  291.           if ((i>0) && (i<=nmap)) {
  292.         gfile_sec(map[i-1]);
  293.           }
  294.         }
  295.   }
  296. }
  297.  
  298.  
  299.