home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Inside Multimedia 1995 August
/
IMM0895.BIN
/
driver
/
mitsumi
/
mtmnt111.exe
/
OEMSETUP.INF
< prev
next >
Wrap
INI File
|
1994-04-19
|
14KB
|
400 lines
[Identification]
OptionType = SCSI
[LanguagesSupported]
ENG
[Options]
"OEMMTM" = MtmCD
[OptionsTextENG]
"OEMMTM" = "MITSUMI CD-ROM Drive"
[MiniportDrivers]
MtmCD = !SERVICE_KERNEL_DRIVER, "SCSI CDROM Class", !SERVICE_ERROR_NORMAL, 2, %SystemRoot%\System32\IoLogMsg.dll , 7
[Identify]
read-syms Identification
set Status = STATUS_SUCCESSFUL
set Identifier = $(OptionType)
set Media = #("Source Media Descriptions", 1, 1)
Return $(Status) $(Identifier) $(Media)
[ReturnOptions]
set Status = STATUS_FAILED
set OptionList = {}
set OptionTextList = {}
;
; Check if the language requested is supported
;
set LanguageList = ^(LanguagesSupported, 1)
Ifcontains(i) $($0) in $(LanguageList)
goto returnoptions
else
set Status = STATUS_NOLANGUAGE
goto finish_ReturnOptions
endif
;
; form a list of all the options and another of the text representing
;
returnoptions = +
set OptionList = ^(Options, 0)
set OptionTextList = ^(OptionsText$($0), 1)
set Status = STATUS_SUCCESSFUL
finish_ReturnOptions = +
Return $(Status) $(OptionList) $(OptionTextList)
[InstallOption]
;
; Set default values for
;
set Status = STATUS_FAILED
set DrivesToFree = {}
;
; extract parameters
;
set Option = $($1)
set SrcDir = $($2)
set AddCopy = $($3)
set DoCopy = $($4)
set DoConfig = $($5)
set ExitCode = 0
;
; Check if the language requested is supported
;
set LanguageList = ^(LanguagesSupported, 1)
Ifcontains(i) $($0) in $(LanguageList)
else
set Status = STATUS_NOLANGUAGE
goto finish_InstallOption
endif
read-syms Strings$($0)
;
; check to see if Option is supported.
;
set OptionList = ^(Options, 0)
ifcontains $(Option) in $(OptionList)
else
Debug-Output "SCSI.INF: SCSI option is not supported."
goto finish_InstallOption
endif
set OptionList = ""
;
; Option has been defined already
;
set MiniportDriver = #(Options, $(Option), 1)
set Type = $(#(MiniportDrivers, $(MiniportDriver), 1))
set Group = #(MiniportDrivers, $(MiniportDriver), 2)
set ErrorControl = $(#(MiniportDrivers, $(MiniportDriver), 3))
set Tag = #(MiniportDrivers, $(MiniportDriver), 4)
set EventMessageFile = #(MiniportDrivers, $(MiniportDriver), 5)
set TypesSupported = #(MiniportDrivers, $(MiniportDriver), 6)
set Start = $(!SERVICE_BOOT_START)
installtheoption = +
;
; Code to add files to copy list
;
ifstr(i) $(AddCopy) == "YES"
set DoActualCopy = NO
set FileToCheck = #(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\drivers\"$(FileToCheck)
ifstr(i) $(STATUS) == NO
set DoActualCopy = YES
endif
set DoActualSetup = YES
set FileToCheckE = #(Files-Setup, $(MiniportDriver), 2)
LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)\$(FileToCheckE)
ifstr(i) $(STATUS) == NO
set DoActualSetup = NO
endif
ifstr(i) $(DoActualCopy) == NO
shell "subroutn.inf" DriversExist $($0) $(String1)
ifint $($ShellCode) != $(!SHELL_CODE_OK)
Debug-Output "SCSI.INF: shelling DriversExist failed"
goto finish_InstallOption
endif
ifstr(i) $($R0) == STATUS_CURRENT
else-ifstr(i) $($R0) == STATUS_NEW
set DoActualCopy = YES
else-ifstr(i) $($R0) == STATUS_USERCANCEL
Debug-Output "SCSI.INF: User cancelled SCSI installation"
goto finish_InstallOption
else
Debug-Output "SCSI.INF: Error reported in DriversExist routine in SUBROUTN.INF"
goto finish_InstallOption
endif
endif
ifstr(i) $(DoActualCopy) == YES
shell "subroutn.inf" DoAskSourceEx $(SrcDir) $(String2)
ifint $($ShellCode) != $(!SHELL_CODE_OK)
Debug-Output "SCSI.INF: shelling DoAskSourceEx failed"
goto finish_InstallOption
endif
ifstr(i) $($R0) == STATUS_SUCCESSFUL
set SrcDir = $($R1)
ifstr(i) $($R2) != ""
set DrivesToFree = >($(DrivesToFree), $($R2))
endif
else
Debug-Output "SCSI.INF: User cancelled asking source."
goto finish_InstallOption
endif
else
set DoCopy = NO
endif
endif
ifstr(i) $(DoConfig) == "YES"
;
; first run a privilege check on modifying the setup node
;
shell "registry.inf" CheckSetupModify
ifint $($ShellCode) != $(!SHELL_CODE_OK)
goto finish_InstallOption
endif
ifstr(i) $($R0) != STATUS_SUCCESSFUL
goto finish_InstallOption
endif
ifstr(i) $(DoCopy) == "YES"
;
; call SETUPB.EXE
;
RunProgram ExitCode "" "" $(SrcDir)\setupb.exe 1
ifint $(ExitCode) != 0
set Status = STATUS_USERCANCEL
goto finish_InstallOption
endif
else
ifstr(i) $(DoActualSetup) == "YES"
;
; call SETUPB.EXE
;
RunProgram ExitCode "" "" $(!STF_WINDOWSSYSPATH)\setupb.exe 2
ifint $(ExitCode) != 0
set Status = STATUS_USERCANCEL
goto finish_InstallOption
endif
else
;
; enable the registry entry
;
shell "registry.inf" ModifyServicesEntry $(MiniportDriver) $(!SERVICE_BOOT_START)
ifint $($ShellCode) != $(!SHELL_CODE_OK)
Debug-Output "SCSI.INF: Failed to shell ModifyServicesEntry"
goto finish_InstallOption
endif
ifstr(i) $($R0) != STATUS_SUCCESSFUL
Debug-Output "SCSI.INF: Failed to enable services entry"
goto finish_InstallOption
endif
endif
endif
endif
set Status = STATUS_SUCCESSFUL
finish_InstallOption = +
ForListDo $(DrivesToFree)
LibraryProcedure STATUS,$(!LIBHANDLE), DeleteNetConnection $($) "TRUE"
EndForListDo
Return $(Status)
[DeInstallOption]
Debug-Output "MTMCD: DeInstallOptions Section..."
;
; Set default values for
;
set Status = STATUS_FAILED
;
; extract parameters
;
set Option = $($1)
;
; Check if the language requested is supported
;
set LanguageList = ^(LanguagesSupported, 1)
Ifcontains(i) $($0) in $(LanguageList)
else
set Status = STATUS_NOLANGUAGE
goto finish_DeInstallOption
endif
read-syms Strings$($0)
;
; check to see if Option is supported.
;
set OptionList = ^(Options, 0)
ifcontains $(Option) in $(OptionList)
else
goto finish_DeInstallOption
endif
set OptionList = ""
;
; fetch details about option
;
set MiniportDriver = #(Options, $(Option), 1)
set MiniportFile = #(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
set FilePath = $(!STF_WINDOWSSYSPATH)"\drivers\"$(MiniportFile)
;
; check to see if file is installed
; if not give success
;
LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(FilePath)
ifstr(i) $(STATUS) == "NO"
set Status = STATUS_SUCCESSFUL
goto finish_DeInstallOption
endif
shell "registry.inf" GetServicesEntryStart $(MiniportDriver)
ifstr(i) $($R0) != "STATUS_SUCCESSFUL"
; this could happen if there is no start value or there is no
; key, in which case the option is not installed
set Status = STATUS_SUCCESSFUL
goto finish_DeInstallOption
endif
ifstr(i) $($R1) == $(!SERVICE_BOOT_START)
shell "subroutn.inf" SetupMessage $(!STF_LANGUAGE) "WARNING" $(String3)
ifstr(i) $($R0) != STATUS_SUCCESSFUL
goto do_removal
endif
ifstr(i) $($R1) == "CANCEL"
goto finish_DeInstallOption
endif
endif
do_removal =+
;
; disable the registry entry
;
shell "registry.inf" RemoveServicesEntry $(MiniportDriver)
ifint $($ShellCode) != $(!SHELL_CODE_OK)
Debug-Output "SCSI.INF: Failed to shell RemoveServicesEntry"
goto finish_DeInstallOption
endif
ifstr(i) $($R0) != STATUS_SUCCESSFUL
Debug-Output "SCSI.INF: Failed to disable services entry"
goto finish_DeInstallOption
endif
;
; we won't remove the file because we can only do so during the next boot.
; if the user chooses to reinstall the same driver during this boot
; he will still end up deleting the driver on next boot. if the file
; should be deleted a warning should be put up saying that the user should
; not try to reinstall the driver during this boot
;
; AddFileToDeleteList $(FilePath)
set Status = STATUS_SUCCESSFUL
finish_DeInstallOption =+
return $(Status)
[GetInstalledOptions]
set Status = STATUS_FAILED
set InstalledOptions = {}
set InstalledOptionsText = {}
;
; Check if the language requested is supported
;
set LanguageList = ^(LanguagesSupported, 1)
Ifcontains(i) $($0) in $(LanguageList)
else
set Status = STATUS_NOLANGUAGE
goto finish_GetInstalledOptions
endif
set OptionList = ^(Options, 0)
ForListDo $(OptionList)
set MiniportDriver = #(Options, $($), 1)
set MiniportFile = #(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
set FilePath = $(!STF_WINDOWSSYSPATH)"\drivers\"$(MiniportFile)
LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(FilePath)
ifstr(i) $(STATUS) == "YES"
shell "registry.inf" GetServicesEntryStart $(MiniportDriver)
ifint $($ShellCode) == $(!SHELL_CODE_OK)
ifstr(i) $($R0) == STATUS_SUCCESSFUL
ifstr(i) $($R1) != $(!SERVICE_DISABLED)
set OptionText = #(OptionsText$($0), $($), 1)
set InstalledOptions = >($(InstalledOptions), $($))
set InstalledOptionsText = >($(InstalledOptionsText), $(OptionText))
endif
endif
endif
endif
EndForListDo
set Status = STATUS_SUCCESSFUL
finish_GetInstalledOptions =+
Return $(Status) $(InstalledOptions) $(InstalledOptionsText)
;**************************************************************************
; PROGRESS GUAGE VARIABLES
;**************************************************************************
;[ProgressCopyENG]
; ProCaption = "Windows NT Setup"
; ProCancel = "Cancel"
; ProCancelMsg = "Windows NT is not correcly installed. Are you sure you want "+
; "to cancel copying files?"
; ProCancelCap = "Setup Message"
; ProText1 = "Copying:"
; ProText2 = "To:"
[StringsENG]
String1 = "MITSUMI Adapter"
String2 = "Please enter the full path to the MITSUMI "+
"Adapter files. Then choose Continue."
String3 = "The MITSUMI Adapter has been marked as a boot device. Removing "+
"it may cause the system not to boot."$(!LF)$(!LF)"Are you sure "+
"you want to remove the Adapter."
;[StringF ]
; String1 = "Adaptateur MITSUMI"
; String2 = "Entrez le chemin dÆaccΦs complet aux fichiers "+
; "de lÆadaptateur MITSUMI, puis choisissez ôcontinuerö."
; String3 = "LÆadaptateur MITSUMI a ΘtΘ repΘrΘ comme composante de mise en route. "+
; "Sa suppression risque dÆentraver le lancement du systΦme. "+
; "Voulez-vous rΘellement supprimer lÆadaptateur?"
;[StringG ]
; String1 = "MITSUMI Adapter
; String2 = "Bitte geben Sie die vollstΣndige Pfadbezeichnung fⁿr "+
; "die MITSUMI Adapter-Dateien ein. Dann wΣhlen Sie Fortfahren."
; String3 = "Der MITSUMI Adapter wurde als StartgerΣt gekennzeichnet. "+
; "Seine Entfernung kann das System am Booten hindern. "+
; "Sind Sie sicher, da▀ Sie den Adapter entfernen m÷chten?"
;[StringI ]
; String1 = "Adattore MITSUMI"
; String2 = "Prego digitare il cammino completo verso i file "+
; dellÆadattatore MITSUMI. Poi setezionare Continua."
; String3 = "LÆadattatore MITSUMI Φ stato marcato come unitα di boot. "+
; Togliendolo potrebbe succedere che il sistema non riesce "+
; pi∙ ad innescare. Siete sicuri di voler togliere lÆadattatore?"
;[StringS ]
; String1 = "Adaptador MITSUMI"
; String2 = "Por favor, escriba el nombre completo del directorio para "+
; los archivos del adaptador MITSUMI. DespuΘs seleccione Continuar."
; String3 = "El adaptador MITSUMI ha sido determinado como unidad cargadora. "+
; Quitarlo puede causar que el sistema no cargue. "+
; ┐Estß Ud. seguro que quiere quitar el adaptador?"
[Source Media Descriptions]
1 = "" , TAGFILE = mtmminip.tag
[Files-ScsiMiniportDrivers]
MtmCD = 1 , mtmcdaeb.sys , SIZE=57856
[Files-Setup]
MtmCD = 1 , setupb.exe , SIZE=37888