home *** CD-ROM | disk | FTP | other *** search
/ Enter 1999 April - Disc 1 / enter_04_1999_1.iso / OS2 / XFREE86 / XBASE.ZIP / XFree86 / bin / cleanupdate.cmd < prev    next >
Encoding:
Text File  |  1996-05-21  |  3.5 KB  |  94 lines
  1. /* OS/2 REXX */
  2. /* Copyright (C)1996 by Holger.Veit@gmd.de */
  3. /* This script cleans the 3.1.2D directory before installation of 3.1.2E
  4.  * It is mandatory to call this script before
  5.  * This file is different from a simple recursive remove-everything,
  6.  * it will preserve installed user apps and certain user files.
  7.  */
  8. '@echo off'
  9. ADDRESS CMD
  10. CALL RxFuncAdd 'SysLoadFuncs','RexxUtil','SysLoadFuncs'
  11. CALL SysLoadFuncs
  12. env = 'OS2ENVIRONMENT'
  13. x11root = VALUE('X11ROOT',,env)
  14. IF x11root = '' THEN DO
  15.     SAY "You must have the environment variable X11ROOT set to point to"
  16.     SAY "the root of your XFree86 3.1.2D installation".
  17.     EXIT
  18. END
  19.  
  20. bindir=x11root'\XFree86\bin'
  21. libdir=x11root'\XFree86\lib'
  22. mandir=x11root'\XFree86\man'
  23.  
  24. dir=bindir
  25. ext=".exe"
  26. lst="appres atobm bdftopcf beforelight bitmap bmtoa dga editres fsinfo "
  27. lst=lst||"fslsfonts fstobdf iceauth imake makedepend mkfontdir oclock "
  28. lst=lst||"reconfig resize showrgb smproxy twm xauth xclipboard xclock "
  29. lst=lst||"xcmsdb xconsole xcutsel xdpyinfo xf86config XF86_8514 XF86_AGX "
  30. lst=lst||"XF86_I128 XF86_Mach32 XF86_Mach64 XF86_Mach8 XF86_Mono XF86_P9000 "
  31. lst=lst||"XF86_S3 XF86_SVGA XF86_VGA16 XF86_W32 xfd xfs xhost xieperf xinit "
  32. lst=lst||"xkbbell xkbcomp xkbevd xkbprint xkbvleds xkbwatch xkill xlogo "
  33. lst=lst||"xlsatoms xlsclients xlsfonts xmag xman xmh xmodmap Xnest xprop "
  34. lst=lst||"xrdb xrefresh xset xsetmode xsetpointer xsetroot xsm xstdcmap "
  35. lst=lst||"xterm Xvfb xvidtune xwd xwininfo xwud"
  36. CALL clearit dir,lst,ext
  37.  
  38. dir=bindir
  39. ext=".cmd"
  40. lst="rstart xmkmf imakesvc indir make mkdirhier os2inst"
  41. CALL clearit dir,lst,ext
  42.  
  43. dirtoclean=libdir
  44. ext=""
  45. lst="FS.a FS.lib ICE.a ICE.dll ICE.lib ICE_s.a oldX.a oldX.lib "
  46. lst=lst||"PEX5.a PEX5.dll PEX5.lib PEX5_s.a SM.a SM.dll SM.lib SM_s.a X11.a "
  47. lst=lst||"X11.dll X11.lib X11_s.a Xau.a Xau.lib Xaw.a Xaw.dll Xaw.lib Xaw_s.a "
  48. lst=lst||"Xdmcp.a Xdmcp.lib Xext.a Xext.dll Xext.lib Xext_s.a Xi.a Xi.dll Xi.lib "
  49. lst=lst||"XIE.a XIE.dll XIE.lib XIE_s.a Xi_s.a xkbfile.a xkbfile.lib Xmu.a Xmu.dll "
  50. lst=lst||"Xmu.lib Xmu_s.a Xss.a Xss.lib Xt.a Xt.dll Xt.lib Xtst.a Xtst.dll Xtst.lib "
  51. lst=lst||"Xtst_s.a Xt_s.a Xxf86dga.a Xxf86dga.lib Xxf86misc.a Xxf86misc.lib Xxf86vm.a "
  52. lst=lst||"Xxf86vm.lib"
  53. CALL clearit dir,lst,ext
  54.  
  55. dir=libdir'\X11\app-defaults'
  56. ext=""
  57. lst="XTerm XTerm-color"
  58. CALL clearit dir,lst,ext
  59.  
  60. dir=libdir'\X11\config'
  61. ext=""
  62. lst="Imake.cf Imake.rules Imake.tmpl Library.tmpl os2.cf os2.rules "
  63. lst=lst||"os2Lib.rules os2Lib.tmpl Project.tmpl Server.tmpl site.def xf86.rules "
  64. lst=lst||"xf86.tmpl xf86site.def xfree86.cf"
  65. CALL clearit dir,lst,ext
  66.  
  67. dir=libdir'\X11\doc'
  68. ext=""
  69. lst="AccelCards BetaReport COPYRIGHT Devices INSTALL LbxproxyOnly "
  70. lst=lst||"Monitors QuickStart.doc README README.agx README.ark README.ati "
  71. lst=lst||"README.cirrus README.clkprog README.Config README.DGA README.LinkKit "
  72. lst=lst||"README.Mach64 README.Oak README.P9000 README.S3 README.trident README.tseng "
  73. lst=lst||"README.Video7 README.W32 README.WstDig RELNOTES ServersOnly VGADriver.Doc "
  74. lst=lst||"xinput"
  75. CALL clearit dir,lst,ext
  76.  
  77. dir=mandir'\man1'
  78. ext=""
  79. lst="SuperProbe.1 xf86config.1 XF86_8514.1 XF86_Accel.1 XF86_AGX.1 "
  80. lst=lst||"XF86_I128.1 XF86_Mach32.1 XF86_Mach64.1 XF86_Mach8.1 XF86_Mono.1 "
  81. lst=lst||"XF86_P9000.1 XF86_S3.1 XF86_SVGA.1 XF86_VGA16.1 XF86_W32.1 "
  82. lst=lst||"XFree86.1 Xserver.1 XF86Config.1"
  83. CALL clearit dir,lst,ext
  84. EXIT
  85.  
  86. clearit: PROCEDURE
  87.     ARG dir,list,ext
  88.     DO i=1 TO WORDS(list)
  89.         file = dir'\'WORD(list,i)||ext
  90.         SAY "deleting "file
  91.         Call SysFileDelete(file)
  92.     END
  93.     RETURN
  94.