home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / Dloads / OTHERUTI / WWIV412S.ZIP / SHRINK.C < prev    next >
C/C++ Source or Header  |  1989-09-17  |  6KB  |  268 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. #include "vardec.h"
  16. #include "fcns.h"
  17.  
  18. #include <stdio.h>
  19. #include <io.h>
  20. #include <fcntl.h>
  21. #include <sys\stat.h>
  22. #include <process.h>
  23. #include <dos.h>
  24. #include <stdlib.h>
  25. #include <dir.h>
  26.  
  27.  
  28. #define READ(x) read(f,&(x),sizeof(x))
  29.  
  30. #define WRITE(x) write(f,&(x),sizeof(x))
  31. extern int noklevel,oklevel,ooneuser,no_hangup,ok_modem_stuff,topdata;
  32. extern int sysop_alert,do_event,incom,outcom,defscreenbottom,global_handle;
  33. extern long last_time_c;
  34. extern char *xenviron[50];
  35.  
  36. extern unsigned char andwith;
  37.  
  38. extern int usernum,chatcall,cursub,curdir,curdloads,msgreadlogon,mailcheck;
  39. extern int smwcheck,use_workspace,using_modem,fsenttoday,base,global_xx;
  40. extern long nscandate;
  41. extern unsigned char andwith,realsl,actsl;
  42. extern double timeon,extratimecall,last_time,xtime;
  43. extern unsigned int modem_speed,com_speed,useron;
  44. extern char chatreason[81],curspeed[80];
  45. extern userrec thisuser;
  46.  
  47. extern int flow_control,async_irq;
  48.  
  49. extern char xdate[9];
  50. /****************************************************************************/
  51.  
  52. int restore_data(char *s)
  53. {
  54.   int f,stat;
  55.  
  56.   f=open(s,O_RDONLY | O_BINARY);
  57.   if (f<0)
  58.     return(-1);
  59.  
  60.   READ(stat);
  61.   READ(oklevel);
  62.   READ(noklevel);
  63.   READ(ooneuser);
  64.   READ(no_hangup);
  65.   READ(ok_modem_stuff);
  66.   READ(topdata);
  67.   READ(last_time_c);
  68.   READ(sysop_alert);
  69.   READ(do_event);
  70.  
  71.   if (stat) {
  72.     READ(andwith);
  73.     READ(usernum);
  74.     READ(chatcall);
  75.     READ(chatreason);
  76.     READ(timeon);
  77.     READ(extratimecall);
  78.     READ(curspeed);
  79.     READ(modem_speed);
  80.     READ(com_speed);
  81.     READ(cursub);
  82.     READ(curdir);
  83.     READ(curdloads);
  84.     READ(msgreadlogon);
  85.     READ(nscandate);
  86.     READ(mailcheck);
  87.     READ(smwcheck);
  88.     READ(use_workspace);
  89.     READ(using_modem);
  90.     READ(last_time);
  91.     READ(fsenttoday);
  92.     READ(global_xx);
  93.     READ(xtime);
  94.     READ(xdate);
  95.     READ(incom);
  96.     READ(outcom);
  97.     READ(global_handle);
  98.  
  99.     if (global_handle) {
  100.       global_handle=0;
  101.       set_global_handle(1);
  102.     }
  103.  
  104.     read_user(usernum,&thisuser);
  105.     useron=1;
  106.     realsl=actsl=thisuser.sl;
  107.     changedsl();
  108.     topscreen();
  109.     set_baud(com_speed);
  110.   }
  111.  
  112.   close(f);
  113.   unlink(s);
  114.   unlink("stat.wwv");
  115.   return(stat);
  116. }
  117.  
  118. /****************************************************************************/
  119.  
  120. void save_state(char *s, int state,int ctc)
  121. {
  122.   int f;
  123.  
  124.   save_status();
  125.  
  126.   f=open(s,O_RDWR | O_BINARY | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
  127.   if (f<0)
  128.     return;
  129.  
  130.   WRITE(state);
  131.   WRITE(oklevel);
  132.   WRITE(noklevel);
  133.   WRITE(ooneuser);
  134.   WRITE(no_hangup);
  135.   WRITE(ok_modem_stuff);
  136.   WRITE(topdata);
  137.   WRITE(last_time_c);
  138.   WRITE(sysop_alert);
  139.   WRITE(do_event);
  140.  
  141.   if (state) {
  142.     WRITE(andwith);
  143.     WRITE(usernum);
  144.     WRITE(chatcall);
  145.     WRITE(chatreason);
  146.     WRITE(timeon);
  147.     WRITE(extratimecall);
  148.     WRITE(curspeed);
  149.     WRITE(modem_speed);
  150.     WRITE(com_speed);
  151.     WRITE(cursub);
  152.     WRITE(curdir);
  153.     WRITE(curdloads);
  154.     WRITE(msgreadlogon);
  155.     WRITE(nscandate);
  156.     WRITE(mailcheck);
  157.     WRITE(smwcheck);
  158.     WRITE(use_workspace);
  159.     WRITE(using_modem);
  160.     WRITE(last_time);
  161.     WRITE(fsenttoday);
  162.     WRITE(global_xx);
  163.     WRITE(xtime);
  164.     WRITE(xdate);
  165.     WRITE(incom);
  166.     WRITE(outcom);
  167.     WRITE(global_handle);
  168.  
  169.     set_global_handle(0);
  170.   }
  171.  
  172.   close(f);
  173.  
  174.   if (state) {
  175.     f=open("stat.wwv",O_RDWR | O_BINARY | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
  176.     if (f<0)
  177.       return;
  178.  
  179.     WRITE(incom);
  180.     WRITE(outcom);
  181.     WRITE(thisuser);
  182.     WRITE(flow_control);
  183.     WRITE(async_irq);
  184.     WRITE(com_speed);
  185.     WRITE(base);
  186.     WRITE(andwith);
  187.     WRITE(ctc);
  188.     WRITE(defscreenbottom);
  189.     WRITE(ok_modem_stuff);
  190.  
  191.     close(f);
  192.   }
  193.  
  194.  
  195. }
  196.  
  197. /****************************************************************************/
  198.  
  199. void do_it_1(char *cl)
  200. {
  201.   int i,i1,l;
  202.   char *ss,*ss1;
  203.   char t[81];
  204.  
  205.   sl1(1,"");
  206.   ss=cl;
  207.   while ((*ss) && (*ss!=' '))
  208.     ++ss;
  209.   if (*ss==' ') {
  210.     *ss=0;
  211.     ss++;
  212.   }
  213.   ss1=(char far *) getvect(0x6b);
  214.   if (ok_modem_stuff)
  215.     closeport();
  216.   close_user();
  217.   *ss1=1;
  218.   ss1++;
  219.   strcpy(ss1,searchpath(cl));
  220.   ss1=MK_FP(FP_SEG(ss1),0x0080);
  221.   strcpy(t," ");
  222.   strcat(t,ss);
  223.   strcat(t,"\r");
  224.   *ss1=strlen(t)-1;
  225.   ++ss1;
  226.   strcpy(ss1,t);
  227.   exit(0);
  228. }
  229.  
  230. /****************************************************************************/
  231.  
  232. void shrink_out(char *command, int state, int intercept,int ctc,int ccc)
  233. {
  234.   char s[81],s1[10],*ss1;
  235.   int ok_shrink;
  236.  
  237.   ok_shrink=1;
  238.   ss1=(char far *) getvect(0x6b);
  239.   if (*ss1) {
  240.     ok_shrink=0;
  241.     nl();
  242.     pl("Can't shrink: No BBS.COM");
  243.     nl();
  244.   }
  245.   if (!searchpath("RETURN.EXE")) {
  246.     ok_shrink=0;
  247.     nl();
  248.     pl("Can't shrink: No RETURN.EXE");
  249.     nl();
  250.   }
  251.  
  252.   if (ok_shrink) {
  253.     if (state) {
  254.       thisuser.sl=realsl;
  255.       write_user(usernum,&thisuser);
  256.     }
  257.     save_state("restore.wwv",state,ctc);
  258.     sprintf(s,"RETURN.EXE %d %d %s",intercept,ccc,command);
  259.     set_protect(0);
  260.     do_it_1(s);
  261.   } else {
  262.     if (intercept)
  263.       full_external(command,ctc,ccc);
  264.     else
  265.       do_remote(command,ccc);
  266.   }
  267. }
  268.