home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / d / d423_liu / 8.ddi / OEMNADDP.IN_ / OEMNADDP.IN
Encoding:
INI File  |  1993-07-24  |  25.6 KB  |  669 lines

  1. [Identification]
  2.     OptionType = NetAdapter
  3. [PlatformsSupported]
  4.     ISA
  5.         "Jazz-Internal Bus"
  6. [Options]
  7.     DECPC
  8. [FileConstants]
  9. UtilityInf      = "UTILITY.INF"
  10. subroutineinf   = "SUBROUTN.INF"
  11. SoftwareType    = "driver"
  12. Exit_Code       = 0
  13. NetEventDLL     = "%SystemRoot%\System32\netevent.dll"
  14. IoLogMsgDLL     = "%SystemRoot%\System32\IoLogMsg.dll"
  15. Manufacturer    = "Microsoft"
  16. ProductMajorVersion     = "3"
  17. ProductMinorVersion     = "1"
  18. ProductVersion  = $(ProductMajorVersion)"."$(ProductMinorVersion)
  19. ProductSoftwareName     = "Lance"
  20. ProductSoftwareImagePath = "\SystemRoot\System32\drivers\lance.sys"
  21. NetRuleSoftwareType     = "lanceSys ndisDriver lanceDriver"
  22. NetRuleSoftwareUse      = $(SoftwareType)
  23. NetRuleSoftwareBindForm = """LanceSys"" yes no container"
  24. NetRuleSoftwareClass    = {"lanceDriver basic"}
  25. ProductHardwareName     = "Lance"
  26. NetRuleHardwareType     = "decpc decpcAdapter"
  27. NetRuleHardwareBindForm = " yes yes container"
  28. NetRuleHardwareClass    = {"decpcAdapter basic"}
  29. ProductKeyName  = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\"$(ProductSoftwareName)"\CurrentVersion"
  30. ParamKeyName    = $(!NTN_ServiceBase)$(ProductHardwareName)"\Parameters"
  31. [GeneralConstants]
  32. from      = ""
  33. to        = ""
  34. ExitCodeOk     = 0
  35. ExitCodeCancel = 1
  36. ExitCodeFatal  = 2
  37. KeyNull         = ""
  38. MAXIMUM_ALLOWED   = 33554432
  39. RegistryErrorIndex = NO_ERROR
  40. KeyProduct      = ""
  41. KeyParameters   = ""
  42. TRUE            = 1
  43. FALSE           = 0
  44. NoTitle            = 0
  45. ExitState   = "Active"
  46. OldVersionExisted = $(FALSE)
  47. DriverPath      = $(!STF_NTPATH)\drivers
  48. [date]
  49.     Now = {} ? $(!LIBHANDLE) GetSystemDate
  50. [Identify]
  51.     read-syms Identification
  52.     set Status     = STATUS_SUCCESSFUL
  53.     set Identifier = $(OptionType)
  54.     set Media      = #("Source Media Descriptions", 1, 1)
  55.     Return $(Status) $(Identifier) $(Media)
  56. [ReturnOptions]
  57.     set Status        = STATUS_FAILED
  58.     set OptionList     = {}
  59.     set OptionTextList = {}
  60.     set LanguageList = ^(LanguagesSupported, 1)
  61.     Ifcontains(i) $($0) in $(LanguageList)
  62.         ifstr(i) $($1) == ""
  63.            goto returnoptions
  64.         endif
  65.         set PlatformList = ^(PlatformsSupported, 1)
  66.         Ifcontains(i) $($1) in $(PlatformList)
  67.            goto returnoptions
  68.         else
  69.            set Status = STATUS_NOTSUPPORTED
  70.            goto finish_ReturnOptions
  71.         endif
  72.     else
  73.         set Status = STATUS_NOLANGUAGE
  74.         goto finish_ReturnOptions
  75.     endif
  76. returnoptions = +
  77.     set OptionList     = ^(Options, 1)
  78.     set OptionTextList = ^(OptionsText$($0), 1)
  79.     set Status         = STATUS_SUCCESSFUL
  80. finish_ReturnOptions = +
  81.     Return $(Status) $(OptionList) $(OptionTextList)
  82. [InstallOption]
  83.     set Option   = $($1)
  84.     set SrcDir   = $($2)
  85.     set AddCopy  = $($3)
  86.     set DoCopy   = $($4)
  87.     set DoConfig = $($5)
  88.     set LanguageList = ^(LanguagesSupported, 1)
  89.     Ifcontains(i) $($0) NOT-IN $(LanguageList)
  90.         Return STATUS_NOLANGUAGE
  91.     endif
  92.     Debug-Output "OEMNADDP.INF: STF_CWDIR is: "$(!STF_CWDIR)
  93.     Debug-Output "OEMNADDP.INF: STF_LANGUAGE is: "$(!STF_LANGUAGE)
  94.     set-subst LF = "\n"
  95.     read-syms GeneralConstants
  96.     read-syms FileConstants
  97.     Shell $(UtilityInf), GetBindingInfo, "DEC"
  98.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  99.         Debug-Output "ShellCode error: cannot get an error string."
  100.         goto ShellCodeError
  101.     endif
  102.     set NetRuleSoftwareBindable = $($R1)
  103.     read-syms DialogConstants$(!STF_LANGUAGE)
  104.     ifstr(i) $(!NTN_Origination) == "NCPA"
  105.         set Continue = $(OK)
  106.     endif
  107.     read-syms FileConstants$(!STF_LANGUAGE)
  108.     detect date
  109.     set-title  $(FunctionTitle)
  110.     set to   = Begin
  111.     set from = Begin
  112.     set CommonStatus = STATUS_SUCCESSFUL
  113.     EndWait
  114. Begin = +
  115.     Ifstr(i) $(!NTN_InstallMode) == deinstall
  116.         set StartLabel = removeadapter
  117.     else-Ifstr(i) $(!NTN_InstallMode) == bind
  118.         set StartLabel = bindingadapter
  119.     else-Ifstr(i) $(!NTN_InstallMode) == Update
  120.         set StartLabel = UpgradeSoftware
  121.     else-Ifstr(i) $(!NTN_InstallMode) == configure
  122.         set CommonStatus = STATUS_REBOOT
  123.         set StartLabel = configureadapter
  124.         Ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
  125.             Debug-Output "Cannot configure the DEC PC driver software."
  126.             Shell $(UtilityInf),RegistryErrorString,CANNOT_CONFIGURE_SOFTWARE
  127.         else
  128.             Debug-Output "Cannot configure the DEC PC card."
  129.             Shell $(UtilityInf),RegistryErrorString,CANNOT_CONFIGURE_HARDWARE
  130.         endif
  131.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  132.             Debug-Output "ShellCode error: cannot get an error string."
  133.             goto ShellCodeError
  134.         endif
  135.         set Error = $($R0)
  136.         set from = end
  137.         set to = end
  138.         goto nonfatalinfo
  139.     else
  140.         set StartLabel = installadapter
  141.         set OEM_ABANDON_OPTIONS = {}
  142.         set OEM_ABANDON_SOFTWARE = FALSE
  143.         set OEM_ABANDON_ON = TRUE
  144.     endif
  145.     set from = $(fatal)
  146.     set to = $(fatal)
  147.     goto $(StartLabel)
  148. installadapter = +
  149.     OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct
  150.     Ifstr $(KeyProduct) != $(KeyNull)
  151.         CloseRegKey $(KeyProduct)
  152.         ifstr(i) !(NTN_RegBase) == $(ProductKeyName)
  153.            Shell $(UtilityInf), VerExistedDlg, $(ProductSoftwareTitle),+
  154.                $(ProductVersion)
  155.            ifint $($ShellCode) != $(!SHELL_CODE_OK)
  156.                Debug-Output "ShellCode error: cannot get an error string."
  157.                goto ShellCodeError
  158.            endif
  159.            goto end
  160.         else
  161.            Shell $(UtilityInf), CardExistedDlg
  162.            ifint $($ShellCode) != $(!SHELL_CODE_OK)
  163.                Debug-Output "ShellCode error: cannot get an error string."
  164.                goto ShellCodeError
  165.            endif
  166.            ifstr(i) $($R1) != "OK"
  167.                set CommonStatus = STATUS_USERCANCEL
  168.                goto end
  169.            endif
  170.            set OldVersionExisted = $(TRUE)
  171.         endif
  172.     endif
  173.     goto adapteroptions
  174. configureadapter = +
  175.     Ifstr $(KeyProduct) == $(KeyNull)
  176.         OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_RegBase) $(MAXIMUM_ALLOWED) KeyProduct
  177.         Ifstr $(KeyProduct) == $(KeyNull)
  178.             set RegistryErrorIndex = CANNOT_FIND_COMPONENT_SERVICE
  179.             Debug-Output "Cannot find component product key"
  180.             goto fatalregistry
  181.         Endif
  182.     Endif
  183.     Debug-Output "INF: Shelling to FindService"
  184.     Shell $(UtilityInf) FindService, $(KeyProduct)
  185.     Ifint $($ShellCode) != $(!SHELL_CODE_OK)
  186.         Debug-Output "INF: FindService shell failure"
  187.         Goto ShellCodeError
  188.     Endif
  189.     Ifstr(i) $($R0) != NO_ERROR
  190.         Debug-Output "INF: FindService Shell error: "$($R0)
  191.         Goto fatalregistry
  192.     endif
  193.     set KeyParameters = $($R2)
  194.     CloseRegKey $($R1)
  195.     Ifstr $(KeyParameters) == $(KeyNull)
  196.         set RegistryErrorIndex = CANNOT_FIND_COMPONENT_SERVICE
  197.         Debug-Output "Cannot find component service"
  198.         goto fatalregistry
  199.     endif
  200.     set OldVersionExisted = $(TRUE )
  201.     goto adapteroptions
  202. adapteroptions = +
  203.     set from = adapteroptions
  204. nextstep = +
  205.     ifint $(OldVersionExisted) == $(TRUE)
  206.         ifstr(i) $(!NTN_InstallMode) == configure
  207.             goto writeparameters
  208.         endif
  209.     endif
  210.     StartWait
  211.     ifint $(OldVersionExisted) == $(FALSE)
  212.         Ifstr(i) $(DoCopy) == "YES"
  213.            Shell $(UtilityInf), DoAskSource, $(!STF_CWDDIR), $(SrcDir) YES
  214.            Ifint $($ShellCode) != $(!SHELL_CODE_OK)
  215.                Goto ShellCodeError
  216.            Else-Ifstr(i) $($R0) == STATUS_FAILED
  217.                Shell $(UtilityInf) RegistryErrorString "ASK_SOURCE_FAIL"
  218.                ifint $($ShellCode) != $(!SHELL_CODE_OK)
  219.                   goto ShellCodeError
  220.                endif
  221.                set Error = $($R0)
  222.                Goto fatal
  223.            Else-Ifstr(i) $($R0) == STATUS_USERCANCEL
  224.                Goto successful
  225.            Endif
  226.            Set SrcDir = $($R1)
  227.         Endif
  228.         install "Install-Option"
  229.         ifstr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS
  230.            Shell $(UtilityInf) RegistryErrorString "UNABLE_COPY_FILE"
  231.            ifint $($ShellCode) != $(!SHELL_CODE_OK)
  232.                goto ShellCodeError
  233.            endif
  234.            set Error = $($R0)
  235.            goto fatal
  236.         endif
  237.         Shell $(UtilityInf), AddSoftwareComponent, $(Manufacturer), +
  238.             $(ProductSoftwareName), +
  239.             $(ProductSoftwareName), +
  240.             $(ProductSoftwareTitle), $(STF_CONTEXTINFNAME), +
  241.             $(ProductSoftwareImagePath), "kernel", "NDIS", {}, "",+
  242.             $(NetEventDLL)
  243.         Set OEM_ABANDON_SOFTWARE = TRUE
  244.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  245.             Debug-Output "ShellCode error"
  246.             goto ShellCodeError
  247.         endif
  248.         set RegistryErrorIndex = $($R0)
  249.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  250.             EndWait
  251.             Debug-Output "Registry error: add software components"
  252.             CloseRegKey $($R1)
  253.             CloseRegKey $($R2)
  254.             CloseRegKey $($R3)
  255.             CloseRegKey $($R4)
  256.             CloseRegKey $($R5)
  257.             goto fatalregistry
  258.         endif
  259.         set SoftProductKey      = $($R1)
  260.         Set SoftNetRuleKey      = $($R2)
  261.         Set SoftServiceKey      = $($R3)
  262.         Set SoftParameterKey    = $($R4)
  263.         Set SoftLinkageKey      = $($R5)
  264.         set NewValueList = {{SoftwareType,$(NoTitle),$(!REG_VT_SZ),$(SoftwareType)},+
  265.                            {MajorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMajorVersion)},+
  266.                            {MinorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMinorVersion)},+
  267.                            {Title,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareTitle)},+
  268.                            {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareDescription)},+
  269.                            {ServiceName,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareName)},+
  270.                            {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}}
  271.         Shell  $(UtilityInf), AddValueList, $(SoftProductKey), $(NewValueList)
  272.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  273.             Debug-Output "ShellCode error."
  274.             goto ShellCodeError
  275.         endif
  276.         set RegistryErrorIndex = $($R0)
  277.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  278.             EndWait
  279.             Debug-Output "Resgitry error: add value list."
  280.             CloseRegKey $(SoftProductKey)
  281.             CloseRegKey $(SoftNetRuleKey)
  282.             CloseRegKey $(SoftServiceKey)
  283.             CloseRegKey $(SoftParameterKey)
  284.             CloseRegKey $(SoftLinkageKey)
  285.             goto fatalregistry
  286.         endif
  287.         set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareType)},+
  288.                             {use,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareUse)}, +
  289.                             {bindform,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareBindForm)}, +
  290.                             {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleSoftwareClass)}, +
  291.                             {bindable,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleSoftwareBindable)}, +
  292.                             {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}}
  293.         Shell  $(UtilityInf), AddValueList, $(SoftNetRuleKey), $(NewValueList)
  294.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  295.             Debug-Output "ShellCode error."
  296.             goto ShellCodeError
  297.         endif
  298.         set RegistryErrorIndex = $($R0)
  299.         CloseRegKey $(SoftProductKey)
  300.         CloseRegKey $(SoftNetRuleKey)
  301.         CloseRegKey $(SoftServiceKey)
  302.         CloseRegKey $(SoftParameterKey)
  303.         CloseRegKey $(SoftLinkageKey)
  304.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  305.             EndWait
  306.             Debug-Output "Resgitry error: add value list."
  307.             goto fatalregistry
  308.         endif
  309.     endif
  310.     Shell $(UtilityInf), AddHardwareComponent,$(ProductHardwareName),$(STF_CONTEXTINFNAME),$(ProductKeyName)
  311.     ifint $($R4) != -1
  312.         Set OEM_ABANDON_OPTIONS = >($(OEM_ABANDON_OPTIONS), $(!NTN_SoftwareBase)"\Microsoft\Windows NT\CurrentVersion\NetworkCards\"$($R4))
  313.     endif
  314.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  315.         Debug-Output "Cannot add hardware component"
  316.         goto ShellCodeError
  317.     endif
  318.     set RegistryErrorIndex = $($R0)
  319.     Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  320.         EndWait
  321.         Debug-Output "Registry error: add hardware component"
  322.         Debug-Output $(RegistryErrorIndex)
  323.         CloseRegKey $($R1)
  324.         CloseRegKey $($R2)
  325.         CloseRegKey $($R3)
  326.         goto fatalregistry
  327.     endif
  328.     set KeyParameters = $($R3)
  329.     set KeyAdapterRules = $($R2)
  330.     set AdapterNumber = $($R4)
  331.     set NewValueList = {{Manufacturer,$(NoTitle),$(!REG_VT_SZ),$(Manufacturer)},+
  332.                        {Title,$(NoTitle),$(!REG_VT_SZ),"["$($R4)"] "$(ProductHardwareTitle)},+
  333.                        {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductHardwareDescription)},+
  334.                        {ProductName,$(NoTitle),$(!REG_VT_SZ),$(ProductHardwareName)},+
  335.                        {ServiceName,$(NoTitle),$(!REG_VT_SZ),$($R5)},+
  336.                        {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}}
  337.     Shell  $(UtilityInf), AddValueList, $($R1), $(NewValueList)
  338.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  339.         Debug-Output "ShellCode error"
  340.         goto ShellCodeError
  341.     endif
  342.     CloseRegKey $($R1)
  343.     set TempProdName = """"$(ProductHardwareName)$(AdapterNumber)""""
  344.     set TempBindForm = $(TempProdName)$(NetRuleHardwareBindForm)
  345.     set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleHardwareType)},+
  346.                         {bindform,$(NoTitle),$(!REG_VT_SZ),$(TempBindForm)}, +
  347.                         {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleHardwareClass)}, +
  348.                         {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}}
  349.     Shell  $(UtilityInf), AddValueList, $(KeyAdapterRules), $(NewValueList)
  350.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  351.         Debug-Output "ShellCode error."
  352.         goto ShellCodeError
  353.     endif
  354.     set RegistryErrorIndex = $($R0)
  355.     Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  356.         EndWait
  357.         Debug-Output "Resgitry error: add value list."
  358.         CloseRegKey $(KeyParameters)
  359.         CloseRegKey $(KeyAdapterRules)
  360.         goto fatalregistry
  361.     endif
  362.     CloseRegKey $(KeyAdapterRules)
  363.     OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct
  364.     Ifstr $(KeyProduct) == $(KeyNull)
  365.         set RegistryErrorIndex = CANNOT_FIND_COMPONENT_SERVICE
  366.         Debug-Output "Cannot find component product key"
  367.         goto fatalregistry
  368.     Endif
  369.     CloseRegKey $(KeyProduct)
  370.     goto writeparameters
  371. writeparameters = +
  372.     set CardTypeValue = 3
  373.     Shell $(UtilityInf), GetBusTypeNum
  374.     set BusTypeNum = $($R1)
  375.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  376.         Debug-Output "ShellCode error."
  377.         goto ShellCodeError
  378.     endif
  379.     set NewValueList = {+
  380.                        {MediaType,$(NoTitle),$(!REG_VT_DWORD),1},+
  381.                        {BusType,$(NoTitle),$(!REG_VT_DWORD),$(BusTypeNum)},+
  382.                        {CardType,$(NoTitle),$(!REG_VT_DWORD),$(CardTypeValue)}+
  383.                        }
  384.     Shell  $(UtilityInf), AddValueList, $(KeyParameters), $(NewValueList)
  385.     CloseRegKey $(KeyParameters)
  386.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  387.         Debug-Output "ShellCode error."
  388.         goto ShellCodeError
  389.     endif
  390.     set RegistryErrorIndex = $($R0)
  391.     Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  392.         Debug-Output "Registry error: Add value list"
  393.         goto fatalregistry
  394.     endif
  395.     EndWait
  396.     goto successful
  397. bindingadapter =+
  398.     set Error = "Binding: Sorry, not yet implemented."
  399.     goto fatal
  400. removeadapter = +
  401.     Ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
  402.         Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), +
  403.             $(ProductSoftwareName)
  404.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  405.             Debug-Output "ShellCode error"
  406.             goto ShellCodeError
  407.         endif
  408.         set RegistryErrorIndex = $($R0)
  409.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  410.             goto fatalregistry
  411.         endif
  412.     else
  413.         Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), +
  414.             $(ProductSoftwareName), $(!NTN_RegBase)
  415.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  416.             Debug-Output "ShellCode error"
  417.             goto ShellCodeError
  418.         endif
  419.         set RegistryErrorIndex = $($R0)
  420.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  421.             goto fatalregistry
  422.         endif
  423.     endif
  424.     goto end
  425. UpgradeSoftware = +
  426.     ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
  427.         OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct
  428.         Ifstr $(KeyProduct) != $(KeyNull)
  429.             GetRegValue $(KeyProduct),"MajorVersion", VersionInfo
  430.             set Version = *($(VersionInfo), 4)
  431.             Shell $(UtilityInf), GetInfFileNameFromRegistry, $(KeyProduct)
  432.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  433.                 Debug-Output "ShellCode error"
  434.                 goto ShellCodeError
  435.             endif
  436.             set !UG_Filename = $($R0)
  437.             ifstr(i) $(!UG_Filename) != ""
  438.                 install "Install-Update"
  439.                 ifstr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS
  440.                     goto fatal
  441.                 endif
  442.             endif
  443.             SetRegValue $(KeyProduct) {MajorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMajorVersion)}
  444.             SetRegValue $(KeyProduct) {MinorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMinorVersion)}
  445.             ifint $(Version) != $(ProductVersion)
  446.             endif
  447.             CloseRegKey $(KeyProduct)
  448.         else
  449.             goto fatalregistry
  450.         endif
  451.     else
  452.         OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_RegBase) +
  453.               $(MAXIMUM_ALLOWED) NetworkCardKey
  454.         Ifstr(i) $(NetworkCardKey) != $(KeyNull)
  455.             GetRegValue $(NetworkCardKey),"ServiceName", ServiceNameInfo
  456.             set ServiceName = *($(ServiceNameInfo), 4)
  457.             OpenRegKey $(NetworkCardKey) "" "NetRules" +
  458.                 $(MAXIMUM_ALLOWED) NetRuleKey
  459.             Ifstr(i) $(NetRuleKey) != $(KeyNull)
  460.             else
  461.                 goto fatalregistry
  462.             endif
  463.             CloseRegKey $(NetRules)
  464.             CloseRegKey $(NetworkCardKey)
  465.         else
  466.             goto fatalregistry
  467.         endif
  468.         OpenRegKey $(!REG_H_LOCAL) "" +
  469.               $(!NTN_ServiceBase)"\"$(ServiceName) +
  470.               $(MAXIMUM_ALLOWED) ServiceKey
  471.         Ifstr(i) $(ServiceKey) != $(KeyNull)
  472.             CloseRegKey $(ServiceKey)
  473.         else
  474.             goto fatalregistry
  475.         endif
  476.     endif
  477.     goto end
  478. successful = +
  479.     goto end
  480. abandon = +
  481.     ForListDo $(OEM_ABANDON_OPTIONS)
  482.         Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), +
  483.             $(ProductSoftwareName), $($)
  484.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  485.             Debug-Output "ShellCode error"
  486.             goto ShellCodeError
  487.         endif
  488.         set RegistryErrorIndex = $($R0)
  489.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  490.             goto fatalregistry
  491.         endif
  492.     EndForListDo
  493.     Ifstr(i) $(OEM_ABANDON_SOFTWARE) == TRUE
  494.         Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), +
  495.             $(ProductSoftwareName), FALSE
  496.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  497.             Debug-Output "ShellCode error"
  498.             goto ShellCodeError
  499.         endif
  500.         set RegistryErrorIndex = $($R0)
  501.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  502.             goto fatalregistry
  503.         endif
  504.     endif
  505.     goto end
  506. warning = +
  507.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "WARNING", $(Error)
  508.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  509.         goto ShellCodeError
  510.     endif
  511.     ifstr(i) $($R1) == "OK"
  512.         goto $(to)
  513.     else-ifstr(i) $($R1) == "CANCEL"
  514.         goto $(from)
  515.     else
  516.         goto "end"
  517.     endif
  518. nonfatalinfo = +
  519.     Set CommonStatus = STATUS_USERCANCEL
  520.     Set Severity = STATUS
  521.     goto nonfatalmsg
  522. nonfatal = +
  523.     Set Severity = NONFATAL
  524.     goto nonfatalmsg
  525. nonfatalmsg = +
  526.     ifstr(i) $(Error) == ""
  527.         Set Severity = NONFATAL
  528.         Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL"
  529.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  530.             goto ShellCodeError
  531.         endif
  532.         set Error = $($R0)
  533.     endif
  534.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), $(Severity), $(Error)
  535.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  536.         goto ShellCodeError
  537.     endif
  538.     ifstr(i) $($R1) == "OK"
  539.         goto $(from)
  540.     else
  541.         goto "end"
  542.     endif
  543. fatalregistry = +
  544.     Shell $(UtilityInf) RegistryErrorString $(RegistryErrorIndex)
  545.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  546.         goto ShellCodeError
  547.     endif
  548.     set Error = $($R0)
  549.     goto fatal
  550. fatal = +
  551.     ifstr(i) $(Error) == ""
  552.         Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL"
  553.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  554.             goto ShellCodeError
  555.         endif
  556.         set Error = $($R0)
  557.     endif
  558.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "FATAL", $(Error)
  559.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  560.         goto ShellCodeError
  561.     endif
  562.     goto setfailed
  563. ShellCodeError = +
  564.     set DlgType      = "MessageBox"
  565.     set STF_MB_TITLE = $(ShellCodeErrorTitle)
  566.     set STF_MB_TEXT  = $(ShellCodeErrorText)
  567.     set STF_MB_TYPE  = 1
  568.     set STF_MB_ICON  = 3
  569.     set STF_MB_DEF   = 1
  570.     ui start "Error Message"
  571.     goto setfailed
  572. setfailed = +
  573.     set CommonStatus = STATUS_FAILED
  574.     ifstr(i) $(OEM_ABANDON_ON) == TRUE
  575.         set OEM_ABANDON_ON = FALSE
  576.         goto abandon
  577.     endif
  578.     goto end
  579. end = +
  580.     goto term
  581. term = +
  582.     Return $(CommonStatus)
  583. [Install-Option]
  584.     set STF_VITAL = ""
  585.     ifstr(i) $(AddCopy) == "YES"
  586.         AddSectionFilesToCopyList Files-$(Option) $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers
  587.     endif
  588.     ifstr(i) $(DoCopy) == "YES"
  589.        set !STF_NCPA_FLUSH_COPYLIST = TRUE
  590.        CopyFilesInCopyList
  591.     endif
  592.     ifstr(i) $(DoConfig) == "YES"
  593.     endif
  594.     Exit
  595. [Install-Update]
  596.    set STF_VITAL        = ""
  597.    set STF_OVERWRITE    = "VERIFYSOURCEOLDER"
  598.    AddSectionFilesToCopyList Files-$(Option) $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers
  599.    AddSectionFilesToCopyList Files-Inf $(SrcDir) $(!STF_WINDOWSSYSPATH)
  600.    set !STF_NCPA_FLUSH_COPYLIST = TRUE
  601.    CopyFilesInCopyList
  602.    exit
  603. [Source Media Descriptions]
  604.     1    = "Windows NT Advanced Server Setup Disk #1"   , TAGFILE = disk1
  605.     2    = "Windows NT Advanced Server Setup Disk #2"   , TAGFILE = disk2
  606.     3    = "Windows NT Advanced Server Setup Disk #3"   , TAGFILE = disk3
  607.     4    = "Windows NT Advanced Server Setup Disk #4"   , TAGFILE = disk4
  608.     5    = "Windows NT Advanced Server Setup Disk #5"   , TAGFILE = disk5
  609.     6    = "Windows NT Advanced Server Setup Disk #6"   , TAGFILE = disk6
  610.     7    = "Windows NT Advanced Server Setup Disk #7"   , TAGFILE = disk7
  611.     8    = "Windows NT Advanced Server Setup Disk #8"   , TAGFILE = disk8
  612.     9    = "Windows NT Advanced Server Setup Disk #9"   , TAGFILE = disk9
  613.     10    = "Windows NT Advanced Server Setup Disk #10"  , TAGFILE = disk10
  614.     11    = "Windows NT Advanced Server Setup Disk #11"  , TAGFILE = disk11
  615.     12    = "Windows NT Advanced Server Setup Disk #12"  , TAGFILE = disk12
  616.     13    = "Windows NT Advanced Server Setup Disk #13"  , TAGFILE = disk13
  617.     14    = "Windows NT Advanced Server Setup Disk #14"  , TAGFILE = disk14
  618.     15    = "Windows NT Advanced Server Setup Disk #15"  , TAGFILE = disk15
  619.     16    = "Windows NT Advanced Server Setup Disk #16"  , TAGFILE = disk16
  620.     17    = "Windows NT Advanced Server Setup Disk #17"  , TAGFILE = disk17
  621.     18    = "Windows NT Advanced Server Setup Disk #18"  , TAGFILE = disk18
  622.     19    = "Windows NT Advanced Server Setup Disk #19"  , TAGFILE = disk19
  623.     20    = "Windows NT Advanced Server Setup Disk #20"  , TAGFILE = disk20
  624.     21    = "Windows NT Advanced Server Setup Disk #21"  , TAGFILE = disk21
  625.     22    = "Windows NT Advanced Server Setup Disk #22"  , TAGFILE = disk22
  626.     23    = "Windows NT Advanced Server Setup Disk #23"  , TAGFILE = disk23
  627.     24    = "Windows NT Advanced Server Setup Disk #24"  , TAGFILE = disk24
  628.     25    = "Windows NT Advanced Server Setup Disk #25"  , TAGFILE = disk25
  629.     26    = "Windows NT Advanced Server Setup Disk #26"  , TAGFILE = disk26
  630.     27    = "Windows NT Advanced Server Setup Disk #27"  , TAGFILE = disk27
  631.     28    = "Windows NT Advanced Server Setup Disk #28"  , TAGFILE = disk28
  632.     29    = "Windows NT Advanced Server Setup Disk #29"  , TAGFILE = disk29
  633. [ProductType]
  634. STF_PRODUCT  = LanmanNT
  635. STF_PLATFORM = I386
  636. [Files-Inf]
  637. 2,    oemsetup.inf,     SIZE=1000,    RENAME=$(!UG_Filename)
  638. [Files-DECPC]
  639. 22,LANCE.SYS , SIZE=34304
  640. [LanguagesSupported]
  641.     ENG
  642. [OptionsTextENG]
  643.     DECPC     = "DEC EtherWORKS DEPCA"
  644. [FileConstantsENG]
  645. ProCaption   = "Windows NT Setup"
  646. ProCancel    = "Cancel"
  647. ProCancelMsg = "Windows NT Networking is not correctly installed.  "+
  648.                "Are you sure you want to cancel copying files?"
  649. ProCancelCap = "Network Setup Message"
  650. ProText1     = "Copying:"
  651. ProText2     = "To:"
  652. FunctionTitle   = "DEC EtherWORKS DEPCA Setup"
  653. ProductSoftwareDescription      = "DEC Lance Adapter Driver"
  654. ProductHardwareDescription      = "DEC EtherWORKS DEPCA"
  655. ProductSoftwareTitle    = "DEC Lance Adapter Driver"
  656. ProductHardwareTitle    = "DEC EtherWORKS DEPCA"
  657. ShellCodeErrorTitle     = "Error: "$(FunctionTitle)
  658. ShellCodeErrorText      = "Shell Code Error."
  659. [DialogConstantsENG]
  660. Help        = "&Help"
  661. Exit        = "Cancel"
  662. OK          = "OK"
  663. HelpContext = ""
  664. Continue    = "Continue"
  665. Cancel      = "Cancel"
  666.  
  667.  
  668.  
  669.