home *** CD-ROM | disk | FTP | other *** search
/ Media Share 9 / MEDIASHARE_09.ISO / pcboard / rnet109u.zip / LOWMEM.BAT < prev    next >
DOS Batch File  |  1993-01-26  |  4KB  |  92 lines
  1. echo off
  2. cls
  3. echo %0 Processing... %1   [low memory/external compression example batch]
  4. rem ┌─────────────────────────────────────────────────────────────────────────┐
  5. rem │ This example batch file is for operating RNET with ARCHIVE=EXTERNAL for │
  6. rem │ Sysops running in tight memory where the shell for the compression util │
  7. rem │ is failing due to memory.  Note that RNET simply does NOT do ANY shells │
  8. rem │ when ARCHIVE=EXTERNAL is specified in the HOST_ID.CFG file!             │
  9. rem └─────────────────────────────────────────────────────────────────────────┘
  10.  
  11. if '%1'=='' goto BADID
  12. goto MAIL
  13.  
  14. :BADID
  15. echo ┌────────────────────────────────────────────────────────────────────────┐
  16. echo │ Warning!  This batch file requires the host packet ID as a parameter!  │
  17. echo └────────────────────────────────────────────────────────────────────────┘
  18. echo Examples:
  19. echo           %0 FTL        (for Faster-Than-Light as host)
  20. echo           %0 TRP        (for The Right Place as host)
  21. echo           %0 EXECNET    (for Executive Network as host)
  22. echo %0 started without host ID parameter! >> ERROR.LOG
  23. goto ABORTMAIL
  24.  
  25. :MAIL
  26.  
  27. e:
  28. cd \rnet
  29.  
  30. rem ┌─────────────────────────────────────────────────────────────────────────┐
  31. rem │ Export mail which is for your host.  Finds mail in conferences which    │
  32. rem │ needs to be sent up to host system.  If the *.REP packet is present,    │
  33. rem │ we must uncompress it to allow RNET to append output.  Uses PKUNZIP.    │
  34. rem │ The contents of the REP packet must be placed in the WORKING DIR as set │
  35. rem │ in the HOST_ID.CFG file.  In this case, we are using e:\rnet\workdir\   │
  36. rem ├─────────────────────────────────────────────────────────────────────────┤
  37. rem │ After RNET has processed the new mail, we must rebuild the .REP file.   │
  38. rem │ For this example, we will use PKZIP -M -EX for this operation.  We will │
  39. rem │ also include the REP.LOG in case we need to see the contents later.     │
  40. rem └─────────────────────────────────────────────────────────────────────────┘
  41.  
  42. if exist %1.REP PKUNZIP -O %1.REP e:\rnet\workdir\
  43.  
  44. RNET EXPORT %1
  45.  
  46. if not exist e:\rnet\workdir\%1.MSG goto SKIPREP
  47.  
  48. PKZIP -M -EX %1.REP e:\rnet\workdir\%1.MSG e:\rnet\workdir\REP.LOG
  49.  
  50. :SKIPREP
  51.  
  52. rem ┌─────────────────────────────────────────────────────────────────────────┐
  53. rem │ Send *.REP packet up to host and download *.QWK packet for importing.   │
  54. rem │ Replace this with your terminal program and script designed for this.   │
  55. rem │ Whatever your terminal program and script, if the REP packet is         │
  56. rem │ successfully uploaded, you MUST delete the REP packet or RNET will      │
  57. rem │ append tomorrows mail to the end!  You may simply rename or move the    │
  58. rem │ REP packet also.                                                        │
  59. rem └─────────────────────────────────────────────────────────────────────────┘
  60.  
  61. echo Removing previous %1.QWK packet (one should not exist yet!)
  62. if exist %1.QWK erase %1.QWK
  63.  
  64. rem ┌─────────────────────────────────────┐
  65. rem │ assumes script called (host_id).slc │
  66. rem └─────────────────────────────────────┘
  67.  
  68. echo Calling host...  using Telix script %1.slc, located in e:\telix\
  69. cd \telix
  70. telix -s%1
  71. cd \rnet
  72.  
  73. rem ┌─────────────────────────────────────────────────────────────────────────┐
  74. rem │ Now IMPORT any new mail aquired from the host (*.QWK)  The QWK packet   │
  75. rem │ must be uncompressed for RNET to process it.  Only files needed from    │
  76. rem │ the QWK packet are MESSAGES.DAT, CONTROL.DAT, and NETFLAGS.DAT          │
  77. rem └─────────────────────────────────────────────────────────────────────────┘
  78.  
  79. if not exist %1.QWK goto ENDOFMAIL
  80.  
  81. PKUNZIP %1.QWK messages.dat control.dat netflags.dat e:\rnet\workdir\
  82.  
  83. RNET IMPORT %1
  84.  
  85. :ENDOFMAIL
  86.  
  87. c:
  88. cd\pcb
  89. echo %0 Processing of %1 Completed...  returned to c:\pcb\
  90. :ABORTMAIL
  91.  
  92.