home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / UTIL / WWIVE / DIREDIT.C < prev    next >
Text File  |  1991-12-26  |  8KB  |  351 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 dirdata(int n, char *s)
  24. {
  25.   char x,y,k,i;
  26.   directoryrec r;
  27.  
  28.   r=directories[n];
  29.   if (r.dar==0)
  30.     x=32;
  31.   else {
  32.     for (i=0; i<16; i++)
  33.       if ((1 << i) & r.dar)
  34.         x='A'+i;
  35.   }
  36.   sprintf(s,"3%2d  %1c  %-40s  %-8s %-3d %-3d %-3d %-9.9s",
  37.         n,x,r.name,r.filename,r.dsl,r.age,r.maxfiles,r.path);
  38. }
  39.  
  40. void showdirs()
  41. {
  42.   int abort,i;
  43.   char s[180];
  44.  
  45.   outchr(12);
  46.   abort=0;
  47.   pla("3NN DAR Name                                      FN       DSL AGE FIL PATH",
  48.       &abort);
  49.   pla("7═══════════════════════════════════════════════════════════════════════════════",
  50.       &abort);
  51.   for (i=0; (i<num_dirs) && (!abort); i++) {
  52.     dirdata(i,s);
  53.     pla(s,&abort);
  54.   }
  55. }
  56.  
  57.  
  58.  
  59. void modify_dir(int n)
  60. {
  61.   directoryrec r;
  62.   char s[81],s1[81],ch,ch2,*ss;
  63.   int i,i1,done;
  64.  
  65.   r=directories[n];
  66.   done=0;
  67.   do {
  68.     outchr(12);
  69.     npr("1A.3 Name      1 :7 %s\r\n",r.name);
  70.     npr("1B.3 Filename  1 :7 %s\r\n",r.filename);
  71.     npr("1C.3 Path      1 :7 '%s'\r\n",r.path);
  72.     npr("1D.3 DSL       1 :7 %d\r\n",r.dsl);
  73.     npr("1E.3 Min. Age  1 :7 %d\r\n",r.age);
  74.     npr("1F.3 Max Files 1 :7 %d\r\n",r.maxfiles);
  75.     strcpy(s,"None.");
  76.     if (r.dar!=0) {
  77.       for (i=0; i<16; i++)
  78.         if ((1 << i) & r.dar)
  79.           s[0]='A'+i;
  80.       s[1]=0;
  81.     }
  82.     npr("1G.3 DAR       1 :7 %s\r\n",s);
  83.     npr("1H.3 Mask      1 :7 %d\r\n",r.mask);
  84.     npr("1I.3 Dir Type  1 :7 %u\r\n",r.type);
  85.     npr("1J.3 Uploads   1 :7 %s\r\n",
  86.     (r.mask & mask_no_uploads) ? "Disallowed" : "Allowed");
  87.     npr("1K.3 Arch. only1 :7 %s\r\n",
  88.     (r.mask & mask_archive) ? "Yes" : "No");
  89.     nl();
  90.     prt(7,"[1Which7] 5(7A-J,Q5)1 ? ");
  91.     ch=onek("QABCDEFGHIJK");
  92.     switch(ch) {
  93.       case 'Q':done=1; break;
  94.       case 'A':
  95.         nl();
  96.     prt(1,"New name? ");
  97.     inputl(s,40);
  98.     if (s[0])
  99.       strcpy(r.name,s);
  100.     break;
  101.       case 'B':
  102.         nl();
  103.     prt(1,"New filename? ");
  104.     input(s,8);
  105.     if ((s[0]!=0) && (strchr(s,'.')==0))
  106.       strcpy(r.filename,s);
  107.     break;
  108.       case 'C':
  109.         nl();
  110.     pl("1Enter new path, optionally with drive specifier.");
  111.     pl("1No backslash on end.");
  112.     prt(1,"New Path? ");
  113.     input(s,80);
  114.         if (s[0]) {
  115.           if (chdir(s)) {
  116.             chdir(cdir);
  117.             if (mkdir(s)) {
  118.               pl("Unable to create or change to directory.");
  119.               pl("Hit any key.");
  120.               getkey();
  121.               s[0]=0;
  122.             }
  123.           } else {
  124.             chdir(cdir);
  125.           }
  126.           if (s[0]) {
  127.             strcat(s,"\\");
  128.             strcpy(r.path,s);
  129.         pl("3Path for directory changed.");
  130.         pl("3If there are any files in it, you must");
  131.         pl("3manually move them to the new directory.");
  132.         pl("3Hit any key.");
  133.         getkey();
  134.       }
  135.     }
  136.     break;
  137.       case 'D':
  138.         nl();
  139.     prt(1,"New DSL? ");
  140.     input(s,3);
  141.     i=atoi(s);
  142.     if ((i>=0) && (i<256) && (s[0]))
  143.       r.dsl=i;
  144.     break;
  145.       case 'E':
  146.         nl();
  147.     prt(1,"New Min Age? ");
  148.     input(s,3);
  149.     i=atoi(s);
  150.     if ((i>=0) && (i<128) && (s[0]))
  151.       r.age=i;
  152.     break;
  153.       case 'F':
  154.         nl();
  155.     prt(1,"New max files? ");
  156.     input(s,3);
  157.     i=atoi(s);
  158.     if ((i>0) && (i<500) && (s[0]))
  159.       r.maxfiles=i;
  160.     break;
  161.       case 'G':
  162.         nl();
  163.     prt(7,"New DAR 5(1<SPC>=None5) 1? ");
  164.     ch2=onek("ABCDEFGHIJKLMNOP ");
  165.     if (ch2==32)
  166.       r.dar=0;
  167.     else
  168.       r.dar=1 << (ch2-'A');
  169.     break;
  170.       case 'H':
  171.         nl();
  172.     prt(1,"New Mask? ");
  173.     input(s,3);
  174.     i=atoi(s);
  175.     if ((i>=0) && (i<32767) && (s[0]))
  176.       r.mask=i;
  177.     break;
  178.       case 'I':
  179.         nl();
  180.     prt(1,"New Dir Type? ");
  181.     input(s,4);
  182.     i=atoi(s);
  183.     if (s[0])
  184.       r.type=i;
  185.     break;
  186.       case 'J':
  187.         r.mask &= ~mask_no_uploads;
  188.         nl();
  189.     prt(1,"Allow uploads to this directory? ");
  190.     if (!ny())
  191.       r.mask |= mask_no_uploads;
  192.     break;
  193.       case 'K':
  194.         r.mask &= ~mask_archive;
  195.         nl();
  196.     prt(1,"Require uploads to be archived? ");
  197.     if (yn())
  198.       r.mask |= mask_archive;
  199.     break;
  200.     }
  201.   } while ((!done) && (!hangup));
  202.   directories[n]=r;
  203. }
  204.  
  205.  
  206. void insert_dir(int n)
  207. {
  208.   directoryrec r;
  209.   int i,i1,nu;
  210.   userrec u;
  211.   long l1,l2,l3;
  212.  
  213.   for (i=num_dirs-1; i>=n; i--) {
  214.     directories[i+1]=directories[i];
  215.     dir_dates[i+i]=dir_dates[i];
  216.   }
  217.   strcpy(r.name,"** NEW DIR **");
  218.   strcpy(r.filename,"NONAME");
  219.   strcpy(r.path,syscfg.dloadsdir);
  220.   r.dsl=10;
  221.   r.age=0;
  222.   r.maxfiles=50;
  223.   r.dar=0;
  224.   r.type=0;
  225.   r.mask=0;
  226.   directories[n]=r;
  227.   ++num_dirs;
  228.   read_user(1,&u);
  229.   nu=number_userrecs();
  230.   if (n>=32) {
  231.     l1=0xffffffff >>(64-n);
  232.     l2=0xffffffff <<(n-31);
  233.     l3=1L << (n-32);
  234.     for (i=1; i<=nu; i++) {
  235.       read_user(i,&u);
  236.       u.nscn2=(u.nscn2 & l1) | ((u.nscn2 << 1) & l2) | l3;
  237.       write_user(i,&u);
  238.     }
  239.   } else {
  240.     l1=0xffffffff >>(32-n);
  241.     l2=0xffffffff <<(n+1);
  242.     l3=1L << n;
  243.     for (i=1; i<=nu; i++) {
  244.       read_user(i,&u);
  245.       u.nscn2=(u.nscn2 << 1) | (u.nscn1 >> 31);
  246.       u.nscn1=(u.nscn1 & l1) | ((u.nscn1 << 1) & l2) | l3;
  247.       write_user(i,&u);
  248.     }
  249.   }
  250.   modify_dir(n);
  251. }
  252.  
  253.  
  254. void delete_dir(int n)
  255. {
  256.   int i,i1,nu;
  257.   userrec u;
  258.   long l1,l2;
  259.  
  260.   for (i=n; i<num_dirs; i++) {
  261.     directories[i]=directories[i+1];
  262.     dir_dates[i]=dir_dates[i+1];
  263.   }
  264.   --num_dirs;
  265.   read_user(1,&u);
  266.   nu=number_userrecs();
  267.   if (n>=32) {
  268.     l1=0xffffffff >>(64-n);
  269.     l2=0xffffffff <<(n-32);
  270.     for (i=1; i<=nu; i++) {
  271.       read_user(i,&u);
  272.       u.nscn2=(u.nscn2 & l1) | ((u.nscn2 >> 1) & l2);
  273.       write_user(i,&u);
  274.     }
  275.   } else {
  276.     l1=0xffffffff >>(32-n);
  277.     l2=0xffffffff <<(n);
  278.     for (i=1; i<=nu; i++) {
  279.       read_user(i,&u);
  280.       u.nscn1=(u.nscn1 & l1) | ((u.nscn1 >> 1) & l2) | (u.nscn2 << 31);
  281.       u.nscn2=u.nscn2 >> 1;
  282.       write_user(i,&u);
  283.     }
  284.   }
  285. }
  286.  
  287.  
  288. void dlboardedit()
  289. {
  290.   int i,i1,i2,done,f;
  291.   char s[81],s1[81],s2[81],ch;
  292.  
  293.   if (!checkpw())
  294.     return;
  295.   showdirs();
  296.   done=0;
  297.   do {
  298.     nl();
  299.     prt(1,"Dirs:7 D1:elete, 7I1:nsert,7 M1:odify,7 Q1:uit, ? : ");
  300.     ch=onek("QDIM?");
  301.     switch(ch) {
  302.       case '?':
  303.         showdirs();
  304.         break;
  305.       case 'Q':
  306.         done=1;
  307.         break;
  308.       case 'M':
  309.         nl();
  310.     prt(1,"Dir number? ");
  311.     input(s,2);
  312.     i=atoi(s);
  313.     if ((s[0]!=0) && (i>=0) && (i<num_dirs))
  314.       modify_dir(i);
  315.     break;
  316.       case 'I':
  317.         if (num_dirs<64) {
  318.           nl();
  319.       prt(1,"Insert before which dir? ");
  320.       input(s,2);
  321.       i=atoi(s);
  322.       if ((s[0]!=0) && (i>=0) && (i<=num_dirs))
  323.         insert_dir(i);
  324.     }
  325.     break;
  326.       case 'D':
  327.         nl();
  328.     prt(1,"Delete which dir? ");
  329.     input(s,2);
  330.     i=atoi(s);
  331.     if ((s[0]!=0) && (i>=0) && (i<num_dirs)) {
  332.       nl();
  333.       sprintf(s1,"Delete %s? ",directories[i].name);
  334.       prt(5,s1);
  335.       if (yn())
  336.         delete_dir(i);
  337.     }
  338.     break;
  339.     }
  340.   } while ((!done) && (!hangup));
  341.   sprintf(s,"%sDIRS.DAT",syscfg.datadir);
  342.   f=open(s,O_RDWR | O_BINARY | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
  343.   write(f,(void *)&directories[0], num_dirs * sizeof(directoryrec));
  344.   close(f);
  345.   if (!wfc)
  346.     changedsl();
  347. }
  348.  
  349.  
  350.  
  351.