home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / Dloads / WWIVMODS / MODSUNKN.ZIP / REVATPUR.MOD < prev    next >
Text File  |  1992-01-29  |  3KB  |  104 lines
  1. Revised User Auto-Purge Routine from The Black Dragon.
  2. The Black Dragon #1 @2380    [Black Dragon Enterprises]
  3. Sat Mar 04 11:30:58 1989
  4.  
  5. Due to problems that other sysops have had with my user auto-purge routine,
  6. here is an exact copy of what my routine looks like in it's current state.
  7. I have not suffered any side effects that other sysops have reported to me.
  8.  
  9. It will purge any user, excluding the currently logged on one, who hasn't
  10. called in as many days as his SL indicates.  The modification is RSM() is
  11. necessary so that the logged on user won't see messages like "User X read
  12. your mail on ..." when they are directed to the user being purged.
  13.  
  14. Notice the variable "d" in the autopurge routine is the number of days since
  15. the last logon.  The if statement that follows can be changed so any
  16. comparison on "d" can be made (e.g. d>30 if one has a 30 day policy).
  17.  
  18. The autopurge routine is set up as a separate file.  On my BBS, it is one
  19. of several routines defined in a file I call LOCAL.C (for local modifications).
  20. >----------------------( User Purge Modification )---------------------<
  21. #include <ctype.h>
  22. #include <stdlib.h>
  23. #include <stat.h>
  24. #include <dos.h>
  25. #include <io.h>
  26. #include <fcntl.h>
  27. #include <string.h>
  28. #include <stdio.h>
  29. #include <alloc.h>
  30. #include <dir.h>
  31. #include <math.h>
  32. #include <time.h>
  33. #include "vardec.h"
  34. #include "fcns.h"
  35.  
  36. #define exempt_purge 0x80 /* or whatever isn't already used /*
  37.  
  38. extern int auto_purge, userfile, usernum;
  39. extern double timeon;
  40. extern configrec syscfg;
  41.  
  42. void auto_delete()
  43. {
  44.   int count, i;
  45.   float d;
  46.   char s[81];
  47.   userrec u;
  48.  
  49.   auto_purge=1;
  50.   count=0;
  51.   for (i=2;i<=syscfg.maxusers;i++) {
  52.     read_user(i,&u);
  53.     if (!(u.inact & inact_deleted) && !(u.exempt & exempt_purge)) {
  54.       d=(time(&s)-u.daten)/24.0/3600.0;
  55.       if ((d>u.sl)&& (usernum!=i)) {
  56.         sprintf(s,"=> Auto-deleted user #%d - %s", i, u.name);
  57.         deluser(i);
  58.         sysoplog(s);
  59.         ++count;
  60.       }
  61.     }
  62.   }
  63.   sprintf(s,"Auto-Deleted %d user(s)",count);
  64.   sysoplog(s);
  65.   prt(6,s);
  66.   nl();
  67.   auto_purge=0;
  68. }
  69. >----------------------------( In BBSUTL.C )---------------------------<
  70. extern int auto_purge;
  71.  
  72. void rsm(int un, userrec *u)
  73. {
  74.   shortmsgrec sm;
  75.   int i,i1,f,any;
  76.   char s1[81];
  77.  
  78.   any=0;
  79.   if ((u->sysstatus) & sysstatus_smw) {
  80.     sprintf(s1,"%sSMW.DAT",syscfg.datadir);
  81.     f=open(s1,O_RDWR | O_BINARY | O_CREAT, S_IREAD | S_IWRITE);
  82.     i=(int) (filelength(f) / sizeof(shortmsgrec));
  83.     for (i1=0; i1<i; i1++) {
  84.       lseek(f,((long) (i1)) * sizeof(shortmsgrec),SEEK_SET);
  85.       read(f,(void *)&sm,sizeof(shortmsgrec));
  86.       if ((sm.touser==un) && (sm.tosys==0)) {
  87. ***=>   if (!auto_purge) pl(sm.message);                   /* CHANGED */
  88.         sm.touser=0;
  89.         sm.tosys=0;
  90.         sm.message[0]=0;
  91.         lseek(f,((long) (i1)) * sizeof(shortmsgrec),SEEK_SET);
  92.         write(f,(void *)&sm,sizeof(shortmsgrec));
  93.         any=1;
  94.       }
  95.     }
  96.     close(f);
  97.     u->sysstatus ^= sysstatus_smw;
  98.     smwcheck=1;
  99.   }
  100.   if (any)
  101.     nl();
  102. }
  103. >------------------------( End of Modification )-----------------------<
  104.         The Black Dragon.