home *** CD-ROM | disk | FTP | other *** search
/ Windows NT Super Tune-Up Kit / PIE-WindowsNTSuperTuneUpKit-1997.iso / DRIVERS / SCSI_CD / NEC_TRAN / SSTR1602 / OEMSETUP.INF < prev    next >
INI File  |  1994-10-10  |  15KB  |  442 lines
  1. [Identification]
  2.     OptionType = SCSI
  3.  
  4.  
  5. [LanguagesSupported]
  6.     ENG
  7.  
  8.  
  9. [Options]
  10.     "T348"       = T348
  11.     "T358"       = T358
  12.     "T338"       = T338
  13. ;    "T128"       = T128
  14. ;    "T13b"       = T13b
  15.     "T160"       = T160
  16.  
  17. [OptionsTextENG]
  18.     "T348"       = "Trantor T348 MiniSCSI Plus Driver"
  19.     "T358"       = "Trantor T358 MiniSCSI EPP Driver"
  20.     "T338"       = "Trantor T338 MiniSCSI Driver"
  21. ;    "T128"       = "Trantor T128 Driver"
  22. ;    "T13b"       = "Trantor T130B Driver"
  23.     "T160"       = "Trantor T160 Driver"
  24.  
  25. [MiniportDrivers]
  26.     T348  = !SERVICE_KERNEL_DRIVER, "SCSI Miniport", !SERVICE_ERROR_NORMAL, 20, %SystemRoot%\System32\IoLogMsg.dll , 7
  27.     T358  = !SERVICE_KERNEL_DRIVER, "SCSI Miniport", !SERVICE_ERROR_NORMAL, 20, %SystemRoot%\System32\IoLogMsg.dll , 7
  28.     T338  = !SERVICE_KERNEL_DRIVER, "SCSI Miniport", !SERVICE_ERROR_NORMAL, 20, %SystemRoot%\System32\IoLogMsg.dll , 7
  29. ;    T128  = !SERVICE_KERNEL_DRIVER, "SCSI Miniport", !SERVICE_ERROR_NORMAL, 20, %SystemRoot%\System32\IoLogMsg.dll , 7
  30. ;    T13B  = !SERVICE_KERNEL_DRIVER, "SCSI Miniport", !SERVICE_ERROR_NORMAL, 20, %SystemRoot%\System32\IoLogMsg.dll , 7
  31.     T160  = !SERVICE_KERNEL_DRIVER, "SCSI Miniport", !SERVICE_ERROR_NORMAL, 20, %SystemRoot%\System32\IoLogMsg.dll , 7
  32.  
  33.         
  34. [Identify]
  35.     read-syms Identification
  36.     set Status     = STATUS_SUCCESSFUL
  37.     set Identifier = $(OptionType)
  38.     set Media      = #("Source Media Descriptions", 1, 1)
  39.     Return $(Status) $(Identifier) $(Media)
  40.  
  41.  
  42. [ReturnOptions]
  43.     set Status        = STATUS_FAILED
  44.     set OptionList     = {}
  45.     set OptionTextList = {}
  46.     set LanguageList = ^(LanguagesSupported, 1)
  47.     Ifcontains(i) $($0) in $(LanguageList)
  48.         goto returnoptions
  49.     else
  50.         set Status = STATUS_NOLANGUAGE
  51.         goto finish_ReturnOptions
  52.     endif
  53. returnoptions = +
  54.     set OptionList     = ^(Options, 0)
  55.     set OptionTextList = ^(OptionsText$($0), 1)
  56.     set Status         = STATUS_SUCCESSFUL
  57. finish_ReturnOptions = +
  58.     Return $(Status) $(OptionList) $(OptionTextList)
  59.  
  60. [InstallOption]
  61.     set Status = STATUS_FAILED
  62.     set DrivesToFree = {}
  63.     set Option   = $($1)
  64.     set SrcDir   = $($2)
  65.     set AddCopy  = $($3)
  66.     set DoCopy   = $($4)
  67.     set DoConfig = $($5)
  68.     set LanguageList = ^(LanguagesSupported, 1)
  69.     Ifcontains(i) $($0) in $(LanguageList)
  70.     else
  71.         set Status = STATUS_NOLANGUAGE
  72.         goto finish_InstallOption
  73.     endif
  74.     read-syms Strings$($0)
  75.     set OptionList = ^(Options, 0)
  76.     ifcontains $(Option) in $(OptionList)
  77.     else
  78.         Debug-Output "SCSI.INF: SCSI option is not supported."
  79.         goto finish_InstallOption
  80.     endif
  81.     set OptionList = ""
  82.  
  83.     ;
  84.     ; Option has been defined already
  85.     ;
  86.  
  87.     set MiniportDriver   =   #(Options,         $(Option),         1)
  88.     set Type             = $(#(MiniportDrivers, $(MiniportDriver), 1))
  89.     set Group            =   #(MiniportDrivers, $(MiniportDriver), 2)
  90.     set ErrorControl     = $(#(MiniportDrivers, $(MiniportDriver), 3))
  91.     set Tag              =   #(MiniportDrivers, $(MiniportDriver), 4)
  92.     set EventMessageFile =   #(MiniportDrivers, $(MiniportDriver), 5)
  93.     set TypesSupported   =   #(MiniportDrivers, $(MiniportDriver), 6)
  94.  
  95.     set Start            =   $(!SERVICE_BOOT_START)
  96.  
  97.     shell "registry.inf" GetServicesEntryStart $(MiniportDriver)
  98.     ifint $($ShellCode) == $(!SHELL_CODE_OK)
  99.         ifstr(i) $($R0) == "STATUS_SUCCESSFUL"
  100.             ifstr(i) $($R1) == $(!SERVICE_BOOT_START)
  101.                 set Start = $(!SERVICE_BOOT_START)
  102.             endif
  103.         endif
  104.     endif
  105.  
  106. installtheoption = +
  107.     ifstr(i) $(AddCopy) == "YES"
  108.         set DoActualCopy = NO
  109.         set FileToCheck = #(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
  110.         LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\drivers\"$(FileToCheck)
  111.         ifstr(i) $(STATUS) == NO
  112.             set DoActualCopy = YES
  113.         endif
  114.  
  115.         ifstr(i) $(DoActualCopy) == NO
  116.             shell "subroutn.inf" DriversExist $($0) $(String1)
  117.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  118.                 Debug-Output "SCSI.INF: shelling DriversExist failed"
  119.                 goto finish_InstallOption
  120.             endif
  121.  
  122.             ifstr(i) $($R0) == STATUS_CURRENT
  123.             else-ifstr(i) $($R0) == STATUS_NEW
  124.                 set DoActualCopy = YES
  125.             else-ifstr(i) $($R0) == STATUS_USERCANCEL
  126.                 Debug-Output "SCSI.INF: User cancelled SCSI installation"
  127.                 goto finish_InstallOption
  128.             else
  129.                 Debug-Output "SCSI.INF: Error reported in DriversExist routine in SUBROUTN.INF"
  130.                 goto finish_InstallOption
  131.             endif
  132.         endif
  133.  
  134.         ifstr(i) $(DoActualCopy) == YES
  135.  
  136.             shell "subroutn.inf" DoAskSourceEx $(SrcDir) $(String2)
  137.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  138.                 Debug-Output "SCSI.INF: shelling DoAskSourceEx failed"
  139.                 goto finish_InstallOption
  140.             endif
  141.  
  142.             ifstr(i) $($R0) == STATUS_SUCCESSFUL
  143.                 set SrcDir = $($R1)
  144.                 ifstr(i) $($R2) != ""
  145.                     set DrivesToFree = >($(DrivesToFree), $($R2))
  146.                 endif
  147.             else
  148.                 Debug-Output "SCSI.INF: User cancelled asking source."
  149.                 goto finish_InstallOption
  150.             endif
  151.  
  152.             install Install-AddCopyOption
  153.             ifstr(i) $(STF_INSTALL_OUTCOME) != "STF_SUCCESS"
  154.                 Debug-Output "Adding SCSI files to copy list failed"
  155.                 goto finish_InstallOption
  156.             endif
  157.         else
  158.             set DoCopy = NO
  159.         endif
  160.  
  161.     endif
  162.  
  163.     ifstr(i) $(DoCopy) == "YES"
  164.         read-syms ProgressCopy$($0)
  165.         install Install-DoCopyOption
  166.         ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_FAILURE"
  167.             Debug-Output "Copying files failed"
  168.             goto finish_InstallOption
  169.         else-ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_USERQUIT"
  170.             set Status = STATUS_USERCANCEL
  171.             goto finish_InstallOption
  172.         endif
  173.     endif
  174.  
  175.     ifstr(i) $(DoConfig) == "YES"
  176.         shell "registry.inf" CheckSetupModify
  177.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  178.             goto finish_InstallOption
  179.         endif
  180.  
  181.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  182.             goto finish_InstallOption
  183.         endif
  184.  
  185.         set ServiceNode   = $(MiniportDriver)
  186.         set ServiceBinary = %SystemRoot%\System32\drivers\#(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
  187.  
  188.         set ServicesValues   = { +
  189.                 {Type,           0, $(!REG_VT_DWORD),     $(Type)                  }, +
  190.                 {Start,          0, $(!REG_VT_DWORD),     $(Start)                 }, +
  191.                 {Group,          0, $(!REG_VT_SZ),        $(Group)                 }, +
  192.                 {ErrorControl,   0, $(!REG_VT_DWORD),     $(ErrorControl)          }, +
  193.                 {Tag,            0, $(!REG_VT_DWORD),     $(Tag)                   }, +
  194.                 {BinaryPathName, 0, $(!REG_VT_EXPAND_SZ), $(ServiceBinary)         }  +
  195.                 }
  196.         set ParametersValues = ""
  197.         set DeviceValues     = {}
  198.         set EventLogValues   = { +
  199.                 {EventMessageFile, 0, $(!REG_VT_EXPAND_SZ), $(EventMessageFile) }, +
  200.                 {TypesSupported,   0, $(!REG_VT_DWORD),     $(TypesSupported)   }  +
  201.                 }
  202.  
  203.         shell "registry.inf"  MakeServicesEntry $(ServiceNode)      +
  204.                                                 $(ServicesValues)   +
  205.                                                 $(ParametersValues) +
  206.                                                 $(DeviceValues)     +
  207.                                                 $(EventLogValues)   +
  208.                                                 Parameters
  209.  
  210.  
  211.  
  212.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  213.             Debug-Output "Couldn't execute MakeServicesEntry in registry.inf"
  214.             goto finish_InstallOption
  215.         endif
  216.  
  217.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  218.             Debug-Output "MakeServicesEntry failed for SCSI"
  219.             goto finish_InstallOption
  220.         endif
  221.  
  222.     endif
  223.  
  224.     set Status = STATUS_SUCCESSFUL
  225. finish_InstallOption = +
  226.     ForListDo $(DrivesToFree)
  227.         LibraryProcedure STATUS,$(!LIBHANDLE), DeleteNetConnection $($) "TRUE"
  228.     EndForListDo
  229.  
  230.     Return $(Status)
  231.  
  232.  
  233. [Install-AddCopyOption]
  234.  
  235.     ;
  236.     ; Add the files to the copy list
  237.     ;
  238.     AddSectionKeyFileToCopyList   Files-ScsiMiniportDrivers         +
  239.                                   $(MiniportDriver)                 +
  240.                                   $(SrcDir)                      +
  241.                                   $(!STF_WINDOWSSYSPATH)\drivers
  242.  
  243.     exit
  244.  
  245.  
  246. [Install-DoCopyOption]
  247.  
  248.     ;
  249.     ; Copy files in the copy list
  250.     ;
  251.     CopyFilesInCopyList
  252.     exit
  253.  
  254. [DeInstallOption]
  255.     ;
  256.     ; Set default values for
  257.     ;
  258.     set Status   = STATUS_FAILED
  259.     ;
  260.     ; extract parameters
  261.     ;
  262.     set Option   = $($1)
  263.  
  264.     ;
  265.     ; Check if the language requested is supported
  266.     ;
  267.     set LanguageList = ^(LanguagesSupported, 1)
  268.     Ifcontains(i) $($0) in $(LanguageList)
  269.     else
  270.         set Status = STATUS_NOLANGUAGE
  271.         goto finish_DeInstallOption
  272.     endif
  273.     read-syms Strings$($0)
  274.  
  275.     ;
  276.     ; check to see if Option is supported.
  277.     ;
  278.  
  279.     set OptionList = ^(Options, 0)
  280.     ifcontains $(Option) in $(OptionList)
  281.     else
  282.         goto finish_DeInstallOption
  283.     endif
  284.     set OptionList = ""
  285.  
  286.     ;
  287.     ; fetch details about option
  288.     ;
  289.  
  290.     set MiniportDriver = #(Options, $(Option), 1)
  291.     set MiniportFile   = #(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
  292.     set FilePath       = $(!STF_WINDOWSSYSPATH)"\drivers\"$(MiniportFile)
  293.  
  294.     ;
  295.     ; check to see if file is installed
  296.     ; if not give success
  297.     ;
  298.  
  299.     LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(FilePath)
  300.     ifstr(i) $(STATUS) == "NO"
  301.         set Status = STATUS_SUCCESSFUL
  302.         goto finish_DeInstallOption
  303.     endif
  304.  
  305.     shell "registry.inf" GetServicesEntryStart $(MiniportDriver)
  306.     ifstr(i) $($R0) != "STATUS_SUCCESSFUL"
  307.         ; this could happen if there is no start value or there is no
  308.         ; key, in which case the option is not installed
  309.         set Status = STATUS_SUCCESSFUL
  310.         goto finish_DeInstallOption
  311.     endif
  312.  
  313.     ifstr(i) $($R1) == $(!SERVICE_BOOT_START)
  314.         shell "subroutn.inf" SetupMessage $(!STF_LANGUAGE) "WARNING" $(String3)
  315.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  316.             goto do_removal
  317.         endif
  318.         ifstr(i) $($R1) == "CANCEL"
  319.             goto finish_DeInstallOption
  320.         endif
  321.     endif
  322.  
  323. do_removal =+
  324.     ;
  325.     ; disable the registry entry
  326.     ;
  327.  
  328.     shell "registry.inf" RemoveServicesEntry $(MiniportDriver)
  329.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  330.         Debug-Output "SCSI.INF: Failed to shell RemoveServicesEntry"
  331.         goto finish_DeInstallOption
  332.     endif
  333.  
  334.     ifstr(i) $($R0) != STATUS_SUCCESSFUL
  335.         Debug-Output "SCSI.INF: Failed to disable services entry"
  336.         goto finish_DeInstallOption
  337.     endif
  338.  
  339.     ;
  340.     ; we won't remove the file because we can only do so during the next boot.
  341.     ; if the user chooses to reinstall the same driver during this boot
  342.     ; he will still end up deleting the driver on next boot. if the file
  343.     ; should be deleted a warning should be put up saying that the user should
  344.     ; not try to reinstall the driver during this boot
  345.     ;
  346.     ;    AddFileToDeleteList $(FilePath)
  347.  
  348.     set Status = STATUS_SUCCESSFUL
  349.  
  350. finish_DeInstallOption =+
  351.     return $(Status)
  352.  
  353.  
  354. ;-------------------------------------------------------------------------
  355. ; 5. GetInstalledOptions:
  356. ;
  357. ; FUNCTION:  To find out the list of options which are installed
  358. ;
  359. ; INPUT:     $($0): Language to Use
  360. ;
  361. ; OUTPUT:    $($R0): STATUS: STATUS_SUCCESSFUL |
  362. ;                            STATUS_FAILED
  363. ;
  364. ;            $($R1): List of options installed
  365. ;            $($R2): Option installed Text List
  366. ;-------------------------------------------------------------------------
  367. [GetInstalledOptions]
  368.     set Status = STATUS_FAILED
  369.     set InstalledOptions = {}
  370.     set InstalledOptionsText = {}
  371.  
  372.     ;
  373.     ; Check if the language requested is supported
  374.     ;
  375.     set LanguageList = ^(LanguagesSupported, 1)
  376.     Ifcontains(i) $($0) in $(LanguageList)
  377.     else
  378.         set Status = STATUS_NOLANGUAGE
  379.         goto finish_GetInstalledOptions
  380.     endif
  381.  
  382.     set OptionList = ^(Options, 0)
  383.     ForListDo $(OptionList)
  384.         set MiniportDriver = #(Options, $($), 1)
  385.         set MiniportFile   = #(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
  386.         set FilePath       = $(!STF_WINDOWSSYSPATH)"\drivers\"$(MiniportFile)
  387.         LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(FilePath)
  388.         ifstr(i) $(STATUS) == "YES"
  389.             shell "registry.inf" GetServicesEntryStart $(MiniportDriver)
  390.             ifint $($ShellCode) == $(!SHELL_CODE_OK)
  391.                 ifstr(i) $($R0) == STATUS_SUCCESSFUL
  392.                     ifstr(i) $($R1) != $(!SERVICE_DISABLED)
  393.  
  394.                         set OptionText = #(OptionsText$($0), $($), 1)
  395.                         set InstalledOptions     = >($(InstalledOptions), $($))
  396.                         set InstalledOptionsText = >($(InstalledOptionsText), $(OptionText))
  397.  
  398.                     endif
  399.                 endif
  400.             endif
  401.         endif
  402.     EndForListDo
  403.     set Status = STATUS_SUCCESSFUL
  404. finish_GetInstalledOptions =+
  405.     Return $(Status) $(InstalledOptions) $(InstalledOptionsText)
  406.  
  407.  
  408. ;**************************************************************************
  409. ; PROGRESS GUAGE VARIABLES
  410. ;**************************************************************************
  411.  
  412. [ProgressCopyENG]
  413.     ProCaption   = "Windows NT Setup"
  414.     ProCancel    = "Cancel"
  415.     ProCancelMsg = "Windows NT is not correcly installed.  Are you sure you want "+
  416.                    "to cancel copying files?"
  417.     ProCancelCap = "Setup Message"
  418.     ProText1     = "Copying:"
  419.     ProText2     = "To:"
  420.  
  421. [StringsENG]
  422.     String1 = "SCSI Adapter"
  423.     String2 = "Please enter the full path to the OEM SCSI "+
  424.               "Adapter files.  Then choose Continue."
  425.     String3 = "The SCSI Adapter has been marked as a boot device.  Removing "+
  426.               "it may cause the system not to boot."$(!LF)$(!LF)"Are you sure "+
  427.               "you want to remove the Adapter."
  428.  
  429. [Source Media Descriptions]
  430.     1  = "Trantor OEM Driver disk"  , TAGFILE = TRANTOR
  431.  
  432.  
  433.  
  434. [Files-ScsiMiniportDrivers]
  435. T348 = 1,T348.sys,SIZE=25088
  436. T358 = 1,T358.sys,SIZE=30208
  437. T338 = 1,T338.sys,SIZE=24064
  438. ;T128 = 1,T128.sys,SIZE=999
  439. ;T13B = 1,T13b.sys,SIZE=999
  440. T160 = 1,T160.sys,SIZE=25088
  441.  
  442.