home *** CD-ROM | disk | FTP | other *** search
- ; IMAGE LIBRARY
- ;
- ; Target platform = AIRWALK
- ; Package type = Utility
- ; Package Name = DirectX7
- ;==========================================
- ; Modifications
- ; 06/07/00 GSI The verification of the Csd letter is now unuseful
- ; 24/07/00 GSI Increase delay after setup and no version verification
-
- DEBUG
- #Package,DirectX
- #Version,DirectX7
- #Target_OS,Win95 Win98
- #Target_OS_Major,5
- #Target_OS_Minor,0
- #Target_OS_CSD,Service Pack 3 Service Pack 4 Service Pack 5 Service Pack 6
-
- #ALL_LOCS,TRUE
- #ALL_OS,TRUE
- #TARGET_DIR,C:\Masters\#Package
-
- INCLUDE,MSG.Script
- LOG,#F_FAIL
- GRADIENT,#COLOR_TOP,#COLOR_BOTTOM
- MSG_START,#FONT_SIZE,#COLOR_BACK,#COLOR_TEXT,#ENV,#MSG_POS
- INI_SEC_DEL,#F_RESULT,#Package
- INI_KEY_WRITE,#F_RESULT,#Package,Install_Start,#NOW
-
- ;==========================================
- ; Verify the current loc and set LOC variable
- ; If don't exists then exit script
- ;==========================================
-
- INCLUDE,LOC.Script
-
-
- ; WARNING : This verification is now unuseful !
-
- ; Verify the Current CSD number
- ; If Win95 SR2.5 (CSD = C or c) then Ok else exit script
-
- FINDSTRING,#OS_NAME,Win98
- ONGOOD,CORRECT_OS
-
- FINDSTRING,#OS_NAME,Win95
- ONERROR,ERROR_OS
-
- ;#CSD,#OS_CSD
- ;FINDSTRING,#CSD,C,c
- ;ONGOOD,CORRECT_OS
- ;GOTO,EXIT_ON_ERROR
-
-
- ;==========================================
- ; Verify the current OS and set OS variable
- ; If don't exists then exit script
- ;==========================================
- :CORRECT_OS
- #OS,#OS_Name
-
- :OS_TEST
- FINDSTRING,#Target_OS,#OS_Name
- ONERROR,ERROR_OS
- GOTO,END_OS
-
- :ERROR_OS
- #ERROR_MSG,#ERR_OS
- ; Write error somewhere...
- INI_KEY_WRITE,#F_RESULT,#Package,STATUS,FAIL
- INI_KEY_WRITE,#F_RESULT,#Package,CHECK,FAIL
- ; And finally exit the script
- GOTO,EXIT_ON_ERROR
-
- :END_OS
-
- ;Check if already installed
- REG_SET_ROOT,HKLM
- REG_KEY_EXIST,\SOFTWARE\Microsoft\DirectX
- ONERROR,FIRST_INSTALL
- REG_KEY_OPEN,\SOFTWARE\Microsoft\DirectX
- REG_VAL_EXIST,Version
- ONERROR,FIRST_INSTALL
- REG_VAL_READ,STRING,Version
- EQUAL,#REGVALUE,4.07.00.0716
- ONERROR,FIRST_INSTALL
- #ERROR_MSG,#DONE
- ; Write error somewhere...
- INI_KEY_WRITE,#F_RESULT,#Package,STATUS,PASS
- INI_KEY_WRITE,#F_RESULT,#Package,CHECK,FAIL
- ; And finally exit the script
- MSG_START,#FONT_SIZE,#COLOR_BACK,#COLOR_TEXT,#ERROR_MSG,#MSG_POS
- Delay,10
- LOG,#F_DONE
- GOTO,FIN
-
- ;==========================================
- ; Write Package information to Log file
- ;
- ;==========================================
-
- :FIRST_INSTALL
- MSG_START,#FONT_SIZE,#COLOR_BACK,#COLOR_TEXT,#ENV_OK,#MSG_POS
-
- INI_KEY_WRITE,#F_RESULT,#Package,PACKAGE_REV,#Version
- INI_KEY_WRITE,#F_RESULT,#Package,TARGET_OS,#Target_OS
- INI_KEY_WRITE,#F_RESULT,#Package,OS,#OS_NAME #OS_MAJORVERSION.#OS_MINORVERSION
- INI_KEY_WRITE,#F_RESULT,#Package,SP,#OS_CSD
- INI_KEY_WRITE,#F_RESULT,#Package,LOC,#LOC
- INI_KEY_WRITE,#F_RESULT,#Package,Install_Start,#NOW
- Delay,10
-
- :COPY_TO_MASTERS
- MSG_START,#FONT_SIZE,#COLOR_BACK,#COLOR_TEXT,#COPY,#MSG_POS
- #LOC,#LOC,\
- EQUAL,#ALL_LOCS,TRUE
- ONERROR,LOC_OS
- #LOC,#NULL
-
- :LOC_OS
- #OS,#OS,\
- EQUAL,#ALL_OS,TRUE
- ONERROR,LOC_PATH
- #OS,#NULL
-
- :LOC_PATH
-
- FILE_COPY,#OSPackage\#LOC*.*,#TARGET_DIR,SILENT,NOCONFIRMATION
-
- ;==========================================
- ; Verify copy
- ;
- ;==========================================
- :VERIFY_COPY
- FILE_EXISTS,#TARGET_DIR\Dx70a.exe
- ONGOOD,START_INSTALL
-
- #ERROR_MSG,#ERR_COPY
- ; Write error somewhere...
- INI_KEY_WRITE,#F_RESULT,#Package,STATUS,FAIL
- INI_KEY_WRITE,#F_RESULT,#Package,CHECK,FAIL
- ; And finally exit the script
- GOTO,EXIT_ON_ERROR
-
- :START_INSTALL
-
- MSG_START,#FONT_SIZE,#COLOR_BACK,#COLOR_TEXT,#COPY_OK,#MSG_POS
- Delay,10
- MSG_START,#FONT_SIZE,#COLOR_BACK,#COLOR_TEXT,#SETUP,#MSG_POS
- Delay,10
- MSG_START,#FONT_SIZE,#COLOR_BACK,#COLOR_TEXT,#WAIT,#MSG_POS
-
-
- START,#TARGET_DIR\Dx70a.exe, /Q /R:N
-
- ;------------------ Wait the end of setup
-
- ; Delay 200 -> 300
- Delay,300
-
- ;==========================================
- ; Apply any patch to registry or ini files
- ;
- ;==========================================
- :APPLY_PATCH
-
- ;==========================================
- ; Verify Install
- ;
- ;==========================================
-
-
- :VERIFY_INSTALL
- REG_SET_ROOT,HKLM
- REG_KEY_EXIST,\SOFTWARE\Microsoft\DirectX
- ;ONERROR,BAD_DX
- ONGOOD,INSTALL_OK
- ;REG_KEY_OPEN,\SOFTWARE\Microsoft\DirectX
- ;REG_VAL_EXIST,Version
- ;ONERROR,BAD_DX
- ;REG_VAL_READ,STRING,Version
- ;EQUAL,#REGVALUE,4.07.00.0716
- ;ONGOOD,INSTALL_OK
-
- :BAD_DX
- #ERROR_MSG,#ERR_VERIF
- ; Write error somewhere...
- INI_KEY_WRITE,#F_RESULT,#Package,STATUS,PASS
- INI_KEY_WRITE,#F_RESULT,#Package,CHECK,FAIL
- ; And finally exit the script
- GOTO,EXIT_ON_ERROR
-
- :INSTALL_OK
- INI_KEY_WRITE,#F_RESULT,#Package,STATUS,PASS
- INI_KEY_WRITE,#F_RESULT,#Package,CHECK,PASS
- INI_KEY_WRITE,#F_RESULT,#Package,Install_Stop,#NOW
- INI_KEY_WRITE,#F_RESULT,#Package,ERROR,None
- MSG_START,#FONT_SIZE,#COLOR_BACK,#COLOR_TEXT,#OK,#MSG_POS
- Delay,10
-
- :END_OF_SCRIPT
- LOG,#F_PASS
- GOTO,FIN
-
- :EXIT_ON_ERROR
- ; Tell user that package don't support the current LOC
- MSG_START,#FONT_SIZE,#COLOR_BACK,#COLOR_TEXT,#ERROR_MSG,#MSG_POS
- INI_KEY_WRITE,#F_RESULT,#Package,ERROR,#ERROR_MSG
- INI_KEY_WRITE,#F_RESULT,#Package,PACKAGE_REV,#Version
- INI_KEY_WRITE,#F_RESULT,#Package,TARGET_OS,#Target_OS
- INI_KEY_WRITE,#F_RESULT,#Package,OS,#OS_NAME #OS_MAJORVERSION.#OS_MINORVERSION
- INI_KEY_WRITE,#F_RESULT,#Package,SP,#OS_CSD
- INI_KEY_WRITE,#F_RESULT,#Package,LOC,#CURRENT_LOC
- INI_KEY_WRITE,#F_RESULT,#Package,Install_Stop,#NOW
- DELAY,20
- GRADIENT,clBlack,clBlack
- MSG_START,#FONT_SIZE,#CL_RED,#CL_BLACK,#FAIL,#MSG_POS
- DELAY,20
-
- :FIN
-
-
-
-