OEMSETUP.INF Driver File Contents (1800002b.exe)

;-------------------------------------------------------------------
; oemsetup.inf - Install script used by WinNT network/control-panel to
;   install the Comtrol VS1000/VS2000 software(VSLink).
;Change History:
; 3-12-98 - minor naming changes.
;11-05-97 - Add peer to VSLink files and remove tagfile (ntdiskid).  DCS
;-------------------------------------------------------------------

;***************
[Identification]
    OptionType = NetAdapter

;*******************
[LanguagesSupported]
    ENG

;*******************
[PlatformsSupported]
    ISA
    EISA
    PCI

;********
[Options]
;    "Comtrol InterChangeVS Async Virtual Server"
    vslinka

;***************
[OptionsTextENG]
    "Comtrol VS1000/VS2000/RocketPort Serial Hub"

;*************
[DebugOnOrOff]
!STF_DISPLAYDEBUGOUTPUT = 0	;OFF
!DebugOutputControl = 0	;OFF


;***********************************************************************
; CONSTANTS FOR USING DIALOGS
;***********************************************************************

[FileConstants]
;
;  File names, etc.
;
UtilityInf      = "UTILITY.INF"
ParamInf        = "NCPARAM.INF"
subroutineinf   = "SUBROUTN.INF"
SoftwareType    = "driver"
Exit_Code       = 0

;
; EventLog Message File
;
NetEventDLL     = "%SystemRoot%\System32\netevent.dll"
IoLogMsgDLL     = "%SystemRoot%\System32\IoLogMsg.dll"

; Product Info
;
Manufacturer    = "Comtrol"
ProductMajorVersion     = "1"
ProductMinorVersion     = "1"
ProductVersion  = $(ProductMajorVersion)"."$(ProductMinorVersion)

;
; Software
;
ProductSoftwareDescription = "Comtrol VS1000/VS2000/RocketPort Serial Hub"
ProductSoftwareDescriptionHdwDriver = "Comtrol VS1000/VS2000/RocketPort Serial Hub"
ProductSoftwareTitle = "Comtrol VS1000/VS2000/RocketPort Serial Hub"
ProductSoftwareTitleHdwDriver = "Software for VS1000/VS2000/RocketPort Serial Hub"

ProductSoftwareName     = "VsLinkA"
ProductSoftwareImagePath = "\SystemRoot\System32\drivers\vslinka.sys"
NetRuleSoftwareType     = "VSLinkASys serialDriver VSLinkADriver"
NetRuleSoftwareUse      = $(SoftwareType)
NetRuleSoftwareBindForm = """VSLinkASys"" yes no container"
NetRuleSoftwareClass    = {"VSLinkADriver basic"}
NetRuleSoftwareBindable = {"VSLinkADriver VSLinkAAdapter non exclusive 100", "VSLinkADriver ndisDriver non non 100"}

;
; Hardware
;
DisplayHardwareName     = "VS1000/VS2000/RocketPort Serial Hub"
ProductHardwareName     = "VSLinkA"
NetRuleHardwareType     = "VSLinkAAdapter"
NetRuleHardwareBindForm = " yes yes container"
NetRuleHardwareClass    = {"VSLinkAAdapter basic"}

;
; Registry Key
;
ProductKeyName  = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\"$(ProductSoftwareName)"\CurrentVersion"
ParamKeyName    = $(!NTN_ServiceBase)"\"$(ProductHardwareName)"\Parameters"


[date]
    ; Now is a list which contains { Sec from 1-1-1970, Year, Month, Day, Hour,
    ; Minute, Second }
    Now = {} ? $(!LIBHANDLE) GetSystemDate

;*********
[Identify]
    read-syms DebugOnOrOff
    read-syms Identification
    set Status     = STATUS_SUCCESSFUL
    set Identifier = $(OptionType)
    set Media      = #("Source Media Descriptions", 1, 1)
    Debug-Output "VSLinkA:Identify Section"
    Return $(Status) $(Identifier) $(Media)


;**************
[ReturnOptions]
Debug-Output "VSLinkA:ReturnOptions Section"
    set Status        = STATUS_FAILED
    set OptionList     = {}
    set OptionTextList = {}

; Check on languages supported... ENG only
    set LanguageList = ^(LanguagesSupported, 1)
    Ifcontains(i) $($0) in $(LanguageList)
        goto returnoptions
    else
        set Status = STATUS_NOLANGUAGE
        goto finish_ReturnOptions
    endif

; Check on the supported platforms... ISA, EISA etc.
    set PlatformList = ^(PlatformsSupported, 1)
    Ifcontains(i) $($1) in $(PlatformList)
        goto returnoptions
    else
        set Status = STATUS_NOTSUPPORTED
        goto finish_ReturnOptions
    endif

returnoptions = +
    set OptionList     = ^(Options, 1)
    set OptionTextList = ^(OptionsText$($0), 1)
    set Status         = STATUS_SUCCESSFUL
finish_ReturnOptions = +
    Return $(Status) $(OptionList) $(OptionTextList)

;**************
[InstallOption]

Debug-Output "VSLinkA:InstallOption Section"

    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) in $(LanguageList)
    else
        set Status = STATUS_NOLANGUAGE
        goto finish_InstallOption
    endif

    Debug-Output "VSLinkA: Language = "$($0)
    Debug-Output "VSLinkA: Option = "$($1)
    Debug-Output "VSLinkA: SrcDir = "$($2)
    Debug-Output "VSLinkA: AddCopy = "$($3)
    Debug-Output "VSLinkA: DoCopy = "$($4)
    Debug-Output "VSLinkA: DoConfig = "$($5)

    read-syms FileConstants

    ifstr(i) $(!NTN_Origination) == "NCPA"
        set Continue = $(OK)
    endif

    detect date

    set-title  $(FunctionTitle)

    set to   = Begin
    set from = Begin
    set CommonStatus = STATUS_SUCCESSFUL

    EndWait

Begin = +

    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 CommonStatus = STATUS_REBOOT
        set StartLabel = configureadapter

        ; You cannot config the software component

        Ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
            Debug-Output "Cannot configure the VSLinkA/Serial Hub driver software."
            Shell $(UtilityInf),RegistryErrorString,CANNOT_CONFIGURE_SOFTWARE
            ifint $($ShellCode) != $(!SHELL_CODE_OK)
                Debug-Output"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 OEM_ABANDON_OPTIONS = {}
        set OEM_ABANDON_SOFTWARE = FALSE
        set OEM_ABANDON_ON = TRUE
    endif

    Set from = $(fatal)
    Set to = $(fatal)


    Debug-Output "VSLinkA:StartLabel: "$(StartLabel)
    Goto $(StartLabel)


;-----------------------------------------------
; Installation Section
;-----------------------------------------------

installadapter = +
;
;   First, check whether the same version of the software exists
;
    OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct

    Ifstr $(KeyProduct) != $(KeyNull)
        ;
        ; Same version already existed in the local machine
        ; Popup the dialog and ask the user whether he wants to continue
        ;
        CloseRegKey $(KeyProduct)

        ifstr(i) !(NTN_RegBase) == $(ProductKeyName)
           ;
           ; Cannot Install the same software again
           ;
           Shell $(UtilityInf), VerExistedDlg, $(ProductSoftwareTitle),+
               $(ProductVersion)
           ifint $($ShellCode) != $(!SHELL_CODE_OK)
               Debug-Output "ShellCode error: cannot get an error string."
               goto ShellCodeError
           endif

           goto end
        else
           ;
           ; Add a new adapter card?
           ;
           Shell $(UtilityInf), CardExistedDlg

           ifint $($ShellCode) != $(!SHELL_CODE_OK)
               Debug-Output "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

    goto adaptersetup


;-----------------------------------------------
; Configuration Section
;-----------------------------------------------
;
;   Get the current values of all the parameters

configureadapter = +

    ; Run reinstall... to configure new parameters

    RunProgram ExitCode "" "" $(!STF_WINDOWSSYSPATH)\VSLINK\setup.exe

    ;set status to CANCELL so network program will always
    ; allow the user to choose cancel

    set CommonStatus = STATUS_USERCANCEL

    goto successful




;################### INSTALLLING HERE

adaptersetup = +

   ifstr(i) $(AddCopy) == "YES"
       install Install-AddCopyOption
       ifstr(i) $(STF_INSTALL_OUTCOME) != "STF_SUCCESS"
           Debug-Output "VSLinkA: AddCopyOption STF_SUCCESS"
           goto finish_InstallOption
       endif
   endif

   ;Set up driver files for copying from dist disk

   ifstr(i) $(DoCopy) == "YES"

       read-syms ProgressCopy$($0)

       install Install-DoCopyOption

       ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_FAILURE"
           Debug-Output "VSLinkA: DoCopyOption STF_FAILURE"
           goto finish_InstallOption
       else-ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_USERQUIT"
           set Status = STATUS_USERCANCEL
           Debug-Output "VSLinkA: DoCopyOption STF_USERQUIT"
           goto finish_InstallOption
       endif
    endif   

;   If installing, go create the necessary keys;
;   if configuring, they're already open.
;
skipoptions =+

    ifint $(OldVersionExisted) == $(TRUE)
        ifstr(i) $(!NTN_InstallMode) == configure
            goto writeparameters
        endif
    endif
    StartWait
    ;
    ; Add Software Component
    ;
    ifint $(OldVersionExisted) == $(FALSE)

        Shell $(UtilityInf), AddSoftwareComponent, $(Manufacturer), +
            $(ProductSoftwareName), +
            $(ProductSoftwareName), +
            $(ProductSoftwareTitle), $(STF_CONTEXTINFNAME), +
            $(ProductSoftwareImagePath), "kernel", "Extended base", {}, "",+
            $(NetEventDLL)

        Set OEM_ABANDON_SOFTWARE = TRUE

        ifint $($ShellCode) != $(!SHELL_CODE_OK)
            Debug-Output "ShellCode error"
            goto ShellCodeError
        endif
        ;
        ;   At this point:
        ;     $R1 contains the product version key handle;
        ;     $R2 contains the NetRules subkey handle;
        ;     $R3 contains the new Services key handle; and
        ;     $R4 contains the Parameters key
        ;     $R5 contains the Linkage Key
        ;
        set RegistryErrorIndex = $($R0)
        set KeyProduct      = $($R1)
        Set SoftNetRulesKey = $($R2)
	set DriverParameters = $($R4)
        set ServiceKey = $($R3)
        CloseRegKey $($R5)

        Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
            EndWait
            Debug-Output "Registry error: add software components"
            CloseRegKey $(KeyProduct)
            CloseRegKey $(DriverParameters)
            CloseRegKey $(SoftNetRulesKey)
            CloseRegKey $(ServiceKey)
            goto fatalregistry
        endif

        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 "ShellCode error."
            goto ShellCodeError
        endif

        set RegistryErrorIndex = $($R0)

        Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
            EndWait
            Debug-Output "Registry error: add value list."
            CloseRegKey $(KeyProduct)
            CloseRegKey $(DriverParameters)
            CloseRegKey $(SoftNetRulesKey)
            CloseRegKey $(ServiceKey)
            goto fatalregistry
        endif

        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),$(NetRuleSoftwareBindable)}, +
                            {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}}

        Shell  $(UtilityInf), AddValueList, $(SoftNetRulesKey), $(NewValueList)
        ifint $($ShellCode) != $(!SHELL_CODE_OK)
            Debug-Output "ShellCode error."
            goto ShellCodeError
        endif
;;  Add auto start to the service key 
       
        ifstr(i) $(!STF_GUI_UNATTENDED) == "YES"
            set NewValueList = {{Start,$(NoTitle),$(!REG_VT_DWORD),$(!SERVICE_AUTO_START)}}

            Shell  $(UtilityInf), AddValueList, $(ServiceKey), $(NewValueList)
            ifint $($ShellCode) != $(!SHELL_CODE_OK)
                Debug-Output "ShellCode error."
                goto ShellCodeError
            endif
	endif

        set RegistryErrorIndex = $($R0)

;; if unattended add default settings to driverparam key

        ifstr(i) $(!STF_GUI_UNATTENDED) == "YES"
            Shell $(UtilityInf),AddDefaultNetCardParameters,$(DriverParameters)
        endif

        CloseRegKey $(DriverParameters)
        CloseRegKey $(KeyProduct)
        CloseRegKey $(SoftNetRulesKey)
        CloseRegKey $(ServiceKey)

        Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
            EndWait
            Debug-Output "Resgitry error: add value list."
            goto fatalregistry
        endif
    endif

    ;
    ; Create the HARDWARE\Netcard region and its corresponding service
    ; This creates the NetworkCards entry for VSLinkA

    Shell $(UtilityInf), AddHardwareComponent, $(ProductHardwareName),$(STF_CONTEXTINFNAME),$(ProductKeyName)

    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 "Cannot add hardware component"
        goto ShellCodeError
    endif

    set RegistryErrorIndex = $($R0)

    Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
        EndWait
        Debug-Output "Registry error: add hardware component"
        CloseRegKey $($R1)
        CloseRegKey $($R2)
        CloseRegKey $($R3)
        goto fatalregistry
    endif

;
;   At this point:
;     $R1  Registry key variable for HARDWARE\Netcard\(n)
;     $R2  Registry key variable for HARDWARE\Netcard\(n)\\NetRules
;     $R3  Registry key handle for <service>\Parameters key
;     $R4  Adapter number assigned to adapter
;     $R5  Service name generated by combining svc name with adapter number
;
    set KeyParameters = $($R3)
    set KeyAdapterRules = $($R2)
    set AdapterNumber = $($R4)

    set NewValueList = {{Manufacturer,$(NoTitle),$(!REG_VT_SZ),$(Manufacturer)},+
                       {Title,$(NoTitle),$(!REG_VT_SZ),"["$($R4)"] "$(Manufacturer)" "$(DisplayHardwareName)},+
                       {Description,$(NoTitle),$(!REG_VT_SZ),"Comtrol VS1000/VS2000/RocketPort Serial Hub" },+
                       {ProductName,$(NoTitle),$(!REG_VT_SZ),$(DisplayHardwareName)},+
                       {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 "ShellCode error"
        goto ShellCodeError
    endif

    CloseRegKey $($R1)

    set TempProdName = """"$(ProductHardwareName)$(AdapterNumber)""""
    set TempBindForm = $(TempProdName)$(NetRuleHardwareBindForm)

    set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleHardwareType)},+
                        {bindform,$(NoTitle),$(!REG_VT_SZ),$(TempBindForm)}, +
                        {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleHardwareClass)}, +
                        {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}}

    Shell  $(UtilityInf), AddValueList, $(KeyAdapterRules), $(NewValueList)
    ifint $($ShellCode) != $(!SHELL_CODE_OK)
        Debug-Output "ShellCode error."
        goto ShellCodeError
    endif

    set RegistryErrorIndex = $($R0)

    Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
        EndWait
        Debug-Output "Resgitry error: add value list."
        CloseRegKey $(KeyParameters)
        CloseRegKey $(KeyAdapterRules)
        goto fatalregistry
    endif

    CloseRegKey $(KeyAdapterRules)

    goto writeparameters
;
;   REQUIRED:   $(KeyParameters) contains service Parameters key handle
;
writeparameters = +
    Shell $(UtilityInf), GetBusTypeNum
    set BusTypeNum = $($R1)
    ifint $($ShellCode) != $(!SHELL_CODE_OK)
        Debug-Output "ShellCode error."
        goto ShellCodeError
    endif
;
;   Add the rest of the parameters to the Services area
;
    CloseRegKey $(KeyParameters)

    ifint $($ShellCode) != $(!SHELL_CODE_OK)
        Debug-Output "ShellCode error."
        goto ShellCodeError
    endif

    set RegistryErrorIndex = $($R0)

    Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
        Debug-Output "Registry error: Add value list"
        goto fatalregistry
    endif

    EndWait

;    Ifstr(i) $(StartLabel) == installadapter
    ifstr(i) $(!STF_GUI_UNATTENDED) != "YES"
         RunProgram ExitCode "" "" $(!STF_WINDOWSSYSPATH)\VSLink\setup.exe -p
      else
         RunProgram ExitCode "" "" c:\ntinstall\VSLink\setup.exe -a
      endif
;    endif

    goto successful


;-----------------------------------------------
; Binding section
;-----------------------------------------------
bindingadapter =+
    set Error = "Binding: Sorry, not yet implemented."
    goto fatal

;-----------------------------------------------
; Removeadapter section
;-----------------------------------------------

removeadapter = +
    Ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
        ; Remove Software Component
        Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), +
            $(ProductSoftwareName)
        ifint $($ShellCode) != $(!SHELL_CODE_OK)
            Debug-Output "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 "ShellCode error"
            goto ShellCodeError
        endif

        set RegistryErrorIndex = $($R0)

        Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
            goto fatalregistry
        endif
    endif

    Ifstr(i) $(StartLabel) == removeadapter
       RunProgram ExitCode "" "" $(!STF_WINDOWSSYSPATH)\VSLink\setup.exe -ra
    endif

    goto end

;-----------------------------------------------
; Upgrade Software section
;-----------------------------------------------

UpgradeSoftware = +

;Don't allow this option.... Tell user to remove first

Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "WARNING", "Driver should be removed before updating."

successful = +
    goto end

abandon = +
    ForListDo $(OEM_ABANDON_OPTIONS)
        Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), +
            $(ProductSoftwareName), $($)
        ifint $($ShellCode) != $(!SHELL_CODE_OK)
            Debug-Output "ShellCode error"
            goto ShellCodeError
        endif

        set RegistryErrorIndex = $($R0)

        Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
            goto fatalregistry
        endif
    EndForListDo

    Ifstr(i) $(OEM_ABANDON_SOFTWARE) == TRUE
        ; Remove Software Component
        Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), +
            $(ProductSoftwareName), FALSE
        ifint $($ShellCode) != $(!SHELL_CODE_OK)
            Debug-Output "ShellCode error"
            goto ShellCodeError
        endif

        set RegistryErrorIndex = $($R0)

        Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
            goto fatalregistry
        endif
    endif

    goto end

;
; warning display
;
warning = +
    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)
    else
        goto "end"
    endif
;
; non fatal error display
;
nonfatalinfo = +
    Set Severity = STATUS
    Set CommonStatus = STATUS_USERCANCEL
    goto nonfatalmsg
nonfatal = +
    Set Severity = NONFATAL
    goto nonfatalmsg
nonfatalmsg = +
    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)
    else
        goto "end"
    endif

;
;  Registry is broken
;
fatalregistry = +
    Shell $(UtilityInf) RegistryErrorString $(RegistryErrorIndex)
    ifint $($ShellCode) != $(!SHELL_CODE_OK)
        goto ShellCodeError
    endif
    set Error = $($R0)
    goto fatal

;
; fatal error display
;
fatal = +
    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

;
;  Shelling error
;
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
    ;
    ; if OEM_ABANDON_ON == TRUE, then remove the registry entries
    ;
    ifstr(i) $(OEM_ABANDON_ON) == TRUE
        set OEM_ABANDON_ON = FALSE
        goto abandon
    endif

end = +

    Return $(CommonStatus)

    set Status = STATUS_SUCCESSFUL

finish_InstallOption = +
    return $(Status)

;**********************
[Install-AddCopyOption]
    set STF_VITAL = ""
    set STF_OVERWRITE   = "VERIFYSOURCEOLDER"

    Debug-Output "VSLinkA:AddCopyOption"
    AddSectionFilesToCopyList Files-VSLinkAConfig  $(SrcDir) +
                                $(!STF_WINDOWSSYSPATH)\VSLink
    AddSectionFilesToCopyList Files-VSLinkADriver  $(SrcDir) +
                                $(!STF_WINDOWSSYSPATH)\drivers
    AddSectionFilesToCopyList Files-System32  $(SrcDir) +
                                $(!STF_WINDOWSSYSPATH)
    AddSectionFilesToCopyList Files-VSLinkAModem  $(SrcDir) +
                                $(!STF_WINDOWSPATH)\inf

    exit

;*********************
;[Install-Update]
;   set STF_VITAL        = ""
;   set STF_OVERWRITE    = "VERIFYSOURCEOLDER"
;;;;;   AddSectionFilesToCopyList Files-$(Option) $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers
;;;;;   AddSectionFilesToCopyList Files-VSLinkAConfig $(SrcDir) $(!STF_WINDOWSSYSPATH)\VSLink
;   AddSectionFilesToCopyList Files-VSLinkADriver  $(SrcDir) + $(!STF_WINDOWSSYSPATH)\drivers
;;;;   CreateDir $(!STF_WINDOWSSYSPATH)\VSLink
;   CopyFilesInCopyList
;   exit

;*********************
[Install-DoCopyOption]
    Debug-Output "VSLinkA:DoCopyOption"
    ;make sure the target directory exists
    CreateDir $(!STF_WINDOWSSYSPATH)\VSLink
    CopyFilesInCopyList
    exit

;****************
[ProgressCopyENG]
    ProCaption   = "Windows NT Setup"
    ProCancel    = "Cancel"
    ProCancelMsg = "The VSLink/Serial Hub software is not correctly installed.  Are you sure you want "+
                   "to cancel copying files?"
    ProCancelCap = "Setup Message"
    ProText1     = "Copying:"
    ProText2     = "To:"

;*******
[UiVars]
    PlatformID_I386  = I386
    PlatformID_Mips  = Mips
    STF_CONTROLSET     = CurrentControlSet
    STF_PROCESSOR = "" ? $(!LIBHANDLE) GetProcessor
    STF_WINDOWSPATH    = "" ? $(!LIBHANDLE) GetWindowsNtDir
    STF_WINDOWSSYSPATH = "" ? $(!LIBHANDLE) GetWindowsNtSysDir

;**************************
[Source Media Descriptions]
1 = "Comtrol VS1000/VS2000/RocketPort Serial Hub Software Disk"

;************
[ProductType]
STF_PRODUCT  = Winnt

;*******************
[Files-VSLinkAConfig]
;Sizes are estimates only
1,setup.exe , SIZE=50000
1,setup.hlp , SIZE=75000
1,setup.cnt , SIZE=2000

;32 bit apps
1,wcom32.exe , SIZE=70000
1,wcom.hlp ,   SIZE=10000
1,peer.exe , SIZE=70000
1,peer.hlp , SIZE=20000
1,portmon.exe , SIZE=70000
1,portmon.hlp , SIZE=20000

;Readme file
1,readme.txt , SIZE=15000

; setup.exe updates modem.inf RocketModem section file
1,ctmmdm35.inf , SIZE=10000

;*******************
[Files-System32]
1,ctmservi.exe , SIZE=30000

;*******************
[Files-VSLinkADriver]

;Driver Binary
1,vslinka.sys , SIZE=64000

;Microcode
1,vslinka.bin , SIZE=64000

;*******************
[Files-VSLinkAModem]
1,mdmctm1.inf , SIZE=25000


Download Driver Pack

How To Update Drivers Manually

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.

server: web3, load: 2.37