home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1999 May / VPR9905A.BIN / DRIVER / TEKRAM / DC390U2W / WINNT / 3_1-3_5 / TRM390W.INF < prev    next >
INI File  |  1999-01-12  |  11KB  |  357 lines
  1. [Identification]
  2.     OptionType = SCSI
  3.  
  4. [LanguagesSupported]
  5.     ENG
  6.  
  7. [Options]
  8.     "TRM390W"    = trm390w
  9.  
  10. [OptionsTextENG]
  11.     "TRM390W" = "Tekram DC-390U/F/U2 NT ver 3.1 - 3.51 PCI SCSI Driver Ver 3.10"
  12.  
  13. [MiniportDrivers]
  14.     trm390w = !SERVICE_KERNEL_DRIVER, "SCSI Miniport", !SERVICE_ERROR_NORMAL, 5, %SystemRoot%System32\IoLogMsg.dll , 7
  15.  
  16. [Identify]
  17.     read-syms Identification
  18.  
  19.     set Status       = STATUS_SUCCESSFUL
  20.     set Identifier = $(OptionType)
  21.     set Media       = #("Source Media Descriptions", 1, 1)
  22.  
  23.     Return $(Status) $(Identifier) $(Media)
  24.  
  25. [ReturnOptions]
  26.     set Status          = STATUS_FAILED
  27.     set OptionList     = {}
  28.     set OptionTextList = {}
  29.  
  30.     set LanguageList = ^(LanguagesSupported, 1)
  31.     Ifcontains(i) $($0) in $(LanguageList)
  32.     goto returnoptions
  33.     else
  34.     set Status = STATUS_NOLANGUAGE
  35.     goto finish_ReturnOptions
  36.     endif
  37.  
  38. returnoptions = +
  39.     set OptionList     = ^(Options, 0)
  40.     set OptionTextList = ^(OptionsText$($0), 1)
  41.     set Status           = STATUS_SUCCESSFUL
  42.  
  43. finish_ReturnOptions = +
  44.     Return $(Status) $(OptionList) $(OptionTextList)
  45.  
  46. [InstallOption]
  47.     set Status = STATUS_FAILED
  48.     set DrivesToFree = {}
  49.  
  50.     set Option     = $($1)
  51.     set SrcDir     = $($2)
  52.     set AddCopy  = $($3)
  53.     set DoCopy     = $($4)
  54.     set DoConfig = $($5)
  55.  
  56.     set LanguageList = ^(LanguagesSupported, 1)
  57.     Ifcontains(i) $($0) in $(LanguageList)
  58.     else
  59.     set Status = STATUS_NOLANGUAGE
  60.     goto finish_InstallOption
  61.     endif
  62.     read-syms Strings$($0)
  63.  
  64.     set OptionList = ^(Options, 0)
  65.     ifcontains $(Option) in $(OptionList)
  66.     else
  67.     Debug-Output "SCSI.INF: SCSI option is not supported."
  68.     goto finish_InstallOption
  69.     endif
  70.     set OptionList = ""
  71.  
  72.     set MiniportDriver     =   #(Options,     $(Option),       1)
  73.     set Type         = $(#(MiniportDrivers, $(MiniportDriver), 1))
  74.     set Group         =   #(MiniportDrivers, $(MiniportDriver), 2)
  75.     set ErrorControl     = $(#(MiniportDrivers, $(MiniportDriver), 3))
  76.     set Tag         =   #(MiniportDrivers, $(MiniportDriver), 4)
  77.     set EventMessageFile =   #(MiniportDrivers, $(MiniportDriver), 5)
  78.     set TypesSupported     =   #(MiniportDrivers, $(MiniportDriver), 6)
  79.  
  80.     set Start         =   $(!SERVICE_BOOT_START)
  81.     shell "registry.inf" GetServicesEntryStart $(MiniportDriver)
  82.     ifint $($ShellCode) == $(!SHELL_CODE_OK)
  83.     ifstr(i) $($R0) == "STATUS_SUCCESSFUL"
  84.         ifstr(i) $($R1) == $(!SERVICE_BOOT_START)
  85.         set Start = $(!SERVICE_BOOT_START)
  86.         endif
  87.     endif
  88.     endif
  89.  
  90. installtheoption = +
  91.  
  92.     ifstr(i) $(AddCopy) == "YES"
  93.     set DoActualCopy = NO
  94.     set FileToCheck = #(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
  95.     LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\drivers\"$(FileToCheck)
  96.     ifstr(i) $(STATUS) == NO
  97.         set DoActualCopy = YES
  98.     endif
  99.  
  100.     ifstr(i) $(DoActualCopy) == NO
  101.         shell "subroutn.inf" DriversExist $($0) $(String1)
  102.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  103.         Debug-Output "SCSI.INF: shelling DriversExist failed"
  104.         goto finish_InstallOption
  105.         endif
  106.  
  107.         ifstr(i) $($R0) == STATUS_CURRENT
  108.         else-ifstr(i) $($R0) == STATUS_NEW
  109.         set DoActualCopy = YES
  110.         else-ifstr(i) $($R0) == STATUS_USERCANCEL
  111.         Debug-Output "SCSI.INF: User cancelled SCSI installation"
  112.         goto finish_InstallOption
  113.         else
  114.         Debug-Output "SCSI.INF: Error reported in DriversExist routine in SUBROUTN.INF"
  115.         goto finish_InstallOption
  116.         endif
  117.     endif
  118.  
  119.     ifstr(i) $(DoActualCopy) == YES
  120.  
  121.         shell "subroutn.inf" DoAskSourceEx $(SrcDir) $(String2)
  122.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  123.         Debug-Output "SCSI.INF: shelling DoAskSourceEx failed"
  124.         goto finish_InstallOption
  125.         endif
  126.  
  127.         ifstr(i) $($R0) == STATUS_SUCCESSFUL
  128.         set SrcDir = $($R1)
  129.         ifstr(i) $($R2) != ""
  130.             set DrivesToFree = >($(DrivesToFree), $($R2))
  131.         endif
  132.         else
  133.         Debug-Output "SCSI.INF: User cancelled asking source."
  134.         goto finish_InstallOption
  135.         endif
  136.  
  137.         install Install-AddCopyOption
  138.         ifstr(i) $(STF_INSTALL_OUTCOME) != "STF_SUCCESS"
  139.         Debug-Output "Adding SCSI files to copy list failed"
  140.         goto finish_InstallOption
  141.         endif
  142.     else
  143.         set DoCopy = NO
  144.     endif
  145.  
  146.     endif
  147.  
  148.     ifstr(i) $(DoCopy) == "YES"
  149.     read-syms ProgressCopy$($0)
  150.     install Install-DoCopyOption
  151.     ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_FAILURE"
  152.         Debug-Output "Copying files failed"
  153.         goto finish_InstallOption
  154.     else-ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_USERQUIT"
  155.         set Status = STATUS_USERCANCEL
  156.         goto finish_InstallOption
  157.     endif
  158.     endif
  159.  
  160.     ifstr(i) $(DoConfig) == "YES"
  161.     shell "registry.inf" CheckSetupModify
  162.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  163.         goto finish_InstallOption
  164.     endif
  165.  
  166.     ifstr(i) $($R0) != STATUS_SUCCESSFUL
  167.         goto finish_InstallOption
  168.     endif
  169.  
  170.     set ServiceNode   = $(MiniportDriver)
  171.     set ServiceBinary = %SystemRoot%\System32\drivers\#(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
  172.  
  173.     set ServicesValues   = { +
  174.         {Type,         0, $(!REG_VT_DWORD),      $(Type)           }, +
  175.         {Start,      0, $(!REG_VT_DWORD),      $(Start)           }, +
  176.         {Group,      0, $(!REG_VT_SZ),      $(Group)           }, +
  177.         {ErrorControl,     0, $(!REG_VT_DWORD),      $(ErrorControl)       }, +
  178.         {Tag,         0, $(!REG_VT_DWORD),      $(Tag)           }, +
  179.         {BinaryPathName, 0, $(!REG_VT_EXPAND_SZ), $(ServiceBinary)       }  +
  180.         }
  181.     set ParametersValues = ""
  182.     set DeviceValues     = {}
  183.     set EventLogValues   = { +
  184.         {EventMessageFile, 0, $(!REG_VT_EXPAND_SZ), $(EventMessageFile) }, +
  185.         {TypesSupported,   0, $(!REG_VT_DWORD),     $(TypesSupported)    }  +
  186.         }
  187.  
  188.     shell "registry.inf"  MakeServicesEntry $(ServiceNode)      +
  189.                         $(ServicesValues)   +
  190.                         $(ParametersValues) +
  191.                         $(DeviceValues)     +
  192.                         $(EventLogValues)   +
  193.                         Devices
  194.  
  195.  
  196.  
  197.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  198.         Debug-Output "Couldn't execute MakeServicesEntry in registry.inf"
  199.         goto finish_InstallOption
  200.     endif
  201.  
  202.     ifstr(i) $($R0) != STATUS_SUCCESSFUL
  203.         Debug-Output "MakeServicesEntry failed for SCSI"
  204.         goto finish_InstallOption
  205.     endif
  206.  
  207.     endif
  208.  
  209.     set Status = STATUS_SUCCESSFUL
  210. finish_InstallOption = +
  211.     ForListDo $(DrivesToFree)
  212.     LibraryProcedure STATUS,$(!LIBHANDLE), DeleteNetConnection $($) "TRUE"
  213.     EndForListDo
  214.  
  215.     Return $(Status)
  216.  
  217.  
  218. [Install-AddCopyOption]
  219.     AddSectionKeyFileToCopyList   Files-ScsiMiniportDrivers        +
  220.                   $(MiniportDriver)            +
  221.                   $(SrcDir)             +
  222.                   $(!STF_WINDOWSSYSPATH)\drivers
  223.  
  224.     exit
  225.  
  226.  
  227. [Install-DoCopyOption]
  228.     CopyFilesInCopyList
  229.     exit
  230.  
  231. [DeInstallOption]
  232.     set Status     = STATUS_FAILED
  233.     set Option     = $($1)
  234.  
  235.     set LanguageList = ^(LanguagesSupported, 1)
  236.     Ifcontains(i) $($0) in $(LanguageList)
  237.     else
  238.     set Status = STATUS_NOLANGUAGE
  239.     goto finish_DeInstallOption
  240.     endif
  241.     read-syms Strings$($0)
  242.  
  243.     set OptionList = ^(Options, 0)
  244.     ifcontains $(Option) in $(OptionList)
  245.     else
  246.     goto finish_DeInstallOption
  247.     endif
  248.     set OptionList = ""
  249.  
  250.     set MiniportDriver = #(Options, $(Option), 1)
  251.     set MiniportFile   = #(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
  252.     set FilePath       = $(!STF_WINDOWSSYSPATH)"\drivers\"$(MiniportFile)
  253.  
  254.     LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(FilePath)
  255.     ifstr(i) $(STATUS) == "NO"
  256.     set Status = STATUS_SUCCESSFUL
  257.     goto finish_DeInstallOption
  258.     endif
  259.  
  260.     shell "registry.inf" GetServicesEntryStart $(MiniportDriver)
  261.     ifstr(i) $($R0) != "STATUS_SUCCESSFUL"
  262.     ; this could happen if there is no start value or there is no
  263.     ; key, in which case the option is not installed
  264.     set Status = STATUS_SUCCESSFUL
  265.     goto finish_DeInstallOption
  266.     endif
  267.  
  268.     ifstr(i) $($R1) == $(!SERVICE_BOOT_START)
  269.     shell "subroutn.inf" SetupMessage $(!STF_LANGUAGE) "WARNING" $(String3)
  270.     ifstr(i) $($R0) != STATUS_SUCCESSFUL
  271.         goto do_removal
  272.     endif
  273.     ifstr(i) $($R1) == "CANCEL"
  274.         goto finish_DeInstallOption
  275.     endif
  276.     endif
  277.  
  278. do_removal =+
  279.  
  280.     shell "registry.inf" RemoveServicesEntry $(MiniportDriver)
  281.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  282.     Debug-Output "SCSI.INF: Failed to shell RemoveServicesEntry"
  283.     goto finish_DeInstallOption
  284.     endif
  285.  
  286.     ifstr(i) $($R0) != STATUS_SUCCESSFUL
  287.     Debug-Output "SCSI.INF: Failed to disable services entry"
  288.     goto finish_DeInstallOption
  289.     endif
  290.  
  291.     set Status = STATUS_SUCCESSFUL
  292.  
  293. finish_DeInstallOption =+
  294.     return $(Status)
  295.  
  296.  
  297. [GetInstalledOptions]
  298.     set Status = STATUS_FAILED
  299.     set InstalledOptions = {}
  300.     set InstalledOptionsText = {}
  301.  
  302.     set LanguageList = ^(LanguagesSupported, 1)
  303.     Ifcontains(i) $($0) in $(LanguageList)
  304.     else
  305.     set Status = STATUS_NOLANGUAGE
  306.     goto finish_GetInstalledOptions
  307.     endif
  308.  
  309.     set OptionList = ^(Options, 0)
  310.     ForListDo $(OptionList)
  311.     set MiniportDriver = #(Options, $($), 1)
  312.     set MiniportFile   = #(Files-ScsiMiniportDrivers, $(MiniportDriver), 2)
  313.     set FilePath       = $(!STF_WINDOWSSYSPATH)"\drivers\"$(MiniportFile)
  314.     LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(FilePath)
  315.     ifstr(i) $(STATUS) == "YES"
  316.         shell "registry.inf" GetServicesEntryStart $(MiniportDriver)
  317.         ifint $($ShellCode) == $(!SHELL_CODE_OK)
  318.         ifstr(i) $($R0) == STATUS_SUCCESSFUL
  319.             ifstr(i) $($R1) != $(!SERVICE_DISABLED)
  320.  
  321.             set OptionText = #(OptionsText$($0), $($), 1)
  322.             set InstalledOptions     = >($(InstalledOptions), $($))
  323.             set InstalledOptionsText = >($(InstalledOptionsText), $(OptionText))
  324.  
  325.             endif
  326.         endif
  327.         endif
  328.     endif
  329.     EndForListDo
  330.     set Status = STATUS_SUCCESSFUL
  331. finish_GetInstalledOptions =+
  332.     Return $(Status) $(InstalledOptions) $(InstalledOptionsText)
  333.  
  334. [ProgressCopyENG]
  335.     ProCaption     = "Windows NT Setup"
  336.     ProCancel     = "Cancel"
  337.     ProCancelMsg = "Windows NT is not correcly installed.  Are you sure you want "+
  338.            "to cancel copying files?"
  339.     ProCancelCap = "Setup Message"
  340.     ProText1     = "Copying:"
  341.     ProText2     = "To:"
  342.  
  343. [StringsENG]
  344.     String1 = "SCSI Adapter"
  345.     String2 = "Please enter the full path to the Tekram's installation files."$(!LF)$(!LF)+
  346.           "These files are located in \WINNT\3_1-3_5 on the Tekram Installation "+
  347.           "diskette. Then choose Continue."
  348.     String3 = "The SCSI Adapter has been marked as a boot device.  Removing "+
  349.           "it may cause the system not to boot."$(!LF)$(!LF)"Are you sure "+
  350.           "you want to remove the Adapter."
  351.  
  352. [Source Media Descriptions]
  353.     1  = "Tekram DC-390U/F/U2 PCI SCSI Driver Disk"  , TAGFILE = dcscsi
  354.  
  355. [Files-ScsiMiniportDrivers]
  356. trm390w  = 1,trm390w.sys , SIZE=999
  357.