home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / d / d423_liu / 8.ddi / TAPE.IN_ / TAPE.IN
Encoding:
INI File  |  1993-07-24  |  14.8 KB  |  327 lines
  1. [Identification]
  2.     OptionType = TAPE
  3. [ClassDrivers]
  4.     4mmdat   = !SERVICE_KERNEL_DRIVER, "SCSI Class"   , !SERVICE_ERROR_NORMAL, "" , "\SCSI Miniport", "%SystemRoot%\System32\IoLogMsg.dll;%SystemRoot%\System32\drivers\4mmdat.sys"   , 7
  5.     wangqic  = !SERVICE_KERNEL_DRIVER, "SCSI Class"   , !SERVICE_ERROR_NORMAL, "" , "\SCSI Miniport", "%SystemRoot%\System32\IoLogMsg.dll;%SystemRoot%\System32\drivers\wangqic.sys"  , 7
  6.     tandqic  = !SERVICE_KERNEL_DRIVER, "SCSI Class"   , !SERVICE_ERROR_NORMAL, "" , "\SCSI Miniport", "%SystemRoot%\System32\IoLogMsg.dll;%SystemRoot%\System32\drivers\tandqic.sys"  , 7
  7.     archqic  = !SERVICE_KERNEL_DRIVER, "SCSI Class"   , !SERVICE_ERROR_NORMAL, "" , "\SCSI Miniport", "%SystemRoot%\System32\IoLogMsg.dll;%SystemRoot%\System32\drivers\archqic.sys"  , 7
  8.     qic117   = !SERVICE_KERNEL_DRIVER, "Primary Disk" , !SERVICE_ERROR_NORMAL, 6  , "",               "%SystemRoot%\System32\IoLogMsg.dll;%SystemRoot%\System32\drivers\qic117.sys"   , 7
  9.     exabyte1 = !SERVICE_KERNEL_DRIVER, "SCSI Class"   , !SERVICE_ERROR_NORMAL, "" , "\SCSI Miniport", "%SystemRoot%\System32\IoLogMsg.dll;%SystemRoot%\System32\drivers\exabyte1.sys" , 7
  10.     exabyte2 = !SERVICE_KERNEL_DRIVER, "SCSI Class"   , !SERVICE_ERROR_NORMAL, "" , "\SCSI Miniport", "%SystemRoot%\System32\IoLogMsg.dll;%SystemRoot%\System32\drivers\exabyte2.sys" , 7
  11. [Identify]
  12.     read-syms Identification
  13.     set Status     = STATUS_SUCCESSFUL
  14.     set Identifier = $(OptionType)
  15.     set Media      = #("Source Media Descriptions", 1, 1)
  16.     Return $(Status) $(Identifier) $(Media)
  17. [ReturnOptions]
  18.     set Status        = STATUS_FAILED
  19.     set OptionList     = {}
  20.     set OptionTextList = {}
  21.     set LanguageList = ^(LanguagesSupported, 1)
  22.     Ifcontains(i) $($0) in $(LanguageList)
  23.         goto returnoptions
  24.     else
  25.         set Status = STATUS_NOLANGUAGE
  26.         goto finish_ReturnOptions
  27.     endif
  28. returnoptions = +
  29.     set OptionList     = ^(Options, 0)
  30.     set OptionTextList = ^(OptionsText$($0), 1)
  31.     set Status         = STATUS_SUCCESSFUL
  32. finish_ReturnOptions = +
  33.     Return $(Status) $(OptionList) $(OptionTextList)
  34. [InstallOption]
  35.     set Status   = STATUS_FAILED
  36.     set DrivesToFree = {}
  37.     ifstr(i) $($1) == NONE
  38.         set Status = STATUS_SUCCESSFUL
  39.         goto finish_InstallOption
  40.     else-ifstr(i) $($1) == UNKNOWN
  41.         set Status = STATUS_SUCCESSFUL
  42.         goto finish_InstallOption
  43.     endif
  44.     set Option   = $($1)
  45.     set SrcDir   = $($2)
  46.     set AddCopy  = $($3)
  47.     set DoCopy   = $($4)
  48.     set DoConfig = $($5)
  49.     set LanguageList = ^(LanguagesSupported, 1)
  50.     Ifcontains(i) $($0) in $(LanguageList)
  51.     else
  52.         set Status = STATUS_NOLANGUAGE
  53.         goto finish_InstallOption
  54.     endif
  55.     read-syms Strings$($0)
  56.     set OptionList = ^(Options, 0)
  57.     ifcontains $(Option) in $(OptionList)
  58.     else
  59.         goto finish_InstallOption
  60.     endif
  61.     set OptionList = ""
  62.     set ClassDriver      =   #(Options,      $(Option),      1)
  63.     set Type             = $(#(ClassDrivers, $(ClassDriver), 1))
  64.     set Group            =   #(ClassDrivers, $(ClassDriver), 2)
  65.     set ErrorControl     = $(#(ClassDrivers, $(ClassDriver), 3))
  66.     set Tag              =   #(ClassDrivers, $(ClassDriver), 4)
  67.     set Dependencies     =   #(ClassDrivers, $(ClassDriver), 5)
  68.     set EventMessageFile =   #(ClassDrivers, $(ClassDriver), 6)
  69.     set TypesSupported   =   #(ClassDrivers, $(ClassDriver), 7)
  70. installtheoption = +
  71.     ifstr(i) $(AddCopy) == "YES"
  72.         set DoActualCopy = NO
  73.         set FileToCheck = #(Files-TapeClassDrivers, $(ClassDriver), 2)
  74.         LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\drivers\"$(FileToCheck)
  75.         ifstr(i) $(STATUS) == NO
  76.             set DoActualCopy = YES
  77.         endif
  78.         ifstr(i) $(DoActualCopy) == NO
  79.             shell "subroutn.inf" DriversExist $($0) $(String1)
  80.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  81.                 Debug-Output "TAPE.INF: shelling DriversExist failed"
  82.                 goto finish_InstallOption
  83.             endif
  84.             ifstr(i) $($R0) == STATUS_CURRENT
  85.             else-ifstr(i) $($R0) == STATUS_NEW
  86.                 set DoActualCopy = YES
  87.             else-ifstr(i) $($R0) == STATUS_USERCANCEL
  88.                 Debug-Output "TAPE.INF: User cancelled Tape installation"
  89.                 goto finish_InstallOption
  90.             else
  91.                 Debug-Output "TAPE.INF: Error reported in DriversExist routine in SUBROUTN.INF"
  92.                 goto finish_InstallOption
  93.             endif
  94.         endif
  95.         ifstr(i) $(DoActualCopy) == YES
  96.             shell "subroutn.inf" DoAskSourceEx $(SrcDir) $(String2)
  97.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  98.                 Debug-Output "TAPE.INF: shelling DoAskSource failed"
  99.                 goto finish_InstallOption
  100.             endif
  101.             ifstr(i) $($R0) == STATUS_SUCCESSFUL
  102.                 set SrcDir = $($R1)
  103.                 ifstr(i) $($R2) != ""
  104.                     set DrivesToFree = >($(DrivesToFree), $($R2))
  105.                 endif
  106.             else
  107.                 Debug-Output "TAPE.INF: User cancelled asking source."
  108.                 goto finish_InstallOption
  109.             endif
  110.             install Install-AddCopyOption
  111.             ifstr(i) $(STF_INSTALL_OUTCOME) != "STF_SUCCESS"
  112.                 Debug-Output "Adding mouse files to copy list failed"
  113.                 goto finish_InstallOption
  114.             endif
  115.         else
  116.             set DoCopy = NO
  117.         endif
  118.     endif
  119.     ifstr(i) $(DoCopy) == "YES"
  120.         read-syms ProgressCopy$($0)
  121.         install Install-DoCopyOption
  122.         ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_FAILURE"
  123.             Debug-Output "Copying files failed"
  124.             goto finish_InstallOption
  125.         else-ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_USERQUIT"
  126.             set Status = STATUS_USERCANCEL
  127.             goto finish_InstallOption
  128.         endif
  129.     endif
  130.     ifstr(i) $(DoConfig) == "YES"
  131.         shell "registry.inf" CheckSetupModify
  132.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  133.             goto finish_InstallOption
  134.         endif
  135.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  136.             goto finish_InstallOption
  137.         endif
  138.         set ServiceNode      = $(ClassDriver)
  139.         set ServiceBinary = %SystemRoot%\System32\drivers\#(Files-TapeClassDrivers, $(ClassDriver), 2)
  140.         set ServicesValues   = { +
  141.                 {Type,           0, $(!REG_VT_DWORD),     $(Type)                  }, +
  142.                 {Start,          0, $(!REG_VT_DWORD),     $(!SERVICE_SYSTEM_START) }, +
  143.                 {Group,          0, $(!REG_VT_SZ),        $(Group)                 }, +
  144.                 {ErrorControl,   0, $(!REG_VT_DWORD),     $(ErrorControl)          }, +
  145.                 {Dependencies,   0, $(!REG_VT_MULTI_SZ),  {$(Dependencies)}        }, +
  146.                 {BinaryPathName, 0, $(!REG_VT_EXPAND_SZ), $(ServiceBinary)         }  +
  147.                 }
  148.         ifstr(i) $(Tag) != ""
  149.             set TagValue = {Tag,0, $(!REG_VT_DWORD),$(Tag)}
  150.             set ServicesValues = >($(ServicesValues), $(TagValue))
  151.         endif
  152.         set ParametersValues = ""
  153.         set DeviceValues     = {}
  154.         set EventLogValues   = { +
  155.                 {EventMessageFile, 0, $(!REG_VT_EXPAND_SZ), $(EventMessageFile) }, +
  156.                 {TypesSupported,   0, $(!REG_VT_DWORD),     $(TypesSupported)   }  +
  157.                 }
  158.         shell "registry.inf"  MakeServicesEntry $(ServiceNode)      +
  159.                                                 $(ServicesValues)   +
  160.                                                 $(ParametersValues) +
  161.                                                 $(DeviceValues)     +
  162.                                                 $(EventLogValues)   +
  163.                                                 Parameters
  164.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  165.             Debug-Output "Couldn't execute MakeServicesEntry in registry.inf"
  166.             goto finish_InstallOption
  167.         endif
  168.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  169.             Debug-Output "MakeServicesEntry failed for tape"
  170.             goto finish_InstallOption
  171.         endif
  172.     endif
  173.     set Status = STATUS_SUCCESSFUL
  174. finish_InstallOption = +
  175.     ForListDo $(DrivesToFree)
  176.         LibraryProcedure STATUS,$(!LIBHANDLE), DeleteNetConnection $($) "TRUE"
  177.     EndForListDo
  178.     Return $(Status)
  179. [Install-AddCopyOption]
  180.     AddSectionKeyFileToCopyList   Files-TapeClassDrivers         +
  181.                                   $(ClassDriver)                 +
  182.                                   $(SrcDir)                      +
  183.                                   $(!STF_WINDOWSSYSPATH)\drivers
  184.     exit
  185. [Install-DoCopyOption]
  186.     CopyFilesInCopyList
  187.     exit
  188. [DeInstallOption]
  189.     set Status   = STATUS_FAILED
  190.     set Option   = $($1)
  191.     set LanguageList = ^(LanguagesSupported, 1)
  192.     Ifcontains(i) $($0) in $(LanguageList)
  193.     else
  194.         set Status = STATUS_NOLANGUAGE
  195.         goto finish_DeInstallOption
  196.     endif
  197.     read-syms Strings$($0)
  198.     set OptionList = ^(Options, 0)
  199.     ifcontains $(Option) in $(OptionList)
  200.     else
  201.         goto finish_DeInstallOption
  202.     endif
  203.     set OptionList = ""
  204.     set ClassDriver = #(Options, $(Option), 1)
  205.     set ClassFile   = #(Files-TapeClassDrivers, $(ClassDriver), 2)
  206.     set FilePath       = $(!STF_WINDOWSSYSPATH)"\drivers\"$(ClassFile)
  207.     shell "registry.inf" RemoveServicesEntry $(ClassDriver)
  208.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  209.         Debug-Output "TAPE.INF: Failed to shell RemoveServicesEntry"
  210.         goto finish_DeInstallOption
  211.     endif
  212.     ifstr(i) $($R0) != STATUS_SUCCESSFUL
  213.         Debug-Output "TAPE.INF: Failed to disable services entry"
  214.         goto finish_DeInstallOption
  215.     endif
  216.     set Status = STATUS_SUCCESSFUL
  217. finish_DeInstallOption =+
  218.     return $(Status)
  219. [GetInstalledOptions]
  220.     set Status = STATUS_FAILED
  221.     set InstalledOptions = {}
  222.     set InstalledOptionsText = {}
  223.     set LanguageList = ^(LanguagesSupported, 1)
  224.     Ifcontains(i) $($0) in $(LanguageList)
  225.     else
  226.         set Status = STATUS_NOLANGUAGE
  227.         goto finish_GetInstalledOptions
  228.     endif
  229.     set OptionList = ^(Options, 0)
  230.     ForListDo $(OptionList)
  231.         set ClassDriver = #(Options, $($), 1)
  232.         set ClassFile   = #(Files-TapeClassDrivers, $(ClassDriver), 2)
  233.         set FilePath       = $(!STF_WINDOWSSYSPATH)"\drivers\"$(ClassFile)
  234.         LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(FilePath)
  235.         ifstr(i) $(STATUS) == "YES"
  236.             shell "registry.inf" GetServicesEntryStart $(ClassDriver)
  237.             ifint $($ShellCode) == $(!SHELL_CODE_OK)
  238.                 ifstr(i) $($R0) == STATUS_SUCCESSFUL
  239.                     ifstr(i) $($R1) != $(!SERVICE_DISABLED)
  240.                         set OptionText = #(OptionsText$($0), $($), 1)
  241.                         set InstalledOptions     = >($(InstalledOptions), $($))
  242.                         set InstalledOptionsText = >($(InstalledOptionsText), $(OptionText))
  243.                     endif
  244.                 endif
  245.             endif
  246.         endif
  247.     EndForListDo
  248.     set Status = STATUS_SUCCESSFUL
  249. finish_GetInstalledOptions =+
  250.     Return $(Status) $(InstalledOptions) $(InstalledOptionsText)
  251. [Source Media Descriptions]
  252.     1    = "Windows NT Advanced Server Setup Disk #1"   , TAGFILE = disk1
  253.     2    = "Windows NT Advanced Server Setup Disk #2"   , TAGFILE = disk2
  254.     3    = "Windows NT Advanced Server Setup Disk #3"   , TAGFILE = disk3
  255.     4    = "Windows NT Advanced Server Setup Disk #4"   , TAGFILE = disk4
  256.     5    = "Windows NT Advanced Server Setup Disk #5"   , TAGFILE = disk5
  257.     6    = "Windows NT Advanced Server Setup Disk #6"   , TAGFILE = disk6
  258.     7    = "Windows NT Advanced Server Setup Disk #7"   , TAGFILE = disk7
  259.     8    = "Windows NT Advanced Server Setup Disk #8"   , TAGFILE = disk8
  260.     9    = "Windows NT Advanced Server Setup Disk #9"   , TAGFILE = disk9
  261.     10    = "Windows NT Advanced Server Setup Disk #10"  , TAGFILE = disk10
  262.     11    = "Windows NT Advanced Server Setup Disk #11"  , TAGFILE = disk11
  263.     12    = "Windows NT Advanced Server Setup Disk #12"  , TAGFILE = disk12
  264.     13    = "Windows NT Advanced Server Setup Disk #13"  , TAGFILE = disk13
  265.     14    = "Windows NT Advanced Server Setup Disk #14"  , TAGFILE = disk14
  266.     15    = "Windows NT Advanced Server Setup Disk #15"  , TAGFILE = disk15
  267.     16    = "Windows NT Advanced Server Setup Disk #16"  , TAGFILE = disk16
  268.     17    = "Windows NT Advanced Server Setup Disk #17"  , TAGFILE = disk17
  269.     18    = "Windows NT Advanced Server Setup Disk #18"  , TAGFILE = disk18
  270.     19    = "Windows NT Advanced Server Setup Disk #19"  , TAGFILE = disk19
  271.     20    = "Windows NT Advanced Server Setup Disk #20"  , TAGFILE = disk20
  272.     21    = "Windows NT Advanced Server Setup Disk #21"  , TAGFILE = disk21
  273.     22    = "Windows NT Advanced Server Setup Disk #22"  , TAGFILE = disk22
  274.     23    = "Windows NT Advanced Server Setup Disk #23"  , TAGFILE = disk23
  275.     24    = "Windows NT Advanced Server Setup Disk #24"  , TAGFILE = disk24
  276.     25    = "Windows NT Advanced Server Setup Disk #25"  , TAGFILE = disk25
  277.     26    = "Windows NT Advanced Server Setup Disk #26"  , TAGFILE = disk26
  278.     27    = "Windows NT Advanced Server Setup Disk #27"  , TAGFILE = disk27
  279.     28    = "Windows NT Advanced Server Setup Disk #28"  , TAGFILE = disk28
  280.     29    = "Windows NT Advanced Server Setup Disk #29"  , TAGFILE = disk29
  281. [ProductType]
  282. STF_PRODUCT  = LanmanNT
  283. STF_PLATFORM = I386
  284. [Files-TapeClassDrivers]
  285. 4mmdat = 22,4MMDAT.SYS , SIZE=29184
  286. archqic = 22,ARCHQIC.SYS , SIZE=30720
  287. exabyte1 = 22,EXABYTE1.SYS , SIZE=24576
  288. exabyte2 = 22,EXABYTE2.SYS , SIZE=25088
  289. qic117 = 20,QIC117.SYS , SIZE=74752
  290. tandqic = 22,TANDQIC.SYS , SIZE=29696
  291. wangqic = 22,WANGQIC.SYS , SIZE=29184
  292. [LanguagesSupported]
  293.     ENG
  294. [OptionsTextENG]
  295.     4MMDAT   = "4 millimeter DAT drive"
  296.     ARCHQIC  = "Archive 2150S, 2525S, 2750"
  297.     EXABYTE1 = "Exabyte 8200 series (SCSI-1)"
  298.     EXABYTE2 = "Exabyte 8500 series (SCSI-2)"
  299.     QIC117   = "QIC-40/QIC-80 floppy tape drive"
  300.     TANDQIC  = "Tandberg 3660, 3820, 4120, 4220"
  301.     WANGQIC  = "Wangtek 525, 250 drives"
  302. [Options]
  303.     4MMDAT   = 4mmdat
  304.     ARCHQIC  = archqic
  305.     EXABYTE1 = exabyte1
  306.     EXABYTE2 = exabyte2
  307.     QIC117   = qic117
  308.     TANDQIC  = tandqic
  309.     WANGQIC  = wangqic
  310. [ProgressCopyENG]
  311.     ProCaption   = "Windows NT Setup"
  312.     ProCancel    = "Cancel"
  313.     ProCancelMsg = "Windows NT is not correcly installed.  Are you sure you want "+
  314.                    "to cancel copying files?"
  315.     ProCancelCap = "Setup Message"
  316.     ProText1     = "Copying:"
  317.     ProText2     = "To:"
  318. [StringsENG]
  319.     String1 = "Tape Device"
  320.     String2 = "Please enter the full path to the Windows NT Tape Device "+
  321.               "files.  If you want to install files from the original Setup "+
  322.               "floppy disks, type a drive letter (such as A:) and Setup "+
  323.               "will prompt you for the correct disk.  Then choose Continue."
  324.  
  325.  
  326.  
  327.