home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 August / VPR9708B.ISO / DRIVER / DEC / DE450260 / OEMSETNT.INF < prev    next >
INI File  |  1996-12-27  |  42KB  |  1,210 lines
  1. ; OEMSETUP FILE FOR EtherWORKS TURBO PCI 10 Adapters
  2. ; WNT V3.51 and V4.0 - DE450.SYS V1.10
  3. ;
  4. ;     Platform type : ALPHA, Ix86, MIPs, PPC
  5. ;     Supported Adapters: DE450
  6. ;
  7. ; Digital Equipment Corporation, Maynard, Mass.
  8. ;
  9. ; The information in this software is subject to change without 
  10. ; notice and should not be construed as a commitment by Digital 
  11. ; Equipment Corporation.
  12. ;
  13. ; Usage:
  14. ; 
  15. ;     This file is the installation/configuration/deinstallation
  16. ;     procedure of the driver for Windows NT (DE450).  It can be
  17. ;     called from Windows setup directly, or via the Windows NT
  18. ;     Networks Control Program Applet (NCPA) from inside the
  19. ;     Windows Control Panel.
  20. ;
  21. ;    set !DebugOutputControl = 1  ; Turn On Debugging for Install testing 
  22. ;         Debug-Output " Turn on Debugger... "
  23.  
  24. ;******************
  25. ;* IDENTIFICATION *
  26. ;******************
  27. [Identification]
  28.     OptionType = NetAdapter
  29.  
  30. ;***********************
  31. ;* PLATFORMS SUPPORTED *
  32. ;***********************
  33. [PlatformsSupported]
  34.     ISA
  35.     EISA
  36.     "Jazz-Internal Bus"
  37.     PCI
  38.  
  39. ;****************************************
  40. ;* OPTIONS - Order IS be important here *
  41. ;*  Must match order in OptionsTextENG  *
  42. ;****************************************
  43. [Options]
  44.     DE450
  45.  
  46. ;***************************
  47. ;* CONNECTION TYPE CHOICES *
  48. ;***************************
  49. [MediaChoicesDE450]
  50.     Media_0 = "AutoSense", 0
  51.     Media_1 = "TP", 1
  52.     Media_2 = "BNC", 2
  53.     Media_3 = "AUI", 3
  54.     Media_4 = "TP-Full Duplex", 4
  55.  
  56. ;******************************
  57. ;* TRANSMIT THRESHOLD CHOICES *
  58. ;******************************
  59. [TXThresholdChoicesDE450]
  60.     TXThreshold_0 = "72", 0
  61.     TXThreshold_1 = "96", 1
  62.     TXThreshold_2 = "128", 2
  63.     TXThreshold_3 = "160", 3
  64.  
  65. ;****************************
  66. ;* DEFINITIONS USED IN CODE *
  67. ;****************************
  68. [FileConstants]
  69. UtilityInf      = "UTILITY.INF"
  70. subroutineinf   = "SUBROUTN.INF"
  71. SoftwareType    = "driver"
  72. NetEventDLL     = "%SystemRoot%\System32\netevent.dll"
  73. Manufacturer    = "DigitalEquipmentCorporation"
  74. ProductMajorVersion     = "1"
  75. ProductMinorVersion     = "05"           
  76. ProductVersion  = $(ProductMajorVersion)"."$(ProductMinorVersion)
  77.  
  78. VendorID = 4113  ;; 1011 (DEC)
  79.  
  80. ;
  81. ; Software Specific Information Below.
  82. ;
  83. ProductSoftwareName        = "DE450_"          ; current driver name
  84. ProductSoftwareTitle       = "DEC DE450 Adapter Driver"
  85. ProductSoftwareImagePath   = "%SystemRoot%\System32\drivers\DE450.sys"
  86. NetRuleSoftwareType        = "DE450Sys ndisDriver DE450Driver"
  87. NetRuleSoftwareUse         = $(SoftwareType)
  88. NetRuleSoftwareBindForm    = """DE450Sys"" yes no container"
  89. NetRuleSoftwareClass       = {"DE450Driver basic"}
  90. NetRuleSoftwareSWBindable  = {"DE450Driver DE450Adapter non exclusive 100"}
  91.  
  92. OptionHelpFile = "DE450.HLP"
  93. ProductHardwareName = "DE450_"
  94.  
  95. PCIAdapterType  = 5
  96.  
  97. PCIBusType  = 5
  98.  
  99. ;
  100. ; Hardware Specific Information Below.
  101. ;
  102. ; Note that in the HardwareParam Lists, ConnectionType is not present.
  103. ; ConnectionType is queried by a dialog box, and entered into the
  104. ; registry with that information.  MapRegisters is also determined
  105. ; elsewhere, as are BusNumber, FunctionNumber, and DeviceType.
  106. ;
  107. ; Also note that only parameters with CONSTANT values can be here.
  108. ; If you try to use a variable in one of these lists, it will not
  109. ; work the way you expect!
  110. ;
  111.  
  112. ; DE450 Information
  113.  
  114. ProductHardwareDE450Title   = "DEC DE450 EtherWORKS Turbo PCI 10 Adapter"
  115. NetRuleHardwareDE450Type    = "DE450 DE450Adapter"
  116. NetRuleHardwareDE450Class   = {"DE450Adapter basic"}
  117. HelpDE450Id = 1
  118. DE450CFID = 1314833
  119.  
  120. DE450HardwareParamList = {{BusType,$(NoTitle),$(!REG_VT_DWORD),$(PCIBusType)},+
  121.               {MediaType,$(NoTitle),$(!REG_VT_DWORD),1}}
  122.  
  123.  
  124. NetRuleHardwareBindForm = " yes yes container"
  125. ProductKeyName    = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\"$(ProductSoftwareName)"\CurrentVersion"
  126. DE450ProductKeyName = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\"$(DE450ProductSoftwareName)"\CurrentVersion"
  127. VersionKeyName    = $(!NTN_SoftwareBase)"\Microsoft\Windows NT\CurrentVersion"
  128.  
  129. [GeneralConstants]
  130. KeyNull           = ""
  131. MAXIMUM_ALLOWED   = 33554432
  132. KeyProduct        = ""
  133. KeyParameters     = ""
  134. TRUE              = 1
  135. FALSE             = 0
  136. NoTitle           = 0
  137.  
  138. [date]
  139.     Now = {} ? $(!LIBHANDLE) GetSystemDate
  140.  
  141. ;********************
  142. ;* IDENTIFY SECTION *
  143. ;********************
  144. ;
  145. ; The [Identify] section is the first section executed by Setup. It
  146. ; returns information to Setup about the type of drivers that can 
  147. ; be installed by this .INF file (in our case, network drivers).
  148. ;
  149. [Identify]
  150.     read-syms Identification
  151.     set Status     = STATUS_SUCCESSFUL
  152.     set Identifier = $(OptionType)
  153.     set SourceMedia      = #("Source Media Descriptions", 1, 1)
  154.     Return $(Status) $(Identifier) $(SourceMedia)
  155.  
  156. ;**************************
  157. ;* RETURN OPTIONS SECTION *
  158. ;**************************
  159. ;
  160. ; If the [Identify] section indicates that the .INF file supports
  161. ; the appropriate type of driver, Setup calls the [ReturnOptions]
  162. ; section.  Setup passes a single parameter to this section,
  163. ; indicating the language to be used for dialog strings.  This 
  164. ; section returns information to the Setup program, listing the
  165. ; names of any drivers which can be installed by this .INF file.
  166. ; It also returns the text strings for each driver to be used in 
  167. ; the dialog box asking the user to select the driver to install.
  168. ;
  169. [ReturnOptions]
  170.     ;
  171.     ; Initialize variables to failure state.
  172.     ;
  173.     set Status        = STATUS_FAILED
  174.     set OptionList     = {}
  175.     set OptionTextList = {}
  176.     
  177.     ;
  178.     ; See if our language list supports the language specified.
  179.     ;
  180.     set LanguageList = ^(LanguagesSupported, 1)
  181.     Ifcontains(i) $($0) not-in $(LanguageList)
  182.     set Status = STATUS_NOLANGUAGE
  183.     goto finish_ReturnOptions
  184.     endif
  185.     
  186.     ;
  187.     ; If a second parameter was passed in, see if it is a supported
  188.     ; platform.
  189.     ;
  190.     ifstr(i) $($1) != ""
  191.     set PlatformList = ^(PlatformsSupported, 1)
  192.     Ifcontains(i) $($1) not-in $(PlatformList)
  193.         set Status = STATUS_NOTSUPPORTED
  194.         goto finish_ReturnOptions
  195.     endif
  196.     endif
  197.     
  198.     ;
  199.     ; If we get here, we are successful, so return the option list.
  200.     ;
  201.     set OptionList     = ^(Options, 1)
  202.     set OptionTextList = ^(OptionsText$($0), 1)
  203.     set Status         = STATUS_SUCCESSFUL
  204.     
  205.     ;
  206.     ; Exit from this section.
  207.     ;
  208. finish_ReturnOptions = +
  209.     Return $(Status) $(OptionList) $(OptionTextList)
  210.  
  211. ;*************************
  212. ;* INSTALLOPTION SECTION *
  213. ;*************************
  214. ;
  215. ; If the [ReturnOptions] section returns successfully, indicating
  216. ; the language is supported, Setup displays a dialog box from which
  217. ; the user can select a driver to install.  Setup then calls the 
  218. ; [InstallOption] section, with the following parameters:
  219. ;
  220. ;       Language to use
  221. ;       OptionID to install (DE450)
  222. ;       SourceDirectory
  223. ;       AddCopy  (yes/no)
  224. ;       DoCopy   (yes/no)
  225. ;       DoConfig (yes/no)
  226. ;
  227. ; ScrDir seems to always be A:\, even when you later install from
  228. ; the oemnad#.inf which is copied to the system32 directory.
  229. ;
  230. ; AddCopy and DoCopy are valid only when NTN_InstallMode = install.
  231. ; AddCopy is yes if the files should be added to the copy list.
  232. ; DoCopy is yes if CopyFilesInCopyList should be called.
  233. ;
  234. ; DoConfig is not used for network cards.
  235. ;
  236. ; This .INF file is automatically copied to the SYSTEM32 directory,
  237. ; by WinNT, and renamed so as to have a unique name.
  238. ;
  239.  
  240. [InstallOption]
  241.  
  242.     ;set !DebugOutputControl = 1  ; Turn On Debugging for Install testing 
  243.     Debug-Output "oemsetup for "$(ProductHardwareName)" V"$(ProductVersion)" ..."
  244.     
  245.     ;
  246.     ; Read input parameters.
  247.     ;
  248.     set Option   = $($1)
  249.     set SrcDir   = $($2)
  250.     set AddCopy  = $($3)
  251.     set DoCopy   = $($4)
  252.     set DoConfig = $($5)
  253.     
  254.     ;
  255.     ; Check if specified language is supported.
  256.     ;
  257.     set LanguageList = ^(LanguagesSupported, 1)
  258.     Ifcontains(i) $($0) NOT-IN $(LanguageList)
  259.     Return STATUS_NOLANGUAGE
  260.     endif
  261.     
  262.     ;
  263.     ; Set up local variables and constant values.
  264.     ;
  265.     set-subst LF = "\n"
  266.     read-syms GeneralConstants
  267.     read-syms FileConstants
  268.     read-syms DialogConstants$(!STF_LANGUAGE)
  269.     read-syms FileConstants$(!STF_LANGUAGE)
  270.     read-syms FileDependentDlg$(!STF_LANGUAGE)
  271.     SetHelpFile $(!STF_WINDOWSSYSPATH)"\"$(OptionHelpFile) $(MinHelpId) $(MaxHelpId)
  272.     detect date
  273.     set-title  $(Function$(Option)Title)
  274.     set CommonStatus = STATUS_SUCCESSFUL
  275.     EndWait
  276.  
  277.     ;
  278.     ; Problem was discovered using unattend.txt files for automatic
  279.     ; installation.  It was found that $2 passed into this section does
  280.     ; not have an appropriate value when using unattend.txt.  It was
  281.     ; found that during manual AND unattended installations, the variable
  282.     ; STF_SRCDIR_OVERRIDE did contain an appropriate value.
  283.     ;
  284.     ifstr(i) $(!STF_SRCDIR_OVERRIDE) != ""
  285.     set SrcDir = $(!STF_SRCDIR_OVERRIDE)
  286.     endif
  287.  
  288.     ;
  289.     ; NTN_InstallMode
  290.     ;   install   - this is a primary or original installation, it
  291.     ;               may be an upgrade
  292.     ;   deinstall - this product and its binaries are to be removed
  293.     ;               from the disk
  294.     ;   configure - this product is to be (re-) configured
  295.     ;   bind      - this product's relationships to other products
  296.     ;               have changed and should be reviewed. 
  297.     ;
  298.     Ifstr(i) $(!NTN_InstallMode) == deinstall
  299.     set StartLabel = removeadapter
  300.     else-Ifstr(i) $(!NTN_InstallMode) == Update
  301.     set StartLabel = UpgradeSoftware
  302.     else-Ifstr(i) $(!NTN_InstallMode) == bind
  303.     set StartLabel = bindingadapter
  304.     else-Ifstr(i) $(!NTN_InstallMode) == configure
  305.     set StartLabel = configureadapter
  306.     else
  307.     set StartLabel = installadapter
  308.     endif
  309.  
  310.     ;
  311.     ; HARDWARE_PUT_IN_REGISTRY gets set to true once the hardware
  312.     ; component is installed.  That way if we get an error we know 
  313.     ; to uninstall it.  HWList has the path to the hardware that 
  314.     ; is needed by RemoveHardwareComponent.
  315.     ;
  316.     ; SOFTWARE_PUT_IN_REGISTRY gets set to true once the software
  317.     ; component is installed.
  318.     ;
  319.     set HARDWARE_PUT_IN_REGISTRY = $(FALSE)
  320.     set HWList = ""
  321.     set SOFTWARE_PUT_IN_REGISTRY = $(FALSE)
  322.     
  323.     ;-------------------------------------------------------------------
  324.     ; Get the NT version (3.50 or ...)
  325.     ;-------------------------------------------------------------------
  326.     ;
  327.     OpenRegKey $(!REG_H_LOCAL) "" $(VersionKeyName) $(MAXIMUM_ALLOWED) KeyVersion
  328.     GetRegValue $(KeyVersion),"CurrentVersion",VersionStruct
  329.     CloseRegKey $(KeyVersion)
  330.     Set NTVersion = *($(VersionStruct),4)
  331.     Ifstr(i) $(NTVersion) == "3.50"
  332.     set $R0 = "Windows NT 3.50 not supported on this distribution."
  333.     goto fatal
  334.     endif
  335.     ;
  336.     ; Go to the appropriate section for this installation mode.
  337.     ;
  338.     Debug-Output "StartLabel "$(StartLabel)
  339.     goto $(StartLabel)
  340.  
  341. ;------------------------------------------------------------------------
  342. ; InstallMode = install
  343. ; Came here straight from figuring out which platform we are on.
  344. ; Option, SrcDir, AddCopy, DoCopy, and DoConfig are valid.
  345. ;
  346. installadapter = +
  347.     
  348.     ;
  349.     ; Set up default for Map Registers
  350.     ;
  351.     Set NumMapRegisters = 8
  352.     
  353.     ;-------------------------------------------------------------------
  354.     ; Determine the platform and set the correct driver/help paths.
  355.     ;-------------------------------------------------------------------
  356.     ;
  357.     set Help_Directory = "WINNT"
  358.     Ifstr $(!STF_PLATFORM) == "Alpha"
  359.     set Source_Directory = "WINNT\ALPHA"
  360.     else-ifstr $(!STF_PLATFORM) == "Mips"
  361.     set Source_Directory = "WINNT\MIPS"
  362.     else-ifstr $(!STF_PLATFORM) == "I386"
  363.     set Source_Directory = "WINNT\INTEL"
  364.     else-ifstr $(!STF_PLATFORM) == "ppc"
  365.     set Source_Directory = "WINNT\PPC"
  366.     else
  367.     set $R0 = "This platform is not recognized and not supported by this distribution."
  368.     goto fatal
  369.     endif
  370.     
  371.     ;-------------------------------------------------------------------
  372.     ; Check to see if a different version of this driver was installed.
  373.     ;-------------------------------------------------------------------
  374. SWCheckThisProductKeyName = +
  375.     ;
  376.     ; Get open handle KeyProduct. 
  377.     ; Returns an empty string if key does not exist.
  378.     ;
  379.     ; NTN_RegBase appears empty on the installation of the first card.
  380.     ; KeyProduct will be KeyNull on the installation of the first card.
  381.     ;
  382.     OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct
  383.     
  384.     ;
  385.     ; We cannot assume that the adapter has never been installed before.
  386.     ; The spec says we must check for older versions of the software 
  387.     ;   (NTN_RegBase = ProductKeyName) and tell the user to use update.
  388.     ;   However, NT does not do update properly, so tell user
  389.     ;   to remove and re-install in this situation.
  390.     ; The spec says we should warn about already finding this hardware 
  391.     ;   installed.  We'll do that and allow the option of continuing.
  392.     ;
  393.     Ifstr $(KeyProduct) != $(KeyNull)
  394.     ;-------------------------------------------------------------------
  395.     ; Software exists - do some checking
  396.     ;-------------------------------------------------------------------
  397.     ; If key already exists, get software version info.
  398.     ;
  399.     GetRegValue $(KeyProduct) MajorVersion OldMajorVersionList
  400.     GetRegValue $(KeyProduct) MinorVersion OldMinorVersionList
  401.     CloseRegKey $(KeyProduct)
  402.     set OldMajorVersion = *($(OldMajorVersionList),4)
  403.     set OldMinorVersion = *($(OldMinorVersionList),4)
  404.     ;
  405.     ; If the old version is the same as ours, no problem.
  406.     ; If not the same, fatal error.
  407.     ;
  408.     ifstr(i) $(OldMajorVersion) != $(ProductMajorVersion)
  409.         goto SWversionMismatch
  410.     endif
  411.     ifstr(i) $(OldMinorVersion) != $(ProductMinorVersion)
  412.         goto SWversionMismatch
  413.     endif
  414.     goto SWversionOK
  415.  
  416. SWversionMismatch = +
  417.     set $R0 = $(Option)".SYS V"$(OldMajorVersion)"."$(OldMinorVersion)+
  418.         "already exists on the system.  Please use the remove button for all DE450 and re-install."
  419.     goto fatal         
  420.  
  421. SWversionOK = +
  422.     Else
  423.     ;-------------------------------------------------------------------
  424.     ; Add software info to the registry
  425.     ;-------------------------------------------------------------------
  426.     ; This is a new software component - need to add version, descr, ...
  427.     ;
  428.     StartWait
  429.     ;
  430.     ; If we are not installing from floppy, NT will detect that the
  431.     ; floppy is not present and ask for one.
  432.     ;
  433.     ; Copy the driver and help file.
  434.     ; If this is being installed from the oemnad#.inf on the
  435.     ; hard disk, NT will look for the disk in the floppy drive,
  436.     ; not find it, and prompt the user to install it.
  437.     ;
  438.     ifstr(i) $(AddCopy) == "YES"
  439.         install "Install-AddList"
  440.         ;
  441.         ; Only do the copy if the add was successful.
  442.         ; Note: do NOT use !STF_INSTALL_OUTCOME, it doesn't work!
  443.         ;
  444.         ifstr(i) $(STF_INSTALL_OUTCOME) == STF_SUCCESS
  445.         ifstr $(DoCopy) == "YES"
  446.             install "Install-CopyList"
  447.         endif
  448.         endif
  449.     endif
  450.     ifstr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS
  451.         set $R0 = "Could not copy driver and help files."
  452.         goto fatal
  453.     endif
  454.  
  455.     ;
  456.     ; AddSoftwareComponent adds all the registry information 
  457.     ; neccessary for a new software component.  This involves
  458.     ; creating the SOFTWARE area and the SERVICE area. Returns:
  459.     ;       R1      key for SOFTWARE\Manufacturer\Product\Version
  460.     ;       R2      key for SOFTWARE\..\NetRules
  461.     ;       R3      key handle for SERVICES key
  462.     ;       R4      "Parameters" key handle for Services area
  463.     ;       R5      "Linkage" key handle for Services area
  464.     ;
  465.     Shell $(UtilityInf), AddSoftwareComponent, $(Manufacturer), +
  466.         $(ProductSoftwareName), +
  467.         $(ProductSoftwareName), +
  468.         $(ProductSoftwareTitle), $(STF_CONTEXTINFNAME), +
  469.         $(ProductSoftwareImagePath), "kernel", "NDIS", {}, "",+
  470.         $(NetEventDLL)
  471.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  472.         goto ShellCodeError
  473.     endif
  474.     Set SOFTWARE_PUT_IN_REGISTRY = $(TRUE)
  475.     Set SoftProductKey      = $($R1)
  476.     Set SoftNetRuleKey      = $($R2)
  477.     Set SoftServiceKey      = $($R3)
  478.     Set SoftParameterKey    = $($R4)
  479.     Set SoftLinkageKey      = $($R5)
  480.     ifstr(i) $($R0) != "NO_ERROR"
  481.         set $R0 = "Error adding software component.  Reboot and try again."
  482.         goto SWAddComplete
  483.     endif
  484.     ;
  485.     ; Create a value list for this entry.
  486.     ; Each entry in ValueList is a list containing:
  487.     ;           ValueName
  488.     ;           Index (must be zero)
  489.     ;           ValueType
  490.     ;           ValueData
  491.     ;
  492.     ; Put this value list in SOFTWARE\Manufacturer\Product\Version
  493.     ;
  494.     set NewValueList = {{SoftwareType,$(NoTitle),$(!REG_VT_SZ),$(SoftwareType)},+
  495.         {MajorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMajorVersion)},+
  496.         {MinorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMinorVersion)},+
  497.         {Title,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareTitle)},+
  498.         {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareDescription)},+
  499.         {ServiceName,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareName)},+
  500.         {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}}
  501.     Shell  $(UtilityInf), AddValueList, $(SoftProductKey), $(NewValueList)
  502.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  503.         goto SWAddComplete
  504.     endif
  505.     ifstr(i) $($R0) != "NO_ERROR"
  506.         set $R0 = "Error adding software version info."
  507.         goto SWAddComplete
  508.     endif
  509.     ;
  510.     ; Set up value list for SOFTWARE\..\NetRules and write it.
  511.     ;
  512.     set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareType)},+
  513.         {use,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareUse)}, +
  514.         {bindform,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareBindForm)}, +
  515.         {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleSoftwareClass)}, +
  516.         {bindable,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleSoftwareSWBindable)}, +
  517.         {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}}
  518.     Shell  $(UtilityInf), AddValueList, $(SoftNetRuleKey), $(NewValueList)
  519.     ifstr(i) $($R0) != "NO_ERROR"
  520.         set $R0 = "Error adding software netrules."
  521.     endif
  522.  
  523. SWAddComplete = +
  524.     CloseRegKey $(SoftProductKey)
  525.     CloseRegKey $(SoftNetRuleKey)
  526.     CloseRegKey $(SoftServiceKey)
  527.     CloseRegKey $(SoftParameterKey)
  528.     CloseRegKey $(SoftLinkageKey)
  529.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  530.         goto ShellCodeError
  531.     endif
  532.     ifstr(i) $($R0) != "NO_ERROR"
  533.         goto fatal
  534.     endif
  535.     endif  ; end installation of SW component, if this is a new component
  536.     
  537.     ;-----------------------------------------------------------------------
  538.     ; Get the list of cards to install.
  539.     ;-----------------------------------------------------------------------
  540.     ; Use GetPCIInformation to get list of PCI cards with this device ID.
  541.     ;
  542.     ;
  543.     ; **** Get Adapter List for the 21041 chip ****
  544.     ;
  545.     ; Shift CFID to get device ID for 21041
  546.     ;
  547.     
  548.     set-div DeviceID = $(DE450CFID) 65336
  549.     
  550.     ;
  551.     ; GetPCIInformation returns AdapterList entry in R0
  552.     ;   - the list contains all cards of that option CFID, 
  553.     ;   with their BusNum and DeviceNum.
  554.     ; Note that R0 does NOT contain "NO_ERROR" as with most utility calls.
  555.     ;
  556.     
  557.     Shell $(UtilityInf), GetPCIInformation, $(VendorID) $(DeviceID)
  558.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  559.     goto ShellCodeError
  560.     endif
  561.     set AdapterList = $($R0)    
  562.     
  563.     ifstr(i) $(AdapterList) == {}
  564.     set $R0 = $(Option)" network card is not present in the system."
  565.     goto fatal
  566.     endif
  567.     
  568.     ;-----------------------------------------------------------------------
  569.     ; Put the hardware information in the registry
  570.     ;-----------------------------------------------------------------------
  571.     ; After installing one, keep going until the adapterlist is empty.
  572.     ;
  573.     ; Note it is illegal to use a "goto" inside the ForListDo
  574.     ; that jumps to somewhere outside the ForListDo.
  575.     ;
  576.     set DropThroughForListDo = $(FALSE)
  577.     ForListDo $(AdapterList)
  578.     Set HW_KEYS_OPEN = $(FALSE)
  579.     ifint $(DropThroughForListDo) == $(FALSE)
  580.         ;
  581.         ; Set up BusNum, DeviceNum, and FuncNum.
  582.         ;
  583.         set BusNum = *($($),1)
  584.         set DeviceNum = *($($),2)
  585.         set FuncNum = *($($),3)
  586.         
  587.         Shell $(UtilityInf), IsNetCardAlreadyInstalled, $(BusNum), +
  588.         $(DeviceNum), $(ProductHardware$(Option)Description), +
  589.         $(ProductHardwareName) "YES"
  590.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  591.         goto ForListDropThrough
  592.         else-ifstr(i) $($R0) != "NO_ERROR"
  593.         set $R0 = "Error in determining if netcard is already installed."    
  594.         goto ForListDropThrough
  595.         else-ifstr(i) $($R1) == "YES"   ;already installed,
  596.         goto ThisForIterationDone   ;  so skip it and try next
  597.         endif
  598.  
  599.         ;
  600.         ; Get the value for ConnectionType, returned in ConnectionValue.
  601.         ; Note that this parameter does not apply to DE425 - its 
  602.         ; ConnectionValue is determined in the EISA setup.
  603.         ;
  604.         ;Ifstr(i) $(Option) != "DE425"
  605.         ;    SetHelpFile $(!STF_WINDOWSSYSPATH)"\"$(OptionHelpFile) $(MinHelpId) $(MaxHelpId) $(Help$(Option)Id)
  606.         ;    ui start "InputDlg"
  607.         ;    ui pop 1
  608.         ;    ifstr(i) $(DLGEVENT) != "CONTINUE"
  609.         ;        set CommonStatus = STATUS_USERCANCEL
  610.         ;        goto ForListDropThrough
  611.         ;    else
  612.         ;        set ConnectionListOut = $(Combo1Out)
  613.         ;        set ConnectionValue = *($(ConnectionValues), ~($(ConnectionList),$(ConnectionListOut)))
  614.         ;        ifstr(i) $(ConnectionValue) == ""
  615.         ;            set ConnectionValue = *($(ConnectionValues), 1)
  616.         ;        endif
  617.         ;    endif    
  618.         ;endif
  619.         ;*** temp below
  620.         set ParamMedia = 0
  621.         set ParamTX_Threshold = 2
  622.  
  623.         ;
  624.         ; Install one iteration of the hardware in the registry.
  625.         ;
  626.         ; Note that $(STF_CONTEXTINFNAME) translates to oemnad#.inf
  627.         ;          $(!STF_CONTEXTINFNAME) translates to NCPASHEL.INF        
  628.         ;
  629.         Shell $(UtilityInf), AddHardwareComponent, $(ProductHardwareName), + 
  630.             $(STF_CONTEXTINFNAME), $(ProductKeyName)
  631.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  632.         goto ForListDropThrough
  633.         endif
  634.         ifint $($R4) == -1
  635.         set $R0 = "Error getting "$(Option)" adapter number."
  636.         goto ForListDropThrough
  637.         endif
  638.         Set HW_KEYS_OPEN = $(TRUE)
  639.         Set HARDWARE_PUT_IN_REGISTRY = $(TRUE)
  640.         Set HWList = >($(HWList), +
  641.         $(!NTN_SoftwareBase)"\Microsoft\Windows NT\CurrentVersion\NetworkCards\"$($R4))
  642.         Set HardNetCardKey      = $($R1)
  643.         Set HardNetRuleKey      = $($R2)
  644.         Set HardParameterKey    = $($R3)
  645.         Set AdapterNumber       = $($R4)
  646.         ifstr(i) $($R0) != "NO_ERROR"
  647.         set $R0 = "Error adding hardware to registry."
  648.         goto ForListDropThrough
  649.         endif
  650.     
  651.         ;
  652.         ; Set up and write general card information to registry.
  653.         ;
  654.         set NewValueList = {{Manufacturer,$(NoTitle),$(!REG_VT_SZ),$(Manufacturer)},+
  655.         {Title,$(NoTitle),$(!REG_VT_SZ),"["$($R4)"] "$(ProductHardware$(Option)Title)},+
  656.         {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductHardware$(Option)Description)},+
  657.         {ProductName,$(NoTitle),$(!REG_VT_SZ),$(ProductHardwareName)},+
  658.         {ServiceName,$(NoTitle),$(!REG_VT_SZ),$($R5)},+
  659.         {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}}
  660.         Shell  $(UtilityInf), AddValueList, $(HardNetCardKey), $(NewValueList)
  661.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  662.         goto ForListDropThrough
  663.         endif
  664.         ifstr(i) $($R0) != "NO_ERROR"
  665.         set $R0 = "Error adding general hardware info to registry."
  666.         goto ForListDropThrough
  667.         endif
  668.  
  669.         ;
  670.         ; Set up and write hardware parameters to registry.
  671.         ; Write:
  672.         ;   Media, TX_Threshold
  673.         ;   Hardware parameters defined as constants
  674.         ;   BusNumber, SlotNumber, FunctionNumber
  675.         ;
  676.         set NewValueList = {{Media,$(NoTitle),$(!REG_VT_DWORD),$(ParamMedia)},+
  677.         {TX_Threshold,$(NoTitle),$(!REG_VT_DWORD),$(ParamTX_Threshold)}}
  678.         Shell  $(UtilityInf), AddValueList, $(HardParameterKey), $(NewValueList)
  679.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  680.         goto ForListDropThrough
  681.         endif
  682.         ifstr(i) $($R0) != "NO_ERROR"
  683.         set $R0 = "Error adding programmable parameters to registry."
  684.         goto ForListDropThrough
  685.         endif
  686.         Shell  $(UtilityInf), AddValueList, $(HardParameterKey), $($(Option)HardwareParamList)
  687.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  688.         goto ForListDropThrough
  689.         endif
  690.         ifstr(i) $($R0) != "NO_ERROR"
  691.         set $R0 = "Error adding hardware parameters to registry."
  692.         goto ForListDropThrough
  693.         endif
  694.  
  695.         set NewValueList = {{BusNumber,$(NoTitle),$(!REG_VT_DWORD),$(BusNum)},+
  696.                 {SlotNumber,$(NoTitle),$(!REG_VT_DWORD),$(DeviceNum)},+
  697.                 {FunctionNumber,$(NoTitle),$(!REG_VT_DWORD),$(FunctionNum)}}
  698.         
  699.         Shell  $(UtilityInf), AddValueList, $(HardParameterKey), $(NewValueList)
  700.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  701.         goto ForListDropThrough
  702.         endif
  703.         ifstr(i) $($R0) != "NO_ERROR"
  704.         set $R0 = "Error adding bus/slot/function numbers to registry."
  705.         goto ForListDropThrough
  706.         endif
  707.     
  708.         ;
  709.         ; Set up and write hardware net rules.
  710.         ;
  711.         set TempProdName = """"$(ProductHardwareName)$(AdapterNumber)""""
  712.         set TempBindForm = $(TempProdName)$(NetRuleHardwareBindForm)
  713.         set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleHardware$(Option)Type)},+
  714.         {bindform,$(NoTitle),$(!REG_VT_SZ),$(TempBindForm)}, +
  715.         {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleHardware$(Option)Class)}, +
  716.         {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}}
  717.         Shell  $(UtilityInf), AddValueList, $(HardNetRuleKey), $(NewValueList)
  718.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  719.         goto ForListDropThrough
  720.         endif
  721.         ifstr(i) $($R0) != "NO_ERROR"
  722.         set $R0 = "Error adding hardware net rules to registry."
  723.         goto ForListDropThrough
  724.         endif
  725.         
  726.         goto ThisForIterationDone
  727.     
  728.     endif           ; end of "If DropThroughForList is false ..."
  729.  
  730. ForListDropThrough = +
  731.     set DropThroughForListDo = $(TRUE)
  732. ThisForIterationDone = +
  733.     ifint $(HW_KEYS_OPEN) == $(TRUE)
  734.         CloseRegKey $(HardNetCardKey)
  735.         CloseRegKey $(HardNetRuleKey)
  736.         CloseRegKey $(HardParameterKey)
  737.     endif
  738.  
  739.     EndForListDo
  740.     
  741.     CloseRegKey $(KeyProduct)
  742.     
  743.     ;
  744.     ; There are a number of ways to exit the above ForListDo.
  745.     ;   1. ShellCodeError - fatal, just go process the error 
  746.     ;                   SHOULD NEVER HAPPEN
  747.     ;   2. Error Condition - fatal, error message in R0
  748.     ;                   SHOULD NEVER HAPPEN
  749.     ;   3. Hardware not in registry
  750.     ;           a. user cancelled, remove software if just installed
  751.     ;                   THIS MAY HAPPEN
  752.     ;           b. all adapters previously installed
  753.     ;                   THIS MAY HAPPEN
  754.     ;   4. Success - just continue
  755.     ;                   THIS MAY HAPPEN
  756.     ;
  757.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  758.     goto ShellCodeError
  759.     endif
  760.     ifstr(i) $($R0) != "NO_ERROR"
  761.     goto fatal
  762.     endif
  763.     ifstr(i) $(HARDWARE_PUT_IN_REGISTRY) == $(FALSE)
  764.     ifstr(i) $(CommonStatus) == "STATUS_USERCANCEL"
  765.         goto AbandonComponentsInRegistry
  766.     endif
  767.     set $R0 = "All "$(Option)" adapters already installed."
  768.     goto fatal
  769.     endif
  770.     
  771.     EndWait
  772.     goto end
  773.     
  774.  
  775.  
  776. ;------------------------------------------------------------------------
  777. ; InstallMode = configure
  778. ; Came here straight from figuring out which platform we are on.
  779. ; Option, SrcDir, AddCopy, DoCopy, and DoConfig are valid.
  780. ;
  781. ; The whole purpose of this to to reconfigure ConnectionType.
  782. ;
  783. ;   Get a registry key (KeyProduct).
  784. ;   Get the hardware parameter key (KeyParameters).
  785. ;   Find the ConnectionType parameter location.
  786. ;   Put up the dialog box to get the new ConnectionType.
  787. ;   Write the new ConnectionType to the registry.
  788. ;
  789. configureadapter = +
  790.     ;
  791.     ; Can't configure if it wasn't previously installed!
  792.     ;
  793.     Ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
  794.     set $R0 = "Cannot configure "$(Option)" - product not in registry"
  795.     goto fatal
  796.     endif
  797.     
  798.     ;
  799.     ; Open the registry key to this product.
  800.     ;
  801.     OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_RegBase) $(MAXIMUM_ALLOWED) KeyProduct
  802.     Ifstr $(KeyProduct) == $(KeyNull)
  803.     Set $R0 = "Cannot find "$(ProductSoftwareName)" Service for "$(Option)
  804.     Goto fatal
  805.     Endif
  806.     
  807.     ;
  808.     ; FindService returns:  R0  RegistryErrorIndex
  809.     ;                       R1  KeyThisService
  810.     ;                       R2  KeyParameters
  811.     ;
  812.     Shell $(UtilityInf) FindService, $(KeyProduct)
  813.     CloseRegKey $(KeyProduct)
  814.     Ifint $($ShellCode) != $(!SHELL_CODE_OK)
  815.     Goto ShellCodeError
  816.     Endif
  817.     ifstr(i) $($R0) != "NO_ERROR"
  818.     Goto fatal
  819.     endif
  820.     CloseRegKey $($R1)
  821.  
  822.     set KeyParameters = $($R2)
  823.     Ifstr $(KeyParameters) == $(KeyNull)
  824.     set $R0 = "Cannot find service for "$(Option)
  825.     goto fatal
  826.     endif
  827.     
  828.     ;
  829.     ; Read the parameters from the registry which are changeable from
  830.     ; the dialog box
  831.     ;
  832.  
  833.     EnumRegValue $(KeyParameters) ValueList
  834.     ForListDo $(ValueList)
  835.     set ValueItem = $($)
  836.     set ValueName = *($(ValueItem),1)
  837.     set ValueData = *($(ValueItem),4)
  838.     Ifstr(i) $(ValueName) == "Media"
  839.         set MediaValue = $(ValueData)
  840.     else-Ifstr(i) $(ValueName) == "TX_Threshold"
  841.         set TXThresholdValue = $(ValueData)
  842.     endif
  843.     EndForListDo
  844.  
  845.     ;
  846.     ; Initialize the variables we need to feed into the dialog
  847.     ;
  848.  
  849.     set Combo1Out = *(^(MediaChoices$(Option),1),~(^(MediaChoices$(Option),2),$(MediaValue)))
  850.     set Combo2Out = *(^(TXThresholdChoices$(Option),1),~(^(TXThresholdChoices$(Option),2),$(TXThresholdValue)))
  851.     
  852.     read-syms FileDependentDlg$(!STF_LANGUAGE)
  853.  
  854.     ;
  855.     ; Load the library containing the DLL
  856.     ;
  857.     
  858.     LoadLibrary "Disk 1" $(!STF_WINDOWSSYSPATH)"\"$(DialogDllName) hLib
  859.     
  860.     ;
  861.     ; Display the dialog box and free the library after completion
  862.     ;
  863.  
  864.     ui start "InputDlg" $(hLib)
  865.     ui pop 1
  866.     FreeLibrary $(hLib)
  867.  
  868.     ifstr(i) $(DLGEVENT) != "CONTINUE"
  869.     set CommonStatus = STATUS_USERCANCEL
  870.     CloseRegKey $(KeyParameters)
  871.     goto end
  872.     endif
  873.  
  874.     ;
  875.     ; Determine the values set in the dialog
  876.     ;
  877.  
  878.     set MediaValue = *(^(MediaChoices$(Option),2),~(^(MediaChoices$(Option),1),$(Combo1Out)))
  879.     set ThresholdValue = *(^(TXThresholdChoices$(Option),2),~(^(TXThresholdChoices$(Option),1),$(Combo2Out)))
  880.     
  881.     ;
  882.     ; Write the new values to the registry
  883.     ;
  884.  
  885.     set NewValueList = {{Media,$(NoTitle),$(!REG_VT_DWORD),$(MediaValue)},+
  886.             {TX_Threshold,$(NoTitle),$(!REG_VT_DWORD),$(TXThresholdValue)}}
  887.  
  888.     Shell  $(UtilityInf), AddValueList, $(KeyParameters), $(NewValueList)
  889.     CloseRegKey $(KeyParameters)
  890.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  891.     goto ShellCodeError
  892.     endif
  893.     goto end
  894.  
  895. ;------------------------------------------------------------------------
  896. ; Binding adapter not supported.
  897. ; Option, SrcDir, AddCopy, DoCopy, and DoConfig are valid.
  898. ;
  899. bindingadapter =+
  900.     set $R0 = "Binding: not implemented."
  901.     goto fatal
  902.  
  903. ;------------------------------------------------------------------------
  904. ; Remove adapter.
  905. ; Option, SrcDir, AddCopy, DoCopy, and DoConfig are valid.
  906. ;
  907. ; All references to the adapter are to be deleted from the registry.
  908. ; Does NOT delete files.
  909. ;
  910. ;       If ProductKeyName is the registry base,
  911. ;         remove the software component.
  912. ;       Otherwise, remove the hardware component.
  913. ;       
  914. ; If it is the hardware component that is being removed, the NTN_RegBase
  915. ; will be: SOFTWARE\Microsoft\Windows NT\CurrentVersion\NetworkCards\#
  916. ; where # will the be DE450_# of the card to be removed.  If the # is 1,
  917. ; while you are off doing RemoveHardwareComponent, RemoveSoftwareComponent
  918. ; will be called before control is returned to this .INF file.
  919. ;
  920. ; In theory, RemoveSoftwareComponent should never be called by this
  921. ; .INF file because it is done automatically when #1 is removed.
  922. ;
  923. removeadapter = +
  924.     Ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
  925.     Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), +
  926.         $(ProductSoftwareName)
  927.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  928.         goto ShellCodeError
  929.     endif
  930.     ifstr(i) $($R0) != "NO_ERROR"
  931.         set $R0 = "Error removing software component."
  932.         goto fatal
  933.     endif
  934.     else
  935.     Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), +
  936.         $(ProductSoftwareName), $(!NTN_RegBase)
  937.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  938.         goto ShellCodeError
  939.     endif
  940.     ifstr(i) $($R0) != "NO_ERROR"
  941.         set $R0 = "Error removing hardware component."
  942.         goto fatal
  943.     endif
  944.     endif
  945.     goto end
  946.  
  947. ;------------------------------------------------------------------------
  948. ; Upgrade software.
  949. ; Came here straight from figuring out which platform we are on.
  950. ; Option, SrcDir, AddCopy, DoCopy, and DoConfig are valid.
  951. ;
  952. ; If product exists in registry, copy help file and drivers.
  953. ;
  954. ; If this is implemented, also have to make sure all installed cards
  955. ; are supported by this .INF file (see [Options]).  Then need to update
  956. ; hardware parameters of the options.
  957. ;
  958. UpgradeSoftware = +
  959.     ;-------------------------------------------------------------------
  960.     ; Get the NT version (3.50 or ...)
  961.     ;-------------------------------------------------------------------
  962.     OpenRegKey $(!REG_H_LOCAL) "" $(VersionKeyName) $(MAXIMUM_ALLOWED) KeyVersion
  963.     GetRegValue $(KeyVersion),"CurrentVersion",VersionStruct
  964.     CloseRegKey $(KeyVersion)
  965.     Set NTVersion = *($(VersionStruct),4)
  966.     Ifstr(i) $(NTVersion) == "3.50"
  967.     set $R0 = "Windows NT 3.50 not supported on this distribution."
  968.     goto fatal
  969.     endif
  970.     ;-------------------------------------------------------------------
  971.     ; Determine the platform and set the correct driver/help paths.
  972.     ;-------------------------------------------------------------------
  973.     set Help_Directory = "WINNT"
  974.     Ifstr $(!STF_PLATFORM) == "Alpha"
  975.     set Source_Directory = "WINNT\ALPHA"
  976.     else-ifstr $(!STF_PLATFORM) == "Mips"
  977.     set Source_Directory = "WINNT\MIPS"
  978.     else-ifstr $(!STF_PLATFORM) == "I386"
  979.     set Source_Directory = "WINNT\INTEL"
  980.     else-ifstr $(!STF_PLATFORM) == "ppc"
  981.     set Source_Directory = "WINNT\PPC"
  982.     else
  983.     set $R0 = "This platform is not recognized and not supported by this distribution."
  984.     goto fatal
  985.     endif
  986.     ;---------------------------------------------------------------
  987.     ; Make sure product exists in the registry
  988.     ;---------------------------------------------------------------
  989.     OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct
  990.     Ifstr $(KeyProduct) != $(KeyNull)
  991.     ;---------------------------------
  992.     ; Get the name of the INF file
  993.     ;---------------------------------
  994.     Shell $(UtilityInf), GetInfFileNameFromRegistry, $(KeyProduct)
  995.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  996.         Debug-Output "ShellCode error"
  997.         goto ShellCodeError
  998.     endif
  999.     set !UG_Filename = $($R0)
  1000.     ;---------------------------------
  1001.     ; Copy the files if newer
  1002.     ;---------------------------------
  1003.     install "Install-Update"
  1004.     ifstr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS
  1005.         goto fatal
  1006.     endif
  1007.     ;-----------------------------
  1008.     ; Update the Version Number
  1009.     ;-----------------------------
  1010.     SetRegValue $(KeyProduct) {MajorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMajorVersion)}
  1011.     SetRegValue $(KeyProduct) {MinorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMinorVersion)}
  1012.     CloseRegKey $(KeyProduct)
  1013.     else
  1014.     set $R0 = "Upgrade not supported for the installed driver version."
  1015.     goto fatal
  1016.     endif
  1017.     goto end
  1018.  
  1019. ;------------------------------------------------------------------------
  1020. ; Shell Code Error.
  1021. ;
  1022. ShellCodeError = +
  1023.     set $R0 = "SHELL_CODE_ERROR"
  1024.     goto fatal
  1025.  
  1026. ;------------------------------------------------------------------------
  1027. ; Fatal.
  1028. ;
  1029. ; Message to be displayed is in R0.
  1030. ;
  1031. fatal = +
  1032.     ;
  1033.     ; Set up status failed indicator.
  1034.     ;
  1035.     set CommonStatus = STATUS_FAILED
  1036.     
  1037.     ;
  1038.     ; Print the fatal error message, contained in $R0.
  1039.     ;
  1040.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "FATAL", $($R0)
  1041.     goto AbandonComponentsInRegistry
  1042.  
  1043. ;------------------------------------------------------------------------
  1044. ; AbandonComponentsInRegistry.
  1045. ;
  1046. ; No message to be displayed.
  1047. ;
  1048. AbandonComponentsInRegistry = +
  1049.     Ifint $(HARDWARE_PUT_IN_REGISTRY) == $(TRUE)
  1050.     ;
  1051.     ; Remove hardware components listed in HWList. 
  1052.     ; Since we only allow installation of one component, there will
  1053.     ; be only one component to remove.  RemoveHardwareComponent will 
  1054.     ; automatically remove the software component if this is the only
  1055.     ; hardware component, so we don't need to worry about removing
  1056.     ; the software component from here.
  1057.     ;
  1058.     Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), +
  1059.         $(ProductSoftwareName), $(HWList)
  1060.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  1061.         goto AbandonError
  1062.     endif
  1063.     ifstr(i) $($R0) != "NO_ERROR"
  1064.         goto AbandonError
  1065.     endif
  1066.     
  1067.     else-Ifstr(i) $(SOFTWARE_PUT_IN_REGISTRY) == $(TRUE)
  1068.     ;
  1069.     ; If SOFTWARE_PUT_IN_REGISTRY is true, remove software component.
  1070.     ; We only need to do this if the hardware component was not removed.
  1071.     ;
  1072.     Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), +
  1073.         $(ProductSoftwareName), $(FALSE)
  1074.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  1075.         goto AbandonError
  1076.     endif
  1077.     ifstr(i) $($R0) != "NO_ERROR"
  1078.         goto AbandonError
  1079.     endif
  1080.     endif        
  1081.     goto end
  1082.  
  1083. AbandonError = +
  1084.     set $R0 = "Couldn't remove registry components.  Registry may be corrupt."
  1085.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "FATAL", $($R0)
  1086.     goto end
  1087.  
  1088. ;------------------------------------------------------------------------
  1089. ; End.
  1090. ;
  1091. end = +
  1092.     Return $(CommonStatus)
  1093.  
  1094.  
  1095. ;***********************
  1096. ;* INSTALL SUBROUTINES *
  1097. ;***********************
  1098. [Install-AddList]
  1099.     set !STF_VITAL = 1
  1100.     AddSectionFilesToCopyList Files-Sys $(SrcDir)$(Source_Directory) $(!STF_WINDOWSSYSPATH)\drivers
  1101.     AddSectionFilesToCopyList Files-Hlp $(SrcDir)$(Help_Directory) $(!STF_WINDOWSSYSPATH)
  1102.     AddSectionFIlesToCopyList Files-Dll $(SrcDir)$(Source_Directory) $(!STF_WINDOWSSYSPATH)
  1103.     Exit
  1104.  
  1105. [Install-Update]
  1106.     set STF_VITAL        = ""
  1107.     set STF_OVERWRITE    = "VERIFYSOURCEOLDER"
  1108.     AddSectionFilesToCopyList Files-Inf $(SrcDir) $(!STF_WINDOWSSYSPATH)
  1109.     AddSectionFilesToCopyList Files-Sys $(SrcDir)$(Source_Directory) $(!STF_WINDOWSSYSPATH)\drivers
  1110.     AddSectionFilesToCopyList Files-Hlp $(SrcDir)$(Help_Directory) $(!STF_WINDOWSSYSPATH)
  1111.     AddSectionFIlesToCopyList Files-Dll $(SrcDir)$(Source_Directory) $(!STF_WINDOWSSYSPATH)
  1112.     set !STF_NCPA_FLUSH_COPYLIST = TRUE
  1113.     CopyFilesInCopyList
  1114.     Exit
  1115.  
  1116. [Install-CopyList]
  1117.     set !STF_VITAL = 1
  1118.     set !STF_NCPA_FLUSH_COPYLIST = $(TRUE)
  1119.     CopyFilesInCopyList
  1120.     Exit
  1121.  
  1122. ;*****************************
  1123. ;* SOURCE MEDIA DESCRIPTIONS *
  1124. ;*****************************
  1125. ;
  1126. ; This section is required.  Format is as follows:
  1127. ;   LineKey = (DiskDescription, TAGFILE = TagFileName)
  1128. ;
  1129. ;   LineKey         An integer (1-999) that identifies the line for 
  1130. ;                   later use. Must be consecutive, starting with 1.
  1131. ;
  1132. ;   DiskDescription Disk name string prompting the user to insert
  1133. ;                   the disk.
  1134. ;
  1135. ;   TagFileName     Specifies the name of the file whose presence
  1136. ;                   on the disk indicates to Setup that the correct
  1137. ;                   disk has been inserted.  Whitespace must 
  1138. ;                   surround the "=".
  1139. ;
  1140. [Source Media Descriptions]
  1141.     1  = "Digital DE450 Driver", TAGFILE = DISK1
  1142.  
  1143. ;
  1144. ; Info needed for AddSectionFilesToCopyList
  1145. ;       Format: DiskID, FileName, Option
  1146. ;
  1147. ; DiskID is an integer defined in Source Media Descriptions
  1148. ; 
  1149.  
  1150. [Files-Hlp]
  1151. 1,DE450.HL_,   SIZE=999, DECOMPRESS, RENAME=DE450.HLP
  1152.  
  1153. [Files-Sys]
  1154. 1,DE450.SY_ ,  SIZE=40000, DECOMPRESS, RENAME=DE450.SYS
  1155.  
  1156. [Files-Dll]
  1157. 1,DE450.DL_ , SIZE=2000, DECOMPRESS, RENAME=DE450.DLL
  1158.  
  1159. [Files-Inf]
  1160. 1,OEMSETUP.INF, SIZE=1000, RENAME=$(!UG_Filename)
  1161.  
  1162. ;***************
  1163. ;* DEFINITIONS *
  1164. ;***************
  1165. [LanguagesSupported]
  1166.     ENG
  1167.  
  1168. [OptionsTextENG]
  1169.     DE450  = "DEC DE450 EtherWORKS Turbo PCI 10"
  1170.  
  1171. [FileConstantsENG]
  1172. DialogDllName = "de450.dll"
  1173. ProductSoftwareDescription = "DEC DE450 Driver"
  1174.  
  1175. FunctionDE450Title = "DEC DE450 Adapter Setup"
  1176. ProductHardwareDE450Description = "DEC DE450 EtherWORKS Turbo PCI 10 Adapter"
  1177.  
  1178. ConnectionList  = ^(ConnectionChoices$(Option), 1)
  1179. ConnectionValues = ^(ConnectionChoices$(Option), 2)
  1180. NoList  = ^(NoChoices, 1)
  1181. NoValues = ^(NoChoices, 2)
  1182.  
  1183.  
  1184. ;**************************
  1185. ;* DIALOG BOX INFORMATION *
  1186. ;**************************
  1187. [DialogConstantsENG]
  1188. Help        = "&Help"
  1189. Exit        = "Cancel"
  1190. OK          = "OK"
  1191. Continue    = "Continue"
  1192. Cancel      = "Cancel"
  1193.  
  1194. [FileDependentDlgENG]
  1195. DlgTemplate = "DE450"
  1196. DlgType = "RadioCombination"
  1197. Caption = $(Function$(Option)Title)
  1198. Combo1 = "Media Type"
  1199. Combo2 = "Transmit Threshold"
  1200. NotifyFields = {"NO","NO"}
  1201. Combo1List = ^(MediaChoices$(Option),1)
  1202. Combo2List = ^(TXThresholdChoices$(Option),1)
  1203. ComboListItemsIn  = {Combo1List,Combo2List}
  1204. ComboListItemsOut = {Combo1Out,Combo2Out}
  1205. EditTextLim = {"",""}
  1206. EditTextIn = {"",""}
  1207. MinHelpId = 1
  1208. MaxHelpId = 10
  1209. HelpContext = $(Help$(Option)Id)
  1210.