;*********************************************************************** ; SpellCaster ISDN Interface Card WindowsNT Setup File. ;*********************************************************************** [Identification] OptionType = NetAdapter ;*********************************************************************** ; ;*********************************************************************** [PlatformsSupported] ISA ;*********************************************************************** ; ;*********************************************************************** [Options] DcBri TcBri DcPri ;*********************************************************************** ; ;*********************************************************************** [FileConstants] ScGroup = "SpellCaster " ScConfig = "SpellCaster Configuration" RlsNotes = "Release Notes" InfName = "OEMSETNT.INF" UtilityInf = "UTILITY.INF" ParamInf = "NCPARAM.INF" subroutineinf = "SUBROUTN.INF" SoftwareType = "driver" Exit_Code = 0 NetEventDLL = "%SystemRoot%\System32\netevent.dll" IoLogMsgDLL = "%SystemRoot%\System32\IoLogMsg.dll" Manufacturer = "SpellCaster Telecommunications Inc." ; FIXME - default to dialup line mode = 1 -- leased line = 0 ; In dialup mode we need to write the parameters so RAS/TAPI will bind to us ; In leased mode we need to write the parameters so NDIS/WAN will bind to us ; Right now this file only supports dialup mode - leased line changes are needed LineType = 1 ; Parameters for the hardware setup dialog box IO_Addr_List = {384, 448, 512, 576, 640, 704, 768, 832, 896, 960} Switch_Value_List = {"6", "7", "8", "9", "A", "B", "C", "D", "E", "F"} RAM_Addr_List = {786432, 802816, 819200, 835584, 851968, 868352, 884736, 901120, 917504, 933888, 950272, 966656} IRQ_List = {3, 4, 5, 6, 7, 9, 10, 11, 12, 14} SwitchType = 4 Ch0Phone = " " Ch0SPID = " " Ch1Phone = " " Ch1SPID = " " NumberOfLines = 1 ;*********************************************************************** ; ;*********************************************************************** [DCBRI-Specific] ProductMajorVersion = "1" ProductMinorVersion = "3" ProductVersion = $(ProductMajorVersion)"."$(ProductMinorVersion) ProductSoftwareName = "DcBri" ProductSoftwareImagePath = "\SystemRoot\System32\drivers\dcbri.sys" NetRuleSoftwareType = "DcBriSys DcBriDriver" NetRuleSoftwareUse = $(SoftwareType) NetRuleSoftwareBindForm = """DcBriSys"" yes no container" NetRuleSoftwareClass = {"DcBriDriver basic"} NetRuleSoftwareBindable = {"DcBriDriver DcBriAdapter non exclusive 100"} ProductHardwareName = "DcBri" NetRuleHardwareBindForm = " yes yes container" NetRuleHardwareDcBriType = "DcBri DcBriAdapter" NetRuleHardwareDcBriClass = {"DcBriAdapter basic"} BindableDcBriTxt = {"DcBriDriver DcBriAdapter non exclusive 100"} DeviceMap = "HARDWARE\DEVICEMAP" TapiDevices = "TAPI DEVICES" TapiDeviceKey = $(ProductHardwareName) TapiMediaType = "ISDN" ProductKeyName = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\"+ $(ProductSoftwareName)"\CurrentVersion" ParamKeyName = $(!NTN_ServiceBase)"\"$(ProductHardwareName)+ "\Parameters" ScDir = $(!SFT_CWDDIR)spellcst ScUtilDir = $(!SFT_CWDDIR)spellcst\dcbri ProductPath = $(ScUtilDir)"\" BoardName = "DataCommute/BRI" ;*********************************************************************** ; ;*********************************************************************** [TCBRI-Specific] ProductMajorVersion = "1" ProductMinorVersion = "3" ProductVersion = $(ProductMajorVersion)"."$(ProductMinorVersion) ProductSoftwareName = "TcBri" ProductSoftwareImagePath = "\SystemRoot\System32\drivers\tcbri.sys" NetRuleSoftwareType = "TcBriSys TcBriDriver" NetRuleSoftwareUse = $(SoftwareType) NetRuleSoftwareBindForm = """TcBriSys"" yes no container" NetRuleSoftwareClass = {"TcBriDriver basic"} NetRuleSoftwareBindable = {"TcBriDriver TcBriAdapter non exclusive 100"} ProductHardwareName = "TcBri" NetRuleHardwareBindForm = " yes yes container" NetRuleHardwareTcBriType = "TcBri TcBriAdapter" NetRuleHardwareTcBriClass = {"TcBriAdapter basic"} BindableTcBriTxt = {"TcBriDriver TcBriAdapter non exclusive 100"} DeviceMap = "HARDWARE\DEVICEMAP" TapiDevices = "TAPI DEVICES" TapiDeviceKey = $(ProductHardwareName) TapiMediaType = "ISDN" ProductKeyName = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\"+ $(ProductSoftwareName)"\CurrentVersion" ParamKeyName = $(!NTN_ServiceBase)"\"$(ProductHardwareName)+ "\Parameters" ScDir = $(!SFT_CWDDIR)spellcst ScUtilDir = $(!SFT_CWDDIR)spellcst\tcbri ProductPath = $(ScUtilDir)"\" BoardName = "TeleCommute/BRI" ;*********************************************************************** ; ;*********************************************************************** [DCPRI-Specific] ProductMajorVersion = "1" ProductMinorVersion = "3" ProductVersion = $(ProductMajorVersion)"."$(ProductMinorVersion) ProductSoftwareName = "DcPri" ProductSoftwareImagePath = "\SystemRoot\System32\drivers\dcpri.sys" NetRuleSoftwareType = "DcPriSys DcPriDriver" NetRuleSoftwareUse = $(SoftwareType) NetRuleSoftwareBindForm = """DcPriSys"" yes no container" NetRuleSoftwareClass = {"DcPriDriver basic"} NetRuleSoftwareBindable = {"DcPriDriver DcPriAdapter non exclusive 100"} ProductHardwareName = "DcPri" NetRuleHardwareBindForm = " yes yes container" NetRuleHardwareDcPriType = "DcPri DcPriAdapter" NetRuleHardwareDcPriClass = {"DcPriAdapter basic"} BindableDcPriTxt = {"DcPriDriver DcPriAdapter non exclusive 100"} DeviceMap = "HARDWARE\DEVICEMAP" TapiDevices = "TAPI DEVICES" TapiDeviceKey = $(ProductHardwareName) TapiMediaType = "ISDN" ProductKeyName = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\"+ $(ProductSoftwareName)"\CurrentVersion" ParamKeyName = $(!NTN_ServiceBase)"\"$(ProductHardwareName)+ "\Parameters" ScDir = $(!SFT_CWDDIR)spellcst ScUtilDir = $(!SFT_CWDDIR)spellcst\dcpri ProductPath = $(ScUtilDir)"\" BoardName = "DataCommute/PRI" SignalCode = 0 FrameMode = 0 CRC6 = 0 LineLength = 0 BypassJitter = 0 ;*********************************************************************** ; ;*********************************************************************** [GeneralConstants] !DebugOutputControl = 1 from = "" to = "" ExitCodeOk = 0 ExitCodeCancel = 1 ExitCodeFatal = 2 KeyNull = "" MAXIMUM_ALLOWED = 33554432 RegistryErrorIndex = NO_ERROR KeyProduct = "" KeyParameters = "" TRUE = 1 FALSE = 0 NoTitle = 0 ExitState = "Active" OldVersionExisted = $(FALSE) DriverPath = $(!STF_NTPATH)\drivers CreateIcons = $(TRUE) DeleteIcons = $(TRUE) ;*********************************************************************** ; ;*********************************************************************** [Date] Now = {} ? $(!LIBHANDLE) GetSystemDate ;*********************************************************************** ; ;*********************************************************************** [Identify] Read-Syms Identification Set Status = STATUS_SUCCESSFUL Set Identifier = $(OptionType) Set Media = #("Source Media Descriptions", 1, 1) Return $(Status) $(Identifier) $(Media) ;*********************************************************************** ; ;*********************************************************************** [ReturnOptions] read-syms GeneralConstants Set Status = STATUS_FAILED Set OptionList = {} Set OptionTextList = {} Set LanguageList = ^(LanguagesSupported, 1) IfContains(i) $($0) in $(LanguageList) IfStr(i) $($1) == "" GoTo SetOptions EndIf Set PlatformList = ^(PlatformsSupported, 1) IfContains(i) $($1) in $(PlatformList) GoTo SetOptions Else Set Status = STATUS_NOTSUPPORTED GoTo ExitReturnOptions EndIf Else Set Status = STATUS_NOLANGUAGE GoTo ExitReturnOptions EndIf SetOptions = + Set OptionList = ^(Options, 1) Set OptionTextList = ^(OptionsText$($0), 1) Set Status = STATUS_SUCCESSFUL ExitReturnOptions = + Return $(Status) $(OptionList) $(OptionTextList) ;*********************************************************************** ; ;*********************************************************************** [InstallOption] Set Status = STATUS_FAILED Set Option = $($1) Set SrcDir = $($2) Set AddCopy = $($3) Set DoCopy = $($4) Set DoConfig = $($5) Set LanguageList = ^(LanguagesSupported, 1) IfContains(i) $($0) NOT-IN $(LanguageList) Return STATUS_NOLANGUAGE EndIf Set-Subst LF = "\n" Read-Syms GeneralConstants Read-Syms FileConstants Read-Syms $(Option)-Specific Read-Syms DialogConstants$(!STF_LANGUAGE) IfStr(i) $(!NTN_Origination) == "NCPA" Set Continue = $(OK) EndIf Read-Syms FileConstants$(!STF_LANGUAGE)-$(Option) Detect Date Set-Title $(FunctionTitle)$(Option) Set to = Begin Set from = Begin Set CommonStatus = STATUS_SUCCESSFUL EndWait ;*********************************************************************** ; ;*********************************************************************** Begin = + Set ActivateDetection = FALSE IfStr(i) $(!NTN_InstallMode) == deinstall Set StartLabel = RemoveAdapter Else-IfStr(i) $(!NTN_InstallMode) == Update Set StartLabel = UpgradeSoftware Else-IfStr(i) $(!NTN_InstallMode) == bind Set StartLabel = BindingAdapter Else-IfStr(i) $(!NTN_InstallMode) == configure Set StartLabel = ConfigureAdapter Set ActivateDetection = TRUE Set CommonStatus = STATUS_REBOOT IfStr(i) $(ProductKeyName) == $(!NTN_RegBase) Debug-Output $(InfName)": Cannot configure the SpellCaster DataCommute/BRI driver software." Shell $(UtilityInf),RegistryErrorString,CANNOT_CONFIGURE_SOFTWARE IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error: cannot get an error string." GoTo ShellCodeError EndIf Set Error = $($R0) Set from = end Set to = end GoTo NonFatalInfo EndIf Else Set StartLabel = InstallAdapter Set ActivateDetection = TRUE Set OEM_ABANDON_OPTIONS = {} Set OEM_ABANDON_SOFTWARE = FALSE Set OEM_ABANDON_ON = TRUE EndIf Debug-Output $(InfName)": ==================================================" Debug-Output $(InfName)": STF_CWDIR is: "$(!STF_CWDIR) Debug-Output $(InfName)": STF_LANGUAGE is: "$(!STF_LANGUAGE) Debug-Output $(InfName)": Option is: "$(Option) Debug-Output $(InfName)": !STF_NCDETECT is: "$(!STF_NCDETECT) Debug-Output $(InfName)": !STF_NCOPTION is: "$(!STF_NCOPTION) Debug-Output $(InfName)": !STF_NCDETCARD is: "$(!STF_NCDETCARD) Debug-Output $(InfName)": !STF_NCDETINFO is: "$(!STF_NCDETINFO) Debug-Output $(InfName)": ==================================================" Set DetectedCard = FALSE IfStr(i) $(ActivateDetection) != TRUE GoTo $(StartLabel) EndIf Debug-Output $(InfName)": Calling Param_SetDefaults" Shell $(ParamInf) Param_SetDefaults {} Debug-Output $(InfName)": Calling Param_SetDefaults" Shell $(ParamInf) Param_SetDefaults {} Shell $(ParamInf) HexListFromDecList $(RAM_Addr_List) Set RAM_Hex_List = $($R0) Shell $(ParamInf) HexListFromDecList $(IO_Addr_List) Set Temp_List = $($R0) ; Append the corresponding switch setting to each IO address set IO_Hex_List = {} ForListDo $(Temp_List) Set IO_Hex_List = >($(IO_Hex_List),$($)" ("*($(Switch_Value_List), $(#))")") EndForListDo IfStr(i) $(!STF_NCDETECT) == YES IfStr(i) $(!STF_NCOPTION) == $(Option) Set DetectedCard = TRUE Debug-Output $(InfName)": Setting DetectedCard to TRUE" EndIf EndIf Shell "" DebugConfiguration "After parameter querying" Set from = FatalError Set to = FatalError GoTo $(StartLabel) ;*********************************************************************** ; ;*********************************************************************** InstallAdapter = + ; Set default for initial configuration Set InterruptNumber = 10 Set IoBaseAddress = 640 ;(0xA0) Set RamBaseAddress = 851968 ;(0xD0000) OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct IfStr $(KeyProduct) != $(KeyNull) CloseRegKey $(KeyProduct) IfStr(i) !(NTN_RegBase) == $(ProductKeyName) Shell $(UtilityInf), VerExistedDlg, $(ProductSoftwareTitle),+ $(ProductVersion) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error: cannot get an error string." GoTo ShellCodeError EndIf GoTo end Else Debug-Output $(InfName)": CardExistedDlg." ;----------------- set NetworkCardKeyName = $(!NTN_SoftwareBase)"\Microsoft\Windows NT\CurrentVersion\NetworkCards" OpenRegKey $(!REG_H_LOCAL) "" $(NetworkCardKeyName) $(MAXIMUM_ALLOWED) IE_KeyNetcards ifstr(i) $(IE_KeyNetcards) != "" EnumRegKey $(IE_KeyNetcards) IE_KeyNameList ForListDo $(IE_KeyNameList) OpenRegKey $(IE_KeyNetcards) "" *($($),1) + $(MAXIMUM_ALLOWED) NetworkCardKey Ifstr(i) $(NetworkCardKey) != $(KeyNull) GetRegValue $(NetworkCardKey),"Manufacturer", ManufacturerInfo set ManufacturerName = *($(ManufacturerInfo), 4) Debug-Output " Manufacturer = "$(ManufacturerName) Ifstr $(ManufacturerName) != $(Manufacturer) goto nextnetcard2 endif GetRegValue $(NetworkCardKey),"ProductName", ProductNameInfo set ProductName = *($(ProductNameInfo), 4) Debug-Output " ProductName = "$(ProductName) Ifstr(i) $(ProductName) != $(Option) goto nextnetcard2 endif OpenRegKey $(NetworkCardKey) "" "NetRules" + $(MAXIMUM_ALLOWED) NetRuleKey Ifstr $(NetRuleKey) != $(KeyNull) GetRegValue $(NetRuleKey),"InfOption", InfOptionInfo set InfOption = *($(InfOptionInfo), 4) Debug-Output "InfOption = "$(InfOption) endif Ifstr(i) $(InfOption) == $(Option) set CreateIcons = $(FALSE) Debug-Output "CreateIcons FALSE" endif CloseRegKey $(NetRules) CloseRegKey $(NetworkCardKey) endif nextnetcard2 = + EndForListDo CloseRegKey $(IE_KeyNetcards) endif ;----------------- Shell $(UtilityInf), CardExistedDlg IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error: cannot get an error string." GoTo ShellCodeError EndIf IfStr(i) $($R1) != "OK" Set CommonStatus = STATUS_USERCANCEL GoTo end EndIf Set OldVersionExisted = $(TRUE) EndIf EndIf Set CurrParamSettings = {} IfStr(i) $(DetectedCard) != TRUE GoTo AdapterSetup EndIf StartWait Shell $(ParamInf) Param_QueryCard $(!STF_NCDETCARD) EndWait IfStr(i) $($R0) != STATUS_SUCCESSFUL GoTo AdapterSetup EndIf Set DetectedParams = $($R1) Debug-Output $(InfName)": Calling Param_SetDefaults to merge detected params" Shell $(ParamInf) Param_SetDefaults $(DetectedParams) GoTo AdapterSetup ;*********************************************************************** ; ;*********************************************************************** ConfigureAdapter = + IfStr $(KeyProduct) == $(KeyNull) OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_RegBase) $(MAXIMUM_ALLOWED) KeyProduct IfStr $(KeyProduct) == $(KeyNull) Set RegistryErrorIndex = CANNOT_FIND_COMPONENT_SERVICE Debug-Output $(InfName)": Cannot find component product key" GoTo FatalRegistry EndIf EndIf Debug-Output $(InfName)": Shelling to FindService" Shell $(UtilityInf) FindService, $(KeyProduct) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": FindService shell failure" GoTo ShellCodeError EndIf IfStr(i) $($R0) != NO_ERROR Debug-Output $(InfName)": FindService Shell error: "$($R0) GoTo FatalRegistry EndIf Set KeyParameters = $($R2) CloseRegKey $($R1) IfStr $(KeyParameters) == $(KeyNull) Set RegistryErrorIndex = CANNOT_FIND_COMPONENT_SERVICE Debug-Output $(InfName)": Cannot find component service" GoTo FatalRegistry EndIf Set OldVersionExisted = $(TRUE) Set ValueName = "" Set ValueData = "" Set ValueStr = "" Set ValueList = {} EnumRegValue $(KeyParameters) ValueList ForListDo $(ValueList) Set ValueItem = $($) Set ValueName = *($(ValueItem),1) Set ValueData = *($(ValueItem),4) Debug-Output $(InfName)": "$(ValueName)"="$(ValueData) IfStr(i) $(ValueName) == "RamBaseAddress" Set RamBaseAddress = $(ValueData) Else-IfStr(i) $(ValueName) == "IOBaseAddress" set IOBaseAddress = $(ValueData) Else-IfStr(i) $(ValueName) == "InterruptNumber" set InterruptNumber = $(ValueData) Else-IfStr(i) $(ValueName) == "LineType" Set LineType = $(ValueData) Else-IfStr(i) $(ValueName) == "BusNumber" set BusNumber = $(ValueData) Else-IfStr(i) $(ValueName) == "BusType" set BusType = $(ValueData) EndIf EndForListDo Shell $(ParamInf) Param_SaveValues Set CurrParamSettings = $($R0) ;*********************************************************************** ; ;*********************************************************************** AdapterSetup = + Shell "" DebugConfiguration "before displaying dialog" Set from = AdapterOptions Set InterruptNumber = *($(IRQ_List), ~($(IRQ_List), $(InterruptNumber))) Set RAM_Hex_Value = *($(RAM_Hex_List), ~($(RAM_Addr_List),$(RamBaseAddress))) Set IO_Hex_Value = *($(IO_Hex_List), ~($(IO_Addr_List),$(IOBaseAddress))) Shell $(ParamInf) Param_ParameterConfidence IfStr(i) $($R0) != STATUS_SUCCESSFUL Debug-Output $(InfName)": parameter confidence too low to bypass configuration" GoTo AdapterOptions EndIf IfStr(i) $(DetectedCard) == TRUE IfStr(i) $(!STF_INSTALL_MODE) != CUSTOM GoTo AdapterVerify EndIf EndIf ;*********************************************************************** ; ;*********************************************************************** AdapterOptions = + Read-Syms FileDependentDlg$(!STF_LANGUAGE) UI Start "InputDlg" IfStr(i) $(DLGEVENT) == "CONTINUE" Set IO_Hex_Value = $(Combo1Out) Set IOBaseAddress = *($(IO_Addr_List), ~($(IO_Hex_List),$(IO_Hex_Value))) Set InterruptNumber = $(Combo2Out) Set RAM_Hex_Value = $(Combo3Out) Set RamBaseAddress = *($(RAM_Addr_List), ~($(RAM_Hex_List),$(RAM_Hex_Value))) ui pop 1 Else-IfStr(i) $(DLGEVENT) == "BACK" Set CommonStatus = STATUS_USERCANCEL Debug-Output $(InfName)": Action: exit. Bye." ui pop 1 GoTo end Else Debug-Output $(InfName)": Action: unknown. Bye." ui pop 1 GoTo end EndIf IfStr(i) $(!STF_NCDETINFO) == {} Shell $(UtilityInf),GetBusTypeDialog,$(ProductHardware$(Option)Description) $(BusType) $(BusNumber) ifInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error." GoTo ShellCodeError EndIf Set BusType = $($R1) Set BusNumber = $($R2) Else Set BusType = *($(!STF_NCDETINFO),5) Set BusNumber = *($(!STF_NCDETINFO),6) EndIf ;*********************************************************************** ; ;*********************************************************************** AdapterVerify = + Shell "" DebugConfiguration "after running dialog" IfStr(i) $(DetectedCard) != TRUE Shell $(ParamInf) Param_SaveValues Set NewParamSettings = $($R0) IfStr(i) $(CurrParamSettings) == {} Set DiffParamSettings = $(NewParamSettings) Else Shell $(ParamInf) Param_DiffValues $(CurrParamSettings) Set DiffParamSettings = $($R0) EndIf Debug-Output $(InfName)": Calling Param_VerifyResources" Shell $(ParamInf) Param_VerifyResources $(DiffParamSettings) IfStr(i) $($R0) == STATUS_SUCCESSFUL Debug-Output $(InfName)": Param_VerifyResources succeeded" GoTo SkipOptions EndIf Else Set CardVerifyIndex = $(!STF_NCDETCARD) Debug-Output $(InfName)": Calling Param_VerifyCard" Shell $(ParamInf) Param_VerifyCard $(!STF_NCDETCARD) IfStr(i) $($R0) == STATUS_SUCCESSFUL Debug-Output $(InfName)": Param_VerifyCard succeeded" GoTo SkipOptions EndIf EndIf Set from = AdapterOptions Set to = SkipOptions Shell $(UtilityInf),RegistryErrorString,VERIFY_WARNING IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error: cannot get an error string." GoTo ShellCodeError EndIf Set Error = $($R0) GoTo WarningMsg ;*********************************************************************** ; ;*********************************************************************** SkipOptions =+ IfInt $(OldVersionExisted) == $(TRUE) IfStr(i) $(!NTN_InstallMode) == configure GoTo WriteParameters EndIf EndIf StartWait IfInt $(OldVersionExisted) == $(FALSE) IfStr(i) $(!NTN_InstallMode) == "install" IfStr(i) $(DoCopy) == "YES" Shell $(UtilityInf), DoAskSource, $(!STF_CWDDIR), $(SrcDir) YES IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError Else-IfStr(i) $($R0) == STATUS_FAILED Shell $(UtilityInf) RegistryErrorString "ASK_SOURCE_FAIL" IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError EndIf Set Error = $($R0) GoTo FatalError Else-IfStr(i) $($R0) == STATUS_USERCANCEL GoTo SuccessfulOption EndIf Set SrcDir = $($R1) EndIf Install "Install-Option" IfStr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS Shell $(UtilityInf) RegistryErrorString "UNABLE_COPY_FILE" IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError EndIf Set Error = $($R0) GoTo FatalError EndIf EndIf ; Create the \System\CurrentControlSet\$(Option) key (and...) Shell $(UtilityInf), AddSoftwareComponent, $(Manufacturer), + $(ProductSoftwareName), + $(ProductSoftwareName), + $(ProductSoftwareTitle), $(STF_CONTEXTINFNAME), + $(ProductSoftwareImagePath), "kernelautostart", "NDIS", {}, "",+ $(NetEventDLL) Set OEM_ABANDON_SOFTWARE = TRUE IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error" GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) Set KeyProduct = $($R1) Set SoftNetRulesKey = $($R2) CloseRegKey $($R3) CloseRegKey $($R4) CloseRegKey $($R5) IfStr(i) $(RegistryErrorIndex) != NO_ERROR EndWait Debug-Output $(InfName)": Registry error: add software components" CloseRegKey $(KeyProduct) CloseRegKey $(SoftNetRulesKey) GoTo FatalRegistry EndIf ; Add the \SoftWare\$(Option)\CurrentVersion key Set NewValueList = {{SoftwareType,$(NoTitle),$(!REG_VT_SZ),$(SoftwareType)},+ {MajorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMajorVersion)},+ {MinorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMinorVersion)},+ {Title,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareTitle)},+ {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareDescription)},+ {ServiceName,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareName)},+ {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}} Shell $(UtilityInf), AddValueList, $(KeyProduct), $(NewValueList) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error." GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) IfStr(i) $(RegistryErrorIndex) != NO_ERROR EndWait Debug-Output $(InfName)": Registry error: add value list." CloseRegKey $(KeyProduct) CloseRegKey $(SoftNetRulesKey) GoTo FatalRegistry EndIf ; Add the \SoftWare\$(Option)\CurrentVersion\NetRules key Set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareType)},+ {use,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareUse)}, + {bindform,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareBindForm)}, + {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleSoftwareClass)}, + {bindable,$(NoTitle),$(!REG_VT_MULTI_SZ),$(Bindable$(Option)Txt)}, + {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}} Shell $(UtilityInf), AddValueList, $(SoftNetRulesKey), $(NewValueList) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error." GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) CloseRegKey $(KeyProduct) CloseRegKey $(SoftNetRulesKey) IfStr(i) $(RegistryErrorIndex) != NO_ERROR EndWait Debug-Output $(InfName)": Registry error: add value list." GoTo FatalRegistry EndIf EndIf ; Create \Hardware keys with utility.inf Shell $(UtilityInf), AddHardwareComponent, $(ProductHardwareName),$(STF_CONTEXTINFNAME),$(ProductKeyName) Set AdpNumber = $($R4) IfInt $($R4) != -1 Set OEM_ABANDON_OPTIONS = >($(OEM_ABANDON_OPTIONS), $(!NTN_SoftwareBase)"\Microsoft\Windows NT\CurrentVersion\NetworkCards\"$($R4)) EndIf IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": Cannot add hardware component" GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) IfStr(i) $(RegistryErrorIndex) != NO_ERROR EndWait Debug-Output $(InfName)": Registry error: add hardware component" CloseRegKey $($R1) CloseRegKey $($R2) CloseRegKey $($R3) GoTo FatalRegistry EndIf Set KeyParameters = $($R3) Set KeyAdapterRules = $($R2) Set AdapterNumber = $($R4) ; Create the \Software\Microsoft\Windows NT\Network Cards\<number> key Set NewValueList = {{Manufacturer,$(NoTitle),$(!REG_VT_SZ),$(Manufacturer)},+ {Title,$(NoTitle),$(!REG_VT_SZ),"["$($R4)"] "$(ProductHardware$(Option)Title)},+ {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductHardware$(Option)Description)},+ {ProductName,$(NoTitle),$(!REG_VT_SZ),$(ProductHardwareName)},+ {ServiceName,$(NoTitle),$(!REG_VT_SZ),$($R5)},+ {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}} Shell $(UtilityInf), AddValueList, $($R1), $(NewValueList) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error" GoTo ShellCodeError EndIf CloseRegKey $($R1) ; Create the \Software\Microsoft\Windows NT\Network Cards\<number>\NetRules key Set TempProdName = """"$(ProductHardwareName)$(AdpNumber)"""" Set TempBindForm = $(TempProdName)$(NetRuleHardwareBindForm) Set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleHardware$(Option)Type)},+ {bindform,$(NoTitle),$(!REG_VT_SZ),$(TempBindForm)}, + {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleHardware$(Option)Class)}, + {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}} Shell $(UtilityInf), AddValueList, $(KeyAdapterRules), $(NewValueList) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error." GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) IfStr(i) $(RegistryErrorIndex) != NO_ERROR EndWait Debug-Output $(InfName)": Registry error: add value list." CloseRegKey $(KeyParameters) CloseRegKey $(KeyAdapterRules) GoTo FatalRegistry EndIf CloseRegKey $(KeyAdapterRules) GoTo WriteParameters ;*********************************************************************** ; ;*********************************************************************** WriteParameters = + ;;; You need one address entry in the list for each channel on your device. ;;; FIXME - at this point RAS requires there to be one logical line per address ;;; FIXME - so the address (channel) number is ignored and the line number is used Set TapiAddressList = {$(AdpNumber)"-1-0"} Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-2-0") IfStr(i) $(Option) == "DcPri" Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-3-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-4-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-5-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-6-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-7-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-8-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-9-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-10-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-11-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-12-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-13-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-14-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-15-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-16-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-17-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-18-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-19-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-20-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-21-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-22-0") Set TapiAddressList = >($(TapiAddressList),$(AdpNumber)"-23-0") Endif IfStr(i) $(!NTN_InstallMode) == "install" ; Create the \System\CurrentControlSet\Services\$(Option)<number>\Parameters key Debug-Output $(InfName)": In install section - creating parameters key" IfStr(i) $(Option) != "DcPri" Set NewValueList = {+ {AddressList,$(NoTitle),$(!REG_VT_MULTI_SZ),$(TapiAddressList)},+ {BusNumber,$(NoTitle),$(!REG_VT_DWORD),$(BusNumber)},+ {BusType,$(NoTitle),$(!REG_VT_DWORD),$(BusType)},+ {LineType,$(NoTitle),$(!REG_VT_DWORD),$(LineType)},+ {MediaType,$(NoTitle),$(!REG_VT_SZ),$(TapiMediaType)},+ {BoardInstance,$(NoTitle),$(!REG_VT_SZ),$(AdpNumber)},+ {BoardName,$(NoTitle),$(!REG_VT_SZ),$(BoardName)},+ {DeviceName,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareName)},+ {InterruptNumber,$(NoTitle),$(!REG_VT_DWORD),$(InterruptNumber)},+ {RamBaseAddress,$(NoTitle),$(!REG_VT_DWORD),$(RamBaseAddress)},+ {IOBaseAddress,$(NoTitle),$(!REG_VT_DWORD),$(IOBaseAddress)},+ {NumberOfLines,$(NoTitle),$(!REG_VT_DWORD),$(NumberOfLines)},+ {Line0.SwitchType,$(NoTitle),$(!REG_VT_DWORD),$(SwitchType)},+ {Line0.Channel0.Phone,$(NoTitle),$(!REG_VT_SZ),$(Ch0Phone)},+ {Line0.Channel0.SPID,$(NoTitle),$(!REG_VT_SZ),$(Ch0SPID)},+ {Line0.Channel1.Phone,$(NoTitle),$(!REG_VT_SZ),$(Ch1Phone)},+ {Line0.Channel1.SPID,$(NoTitle),$(!REG_VT_SZ),$(Ch1SPID)},+ {DebugFlags,$(NoTitle),$(!REG_VT_DWORD),"0"},+ } Else-IfStr(i) $(Option) == "DcPri" Set NewValueList = {+ {AddressList,$(NoTitle),$(!REG_VT_MULTI_SZ),$(TapiAddressList)},+ {BusNumber,$(NoTitle),$(!REG_VT_DWORD),$(BusNumber)},+ {BusType,$(NoTitle),$(!REG_VT_DWORD),$(BusType)},+ {LineType,$(NoTitle),$(!REG_VT_DWORD),$(LineType)},+ {MediaType,$(NoTitle),$(!REG_VT_SZ),$(TapiMediaType)},+ {BoardInstance,$(NoTitle),$(!REG_VT_SZ),$(AdpNumber)},+ {BoardName,$(NoTitle),$(!REG_VT_SZ),$(BoardName)},+ {DeviceName,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareName)},+ {InterruptNumber,$(NoTitle),$(!REG_VT_DWORD),$(InterruptNumber)},+ {RamBaseAddress,$(NoTitle),$(!REG_VT_DWORD),$(RamBaseAddress)},+ {IOBaseAddress,$(NoTitle),$(!REG_VT_DWORD),$(IOBaseAddress)},+ {NumberOfLines,$(NoTitle),$(!REG_VT_DWORD),$(NumberOfLines)},+ {Line0.SwitchType,$(NoTitle),$(!REG_VT_DWORD),$(SwitchType)},+ {SignalCode, (NoTitle), $(!REG_VT_DWORD), $(SignalCode)},+ {FrameMode, (NoTitle), $(!REG_VT_DWORD), $(FrameMode)},+ {CRC6, (NoTitle), $(!REG_VT_DWORD), $(CRC6)},+ {LineLength, (NoTitle), $(!REG_VT_DWORD), $(LineLength)},+ {BypassJitter, (NoTitle), $(!REG_VT_DWORD), $(BypassJitter)},+ {DebugFlags,$(NoTitle),$(!REG_VT_DWORD),"0"},+ } Endif Shell $(UtilityInf), AddValueList, $(KeyParameters), $(NewValueList) Else Set NewValueList = {+ {BusNumber,$(NoTitle),$(!REG_VT_DWORD),$(BusNumber)},+ {BusType,$(NoTitle),$(!REG_VT_DWORD),$(BusType)},+ {LineType,$(NoTitle),$(!REG_VT_DWORD),$(LineType)},+ {MediaType,$(NoTitle),$(!REG_VT_SZ),$(TapiMediaType)},+ {BoardName,$(NoTitle),$(!REG_VT_SZ),$(BoardName)},+ {DeviceName,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareName)},+ {InterruptNumber,$(NoTitle),$(!REG_VT_DWORD),$(InterruptNumber)},+ {RamBaseAddress,$(NoTitle),$(!REG_VT_DWORD),$(RamBaseAddress)},+ {IOBaseAddress,$(NoTitle),$(!REG_VT_DWORD),$(IOBaseAddress)},+ {NumberOfLines,$(NoTitle),$(!REG_VT_DWORD),$(NumberOfLines)},+ } Shell $(UtilityInf), AddValueList, $(KeyParameters), $(NewValueList) Endif CloseRegKey $(KeyParameters) set CommandLine = $(ProductSoftwareName)$(AdpNumber) Debug-Output "OEMSETNT.INF: Calling "$(Option)"ui "$(CommandLine) IfStr(i) $(!NTN_InstallMode) == "install" IfStr(i) $(Option) == "DcBri" RunProgram RunCode "SpellCaster ISDN Setup Diskette" "" $(ProductPath)dcbriui.exe $(CommandLine) Else-IfStr(i) $(Option) == "TcBri" RunProgram RunCode "SpellCaster ISDN Setup Diskette" "" $(ProductPath)tcbriui.exe $(CommandLine) Else-IfStr(i) $(Option) == "DcPri" RunProgram RunCode "SpellCaster ISDN Setup Diskette" "" $(ProductPath)dcpriui.exe $(CommandLine) Endif Else IfStr(i) $(Option) == "DcBri" RunProgram RunCode "SpellCaster ISDN Setup Diskette" "" $(ProductPath)dcbriui.exe $(CommandLine) Else-IfStr(i) $(Option) == "TcBri" RunProgram RunCode "SpellCaster ISDN Setup Diskette" "" $(ProductPath)tcbriui.exe $(CommandLine) Else-IfStr(i) $(Option) == "DcPri" RunProgram RunCode "SpellCaster ISDN Setup Diskette" "" $(ProductPath)dcpriui.exe $(CommandLine) Endif Endif IfStr(i) $(!NTN_InstallMode) == "install" IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error." GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) IfStr(i) $(RegistryErrorIndex) != NO_ERROR Debug-Output $(InfName)": Registry error: Add value list" GoTo FatalRegistry EndIf Endif ; ; Skip TAPI/RAS setup if already installed. ; IfStr(i) $(!NTN_InstallMode) == configure Debug-Output $(InfName)" going to successful option!" GoTo SuccessfulOption EndIf ; ; Create the HARDWARE\DEVICEMAP\TAPI DEVICES\DCBRI key ; Debug-Output $(InfName)": devicemap\tapidevices\"$(Option)"!" OpenRegKey $(!REG_H_LOCAL) "" "HARDWARE\DEVICEMAP" $(MAXIMUM_ALLOWED) BaseKey Set TapiKeyName = "TAPI DEVICES\"$(Option) ; Set TapiKeyName = "TAPI DEVICES\"$(Option)$(AdpNumber) ;------------- ; If we are installing more than one card at a time, there may already be ; address list data in the TAPI DEVICES\$(OPTION) Address list. Grab the ; current contents. We'll add our new ones to the current ones. ; set CurrentAddressListKeyName = "HARDWARE\DEVICEMAP\"$(TapiKeyName) OpenRegKey $(!REG_H_LOCAL) "" $(CurrentAddressListKeyName) $(MAXIMUM_ALLOWED) CurrentAddressListHandle ifstr(i) $(CurrentAddressListHandle) != $(KeyNull) GetRegValue $(CurrentAddressListHandle),"Address", CurrentAddressListInfo set CurrentAddressList = *($(CurrentAddressListInfo), 4) Debug-Output " CurrentAddressList = "$(CurrentAddressList) else Debug-Output " No current address list " endif CloseRegKey $(CurrentAddressListHandle) set AddressList = {} ifstr(i) $(CurrentAddressList) != "" ForListDo $(CurrentAddressList) Set ValueItem = $($) Debug-Output $(InfName)": "$(ValueItem)"="$(ValueItem) Set AddressList = >($(AddressList),$(ValueItem)) EndForListDo ForListDo $(TapiAddressList) Set ValueItem = $($) Debug-Output $(InfName)": "$(ValueItem)"="$(ValueItem) Set AddressList = >($(AddressList),$(ValueItem)) EndForListDo else ForListDo $(TapiAddressList) Set ValueItem = $($) Debug-Output $(InfName)": "$(ValueItem)"="$(ValueItem) Set AddressList = >($(AddressList),$(ValueItem)) EndForListDo endif Debug-Output $(InfName)": Final AddressList="$(AddressList) ;-------------- shell "" HtCreateRegKey $(BaseKey) $(TapiKeyName) IfStr(i) $($R0) != NO_ERROR Debug-Output $(InfName)": Error creating registry key!" GoTo FatalRegistry EndIf Set TapiDeviceKey = $($R1) Set NewValueList = {+ {Address,$(NoTitle),$(!REG_VT_MULTI_SZ),$(AddressList)},+ {"Media Type",$(NoTitle),$(!REG_VT_SZ),$(TapiMediaType)}} Shell $(UtilityInf), AddValueList, $(TapiDeviceKey), $(NewValueList) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error." GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) IfStr(i) $(RegistryErrorIndex) != NO_ERROR Debug-Output $(InfName)": Registry error: Add value list" GoTo FatalRegistry EndIf CloseRegKey $(TapiDeviceKey) CloseRegKey $(BaseKey) IfInt $(CreateIcons) == $(TRUE) Install CreateScGroup-$(Option) Endif Ifstr(i) $(!NTN_InstallMode) == configure goto skipRas endif ; ; if RAS is not installed, then shell ras setup INF file to install RAS ; else invoke RAS to allow user to configure RAS for Switch56. ; Read-Syms InvokeRasDlg$(!STF_LANGUAGE)-$(Option) Shell "oemnsvra.inf" CheckRasInstalled IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": Error Shelling the RAS INF file oemnsvra.inf" Shell "subroutn.inf" SetupMessage, $(!STF_LANGUAGE), + "STATUS", $(InvokeRasError) IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError EndIf EndIf ; Set RasInstalled = $($R0) Debug-Output $(InfName)": Is RAS Installed? "$(RasInstalled) ; ; display a message to the user that RAS setup will now be invoked ; IfStr(i) $(RasInstalled) == FALSE Shell "subroutn.inf" SetupMessage, $(!STF_LANGUAGE), "STATUS", + $(InvokeRasNotMsg) IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo SuccessfulOption EndIf Else Shell "subroutn.inf" SetupMessage, $(!STF_LANGUAGE), "STATUS", + $(InvokeRasConfigMsg) IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo SuccessfulOption EndIf EndIf ; Set the flags based on whether this is an IDW installation Ifstr(i) $(!STF_IDW) == TRUE set AddCopy = NO set DoCopy = NO set DoConfig = NO else set AddCopy = YES set DoCopy = YES set DoConfig = YES endif ; Change the global install mode flag to configure if RAS is already installed Debug-Output "OEMSETNT.INF: before - NTN_InstallMode = "$(!NTN_InstallMode) set SaveNTN_InstallMode = $(!NTN_InstallMode) ifstr(i) $(RasInstalled) == TRUE set !(NTN_InstallMode) = configure else GoTo SuccessfulOption endif ; ; now invoke RAS setup to do the right thing ; Debug-Output "OEMSETNT.INF: after - NTN_InstallMode = "$(!NTN_InstallMode) Shell "oemnsvra.inf" InstallOption $(!STF_LANGUAGE) "RAS" $(RasDir) $(AddCopy) $(DoCopy) $(DoConfig) ; ; restore the global instal mode flag if it was changed ; set !NTN_InstallMode = $(SaveNTN_InstallMode) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": Error Shelling the RAS INF file oemnsvra.inf" Shell "subroutn.inf" SetupMessage, $(!STF_LANGUAGE), "STATUS", + $(InvokeRasError) IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError EndIf GoTo SuccessfulOption EndIf skipRas =+ goto SuccessfulOption ;*********************************************************************** ; ;*********************************************************************** BindingAdapter =+ Set Error = "Binding: Sorry, not yet implemented." GoTo FatalError ;*********************************************************************** ; ;*********************************************************************** RemoveAdapter = + Debug-Output "$(InfName): Entering RemoveAdapter" OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyToReferenceCount Ifstr $(KeyToReferenceCount) == "" Debug-Output "$(InfName): Could not open Software Base Key" set RefCountBeforeRemove = 2 GoTo FatalRegistry endif GetRegValue $(KeyToReferenceCount),"RefCount", RefCountInfo set RefCountBeforeRemove = *($(RefCountInfo), 4) CloseRegKey $(KeyToReferenceCount) ifInt $(RefCountBeforeRemove) == 1 Debug-Output $(InfName)": ref 1" else Debug-Output $(InfName)": ref2 - not deleting" set DeleteIcons = $(FALSE) Endif IfStr $(KeyProduct) == $(KeyNull) OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_RegBase) $(MAXIMUM_ALLOWED) KeyProduct IfStr $(KeyProduct) == $(KeyNull) Set RegistryErrorIndex = CANNOT_FIND_COMPONENT_SERVICE Debug-Output $(InfName)": Cannot find component product key" GoTo FatalRegistry EndIf EndIf Debug-Output $(InfName)": Shelling to FindService" Shell $(UtilityInf) FindService, $(KeyProduct) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": FindService shell failure" GoTo ShellCodeError EndIf IfStr(i) $($R0) != NO_ERROR Debug-Output $(InfName)": FindService Shell error: "$($R0) GoTo FatalRegistry EndIf Set KeyParameters = $($R2) CloseRegKey $($R1) IfStr $(KeyParameters) == $(KeyNull) Set RegistryErrorIndex = CANNOT_FIND_COMPONENT_SERVICE Debug-Output $(InfName)": Cannot find component service" GoTo FatalRegistry EndIf Set OldVersionExisted = $(TRUE) Set ValueName = "" Set ValueData = "" Set ValueStr = "" Set ValueList = {} EnumRegValue $(KeyParameters) ValueList ForListDo $(ValueList) Set ValueItem = $($) Set ValueName = *($(ValueItem),1) Set ValueData = *($(ValueItem),4) Debug-Output $(InfName)": "$(ValueName)"="$(ValueData) IfStr(i) $(ValueName) == "ADP_Number" set AdpNumber = $(ValueData) EndIf EndForListDo Set DelTapiKeyName = "HARDWARE\DEVICEMAP\TAPI DEVICES\"$(Option) ; Set DelTapiKeyName = "HARDWARE\DEVICEMAP\TAPI DEVICES\"$(Option)$(AdpNumber) DeleteRegKey $(!REG_H_LOCAL) $(DelTapiKeyName) IfInt $(DeleteIcons) == $(TRUE) ; ; Delete the support files ; set RemoveList = {} set RemoveList = >($(RemoveList), #(Files-RemoveList$(Option), DRIVERSYS, 1)) set RemoveList = >($(RemoveList), #(Files-RemoveList$(Option), DRIVERUI, 1)) set RemoveList = >($(RemoveList), #(Files-RemoveList$(Option), RLSNOTES, 1)) ForListDo $(RemoveList) Debug-Output "Removing "$($) LibraryProcedure Status , $(!LIBHANDLE), DelFile $($) Debug-Output "Status is "$(Status) EndForListDo ; ; Remove the program group ; ; Install RemoveScGroup-$(Option) ; ; Done deleting files and program group ; Endif IfStr(i) $(ProductKeyName) == $(!NTN_RegBase) Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), + $(ProductSoftwareName) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error" GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) IfStr(i) $(RegistryErrorIndex) != NO_ERROR GoTo FatalRegistry EndIf Else Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), + $(ProductSoftwareName), $(!NTN_RegBase) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error" GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) IfStr(i) $(RegistryErrorIndex) != NO_ERROR GoTo FatalRegistry EndIf EndIf GoTo end ;*********************************************************************** ; ;*********************************************************************** UpgradeSoftware = + IfStr(i) $(ProductKeyName) == $(!NTN_RegBase) OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct IfStr $(KeyProduct) != $(KeyNull) GetRegValue $(KeyProduct),"MajorVersion", VersionInfo Set Version = *($(VersionInfo), 4) Shell $(UtilityInf), GetInfFileNameFromRegistry, $(KeyProduct) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error" GoTo ShellCodeError EndIf Set !UG_Filename = $($R0) IfStr(i) $(!UG_Filename) != "" install "Install-Update" IfStr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS GoTo FatalError EndIf EndIf SetRegValue $(KeyProduct) {MajorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMajorVersion)} SetRegValue $(KeyProduct) {MinorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMinorVersion)} IfInt $(Version) != $(ProductVersion) EndIf CloseRegKey $(KeyProduct) Else GoTo FatalRegistry EndIf Else OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_RegBase) + $(MAXIMUM_ALLOWED) NetworkCardKey IfStr(i) $(NetworkCardKey) != $(KeyNull) GetRegValue $(NetworkCardKey),"ServiceName", ServiceNameInfo Set ServiceName = *($(ServiceNameInfo), 4) OpenRegKey $(NetworkCardKey) "" "NetRules" + $(MAXIMUM_ALLOWED) NetRuleKey IfStr(i) $(NetRuleKey) != $(KeyNull) Else GoTo FatalRegistry EndIf CloseRegKey $(NetRules) CloseRegKey $(NetworkCardKey) Else GoTo FatalRegistry EndIf OpenRegKey $(!REG_H_LOCAL) "" + $(!NTN_ServiceBase)"\"$(ServiceName) + $(MAXIMUM_ALLOWED) ServiceKey IfStr(i) $(ServiceKey) != $(KeyNull) CloseRegKey $(ServiceKey) Else GoTo FatalRegistry EndIf EndIf GoTo end ;*********************************************************************** ; ;*********************************************************************** SuccessfulOption = + GoTo end ;*********************************************************************** ; ;*********************************************************************** Abandon = + ForListDo $(OEM_ABANDON_OPTIONS) Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), + $(ProductSoftwareName), $($) IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error" GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) IfStr(i) $(RegistryErrorIndex) != NO_ERROR GoTo FatalRegistry EndIf EndForListDo IfStr(i) $(OEM_ABANDON_SOFTWARE) == TRUE Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), + $(ProductSoftwareName), FALSE IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error" GoTo ShellCodeError EndIf Set RegistryErrorIndex = $($R0) IfStr(i) $(RegistryErrorIndex) != NO_ERROR GoTo FatalRegistry EndIf EndIf GoTo end ;*********************************************************************** ; ;*********************************************************************** WarningMsg = + Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "WARNING", $(Error) IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError EndIf IfStr(i) $($R1) == "OK" GoTo $(to) Else-IfStr(i) $($R1) == "CANCEL" GoTo $(from) EndIf GoTo end ;*********************************************************************** ; ;*********************************************************************** NonFatalInfo = + Set Severity = STATUS Set CommonStatus = STATUS_USERCANCEL IfStr(i) $(Error) == "" Set Severity = NONFATAL Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL" IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError EndIf Set Error = $($R0) EndIf Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), $(Severity), $(Error) IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError EndIf IfStr(i) $($R1) == "OK" GoTo $(from) EndIf GoTo end ;*********************************************************************** ; ;*********************************************************************** FatalRegistry = + Shell $(UtilityInf) RegistryErrorString $(RegistryErrorIndex) IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError EndIf Set Error = $($R0) GoTo FatalError ;*********************************************************************** ; ;*********************************************************************** FatalDetect = + Shell $(UtilityInf),RegistryErrorString,CANNOT_DETECT IfInt $($ShellCode) != $(!SHELL_CODE_OK) Debug-Output $(InfName)": ShellCode error: cannot get an error string." GoTo ShellCodeError EndIf Set Error = $($R0) GoTo FatalError ;*********************************************************************** ; ;*********************************************************************** FatalError = + IfStr(i) $(Error) == "" Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL" IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError EndIf Set Error = $($R0) EndIf Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "FATAL", $(Error) IfInt $($ShellCode) != $(!SHELL_CODE_OK) GoTo ShellCodeError EndIf GoTo SetFailed ;*********************************************************************** ; ;*********************************************************************** ShellCodeError = + Set DlgType = "MessageBox" Set STF_MB_TITLE = $(ShellCodeErrorTitle) Set STF_MB_TEXT = $(ShellCodeErrorText) Set STF_MB_TYPE = 1 Set STF_MB_ICON = 3 Set STF_MB_DEF = 1 UI Start "Error Message" GoTo SetFailed ;*********************************************************************** ; ;*********************************************************************** SetFailed = + Set CommonStatus = STATUS_FAILED IfStr(i) $(OEM_ABANDON_ON) == TRUE Set OEM_ABANDON_ON = FALSE GoTo Abandon EndIf GoTo end ;*********************************************************************** ; ;*********************************************************************** end = + Set !DebugOutputControl = $(OldDebugControl) IfInt $(RunCode) == 2 Return STATUS_USERCANCEL Else Return $(CommonStatus) Endif ;*********************************************************************** ; ;*********************************************************************** [CreateScGroup-DCBRI] CreateCommonProgManGroup $(ScGroup)"BRI" "" ShowCommonProgManGroup $(ScGroup)"BRI", 1 CreateCommonProgManItem $(ScGroup)"BRI", $(RlsNotes) + "NOTEPAD.EXE "+ "%SystemRoot%\system32\spellcst\dcbri\README.TXT" + "PROGMAN.EXE" 29 CreateCommonProgManItem $(ScGroup)"BRI", $(ScConfig) + "%SystemRoot%\system32\spellcst\dcbri\DCBRIUI.EXE "+ "DcBri" + "" 0 ShowCommonProgManGroup $(ScGroup)+"BRI", 6 exit ;*********************************************************************** ; ;*********************************************************************** [CreateScGroup-TCBRI] CreateCommonProgManGroup $(ScGroup)"POTS" "" ShowCommonProgManGroup $(ScGroup)"POTS", 1 CreateCommonProgManItem $(ScGroup)"POTS", $(RlsNotes) + "NOTEPAD.EXE "+ "%SystemRoot%\system32\spellcst\tcbri\README.TXT" + "PROGMAN.EXE" 29 CreateCommonProgManItem $(ScGroup)"POTS", $(ScConfig) + "%SystemRoot%\system32\spellcst\tcbri\TCBRIUI.EXE "+ "TcBri" + "" 0 ShowCommonProgManGroup $(ScGroup)"POTS", 6 exit ;*********************************************************************** ; ;*********************************************************************** [CreateScGroup-DCPRI] CreateCommonProgManGroup $(ScGroup)"PRI" "" ShowCommonProgManGroup $(ScGroup)"PRI", 1 CreateCommonProgManItem $(ScGroup)"PRI", $(RlsNotes) + "NOTEPAD.EXE "+ "%SystemRoot%\system32\spellcst\dcpri\README.TXT" + "PROGMAN.EXE" 29 CreateCommonProgManItem $(ScGroup)"PRI", $(ScConfig) + "%SystemRoot%\system32\spellcst\dcpri\DCPRIUI.EXE "+ "DcPri" + "" 0 ShowCommonProgManGroup $(ScGroup), 6 exit ;*********************************************************************** ; ;*********************************************************************** [RemoveScGroup-DCBRI] Debug-Output "Removing icons from "$(ScGroup)"BRI" CreateCommonProgManGroup $(ScGroup)"BRI" "" RemoveCommonProgManGroup $(ScGroup)"BRI" exit ;*********************************************************************** ; ;*********************************************************************** [RemoveScGroup-TCBRI] Debug-Output "Removing icons from "$(ScGroup)"POTS" CreateCommonProgManGroup $(ScGroup)"POTS" "" RemoveCommonProgManGroup $(ScGroup)"POTS" exit ;*********************************************************************** ; ;*********************************************************************** [RemoveScGroup-DCPRI] Debug-Output "Removing icons from "$(ScGroup)"PRI" CreateCommonProgManGroup $(ScGroup)"PRI" "" RemoveCommonProgManGroup $(ScGroup)"PRI" exit ;*********************************************************************** ; ;*********************************************************************** [HtCreateRegKey] Debug-Output $(InfName)": Entering [HtCreateRegKey]" Set ECR_Result = NO_ERROR Set ECR_BaseKeyHandle = $($0) Set ECR_NewPath = $($1) Set KeyNull = "" Set MAXIMUM_ALLOWED = 33554432 Debug-Output $(InfName)": HtCreateRegKey - ECR_BaseKeyHandle = "$(ECR_BaseKeyHandle) Debug-Output $(InfName)": ECR_NewPath = "$(ECR_NewPath) Debug-Output $(InfName)": MAXIMUM_ALLOWED = "$(MAXIMUM_ALLOWED) Debug-Output $(InfName)": KeyNull = "$(KeyNull) OpenRegKey $(ECR_BaseKeyHandle) "" $(ECR_NewPath) $(MAXIMUM_ALLOWED) + ECR_BaseKey Debug-Output $(InfName)": ECR_BaseKey = "$(ECR_BaseKey) Debug-Output $(InfName)": OpenRegKey returned "$($R0) IfStr $(ECR_BaseKey) == $(KeyNull) Debug-Output $(InfName)": ECR_BaseKey == KeyNull" Else Debug-Output $(InfName)": ECR_BaseKey != KeyNull" Set ECR_KeyHandle = $(ECR_BaseKey) GoTo ECR_Return EndIf Set ECR_TmpPath = "" Split-String $(ECR_NewPath) "\" ECR_PList Debug-Output $(InfName)": ECR_PList = "$(ECR_PList) ForListDo $(ECR_PList) IfStr(i) $($) != "\" IfInt $(#) == 1 Set ECR_TmpPath = $($) Else Set ECR_TmpPath = $(ECR_TmpPath)"\"$($) EndIf Debug-Output $(InfName)": Determining if "$(ECR_TmpPath)" exists" OpenRegKey $(ECR_BaseKeyHandle) "" $(ECR_TmpPath) $(MAXIMUM_ALLOWED) ECR_BaseKey IfStr $(ECR_BaseKey) == $(KeyNull) Debug-Output $(InfName)": Creating "$(ECR_TmpPath) CreateRegKey $(ECR_BaseKeyHandle) {$(ECR_TmpPath),0,GenericClass} "" $(MAXIMUM_ALLOWED) "" ECR_KeyHandle IfStr(i) $(ECR_KeyHandle) == $(KeyNull) Set ECR_Result = $($R0) GoTo ECR_Return EndIf EndIf EndIf EndForListDo ECR_Return = + Return $(ECR_Result) $(ECR_KeyHandle) ;*********************************************************************** ; ;*********************************************************************** [DebugConfiguration] Debug-Output $(!p:InfName)": **CONFIGURATION STATE: "$($0) Debug-Output $(!p:InfName)": InterruptNumber is "$(!p:InterruptNumber) Debug-Output $(!p:InfName)": RamBaseAddress is "$(!p:RamBaseAddress) Return ;*********************************************************************** ; ;*********************************************************************** [Install-Option] Set STF_VITAL = "" IfStr(i) $(AddCopy) == "YES" AddSectionFilesToCopyList Files-$(Option) $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers AddSectionFilesToCopyList Files-System$(Option) $(SrcDir) $(ProductPath) AddSectionFilesToCopyList Files-Support $(SrcDir) $(ProductPath) EndIf CreateDir $(ScDir) CreateDir $(ScUtilDir) IfStr(i) $(DoCopy) == "YES" Set !STF_NCPA_FLUSH_COPYLIST = TRUE CopyFilesInCopyList EndIf Exit ;*********************************************************************** ; ;*********************************************************************** [Install-Update] Set STF_VITAL = "" Set STF_OVERWRITE = "VERIFYSOURCEOLDER" AddSectionFilesToCopyList Files-$(Option) $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers AddSectionFilesToCopyList Files-Inf $(SrcDir) $(!STF_WINDOWSSYSPATH) AddSectionFilesToCopyList Files-System$(Option) $(SrcDir) $(ProductPath) Set !STF_NCPA_FLUSH_COPYLIST = TRUE CopyFilesInCopyList Exit ;*********************************************************************** ; ;*********************************************************************** [Source Media Descriptions] 1 = "SpellCaster ISDN Setup Diskette" , TAGFILE = disk1 ;*********************************************************************** ; ;*********************************************************************** [ProductType] STF_PRODUCT = Winnt STF_PLATFORM = I386 ;*********************************************************************** ; ;*********************************************************************** [Files-Inf] 1, oemsetnt.inf, SIZE=49000, RENAME=$(!UG_Filename) ;*********************************************************************** ; ;*********************************************************************** [Files-DCBRI] 1, DCBRI.SYS, SIZE=262000 ;*********************************************************************** ; ;*********************************************************************** [Files-TCBRI] 1, TCBRI.SYS, SIZE=262000 ;*********************************************************************** ; ;*********************************************************************** [Files-DCPRI] 1, DCPRI.SYS, SIZE=262000 ;*********************************************************************** ; ;*********************************************************************** [Files-SystemDCBRI] 1, DCBRIUI.EXE, SIZE=150000 ;*********************************************************************** ; ;*********************************************************************** [Files-SystemTCBRI] 1, TCBRIUI.EXE, SIZE=150000 ;*********************************************************************** ; ;*********************************************************************** [Files-SystemDCPRI] 1, DCPRIUI.EXE, SIZE=150000 ;*********************************************************************** ; ;*********************************************************************** [Files-Support] 1, README.TXT, SIZE=60000 ;*********************************************************************** ; ;*********************************************************************** [Files-RemoveListDCBRI] DRIVERSYS = $(!STF_WINDOWSSYSPATH)\drivers\dcbri.sys DRIVERUI = $(!STF_WINDOWSSYSPATH)\spellcst\dcbri\dcbriui.exe RLSNOTES = $(!STF_WINDOWSSYSPATH)\spellcst\dcbri\README.TXT ;*********************************************************************** ; ;*********************************************************************** [Files-RemoveListTCBRI] DRIVERSYS = $(!STF_WINDOWSSYSPATH)\drivers\tcbri.sys DRIVERUI = $(!STF_WINDOWSSYSPATH)\spellcst\tcbri\tcbriui.exe RLSNOTES = $(!STF_WINDOWSSYSPATH)\spellcst\tcbri\README.TXT ;*********************************************************************** ; ;*********************************************************************** [Files-RemoveListDCPRI] DRIVERSYS = $(!STF_WINDOWSSYSPATH)\drivers\dcpri.sys DRIVERUI = $(!STF_WINDOWSSYSPATH)\spellcst\dcpri\dcpriui.exe RLSNOTES = $(!STF_WINDOWSSYSPATH)\spellcst\dcpri\README.TXT ;*********************************************************************** ; ;*********************************************************************** [LanguagesSupported] ENG ;*********************************************************************** ; ;*********************************************************************** [OptionsTextENG] DCBRI = "SpellCaster DataCommute/BRI Adapter" TCBRI = "SpellCaster TeleCommute/BRI Adapter" DCPRI = "SpellCaster DataCommute/PRI Adapter" ;*********************************************************************** ; ;*********************************************************************** [FileConstantsENG-DCBRI] ProCaption = "Windows NT Setup" ProCancel = "Cancel" ProCancelMsg = "Windows NT Networking is not correctly installed. "+ "Are you sure you want to cancel copying files?" ProCancelCap = "Network Setup Message" ProText1 = "Copying:" ProText2 = "To:" FunctionTitleDcBri = "SpellCaster DataCommute/BRI Card Setup" ProductSoftwareDescription = "SpellCaster DataCommute/BRI Driver" ProductHardwareDcBriDescription = "SpellCaster DataCommute/BRI" ProductSoftwareTitle = "SpellCaster DataCommute/BRI Driver" ProductHardwareDcBriTitle = "SpellCaster DataCommute/BRI Adapter" ShellCodeErrorTitle = "Error: "$(FunctionTitle)$(Option)) ShellCodeErrorText = "Shell Code Error." ;*********************************************************************** ; ;*********************************************************************** [FileConstantsENG-TCBRI] ProCaption = "Windows NT Setup" ProCancel = "Cancel" ProCancelMsg = "Windows NT Networking is not correctly installed. "+ "Are you sure you want to cancel copying files?" ProCancelCap = "Network Setup Message" ProText1 = "Copying:" ProText2 = "To:" FunctionTitleTcBri = "SpellCaster TeleCommute/BRI Card Setup" ProductSoftwareDescription = "SpellCaster TeleCommute/BRI Driver" ProductHardwareTcBriDescription = "SpellCaster TeleCommute/BRI" ProductSoftwareTitle = "SpellCaster TeleCommute/BRI Driver" ProductHardwareTcBriTitle = "SpellCaster TeleCommute/BRI Adapter" ShellCodeErrorTitle = "Error: "$(FunctionTitle)$(Option)) ShellCodeErrorText = "Shell Code Error." ;*********************************************************************** ; ;*********************************************************************** [FileConstantsENG-DCPRI] ProCaption = "Windows NT Setup" ProCancel = "Cancel" ProCancelMsg = "Windows NT Networking is not correctly installed. "+ "Are you sure you want to cancel copying files?" ProCancelCap = "Network Setup Message" ProText1 = "Copying:" ProText2 = "To:" FunctionTitleDcPri = "SpellCaster DataCommute/PRI Card Setup" ProductSoftwareDescription = "SpellCaster DataCommute/PRI Driver" ProductHardwareDcPriDescription = "SpellCaster DataCommute/PRI" ProductSoftwareTitle = "SpellCaster DataCommute/PRI Driver" ProductHardwareDcPriTitle = "SpellCaster DataCommute/PRI Adapter" ShellCodeErrorTitle = "Error: "$(FunctionTitle)$(Option)) ShellCodeErrorText = "Shell Code Error." ;*********************************************************************** ; ;*********************************************************************** [DialogConstantsENG] Help = "&Help" Exit = "Cancel" OK = "OK" HelpContext = "" Continue = "Continue" Cancel = "Cancel" ;*********************************************************************** ; ;*********************************************************************** [FileDependentDlgENG] Combo1Label = "I/O &Base Address:" Combo2Label = "&IRQ Level:" Combo3Label = "&RAM Base Address:" DlgType = "MultiCombo" DlgTemplate = "WD" Caption = $(Function$(Option)Title) Combo1List = $(IO_Hex_List) Combo1Out = $(IO_Hex_Value) Combo2List = $(IRQ_List) Combo2Out = $(InterruptNumber) Combo3List = $(RAM_Hex_List) Combo3Out = $(RAM_Hex_Value) ComboListItemsIn = {Combo1List, Combo2List, Combo3List} ComboListItemsOut = {Combo1Out, Combo2Out, Combo3Out} EditTextIn = "" EditTextLim = "" CBOptionsGreyed = {} NotifyFields = {NO, NO, NO} ; HelpContext = $(!IDH_DB_OEMNADN2_INS) ;*********************************************************************** ; ;*********************************************************************** [InvokeRasDlgENG-DCBRI] InvokeRasSetupMsg = "The SpellCaster DataCommute/BRI setup is complete. "+ "Remote Access Service (RAS) must now be installed. "+ "Please configure the DataCommute/BRI in RAS "+ "setup to enable you to use RAS over the DataCommute/BRI." InvokeRasConfigMsg = "The SpellCaster DataCommute/BRI setup is complete. "+ "Remote Access Service (RAS) setup must now be invoked. "+ "Please configure the DataCommute/BRI in RAS "+ "setup to enable you to use RAS over the DataCommute/BRI." InvokeRasError = "The SpellCaster DataCommute/BRI setup encountered an error "+ "while invoking the RAS setup INF file (OEMNSVRA.INF). "+ "Please make sure that the file is present in the "+ "System32 directory and is the proper file." InvokeRasNotMsg = "The SpellCaster DataCommute/BRI setup is complete. The Remote "+ "Access Service (RAS) is not installed. Please "+ "install the Remote Access Service and configure the DcBriISDNn "+ "ports in RAS setup to enable you to use RAS over "+ "over the DataCommute/BRI Adapter." ;*********************************************************************** ; ;*********************************************************************** [InvokeRasDlgENG-TCBRI] InvokeRasSetupMsg = "The SpellCaster TeleCommute/BRI setup is complete. "+ "Remote Access Service (RAS) must now be installed. "+ "Please configure the TeleCommute/BRI in RAS "+ "setup to enable you to use RAS over the TeleCommute/BRI." InvokeRasConfigMsg = "The SpellCaster TeleCommute/BRI setup is complete. "+ "Remote Access Service (RAS) setup must now be invoked. "+ "Please configure the TeleCommute/BRI in RAS "+ "setup to enable you to use RAS over the TeleCommute/BRI." InvokeRasError = "The SpellCaster TeleCommute/BRI setup encountered an error "+ "while invoking the RAS setup INF file (OEMNSVRA.INF). "+ "Please make sure that the file is present in the "+ "System32 directory and is the proper file." InvokeRasNotMsg = "The SpellCaster TeleCommute/BRI setup is complete. The Remote "+ "Access Service (RAS) are not installed. Please "+ "install the Remote Access Service and configure the TcBriISDNn "+ "ports in RAS setup to enable you to use RAS over "+ "over the TeleCommute/BRI Adapter." ;*********************************************************************** ; ;*********************************************************************** [InvokeRasDlgENG-DCPRI] InvokeRasSetupMsg = "The SpellCaster DataCommute/PRI setup is complete. "+ "Remote Access Services (RAS) must now be installed. "+ "Please configure the DataCommute/PRI in RAS "+ "setup to enable you to use RAS over the DataCommute/PRI." InvokeRasConfigMsg = "The SpellCaster DataCommute/PRI setup is complete. "+ "Remote Access Services (RAS) setup must now be invoked. "+ "Please configure the DataCommute/PRI in RAS "+ "setup to enable you to use RAS over the DataCommute/PRI." InvokeRasError = "The SpellCaster DataCommute/PRI setup encountered an error "+ "while invoking the RAS setup INF file (OEMNSVRA.INF). "+ "Please make sure that the file is present in the "+ "System32 directory and is the proper file." InvokeRasNotMsg = "The SpellCaster DataCommute/PRI setup is complete. The Remote "+ "Access Services (RAS) are not installed. Please "+ "install the Remote Access Services and configure the DcPriISDNn "+ "ports in RAS setup to enable you to use RAS over "+ "over the DataCommute/PRI Adapter."Download Driver Pack
After your driver has been downloaded, follow these simple steps to install it.
Expand the archive file (if the download file is in zip or rar format).
If the expanded file has an .exe extension, double click it and follow the installation instructions.
Otherwise, open Device Manager by right-clicking the Start menu and selecting Device Manager.
Find the device and model you want to update in the device list.
Double-click on it to open the Properties dialog box.
From the Properties dialog box, select the Driver tab.
Click the Update Driver button, then follow the instructions.
Very important: You must reboot your system to ensure that any driver updates have taken effect.
For more help, visit our Driver Support section for step-by-step videos on how to install drivers for every file type.