home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / getcfgr.zip / GO.CMD < prev   
OS/2 REXX Batch file  |  1996-12-12  |  18KB  |  665 lines
  1. REM Improved by Leonard E. Malak - Austin, Texas
  2. REM 12-11-96 pab Altered to get *.OS2 from root (POPUPLOG.OS2)
  3. REM 12-12-96 pab Altered to get RPL.MAP for RIPL
  4. REM 12-12-96 pab Altered to get OS/2 .CNF for RIPL
  5. REM 12-12-96 pab Altered to get .FIT for RIPL
  6. REM Main Batch File to Obtain the Configurations in a Domain
  7.  
  8. @ECHO OFF
  9. CLS
  10. REM IF NOT EXIST A:\GO.CMD GOTO DRVA
  11. REM IF ERRORLEVEL 1 GOTO DRVA
  12. IF "%1" == "" GOTO README
  13. CLS
  14. ECHO  
  15. ECHO  
  16. ECHO  
  17. ECHO  
  18. ECHO                 System configuration/status retrieval beginning...
  19. SET P=%1
  20. IF "%1" == "C:" SET P=C
  21. IF "%1" == "c:" SET P=C
  22. IF "%1" == "D:" SET P=D
  23. IF "%1" == "d:" SET P=D
  24. IF "%1" == "E:" SET P=E
  25. IF "%1" == "e:" SET P=E
  26. IF "%1" == "F:" SET P=F
  27. IF "%1" == "f:" SET P=F
  28. IF "%1" == "G:" SET P=G
  29. IF "%1" == "g:" SET P=G
  30. IF ERRORLEVEL 1 GOTO README
  31. IF NOT EXIST %P%:\GETCFG!\*. MD %P%:\GETCFG!
  32. IF EXIST %P%:\GETCFG!\*.* ECHO Y|DEL %P%:\GETCFG!\*.* > NUL
  33. REM COPY A:\GETCFG2.EXE %P%:\GETCFG! > NUL
  34. COPY GETCFG2.EXE %P%:\GETCFG! > NUL
  35. SETLOCAL
  36. %P%:
  37. CD %P%:\GETCFG!
  38. GETCFG2 > NUL
  39. DEL %P%:\GETCFG!\GETCFG2.EXE > NUL
  40. CLS
  41. ECHO  
  42. ECHO  
  43. ECHO  
  44. ECHO  
  45. ECHO                 Running CACHE 386 PART 1
  46. IF EXIST %P%:\IBM386FS\*.* CACHE386 /O
  47. CLS
  48. ECHO  
  49. ECHO  
  50. ECHO  
  51. ECHO  
  52. ECHO                 Running CACHE 386 PART 2
  53. copy CFG_2_1.VER %P%:\GETCFG!\DRIVE%P%.TXT > NUL
  54. IF EXIST %P%:\IBM386FS\*.* CACHE386 /O >> %P%:\GETCFG!\DRIVE%P%.TXT
  55. CLS
  56. ECHO  
  57. ECHO  
  58. ECHO  
  59. ECHO  
  60. ECHO                 Running CACHE 386 PART 3
  61. IF EXIST %P%:\IBM386FS\*.* CACHE386 /S >> %P%:\GETCFG!\DRIVE%P%.TXT
  62. CLS
  63. ECHO  
  64. ECHO  
  65. ECHO  
  66. ECHO  
  67. ECHO                 Copy HPFS386.INI
  68. IF EXIST %P%:\IBM386FS\HPFS386.INI COPY %P%:\IBM386FS\HPFS386.INI  %P%:\GETCFG!\HPFS386.INI > NUL
  69. CLS
  70. ECHO  
  71. ECHO  
  72. ECHO  
  73. ECHO  
  74. ECHO                 Running DIR command on %P%: Disk
  75. SET DRRBKP = %DIRCMD%
  76. SET DIRCMD=
  77. DIR %P%:\*.* /A:H /S  >> %P%:\GETCFG!\DRIVE%P%.TXT
  78. DIR %P%:\*.* /S  >> %P%:\GETCFG!\DRIVE%P%.TXT
  79. SET DIRCMD = %DRRBKP%
  80. SET DRRBKP=
  81. CLS
  82. ECHO  
  83. ECHO  
  84. ECHO  
  85. ECHO  
  86. ECHO                 Running SET command
  87. SET > %P%:\GETCFG!\SET.TXT
  88. CLS
  89. ECHO  
  90. ECHO  
  91. ECHO  
  92. ECHO  
  93. ECHO                 Obtaining Partition Information
  94. FDISK /QUERY >> %P%:\GETCFG!\FDISK.TXT
  95. CLS
  96. ECHO  
  97. ECHO  
  98. ECHO  
  99. ECHO  
  100. ECHO                 Running ASTAT command
  101. ASTAT > %P%:\GETCFG!\ASTAT.TXT
  102. DEL %P%:\GETCFG!\ASTAT.EXE
  103. CLS
  104. ECHO  
  105. ECHO  
  106. ECHO  
  107. ECHO  
  108. ECHO                 Running PSTAT command
  109. PSTAT > %P%:\GETCFG!\PSTAT.TXT
  110. CLS
  111. ECHO  
  112. ECHO  
  113. ECHO  
  114. ECHO  
  115. ECHO                 Running SSTAT command
  116. SSTAT > %P%:\GETCFG!\SSTAT.TXT
  117. DEL %P%:\GETCFG!\SSTAT.EXE
  118. CLS
  119. ECHO  
  120. ECHO  
  121. ECHO  
  122. ECHO  
  123. ECHO                 Running SYSLEVEL command
  124. VER /R   >> %P%:\GETCFG!\SYSLVL.TXT
  125. SYSLEVEL >> %P%:\GETCFG!\SYSLVL.TXT
  126. CLS
  127. ECHO  
  128. ECHO  
  129. ECHO  
  130. ECHO  
  131. ECHO                 Running CHKDSK command
  132. ECHO N|CHKDSK %P%: > %P%:\GETCFG!\CHKDSK.TXT
  133. CLS
  134. ECHO  
  135. ECHO  
  136. ECHO  
  137. ECHO  
  138. ECHO                 Reading hardware configuration
  139. QMC -D > %P%:\GETCFG!\HDWRCFG.TXT 2> NUL
  140. DEL %P%:\GETCFG!\QMC.EXE
  141. CLS
  142. ECHO  
  143. ECHO  
  144. ECHO  
  145. ECHO  
  146. ECHO                 Copying OS/2 CONFIG.SYS
  147. COPY %P%:\CONFIG*.* %P%:\GETCFG!\CONFIG*.* > NUL
  148. CLS
  149. ECHO  
  150. ECHO  
  151. ECHO  
  152. ECHO  
  153. ECHO                 Copying OS/2 AUTOEXEC.BAT
  154. COPY %P%:\AUTOEXEC.BAT %P%:\GETCFG!\AUTOEXEC.OS2 > NUL
  155. CLS
  156. ECHO  
  157. ECHO  
  158. ECHO  
  159. ECHO  
  160. ECHO                 Copying OS/2 STARTUP.CMD
  161. IF EXIST %P%:\STARTUP.CMD COPY %P%:\STARTUP.CMD %P%:\GETCFG!\STARTUP.CMD > NUL
  162. CLS
  163. ECHO  
  164. ECHO  
  165. ECHO  
  166. ECHO  
  167. ECHO                 Copying OS2.INI
  168. IF EXIST \OS2\OS2.INI COPYINI %P%:\OS2\OS2.INI %P%:\GETCFG!\OS2.INI > NUL
  169. CLS
  170. ECHO  
  171. ECHO  
  172. ECHO  
  173. ECHO  
  174. ECHO                 Copying OS2SYS.INI
  175. IF EXIST \OS2\OS2SYS.INI COPYINI %P%:\OS2\OS2SYS.INI %P%:\GETCFG!\OS2SYS.INI > NUL
  176. CLS
  177. ECHO  
  178. ECHO  
  179. ECHO  
  180. ECHO  
  181. ECHO                 Copying NIF FILES
  182. IF EXIST %P%:\IBMCOM\MACS\*.* COPY %P%:\IBMCOM\MACS\*.NIF %P%:\GETCFG!\*.* > NUL
  183. IF EXIST %P%:\IBMCOM\PROTOCOL\*.* COPY %P%:\IBMCOM\PROTOCOL\*.NIF %P%:\GETCFG!\*.* > NUL
  184. CLS
  185. ECHO  
  186. ECHO  
  187. ECHO  
  188. ECHO  
  189. ECHO                 Copying TCPBEUI CONFIG FILES
  190. IF EXIST %P%:\IBMCOM\RFCBCST.LST COPY %P%:\IBMCOM\RFCBCST.LST %P%:\GETCFG!\RFCBCST.LST > NUL 2>> NUL
  191. IF EXIST %P%:\IBMCOM\RFCNAMES.LST COPY %P%:\IBMCOM\RFCNAMES.LST %P%:\GETCFG!\RFCNAMES.LST > NUL 2>> NUL
  192. IF EXIST %P%:\MPTN\BIN\*.CMD COPY %P%:\MPTN\BIN\*.CMD %P%:\GETCFG!\*.CMD > NUL 2>> NUL
  193. IF EXIST %P%:\MPTN\BIN\*.INI COPY %P%:\MPTN\BIN\*.INI %P%:\GETCFG!\*.INI > NUL 2>> NUL
  194. IF EXIST %P%:\MPTN\ETC\RESOLV*.* COPY %P%:\MPTN\ETC\RESOLV*.* %P%:\GETCFG!\*.* > NUL 2>> NUL
  195. IF EXIST %P%:\TCPIP\ETC\RESOLV. COPY %P%:\TCPIP\ETC\RESOLV. %P%:\GETCFG!\RESOLVTP.* > NUL 2>> NUL
  196. IF EXIST %P%:\MPTN\ETC\HOSTS COPY %P%:\MPTN\ETC\HOSTS %P%:\GETCFG!\*.* > NUL 2>> NUL
  197. IF EXIST %P%:\MPTN\ETC\TRUSERS COPY %P%:\MPTN\ETC\TRUSERS %P%:\GETCFG!\*.* > NUL 2>> NUL
  198. IF EXIST %P%:\MPTN\ETC\SENDMAIL.* COPY %P%:\MPTN\ETC\SENDMAIL.* %P%:\GETCFG!\*.* > NUL 2>> NUL
  199. IF EXIST %P%:\MPTN\ETC\*.LOG COPY %P%:\MPTN\ETC\*.LOG %P%:\GETCFG!\*.* > NUL 2>> NUL
  200. IF EXIST %P%:\MPTN\ETC\PROTOCOL. COPY %P%:\MPTN\ETC\PROTOCOL. %P%:\GETCFG!\*.* > NUL 2>> NUL
  201. IF EXIST %P%:\MPTN\ETC\SERVICES. COPY %P%:\MPTN\ETC\SERVICES. %P%:\GETCFG!\*.* > NUL 2>> NUL
  202. IF EXIST %P%:\MPTN\ETC\*.CFG COPY %P%:\MPTN\ETC\*.CFG %P%:\GETCFG!\*.* > NUL 2>> NUL
  203. IF EXIST %P%:\MPTN\ETC\*.KEY COPY %P%:\MPTN\ETC\*.KEY %P%:\GETCFG!\*.* > NUL 2>> NUL
  204. IF EXIST %P%:\MPTN\BIN\TCPSTART.CMD COPY %P%:\MPTN\BIN\TCPSTART.CMD %P%:\GETCFG!\*.* > NUL 2>> NUL
  205. IF EXIST %P%:\TCPIP\BIN\TCPSTART.CMD COPY %P%:\TCPIP\BIN\TCPSTART.CMD %P%:\GETCFG!\*.TCP > NUL 2>> NUL
  206. IFCONFIG lan0 >> IFCONFIG.TXT 2>> NUL
  207. IFCONFIG lan1 >> IFCONFIG.TXT 2>> NUL
  208. IFCONFIG lan2 >> IFCONFIG.TXT 2>> NUL
  209. IFCONFIG lan3 >> IFCONFIG.TXT 2>> NUL
  210. IFCONFIG lan4 >> IFCONFIG.TXT 2>> NUL
  211. IFCONFIG lan5 >> IFCONFIG.TXT 2>> NUL
  212. IFCONFIG lan6 >> IFCONFIG.TXT 2>> NUL
  213. IFCONFIG lan7 >> IFCONFIG.TXT 2>> NUL
  214. HOSTNAME >> HOSTNAME.TXT 2>> HOSTNAME.ERR
  215. NETSTAT -m -u -i -s -r -n -a -p >> netstat.txt 2>> netstat.err
  216. CLS
  217. ECHO  
  218. ECHO  
  219. ECHO  
  220. ECHO  
  221. ECHO                 Copying *.LOG files from the root of %P%:\
  222. IF EXIST %P%:\*.LOG COPY %P%:\*.LOG %P%:\GETCFG!\*.LOG > NUL
  223. CLS
  224. ECHO  
  225. ECHO  
  226. ECHO
  227. ECHO
  228. ECHO                 Copying *.OS2 files from the root of %P%:\
  229. IF EXIST %P%:\*.OS2 COPY %P%:\*.OS2 %P%:\GETCFG!\*.OS2 > NUL
  230. ECHO  
  231. ECHO  
  232. ECHO                 Copying NET.ACC file
  233. IF EXIST %P%:\IBMLAN\ACCOUNTS\NET.ACC COPYINI %P%:\IBMLAN\ACCOUNTS\NET.ACC %P%:\GETCFG!\NET.ACC > NUL
  234. IF EXIST %P%:\IBMLAN\ACCOUNTS\FIX*.* COPY %P%:\IBMLAN\ACCOUNTS\FIX*.* %P%:\GETCFG!\FIX*.* > NUL
  235. CLS
  236. ECHO  
  237. ECHO  
  238. ECHO  
  239. ECHO  
  240. ECHO                 Copying \DCDB DATA files
  241. IF NOT EXIST %P%:\IBMLAN\DCDB\DATA\*.* GOTO PASSDCDB
  242. CLS
  243. ECHO  
  244. ECHO  
  245. ECHO  
  246. ECHO  
  247. ECHO                 Copying DCDB files
  248. COPYINI %P%:\IBMLAN\DCDB\DATA\DCDB.A %P%:\GETCFG!\DCDB.A > NUL
  249. COPYINI %P%:\IBMLAN\DCDB\DATA\DCDB.D %P%:\GETCFG!\DCDB.D > NUL
  250. COPYINI %P%:\IBMLAN\DCDB\DATA\DCDB.F %P%:\GETCFG!\DCDB.F > NUL
  251. COPYINI %P%:\IBMLAN\DCDB\DATA\DCDB.I %P%:\GETCFG!\DCDB.I > NUL
  252. COPYINI %P%:\IBMLAN\DCDB\DATA\DCDB.M %P%:\GETCFG!\DCDB.M > NUL
  253. COPYINI %P%:\IBMLAN\DCDB\DATA\DCDB.P %P%:\GETCFG!\DCDB.P > NUL
  254. :PASSDCDB
  255. CLS
  256. ECHO  
  257. ECHO  
  258. ECHO  
  259. ECHO  
  260. ECHO                 Copying UASCHG.LOG file
  261. IF EXIST %P%:\IBMLAN\ACCOUNTS\UASCHG.LOG COPYINI %P%:\IBMLAN\ACCOUNTS\UASCHG.LOG %P%:\GETCFG!\UASCHG.LOG > NUL
  262. CLS
  263. ECHO  
  264. ECHO  
  265. ECHO  
  266. ECHO  
  267. ECHO                 Copying IBMLAN.INI file
  268. IF EXIST %P%:\IBMLAN\IBMLAN.INI COPY %P%:\IBMLAN\IBMLAN.INI %P%:\GETCFG!\IBMLAN.INI > NUL
  269. CLS
  270. ECHO  
  271. ECHO  
  272. ECHO  
  273. ECHO  
  274. ECHO                 Copying MESSAGES.LOG file
  275. IF EXIST %P%:\IBMLAN\LOGS\MESSAGES.LOG COPYINI %P%:\IBMLAN\LOGS\MESSAGES.LOG %P%:\GETCFG!\MESSAGES.LOG > NUL
  276. CLS
  277. ECHO  
  278. ECHO  
  279. ECHO  
  280. ECHO  
  281. ECHO                 Getting IBMLVL.INI Information
  282. IF EXIST %P%:\IBMLVL.INI COPY %P%:\IBMLVL.INI %P%:\GETCFG!\IBMLVL.INI > NUL
  283. IF EXIST %P%:\IBMLVL.INI SHOWINI -D IBMLVL.INI >> %P%:\GETCFG!\IBMLVL.TXT
  284. DEL %P%:\GETCFG!\SHOWINI.*
  285. CLS
  286. ECHO  
  287. ECHO  
  288. ECHO  
  289. ECHO  
  290. ECHO                 Copying RIPL MAP file
  291. IF EXIST %P%:\IBMLAN\RPL\*.MAP COPY %P%:\IBMLAN\RPL\*.MAP %P%:\GETCFG! > NUL
  292. CLS
  293. ECHO  
  294. ECHO  
  295. ECHO  
  296. ECHO  
  297. ECHO                 Copying RIPL CNF files
  298. IF EXIST %P%:\IBMLAN\RPL\*.CNF COPY %P%:\IBMLAN\RPL\*.CNF %P%:\GETCFG! > NUL
  299. CLS
  300. ECHO  
  301. ECHO  
  302. ECHO  
  303. ECHO  
  304. ECHO                 Copying RIPL FIT files
  305. IF EXIST %P%:\IBMLAN\RPL\FITS\*.FIT COPY %P%:\IBMLAN\RPL\FITS\*.FIT %P%:\GETCFG! > NUL
  306. CLS
  307. ECHO  
  308. ECHO  
  309. ECHO  
  310. ECHO  
  311. ECHO                 Copying RIPL DEFINITION files
  312. IF EXIST %P%:\IBMLAN\DCDB\IMAGES\*.DEF COPY %P%:\IBMLAN\DCDB\IMAGES\*.DEF %P%:\GETCFG! > NUL
  313. CLS
  314. ECHO  
  315. ECHO  
  316. ECHO  
  317. ECHO  
  318. ECHO                 Copying RIPL BATCH files
  319. IF EXIST %P%:\IBMLAN\DOSLAN\NET\*.BAT COPY %P%:\IBMLAN\DOSLAN\NET\*.BAT %P%:\GETCFG! > NUL
  320. CLS
  321. ECHO  
  322. ECHO  
  323. ECHO  
  324. ECHO  
  325. ECHO                 Copying RIPL SYS files
  326. IF EXIST %P%:\IBMLAN\DOSLAN\NET\*.SYS COPY %P%:\IBMLAN\DOSLAN\NET\*.SYS %P%:\GETCFG! > NUL
  327. CLS
  328. ECHO  
  329. ECHO  
  330. ECHO  
  331. ECHO  
  332. ECHO                 Copying RIPL INI files
  333. IF EXIST %P%:\IBMLAN\DOSLAN\NET\*.INI COPY %P%:\IBMLAN\DOSLAN\NET\*.INI %P%:\GETCFG! > NUL
  334. CLS
  335. ECHO  
  336. ECHO  
  337. ECHO  
  338. ECHO  
  339. ECHO                 Copying PROTOCOL.INI file
  340. IF EXIST %P%:\IBMCOM\PROTOCOL.INI COPY %P%:\IBMCOM\PROTOCOL.INI %P%:\GETCFG!\PROTOCOL.INI > NUL
  341. CLS
  342. ECHO  
  343. ECHO  
  344. ECHO  
  345. ECHO  
  346. ECHO                 Copying LANTRAN.LOG file
  347. IF EXIST %P%:\IBMCOM\LANTRAN.LOG COPY %P%:\IBMCOM\LANTRAN.LOG %P%:\GETCFG!\LANTRAN.LOG > NUL
  348. CLS
  349. ECHO  
  350. ECHO  
  351. ECHO  
  352. ECHO  
  353. ECHO                 Copying SYSLEVEL.TRP file
  354. IF EXIST %P%:\IBMCOM\SYSLEVEL.TRP COPY %P%:\IBMCOM\SYSLEVEL.TRP %P%:\GETCFG!\SYSLEVEL.TRP > NUL
  355. CLS
  356. ECHO  
  357. ECHO  
  358. ECHO  
  359. ECHO  
  360. ECHO                 Copying Communication Manager CFG files
  361. IF EXIST %P%:\CMLIB\*.CFG COPY %P%:\CMLIB\*.CFG %P%:\GETCFG!\*.CFG > NUL
  362. IF EXIST %P%:\CMLIB\APPN\*.CF2 COPY %P%:\CMLIB\APPN\*.CF2 %P%:\GETCFG!\*.CF2 > NUL
  363. IF EXIST %P%:\CMLIB\APPN\*.NDF COPY %P%:\CMLIB\APPN\*.NDF %P%:\GETCFG!\*.NDF > NUL
  364. IF EXIST %P%:\CMLIB\APPN\*.SEC COPY %P%:\CMLIB\APPN\*.SEC %P%:\GETCFG!\*.SEC > NUL
  365. CLS
  366. ECHO  
  367. ECHO  
  368. ECHO  
  369. ECHO  
  370. ECHO                 Copying Communication Manager INI files
  371. IF EXIST %P%:\CMLIB\*.INI COPY %P%:\CMLIB\*.INI %P%:\GETCFG!\*.INI > NUL
  372. CLS
  373. ECHO  
  374. ECHO  
  375. ECHO  
  376. ECHO  
  377. ECHO                 Copying Communication Manager INI files
  378. IF EXIST %P%:\IBMCOM\*.INI COPY %P%:\IBMCOM\*.INI %P%:\GETCFG!\*.INI > NUL
  379. CLS
  380. ECHO  
  381. ECHO  
  382. ECHO  
  383. ECHO  
  384. ECHO                 Copying Communication Manager ACS files
  385. IF EXIST %P%:\CMLIB\SYSLEVEL.ACS COPY %P%:\CMLIB\SYSLEVEL.ACS %P%:\GETCFG!\SYSLEVEL.ACS > NUL
  386. CLS
  387. ECHO  
  388. ECHO  
  389. ECHO  
  390. ECHO  
  391. ECHO                 Copying Communication Manager LOG files
  392. IF EXIST %P%:\CMLIB\ACSLAN.LOG COPY %P%:\CMLIB\ACSLAN.LOG %P%:\GETCFG!\ACSLAN.LOG > NUL
  393. IF EXIST %P%:\CMLIB\APPN\*.LOG COPY %P%:\CMLIB\APPN\*.LOG %P%:\GETCFG!\*.LOG > NUL
  394. CLS
  395. ECHO  
  396. ECHO  
  397. ECHO  
  398. ECHO  
  399. ECHO                 Copying Communication Manager ERROR files
  400. IF EXIST %P%:\CMLIB\ERROR.DAT COPYINI %P%:\CMLIB\ERROR.DAT %P%:\GETCFG!\ERROR.DAT > NUL
  401. IF EXIST %P%:\CMLIB\MESSAGE.DAT COPYINI %P%:\CMLIB\MESSAGE.DAT %P%:\GETCFG!\MESSAGE.DAT > NUL
  402. CLS
  403. ECHO  
  404. ECHO  
  405. ECHO  
  406. ECHO  
  407. ECHO                 Copying INSTALL LOG Files
  408. IF EXIST %P%:\OS2\INSTALL\*.* copy %P%:\OS2\INSTALL\*.LOG   %P%:\GETCFG!\*.* > NUL
  409. CLS
  410. ECHO  
  411. ECHO  
  412. ECHO  
  413. ECHO  
  414. ECHO                 Copying SYSLEVEL Files
  415. IF EXIST %P%:\IBMLAN\*.* copy %P%:\IBMLAN\SYSLEVEL.*   %P%:\GETCFG!\SYSLEVEL.* > NUL
  416. IF EXIST %P%:\MUGLIB\*.* copy %P%:\MUGLIB\SYSLEVEL.*   %P%:\GETCFG!\SYSLEVEL.* > NUL
  417. IF EXIST %P%:\OS2\INSTALL\*.* copy %P%:\OS2\INSTALL\SYSLEVEL.*   %P%:\GETCFG!\SYSLEVEL.* > NUL
  418. IF EXIST %P%:\IBMCOM\*.* copy %P%:\IBMCOM\SYSLEVEL.*   %P%:\GETCFG!\SYSLEVEL.* > NUL
  419. IF EXIST %P%:\OS2\SYSLEVEL.EPW copy %P%:\OS2\SYSLEVEL.EPW   %P%:\GETCFG!\SYSLEVEL.* > NUL
  420. CLS
  421. ECHO  
  422. ECHO  
  423. ECHO  
  424. ECHO  
  425. ECHO                 Copying TECHNICAL CONNECTION CFG FILES
  426. CALL GETTC.CMD
  427. ERASE GETTC.CMD > NUL 2>NUL
  428. CLS
  429. ECHO  
  430. ECHO  
  431. ECHO  
  432. ECHO  
  433. ECHO                 Copying NET.CFG
  434. IF EXIST %P%\NET.CFG COPYINI %P%:\NET.CFG %P%:\GETCFG!\ROOTNET.CFG > NUL
  435. IF EXIST %P%\NETWARE\NET.CFG COPYINI %P%:\NETWARE\NET.CFG %P%:\GETCFG!\NET.CFG > NUL
  436. CLS
  437. ECHO  
  438. ECHO  
  439. ECHO  
  440. ECHO  
  441. ECHO                 Running NET START command
  442. IF EXIST %P%:\IBMLAN\*.* NET START > %P%:\GETCFG!\NETSTART.TXT
  443. CLS
  444. ECHO  
  445. ECHO  
  446. ECHO  
  447. ECHO  
  448. ECHO                 Running NET ACCOUNTS command
  449. REM IF EXIST %P%:\IBMLAN\*.* NET ACCOUNTS > %P%:\GETCFG!\NACCOUNT.TXT
  450. IF EXIST %P%:\IBMLAN\*.* CALL NETGSERV.CMD FIRST
  451. CLS
  452. ECHO  
  453. ECHO  
  454. ECHO  
  455. ECHO  
  456. ECHO                 Running NET ERROR command
  457. IF EXIST %P%:\IBMLAN\*.* NET ERROR /r > %P%:\GETCFG!\NETERROR.TXT
  458. rem
  459. IF "%2" =="NOLOGON" GOTO BYPASS
  460. IF "%2" =="nologon" GOTO BYPASS
  461. CLS
  462. ECHO  
  463. ECHO  
  464. ECHO  
  465. ECHO  
  466. ECHO                 Running NET FILE command
  467. IF EXIST %P%:\IBMLAN\*.* NET FILE > %P%:\GETCFG!\NETFILE.TXT
  468. CLS
  469. ECHO  
  470. ECHO  
  471. ECHO  
  472. ECHO  
  473. ECHO                 Running NET WHO command
  474. IF EXIST %P%:\IBMLAN\*.* NET WHO > %P%:\GETCFG!\NETWHO.TXT
  475. CLS
  476. ECHO  
  477. ECHO  
  478. ECHO  
  479. ECHO  
  480. ECHO                 Running NET AUDIT command
  481. IF EXIST %P%:\IBMLAN\*.* NET AUDIT > %P%:\GETCFG!\NETAUDIT.TXT
  482. CLS
  483. ECHO  
  484. ECHO  
  485. ECHO  
  486. ECHO  
  487. ECHO                 Obtaining AT schedules
  488. IF EXIST %P%:\IBMLAN\*.* AT > %P%:\GETCFG!\AT.TXT
  489. CLS
  490. ECHO  
  491. ECHO  
  492. ECHO  
  493. ECHO  
  494. ECHO                 Running NET USE command
  495. IF EXIST %P%:\IBMLAN\*.* NET USE > %P%:\GETCFG!\NETUSE.TXT
  496. CLS
  497. ECHO  
  498. ECHO  
  499. ECHO  
  500. ECHO  
  501. ECHO                 Running NET USER command
  502. IF EXIST %P%:\IBMLAN\*.* NET USER > %P%:\GETCFG!\NETUSER.TXT
  503. CLS
  504. ECHO  
  505. ECHO  
  506. ECHO  
  507. ECHO  
  508. ECHO                 Running NET SHARE command
  509. IF EXIST %P%:\IBMLAN\SERVICES\NETSVINI.EXE NET SHARE > %P%:\GETCFG!\NETSHARE.TXT
  510. CLS
  511. ECHO  
  512. ECHO  
  513. ECHO  
  514. ECHO  
  515. ECHO                 Running NET ACCESS command
  516. NET ACCESS %P%: /TREE > %P%:\GETCFG!\ACL_%P%.TXT
  517. NET ACCESS \COMM /TREE > %P%:\GETCFG!\ACL_COMM.TXT
  518. NET ACCESS \PRINT /TREE > %P%:\GETCFG!\ACL_PRNT.TXT
  519. NET ACCESS \PIPE /TREE > %P%:\GETCFG!\ACL_PIPE.TXT
  520. REM NET ACCESS  > %P%:\GETCFG!\NETACL.TXT
  521. CLS
  522. ECHO  
  523. ECHO  
  524. ECHO  
  525. ECHO  
  526. ECHO                 Running NET ALIAS command
  527. IF EXIST %P%:\IBMLAN\*.* NET ALIAS > %P%:\GETCFG!\NETALIAS.TXT
  528. CLS
  529. ECHO  
  530. ECHO  
  531. ECHO  
  532. ECHO  
  533. ECHO                 Running NET DASD command
  534. IF EXIST %P%:\IBM386FS\*.* NET DASD >> %P%:\GETCFG!\NETDASD.TXT
  535. CLS
  536. ECHO  
  537. ECHO  
  538. ECHO  
  539. ECHO  
  540. ECHO                 Running NET STATUS command
  541. IF EXIST %P%:\IBMLAN\SERVICES\NETSVINI.EXE NET STATUS > %P%:\GETCFG!\NSTATUS.TXT
  542. CLS
  543. ECHO  
  544. ECHO  
  545. ECHO  
  546. ECHO  
  547. ECHO                 Running NET SESSION command
  548. IF EXIST %P%:\IBMLAN\SERVICES\NETSVINI.EXE NET SESSION > %P%:\GETCFG!\NSESSION.TXT
  549. CLS
  550. ECHO  
  551. ECHO  
  552. ECHO  
  553. ECHO  
  554. ECHO                 Running NET STATS SRV command
  555. IF EXIST %P%:\IBMLAN\SERVICES\NETSVINI.EXE NET STATS SRV > %P%:\GETCFG!\NSRVSTAT.TXT
  556. CLS
  557. ECHO  
  558. ECHO  
  559. ECHO  
  560. ECHO  
  561. ECHO                 Running NET STATS REQ command
  562. IF EXIST %P%:\IBMLAN\*.* NET STATS REQ > %P%:\GETCFG!\NREQSTAT.TXT
  563. CLS
  564. ECHO  
  565. ECHO  
  566. ECHO  
  567. ECHO  
  568. ECHO                 Running NET CONFIG SRV command
  569. IF EXIST %P%:\IBMLAN\SERVICES\NETSVINI.EXE NET CONFIG SRV > %P%:\GETCFG!\NSRVCNFG.TXT
  570. CLS
  571. ECHO  
  572. ECHO  
  573. ECHO  
  574. ECHO  
  575. ECHO                 Running NET CONFIG REQ command
  576. IF EXIST %P%:\IBMLAN\*.* NET CONFIG REQ > %P%:\GETCFG!\NREQCNFG.TXT
  577. CLS
  578. ECHO  
  579. ECHO  
  580. ECHO  
  581. ECHO  
  582. ECHO                 Getting NET USER Detail Information
  583. IF EXIST %P%:\GETCFG!\NETUSER.TXT CALL NETUSER.CMD
  584. DEL %P%:\GETCFG!\NETUSER.CMD
  585. CLS
  586. ECHO  
  587. ECHO  
  588. ECHO  
  589. ECHO  
  590. ECHO                 Getting NET GROUP SERVER Information
  591. IF EXIST %P%:\IBMLAN\*.* CALL NETGSERV.CMD
  592. DEL %P%:\GETCFG!\NETGSERV.CMD
  593. CLS
  594. ECHO  
  595. ECHO  
  596. ECHO  
  597. ECHO  
  598. ECHO                 Getting NET ALIAS Detail Information
  599. IF EXIST %P%:\GETCFG!\NETALIAS.TXT CALL NETALIAS.CMD
  600. DEL %P%:\GETCFG!\NETALIAS.CMD
  601. CLS
  602. ECHO  
  603. ECHO  
  604. ECHO  
  605. ECHO  
  606. ECHO                 Running DSPDOMDF command
  607. IF EXIST %P%:\IBMLAN\NETPROG\DSPDOMDF.CMD CALL DSPDOMDF > %P%:\GETCFG!\DSPDOMDF.TXT
  608. :BYPASS
  609. CLS
  610. ECHO  
  611. ECHO  
  612. ECHO  
  613. ECHO  
  614. ECHO                 Storing collected configuration/status files
  615. DEL %P%:\GETCFG!\PKUNZIP2.EXE
  616. DEL %P%:\GETCFG!\COPYINI.EXE
  617. PKZIP2 %P%:\GETCFG!\CUSTCFG%P% *.??? -xPKZIP2.EXE > NUL
  618. CD \
  619. ENDLOCAL
  620. COPY %P%:\GETCFG!\CUSTCFG%P%.ZIP  > NUL
  621. ECHO Y|DEL %P%:\GETCFG!\*.??? > NUL
  622. RD %P%:\GETCFG!
  623. CLS
  624. ECHO  
  625. ECHO  
  626. ECHO  
  627. ECHO  
  628. ECHO                 ** System configuration/status retrieval complete **
  629. ECHO                 **        and saved in CUSTCFG%P%.ZIP          **
  630. REM A:
  631. GOTO EXIT
  632. :DRVA
  633. CLS
  634. ECHO  
  635. ECHO  
  636. ECHO  
  637. ECHO  
  638. ECHO                 Error!  Run this utility from drive A:
  639. GOTO EXIT
  640. :README
  641. ECHO  
  642. ECHO  This procedure will collect information about this computer
  643. ECHO  for problem determination and problem analysis.  No customer
  644. ECHO  files  will be  touched and  the operation of  this computer
  645. ECHO  will NOT  be disrupted.  No user files  or programs  will be
  646. ECHO  copied.  The following files will be copied to CUSTCFGx.ZIP:
  647. ECHO  
  648. ECHO    OS/2, LAN, RIPL AND COMM MANAGER CONFIGURATION FILES
  649. ECHO    OS/2, LAN AND COMM MANAGER STATUS FILES
  650. ECHO  
  651. ECHO  Please ensure that the Server is operational and that you are
  652. ECHO  logged on with a LAN Administrator ID.
  653. ECHO  
  654. ECHO    At an OS/2 prompt in the directory where GO.CMD has been copied,
  655. ECHO    enter   GO d: {NOLOGON}
  656. ECHO  
  657. ECHO    Where "d:" is the drive where OS/2, LAN, or Communications
  658. ECHO    Manager is installed.  Typically, the configurations are needed
  659. ECHO    of the drives where OS/2 and LAN Services is installed. Specify
  660. ECHO    NOLOGON after the drive letter when logging on is NOT possible.
  661. ECHO      
  662. ECHO    Example:  GO C:
  663. :EXIT
  664. SET P=
  665.