home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1996 February / VPR9602A.ISO / drvlib / netcard / x86 / madge.mca / oemsetup.inf < prev    next >
INI File  |  1995-10-27  |  76KB  |  3,002 lines
  1. ; **********************************************************************
  2. ;
  3. ; OEMSETUP.INF 
  4. ;
  5. ; Copyright (c) Madge Networks Ltd. 1994
  6. ;
  7. ; MADGE Smart Ringnode Driver installer for MdgMPort.SYS
  8. ;
  9. ; VeRsIoN=OEMSETUP.INF 3.00.55 (for use with MdgMPort.SYS 2.00.61)
  10. ; 
  11. ; **********************************************************************
  12.  
  13. ; ----------------------------------------------------------------------
  14. ; Mandatory configuration information.
  15. ; ----------------------------------------------------------------------
  16.  
  17. [Identification]
  18.     OptionType = NetAdapter
  19.  
  20. [PlatformsSupported]
  21.     MCA
  22.  
  23. [LanguagesSupported]
  24.     ENG
  25.  
  26. [Options]
  27.     MDGMPMCA
  28.     MDGMPMC32
  29.  
  30. ;-----------------------------------------------------------------------
  31. ; Text strings to identify adapter options.
  32. ;-----------------------------------------------------------------------
  33.  
  34. [OptionsTextENG]
  35.     MDGMPMCA   = "Madge Smart 16/4 MC Ringnode"
  36.     MDGMPMC32  = "Madge Smart 16/4 MC32 Ringnode"
  37.  
  38. ;-----------------------------------------------------------------------
  39. ; Text strings to identify Madge adapters in a machine.
  40. ;-----------------------------------------------------------------------
  41.  
  42. [OptionsChoiceENG]
  43.     MDGMPISA   = "Smart 16/4 AT Ringnode / IO location "
  44.     MDGMPATP   = "Smart 16/4 AT Plus Ringnode / IO location "
  45.     MDGMPISAC  = "Smart 16/4 ISA Client Ringnode / IO location "
  46.     MDGMPISACP = "Smart 16/4 ISA Client Plus Ringnode / IO location "
  47.     MDGMPPC    = "Smart 16/4 PC Ringnode / IO location "
  48.     MDGMPEISA  = "Smart 16/4 EISA Ringnode / slot number "
  49.     MDGMPMCA   = "Smart 16/4 MC Ringnode / slot number "
  50.     MDGMPMC32  = "Smart 16/4 MC32 Ringnode / slot number "
  51.     MDGMPSM16  = "Smart 16 Ringnode / IO location "
  52.     MDGMPPNP   = "Smart 16/4 ISA Client PnP Ringnode / IO location "
  53.     MDGMPPCI   = "Smart 16/4 PCI Ringnode / PCI device ID "
  54.     MDGMPPCMCIA = "Smart 16/4 PCMCIA Ringnode / IO location "
  55.  
  56. ;-----------------------------------------------------------------------
  57. ; Adapter options that require a slot number and a transfer method.
  58. ; Others require an IO location a transfer method and an IRQ number.
  59. ;-----------------------------------------------------------------------
  60.  
  61. [SlotNumberOnlyOptions]
  62.     MDGMPEISA
  63.     MDGMPMCA
  64.     MDGMPMC32
  65.     MDGMPPCI
  66.  
  67. ;-----------------------------------------------------------------------
  68. ; Adapter options that support MMIO.
  69. ;-----------------------------------------------------------------------
  70.  
  71. [MmioOptions]
  72.     MDGMPPCI
  73.  
  74. ; ----------------------------------------------------------------------
  75. ; Miscellaneous declarations for initialsing lists.
  76. ; ----------------------------------------------------------------------
  77.  
  78. [IoLocationChoices]
  79.     "0x0a20",2592
  80.     "0x1a20",6688
  81.     "0x2a20",10784
  82.     "0x3a20",14880
  83.     "0x4a20",18976
  84.     "0x4e20",20000
  85.     "0x5a20",23072
  86.     "0x5e20",24096
  87.     "0x6a20",27168
  88.     "0x6e20",28192
  89.     "0x7a20",31264
  90.     "0x7e20",32288
  91.     "0x0140",320
  92.     "0x0920",2336
  93.     "0x0940",2368
  94.     "0x0960",2400
  95.     "0x0980",2432
  96.     "0x0a40",2624
  97.     "0x0a60",2656
  98.     "0x0a80",2688
  99.     "0x0aa0",2720
  100.     "0x0b20",2848
  101.     "0x0b40",2880
  102.     "0x0b60",2912
  103.     "0x0b80",2944
  104.     "UNKNOWN",65535
  105.  
  106. [DmaChannelChoices]
  107.     "PIO",0
  108.     "DMA Channel 01",1
  109.     "DMA Channel 02",2
  110.     "DMA Channel 03",3
  111.     "DMA Channel 04",4
  112.     "DMA Channel 05",5
  113.     "DMA Channel 06",6
  114.     "DMA Channel 07",7
  115.     "DMA Channel 08",8
  116.     "DMA Channel 09",9
  117.     "DMA Channel 10",10
  118.     "DMA Channel 11",11
  119.     "DMA Channel 12",12
  120.     "DMA Channel 13",13
  121.     "DMA Channel 14",14
  122.     "DMA Channel 15",15
  123.     "DMA",500
  124.     "MMIO",501
  125.     "UNKNOWN",65535
  126.  
  127. [IrqNumberChoices]
  128.     "01",1
  129.     "02",2
  130.     "03",3
  131.     "04",4
  132.     "05",5
  133.     "06",6
  134.     "07",7
  135.     "08",8
  136.     "09",9
  137.     "10",10
  138.     "11",11
  139.     "12",12
  140.     "13",13
  141.     "14",14
  142.     "15",15
  143.     "UNKNOWN",65535
  144.  
  145. [SlotNumberChoices]
  146.     "00",0
  147.     "01",1
  148.     "02",2
  149.     "03",3
  150.     "04",4
  151.     "05",5
  152.     "06",6
  153.     "07",7
  154.     "08",8
  155.     "09",9
  156.     "10",10
  157.     "11",11
  158.     "12",12
  159.     "13",13
  160.     "14",14
  161.     "15",15
  162.     "16",16
  163.     "17",17
  164.     "18",18
  165.     "19",19
  166.     "20",20
  167.     "21",21
  168.     "22",22
  169.     "23",23
  170.     "24",24
  171.     "25",25
  172.     "26",26
  173.     "27",27
  174.     "28",28
  175.     "29",29
  176.     "30",30
  177.     "31",31
  178.     "UNKNOWN",65535
  179.  
  180. [RxTxSlotsChoices]
  181.     "Rx=02 Tx=02",0
  182.     "Rx=03 Tx=03",1
  183.     "Rx=04 Tx=04",2
  184.     "Rx=06 Tx=06",3
  185.     "Rx=08 Tx=08",4
  186.     "Rx=10 Tx=10",5
  187.  
  188. [StatsChoices]
  189.     "Disabled",0
  190.     "Enabled",1
  191.  
  192. [MpChoices]
  193.     "One",0
  194.     "Multiple",1
  195.     "UNKNOWN",65535
  196.     
  197. ; ----------------------------------------------------------------------
  198. ; Constants specific to the driver.
  199. ; ----------------------------------------------------------------------
  200.  
  201. [FileConstants]
  202.  
  203. ;
  204. ;  File names, etc.
  205. ;
  206.  
  207. DialogDllName = "MDGMPDLG.DLL"
  208. DetectDllName = "MDGNCDET.DLL"
  209. SoftwareType  = "driver"
  210. Exit_Code     = 0
  211.  
  212. ;
  213. ; Product Information.
  214. ;
  215.  
  216. Manufacturer        = "Madge"
  217. ProductMajorVersion = "2"
  218. ProductMinorVersion = "00"
  219. ProductRevision     = ".61"
  220. ProductVersion      = $(ProductMajorVersion)"."$(ProductMinorVersion)$(ProductRevision)
  221.  
  222. ;
  223. ; Software information.
  224. ;
  225.  
  226. ProductSoftwareName     = "MdgMPort"
  227. ProductSoftwareImagePath = "%SystemRoot%\system32\drivers\"$(ProductSoftwareName)".sys"
  228.  
  229. NetRuleSoftwareType     = "mdgtrSys ndisDriver mdgtrDriver"
  230. NetRuleSoftwareUse      = $(SoftwareType)
  231. NetRuleSoftwareBindForm = """mdgtrSys"" yes no container"
  232. NetRuleSoftwareClass    = {"mdgtrDriver basic"}
  233. NetRuleSoftwareBindable = {"mdgtrDriver mdgtrAdapter non exclusive 100"}
  234.  
  235. ;
  236. ; Hardware information.
  237. ;
  238.  
  239. ProductHardwareName         = "MdgMPort"
  240. NetRuleHardwareType         = "mdgtr mdgtrAdapter"
  241. NetRuleHardwareBindForm     = " yes yes container"
  242. NetRuleHardwareClass        = {"mdgtrAdapter basic"}
  243.  
  244. ;
  245. ; Registry Key.
  246. ;
  247.  
  248. ProductKeyName  = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\"$(ProductSoftwareName)"\CurrentVersion"
  249. ParamKeyName    = $(!NTN_ServiceBase)"\"$(ProductHardwareName)"\Parameters"
  250.  
  251. ;
  252. ; EventLog Message File.
  253. ;
  254.  
  255. MadgeEventLogFile = $(ProductSoftwareImagePath)
  256.  
  257. ; ---------------------------------------------------------------------
  258. ; General constants.
  259. ; ---------------------------------------------------------------------
  260.  
  261. [GeneralConstants]
  262.  
  263. ;
  264. ;  File names, etc.
  265. ;
  266.  
  267. UtilityInf    = "UTILITY.INF"
  268. SubroutineInf = "SUBROUTN.INF"
  269. ParamInf      = "NCPARAM.INF"
  270.  
  271. ;
  272. ; Program flow control variables.
  273. ;
  274.  
  275. From      = ""
  276. To        = ""
  277.  
  278. ;
  279. ; Return codes; Exit_Code is set to one of these
  280. ;
  281.  
  282. ExitCodeOk     = 0
  283. ExitCodeCancel = 1
  284. ExitCodeFatal  = 2
  285.  
  286. ;
  287. ; Miscellaneous.
  288. ;
  289.  
  290. MAXIMUM_ALLOWED    = 33554432
  291. RegistryErrorIndex = NO_ERROR
  292. KeyNull            = ""
  293. KeyProduct         = ""
  294. KeyParameters      = ""
  295.  
  296. TRUE    = 1
  297. FALSE   = 0
  298. NoTitle = 0
  299.  
  300. ExitState         = "Active"
  301. OldVersionExisted = $(FALSE)
  302.  
  303. DriverPath      = $(!STF_NTPATH)\drivers
  304.  
  305. ;
  306. ; Resource values returned by the detection DLL, so do not change them.
  307. ;
  308.  
  309. VALUE_UNKNOWN   = 65535
  310. GENERAL_PIO     = 0
  311. GENERAL_DMA     = 500
  312. GENERAL_MMIO    = 501
  313.  
  314. ;
  315. ; Lists used to the raw internal form of parameters to and from
  316. ; the form shown to users.
  317. ;
  318.  
  319. IoUserList    = ^(IoLocationChoices, 1)
  320. IoRawList     = ^(IoLocationChoices, 2)
  321.  
  322. SlotUserList  = ^(SlotNumberChoices, 1)
  323. SlotRawList   = ^(SlotNumberChoices, 2)
  324.  
  325. DmaUserList   = ^(DmaChannelChoices, 1)
  326. DmaRawList    = ^(DmaChannelChoices, 2)
  327.  
  328. IrqUserList   = ^(IrqNumberChoices, 1)
  329. IrqRawList    = ^(IrqNumberChoices, 2)
  330.  
  331. RxTxUserList  = ^(RxTxSlotsChoices,1)
  332. RxTxRawList   = ^(RxTxSlotsChoices,2)
  333.  
  334. StatsUserList = ^(StatsChoices,1)
  335. StatsRawList  = ^(StatsChoices,2)
  336.  
  337. MpUserList    = ^(MpChoices,1)
  338. MpRawList     = ^(MpChoices,2)
  339.  
  340. ;
  341. ; Adapter classification lists.
  342. ;
  343.  
  344. MadgeAdapterOptions  = ^(Options,1)
  345. SlotNumberAdapters   = ^(SlotNumberOnlyOptions,1)
  346. MmioAdapters         = ^(MmioOptions,1)
  347.  
  348.  
  349. ;
  350. ; Help identifiers.
  351. ;
  352.  
  353. MadgeHelpIdMin         = 6000
  354. MadgeHelpIdMax         = 6003
  355. MadgeHelpIdMDGMPISA    = 6001
  356. MadgeHelpIdMDGMPATP    = 6001
  357. MadgeHelpIdMDGMPISAC   = 6001
  358. MadgeHelpIdMDGMPISACP  = 6001
  359. MadgeHelpIdMDGMPPC     = 6001
  360. MadgeHelpIdMDGMPSM16   = 6001
  361. MadgeHelpIdMDGMPPNP    = 6001
  362. MadgeHelpIdMDGMPPCMCIA = 6001
  363. MadgeHelpIdMDGMPEISA   = 6002
  364. MadgeHelpIdMDGMPMCA    = 6002
  365. MadgeHelpIdMDGMPMC32   = 6002
  366. MadgeHelpIdMDGMPPCI    = 6003
  367.  
  368. ; ----------------------------------------------------------------------
  369. ; Language dependent constants specific to the driver.
  370. ; ----------------------------------------------------------------------
  371.  
  372. [FileConstantsENG]
  373.  
  374. ;
  375. ; Product Info
  376. ;
  377.  
  378. FunctionTitle   = "MdgMPort v"$(ProductVersion)": Madge Smart Ringnode Setup"
  379.  
  380. ;
  381. ; Software.
  382. ;
  383.  
  384. ProductSoftwareTitle       = "MdgMPort"
  385. ProductSoftwareDescription = "MdgMPort: Madge Smart Ringnode NDIS3 Miniport Driver"
  386.  
  387. ;
  388. ; Hardware.
  389. ;
  390.  
  391. ProductHardwareMDGMPISATitle   = "Madge Smart 16/4 AT Ringnode"
  392. ProductHardwareMDGMPATPTitle   = "Madge Smart 16/4 AT Plus Ringnode"
  393. ProductHardwareMDGMPISACTitle  = "Madge Smart 16/4 ISA Client Ringnode"
  394. ProductHardwareMDGMPISACPTitle = "Madge Smart 16/4 ISA Client Plus Ringnode"
  395. ProductHardwareMDGMPPCTitle    = "Madge Smart 16/4 PC Ringnode"
  396. ProductHardwareMDGMPEISATitle  = "Madge Smart 16/4 EISA Ringnode"
  397. ProductHardwareMDGMPMCATitle   = "Madge Smart 16/4 MC Ringnode"
  398. ProductHardwareMDGMPMC32Title  = "Madge Smart 16/4 MC32 Ringnode"
  399. ProductHardwareMDGMPSM16Title  = "Madge Smart 16 Ringnode"
  400. ProductHardwareMDGMPPNPTitle   = "Madge Smart 16/4 ISA Client PnP Ringnode"
  401. ProductHardwareMDGMPPCITitle   = "Madge Smart 16/4 PCI Ringnode"
  402. ProductHardwareMDGMPPCMCIATitle  = "Madge Smart 16/4 PCMCIA Ringnode"
  403.  
  404. ProductHardwareMDGMPISADescription   = "Madge Smart 16/4 AT Ringnode"
  405. ProductHardwareMDGMPATPDescription   = "Madge Smart 16/4 AT Plus Ringnode"
  406. ProductHardwareMDGMPISACDescription  = "Madge Smart 16/4 ISA Client Ringnode"
  407. ProductHardwareMDGMPISACPDescription = "Madge Smart 16/4 ISA Client Plus Ringnode"
  408. ProductHardwareMDGMPPCDescription    = "Madge Smart 16/4 PC Ringnode"
  409. ProductHardwareMDGMPEISADescription  = "Madge Smart 16/4 EISA Ringnode"
  410. ProductHardwareMDGMPMCADescription   = "Madge Smart 16/4 MC Ringnode"
  411. ProductHardwareMDGMPMC32Description  = "Madge Smart 16/4 MC32 Ringnode"
  412. ProductHardwareMDGMPSM16Description  = "Madge Smart 16 Ringnode"
  413. ProductHardwareMDGMPPNPDescription   = "Madge Smart 16/4 ISA Client PnP Ringnode"
  414. ProductHardwareMDGMPPCIDescription   = "Madge Smart 16/4 PCI Ringnode"
  415. ProductHardwareMDGMPPCMCIADescription   = "Madge Smart 16/4 PCMCIA Ringnode"
  416.  
  417. ;
  418. ; Ring speed selection.
  419. ;
  420.  
  421. SpeedUserListMDGMPISA    = {"Set at adapter", "Force 16 MBit/s"}
  422. SpeedRawListMDGMPISA     = {0, 2}
  423.  
  424. SpeedUserListMDGMPATP    = {"Set at adapter", "Force 4 MBit/s", "Force 16 MBit/s"}
  425. SpeedRawListMDGMPATP     = {0, 1, 2}
  426.  
  427. SpeedUserListMDGMPISAC   = {"Set at adapter", "Force 16 MBit/s"}
  428. SpeedRawListMDGMPISAC    = {0, 2}
  429.  
  430. SpeedUserListMDGMPISACP  = {"Set at adapter", "Force 4 MBit/s", "Force 16 MBit/s"}
  431. SpeedRawListMDGMPISACP   = {0, 1, 2}
  432.  
  433. SpeedUserListMDGMPPC     = {"Set at adapter", "Force 16 MBit/s"}
  434. SpeedRawListMDGMPPC      = {0, 2}
  435.  
  436. SpeedUserListMDGMPEISA   = {"Set at adapter"}
  437. SpeedRawListMDGMPEISA    = {0}
  438.  
  439. SpeedUserListMDGMPMCA    = {"Set at adapter"}
  440. SpeedRawListMDGMPMCA     = {0}
  441.  
  442. SpeedUserListMDGMPMC32   = {"Set at adapter"}
  443. SpeedRawListMDGMPMC32    = {0}
  444.  
  445. SpeedUserListMDGMPSM16   = {"Always 16 MBit/s"}
  446. SpeedRawListMDGMPSM16    = {0}
  447.  
  448. SpeedUserListMDGMPPNP    = {"Set at adapter", "Force 4 MBit/s", "Force 16 MBit/s"}
  449. SpeedRawListMDGMPPNP     = {0, 1, 2}
  450.  
  451. SpeedUserListMDGMPPCI    = {"Set at adapter", "Force 4 MBit/s", "Force 16 MBit/s"}
  452. SpeedRawListMDGMPPCI     = {0, 1, 2}
  453.  
  454. SpeedUserListMDGMPPCMCIA = {"Set at adapter", "Force 4 MBit/s", "Force 16 MBit/s"}
  455. SpeedRawListMDGMPPCMCIA  = {0, 1, 2}
  456.  
  457. ;
  458. ; Adapter types.
  459. ;
  460.  
  461. AdapterTypeFlagMDGMPISA    = 100
  462. AdapterTypeFlagMDGMPATP    = 100
  463. AdapterTypeFlagMDGMPISAC   = 100
  464. AdapterTypeFlagMDGMPISACP  = 100
  465. AdapterTypeFlagMDGMPPC     = 100
  466. AdapterTypeFlagMDGMPEISA   = 500
  467. AdapterTypeFlagMDGMPMCA    = 600
  468. AdapterTypeFlagMDGMPMC32   = 600
  469. AdapterTypeFlagMDGMPSM16   = 400
  470. AdapterTypeFlagMDGMPPNP    = 300
  471. AdapterTypeFlagMDGMPPCI    = 700
  472. AdapterTypeFlagMDGMPPCMCIA = 200
  473.  
  474. ;
  475. ; Messages.
  476. ;
  477.  
  478. CANNOT_FIND_ANY_CARD = "Cannot find a Madge Smart Ringnode in the machine. "+
  479.                        "If you are certain that a Madge Smart Ringode is "+
  480.                        "present then try choosing the adapter type "+
  481.                        "instead of automatic installation. Please note "+
  482.                        "that EISA and MCA adapters will only be found if "+
  483.                        "the EISA configuration utility or PS/2 reference "+
  484.                        "diskette respectively have been used to configure "+
  485.                        "the adapter. Also not that automated installation "+
  486.                        "will not find PCI adapters - please choose the " +
  487.                        "Madge Smart 16/4 PCI Ringnode option directly."
  488.  
  489. TRIMMED_MFS = "WARNING: The maximum frame size at 16Mbps is 17839 bytes"+
  490.           "  and you have specified a value greater than that. This"+
  491.           "  value has been reduced to 17839 for you. If you are in"+
  492.           "  fact running at 4Mbps, the maximum frame size is 4472,"+
  493.           "  but do not worry -  the driver will automatically  set"+
  494.           "  the correct value, and write it to the Event Log."
  495.  
  496. ShellCodeErrorTitle = "Error: "$(FunctionTitle)
  497. ShellCodeErrorText  = "Shell Code Error"
  498.  
  499. ProCaption   = "Windows NT Setup"
  500. ProCancel    = "Cancel"
  501. ProCancelMsg = "Windows NT Networking is not correctly installed.  "+
  502.                "Are you sure you want to cancel copying files?"
  503. ProCancelCap = "Network Setup Message"
  504. ProText1     = "Copying:"
  505. ProText2     = "To:"
  506.  
  507. ; ---------------------------------------------------------------------
  508. ; Language dependant general dialog constants.
  509. ; ---------------------------------------------------------------------
  510.  
  511. [DialogConstantsENG]
  512.  
  513. ;
  514. ; Common button names, etc.
  515. ;
  516.  
  517. Help        = "&Help"
  518. Exit        = "&Cancel"
  519. OK          = "&OK"
  520. Continue    = "C&ontinue"
  521. Cancel      = "C&ancel"
  522. HelpContext = ""
  523.  
  524. OldValueTitleInstall   = "Current hardware settings"
  525. OldValueTitleConfigure = "Currently configured settings"
  526.  
  527. ConsultHelp = "Consult help before changing the settings below"
  528.  
  529. [date]
  530.  
  531.     ; Now is a list which contains { Sec from 1-1-1970, Year, Month, Day, Hour,
  532.     ; Minute, Second }
  533.     Now = {} ? $(!LIBHANDLE) GetSystemDate
  534.  
  535. ; -----------------------------------------------------------------------
  536. ; Language depentant input dialog constants.
  537. ; -----------------------------------------------------------------------
  538.  
  539. [FileDependentDlgENG]
  540.  
  541. DlgType     = "RadioCombination"
  542. DlgTemplate = $(Option)
  543.  
  544. Caption = $(FunctionTitle)
  545.  
  546. Combo1Label = "&IRQ Level:"
  547. Combo2Label = "I/O &Location:"
  548. Combo3Label = "&Transfer method:"
  549. Combo4Label = "Rx/Tx &Buffers:"
  550. Combo5Label = "Traffic &Statistics Gathering:"
  551. Combo6Label = "Please choose a Madge adapter to install"
  552. Combo7Label = "Number of processors in &PC:"
  553. Combo8Label = "Slot &Number:"
  554. Combo9Label = "&Ring Speed:"
  555.  
  556. PciCombo8Label = "PCI &Device ID:"
  557.  
  558. Combo1List = $(IrqList)
  559. Combo1Out  = $(IrqNumber)
  560.  
  561. Combo2List = $(IoList)
  562. Combo2Out  = $(IoLocation)
  563.  
  564. Combo3List = $(DmaList)
  565. Combo3Out  = $(DmaChannel)
  566.  
  567. Combo4List = $(RxTxUserList)
  568. Combo4Out  = $(RxTxSlots)
  569.  
  570. Combo5List = $(StatsUserList)
  571. Combo5Out  = $(StatsFlag)
  572.  
  573. Combo6List = $(AdapterDescList)
  574. Combo6Out  = $(AdapterType)
  575.  
  576. Combo7List = $(MpList)
  577. Combo7Out  = $(MpFlag)
  578.  
  579. Combo8List = $(SlotList)
  580. Combo8Out  = $(SlotNumber)
  581.  
  582. Combo9List = $(SpeedUserList)
  583. Combo9Out  = $(SpeedFlag)
  584.  
  585. ComboListItemsIn  = {Combo1List, Combo2List, Combo3List, Combo4List, Combo5List, Combo6List, Combo7List, Combo8List, Combo9List}
  586. ComboListItemsOut = {Combo1Out, Combo2Out, Combo3Out, Combo4Out, Combo5Out, Combo6Out, Combo7Out, Combo8Out, Combo9Out}
  587.  
  588. Edit1Label  = "Max&FrameSize:"
  589. Edit2Label  = "&LAA:"
  590. EditTextIn  = {$(MaxFrameSize), $(LAA)}
  591. EditTextLim = {5,17}
  592. EditTextOut = {}
  593.  
  594. CBOptionsGreyed = {}
  595. NotifyFields = {NO, NO, NO, NO, NO, NO, NO, NO}
  596.  
  597. HelpContext = $(MadgeHelpId$(Option))
  598.  
  599. AdapterTitle = #(OptionsText$(!STF_LANGUAGE),$(Option),1)
  600.  
  601. ;---------------------------------------------------------------------------
  602. ; Identify the INF file to NT.
  603. ;
  604. ; DESCRIPTION:   To verify that this INF deals with the same type of options
  605. ;                as we are choosing currently.
  606. ;
  607. ; INPUT:         None
  608. ;
  609. ; OUTPUT:        $($R0): STATUS: STATUS_SUCCESSFUL
  610. ;                $($R1): Option Type (COMPUTER ...)
  611. ;                $($R2): Diskette description
  612. ;---------------------------------------------------------------------------
  613.  
  614. [Identify]
  615.  
  616.     read-syms Identification
  617.  
  618.     set Status     = STATUS_SUCCESSFUL
  619.     set Identifier = $(OptionType)
  620.     set Media      = #("Source Media Descriptions", 1, 1)
  621.  
  622.     return $(Status) $(Identifier) $(Media)
  623.  
  624. ;------------------------------------------------------------------------
  625. ; Return the options supported by this INF file.
  626. ;
  627. ; DESCRIPTION:   To return the option list supported by this INF and the
  628. ;                localised text list representing the options.
  629. ;
  630. ;
  631. ; INPUT:         $($0):  Language used. ( ENG | FRN | ... )
  632. ;
  633. ; OUTPUT:        $($R0): STATUS: STATUS_SUCCESSFUL |
  634. ;                                STATUS_NOLANGUAGE
  635. ;                                STATUS_FAILED
  636. ;                                STATUS_NOTSUPPORTED
  637. ;
  638. ;                $($R1): Option List
  639. ;                $($R2): Option Text List
  640. ;------------------------------------------------------------------------
  641.  
  642. [ReturnOptions]
  643.  
  644.     set Status         = STATUS_FAILED
  645.     set OptionList     = {}
  646.     set OptionTextList = {}
  647.  
  648.     ;
  649.     ; Check if the language requested is supported.
  650.     ;
  651.  
  652.     set LanguageList = ^(LanguagesSupported, 1)
  653.  
  654.     ifcontains(i) $($0) in $(LanguageList)
  655.     ;
  656.     ;
  657.     ; Check if the platforms requested is supported
  658.     ;
  659.  
  660.     ifstr(i) $($1) == ""
  661.         ;
  662.         goto Return_Options
  663.         ;
  664.     endif
  665.  
  666.     set PlatformList = ^(PlatformsSupported, 1)
  667.  
  668.     ifcontains(i) $($1) in $(PlatformList)
  669.         ;
  670.         goto Return_Options
  671.         ;
  672.     else
  673.         ;
  674.         set Status = STATUS_NOTSUPPORTED
  675.  
  676.         goto Finish_ReturnOptions
  677.         ;
  678.     endif
  679.     ;
  680.     else
  681.     ;
  682.         set Status = STATUS_NOLANGUAGE
  683.  
  684.     goto Finish_ReturnOptions
  685.     ;
  686.     endif
  687.  
  688.     ;
  689.     ; form a list of all the options and another of the text representing
  690.     ;
  691.  
  692. Return_Options = +
  693.  
  694.     set OptionList     = ^(Options, 1)
  695.     set OptionTextList = ^(OptionsText$($0), 1)
  696.     set Status         = STATUS_SUCCESSFUL
  697.  
  698. Finish_ReturnOptions = +
  699.  
  700.     return $(Status) $(OptionList) $(OptionTextList)
  701.  
  702.  
  703. ;----------------------------------------------------------------------------
  704. ; Prepare an adapter detection DLL for use.
  705. ;----------------------------------------------------------------------------
  706.  
  707. [PrepareDetectionDll]
  708.  
  709.     set NewDllName = $($0)
  710.     set Status     = STATUS_FAILED
  711.  
  712.     read-syms GeneralConstants
  713.  
  714.     set DllValueName = "NetcardDlls"
  715.  
  716.     OpenRegKey $(!REG_H_LOCAL) "" "System\Setup" $(MAXIMUM_ALLOWED) KeySetup
  717.  
  718.     ifstr(i) $(KeySetup) == $(KeyNull)
  719.     ;
  720.     goto PDD_Return
  721.     ;
  722.     endif
  723.  
  724.     set DllFound = 0
  725.  
  726.     GetRegValue $(KeySetup) $(DllValueName) DllNamesValue
  727.  
  728.     ifint $(RegLastError) != $(!REG_ERROR_SUCCESS)
  729.     ;
  730.     goto PDD_Return
  731.     ;
  732.     endif
  733.  
  734.     set DllNames = *($(DllNamesValue),4)
  735.  
  736.     ForListDo $(DllNames)
  737.     ;
  738.     ifstr(i) $($) == $(NewDllName)
  739.         ;
  740.         set DllFound = 1
  741.         ;
  742.     endif
  743.     ;
  744.     EndForListDo
  745.  
  746.     ifint $(DllFound) == 0
  747.     ;
  748.     set DllNames  = >($(DllNames),$(NewDllName))
  749.     set ValueInfo = {$(DllValueName), $(NoTitle), $(!REG_VT_MULTI_SZ), $(DllNames)}
  750.  
  751.         SetRegValue $(KeySetup) $(ValueInfo)
  752.  
  753.     ifint $(RegLastError) == $(!REG_ERROR_SUCCESS)
  754.         ;
  755.         Set Status = STATUS_SUCCESSFUL
  756.         ;
  757.     endif
  758.     ;
  759.     else
  760.     ;
  761.     set Status = STATUS_SUCCESSFUL
  762.     ;
  763.     endif
  764.  
  765.     CloseRegKey $(KeySetup)
  766.  
  767. PDD_Return = +
  768.  
  769.     return $(Status)
  770.  
  771. ;------------------------------------------------------------------------
  772. ; InstallOption:
  773. ;
  774. ;      This section is shelled to by main installation processing
  775. ;      or by NCPASHEL.INF during reconfig, removal, update, etc.
  776. ;
  777. ;
  778. ; FUNCTION:  To copy files representing Options
  779. ;            To configure the installed option
  780. ;            To update the registry for the installed option
  781. ;
  782. ; INPUT:     $($0):  Language to use
  783. ;            $($1):  OptionID to install
  784. ;            $($2):  SourceDirectory
  785. ;            $($3):  AddCopy  (YES | NO)
  786. ;            $($4):  DoCopy   (YES | NO)
  787. ;            $($5):  DoConfig (YES | NO)
  788. ;
  789. ; OUTPUT:    $($R0): STATUS: STATUS_SUCCESSFUL |
  790. ;                            STATUS_NOLANGUAGE |
  791. ;                            STATUS_USERCANCEL |
  792. ;                            STATUS_FAILED
  793. ;------------------------------------------------------------------------
  794.  
  795. [InstallOption]
  796.  
  797.     StartWait
  798.     
  799.     ;
  800.     ; Un-comment for debugging.
  801.     ;
  802.  
  803.     ; set !DebugOutputControl = 1
  804.  
  805.     ;
  806.     ; Set default values.
  807.     ;
  808.  
  809.     set Status = STATUS_FAILED
  810.  
  811.     ;
  812.     ; extract parameters
  813.     ;
  814.  
  815.     set Option   = $($1)
  816.     set SrcDir   = $($2)
  817.     set AddCopy  = $($3)
  818.     set DoCopy   = $($4)
  819.     set DoConfig = $($5)
  820.  
  821.     Debug-Output "MADGE: STF_CWDIR    = "$(!STF_CWDIR)
  822.     Debug-Output "MADGE: STF_LANGUAGE = "$(!STF_LANGUAGE)
  823.     Debug-Output "MADGE: Option       = "$(Option)
  824.     Debug-Output "MADGE: SrcDir       = "$(SrcDir)
  825.     Debug-Output "MADGE: AddCopy      = "$(AddCopy)
  826.     Debug-Output "MADGE: DoCopy       = "$(DoCopy)
  827.     Debug-Output "MADGE: DoConfig     = "$(DoConfig)
  828.  
  829.     ;
  830.     ; Check if the language requested is supported
  831.     ;
  832.  
  833.     set LanguageList = ^(LanguagesSupported, 1)
  834.     
  835.     ifcontains(i) $($0) NOT-IN $(LanguageList)
  836.     ;
  837.     return STATUS_NOLANGUAGE
  838.     ;
  839.     endif
  840.  
  841.     ;
  842.     ; Define all the constants
  843.     ;
  844.  
  845.     set-subst LF = "\n"
  846.  
  847.     read-syms GeneralConstants
  848.     read-syms FileConstants
  849.     read-syms DialogConstants$(!STF_LANGUAGE)
  850.  
  851.     ifstr(i) $(!NTN_Origination) == "NCPA"
  852.     ;
  853.     set Continue = $(OK)
  854.     ;
  855.     endif
  856.  
  857.     read-syms FileConstants$(!STF_LANGUAGE)
  858.  
  859.     SetHelpFile "mdgmpdlg.hlp" $(MadgeHelpIdMin) $(MadgeHelpIdMax)
  860.  
  861.     detect date
  862.  
  863.     set-title $(FunctionTitle)
  864.  
  865.     set To   = Begin
  866.     set From = Begin
  867.  
  868.     ;
  869.     ; Assume all is well.
  870.     ;
  871.  
  872.     set CommonStatus = STATUS_SUCCESSFUL
  873.  
  874.     EndWait
  875.  
  876. ; -----------------------------------------------------------------------
  877. ; Set up the operation-mode-based variables and gaily welcome
  878. ; the user.  If the "install mode" variable is improperly set,
  879. ; assume this is a new installation.
  880. ; -----------------------------------------------------------------------
  881.  
  882. Begin = +
  883.  
  884.     ;
  885.     ; Until proven otherwise we assume that the adapter has not been
  886.     ; detected by our NetDetect DLL and we have not done any raw->user
  887.     ; mapping of parameter lists.
  888.     ;
  889.  
  890.     set AdapterDetected     = FALSE
  891.     set MappedRawParameters = FALSE
  892.  
  893.     ifstr(i) $(!NTN_InstallMode) == deinstall
  894.     ;
  895.         set StartLabel = Remove_Adapter
  896.     ;
  897.     else-ifstr(i) $(!NTN_InstallMode) == Update
  898.     ;
  899.     set StartLabel = Upgrade_Software
  900.     ;
  901.     else-ifstr(i) $(!NTN_InstallMode) == bind
  902.     ;
  903.         set StartLabel = Binding_Adapter
  904.     ;
  905.     else-ifstr(i) $(!NTN_InstallMode) == configure
  906.     ;
  907.         set CommonStatus = STATUS_REBOOT
  908.         set StartLabel = Configure_Adapter
  909.  
  910.         ;
  911.         ;   You cannot config the software component
  912.         ;
  913.  
  914.         ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
  915.         ;
  916.             Shell $(UtilityInf),RegistryErrorString,CANNOT_CONFIGURE_SOFTWARE
  917.  
  918.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  919.             ;
  920.         goto Shell_Code_Error
  921.             ;
  922.         endif
  923.  
  924.         set Error = $($R0)
  925.         set From  = End
  926.         set To    = End
  927.         goto Non_Fatal_Info
  928.         ;
  929.     endif
  930.     ;
  931.     else
  932.     ;
  933.     set StartLabel           = Install_Adapter
  934.     set OEM_ABANDON_OPTIONS  = {}
  935.     set OEM_ABANDON_SOFTWARE = FALSE
  936.     set OEM_ABANDON_ON       = TRUE
  937.     ;
  938.     endif
  939.  
  940.     set From = Fatal
  941.     set To   = Fatal
  942.  
  943.     goto $(StartLabel)
  944.  
  945.  
  946. ; ----------------------------------------------------------------------
  947. ; Installation Section
  948. ; ----------------------------------------------------------------------
  949.  
  950. Install_Adapter = +
  951.  
  952.     ;
  953.     ; First, check whether the same version of the software exists
  954.     ;
  955.  
  956.     OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct
  957.  
  958.     Ifstr $(KeyProduct) != $(KeyNull)
  959.     ;
  960.     ;
  961.     ; Same version already existed in the local machine
  962.     ; Popup the dialog and ask the user whether he wants to continue
  963.     ;
  964.     CloseRegKey $(KeyProduct)
  965.  
  966.     ifstr(i) $(!NTN_RegBase) == $(ProductKeyName)
  967.         ;
  968.        ;
  969.        ; Cannot Install the same software again
  970.        ;
  971.  
  972.        Shell $(UtilityInf), VerExistedDlg, $(ProductSoftwareTitle),+
  973.            $(ProductVersion)
  974.  
  975.        ifint $($ShellCode) != $(!SHELL_CODE_OK)
  976.            ;
  977.            goto Shell_Code_Error
  978.            ;
  979.        endif
  980.  
  981.        goto End
  982.         ;
  983.     else
  984.         ;
  985.            ;
  986.            ; Make sure the user really wants to add a new adapter.
  987.            ; Don't bother for automatic installation.
  988.            ;
  989.  
  990.            ifstr(i) $(Option) != "MDGMPAUTO"
  991.            ;
  992.                ;
  993.            ; Add a new adapter card?
  994.            ;
  995.  
  996.               Shell $(UtilityInf), CardExistedDlg
  997.  
  998.            ifint $($ShellCode) != $(!SHELL_CODE_OK)
  999.                ;
  1000.                goto Shell_Code_Error
  1001.                ;
  1002.            endif
  1003.  
  1004.            ifstr(i) $($R1) != "OK"
  1005.                ;
  1006.                goto End
  1007.                ;
  1008.            endif
  1009.            ;
  1010.            endif
  1011.  
  1012.        set OldVersionExisted = $(TRUE)
  1013.         ;
  1014.     endif
  1015.     ;
  1016.     endif
  1017.  
  1018. ; -----------------------------------------------------------------------
  1019. ; Copy the driver and helper files from the distribution disk.
  1020. ; -----------------------------------------------------------------------
  1021.  
  1022. Install_Files = +
  1023.  
  1024.     ifint $(OldVersionExisted) == $(FALSE)
  1025.     ;
  1026.     ifstr(i) $(!NTN_InstallMode) == "install"
  1027.         ;
  1028.             ;
  1029.             ; NB !STF_SRCDIR is set to something unhelpful like E:\i386\, 
  1030.             ; but if we omit the last parameter, DoAskSource will default 
  1031.             ; to using A:\
  1032.             ;
  1033.             ; Shell $(UtilityInf), DoAskSource, $(!STF_CWDDIR), $(!STF_SRCDIR)
  1034.             ;
  1035.  
  1036.         Shell $(UtilityInf), DoAskSource, $(!STF_CWDDIR)
  1037.  
  1038.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  1039.             ;
  1040.             goto Shell_Code_Error
  1041.             ;
  1042.         else-ifstr(i) $($R0) == STATUS_FAILED
  1043.             ;
  1044.         shell $(UtilityInf) RegistryErrorString "ASK_SOURCE_FAIL"
  1045.  
  1046.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  1047.                 ;
  1048.                 goto Shell_Code_Error
  1049.                 ;
  1050.             endif
  1051.  
  1052.             set Error = $($R0)
  1053.             goto Fatal
  1054.  
  1055.         else-ifstr(i) $($R0) == STATUS_USERCANCEL
  1056.             ;
  1057.             goto Successful
  1058.             ;
  1059.         endif
  1060.  
  1061.         set SrcDir = $($R1)   ; Referenced in install sections.
  1062.  
  1063.             ;
  1064.             ; Install the detection DLL.
  1065.             ;
  1066.  
  1067.             Shell "" PrepareDetectionDll $(DetectDllName)
  1068.  
  1069.             ifstr(i) $($R0) != STATUS_SUCCESSFUL
  1070.             ;
  1071.                 goto Fatal
  1072.             ;
  1073.             endif
  1074.  
  1075.         install "Install-Option"
  1076.  
  1077.         ifstr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS
  1078.             ;
  1079.         shell $(UtilityInf) RegistryErrorString "UNABLE_COPY_FILE"
  1080.  
  1081.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  1082.                 ;
  1083.             goto Shell_Code_Error
  1084.                 ;
  1085.         endif
  1086.  
  1087.         set Error = $($R0)
  1088.         goto Fatal
  1089.             ;
  1090.         endif
  1091.         ;
  1092.     endif
  1093.     ;
  1094.     endif
  1095.  
  1096. ; -----------------------------------------------------------------------
  1097. ; If the adapter option is MDGMPAUTO then we need to perform some adapter
  1098. ; detection. In addition, we may not have been asked to detect the 
  1099. ; adapter but NCPA may have already done it for use. If it has then set 
  1100. ; up the detection variables from the values passed by NCPA.
  1101. ; -----------------------------------------------------------------------
  1102.  
  1103.     ifstr(i) $(!STF_NCDETECT) == YES
  1104.     ;
  1105.         ifstr(i) $(!STF_NCOPTION) == $(Option)
  1106.         ;
  1107.             set AdapterDetected = TRUE
  1108.             set DetectOption    = $(!STF_NCOPTION)
  1109.             set DetectIndex     = $(!STF_NCDETCARD)
  1110.  
  1111.             goto Set_Installation_Defaults
  1112.         ;
  1113.         endif
  1114.     ;
  1115.     endif
  1116.  
  1117.     ;
  1118.     ; If NCPA has not already detected an adapter then we must
  1119.     ; initialize the detection DLL. We mustn't re-initalise it
  1120.     ; if NCPA has detected an adapter else we will trash the
  1121.     ; adapter information found by NCPA.
  1122.     ;
  1123.  
  1124.     Shell $(ParamInf) Param_ControlDetection DTEND
  1125.     Shell $(ParamInf) Param_ControlDetection DTSTART
  1126.  
  1127.     ifstr(i) $(Option) != "MDGMPAUTO"
  1128.     ;
  1129.         goto Set_Installation_Defaults
  1130.     ;
  1131.     endif
  1132.  
  1133. ; -----------------------------------------------------------------------
  1134. ; We have been asked to search for adapters. We will call our NetDetec
  1135. ; DLL via helper functions to build a list of Madge adapters present in
  1136. ; the machine that have not yet been installed.
  1137. ; -----------------------------------------------------------------------
  1138.  
  1139. Detect_Adapters = +
  1140.  
  1141.     StartWait
  1142.  
  1143.     ;
  1144.     ; Initialise the adapter description and detection index lists.
  1145.     ;
  1146.  
  1147.     set AdapterOptionList = {}
  1148.     set AdapterDescList   = {}
  1149.     set AdapterIndexList  = {}
  1150.  
  1151. DA_Loop = +
  1152.  
  1153.     ;
  1154.     ; Call the detection DLL via a helper function to find the
  1155.     ; next adapter.
  1156.     ;
  1157.  
  1158.     Shell $(ParamInf) Param_DetectCard
  1159.  
  1160.     set DetectResult = $($R0)
  1161.     set Status       = *($(DetectResult),1)
  1162.  
  1163.     ifstr(i) $(Status) != 0
  1164.     ;
  1165.     goto DA_Loop_End
  1166.     ;
  1167.     endif
  1168.  
  1169.     set DetectOption = *($(DetectResult),2)
  1170.     set DetectIndex  = *($(DetectResult),3)
  1171.  
  1172.     ;
  1173.     ; If the adapter is not a Madge adapter then start the
  1174.     ; loop again to skip the adapter.
  1175.     ;
  1176.  
  1177.     ifcontains(i) $(DetectOption) not-in $(MadgeAdapterOptions)
  1178.     ;
  1179.         goto DA_Loop
  1180.     ;
  1181.     endif
  1182.  
  1183.     ;
  1184.     ; Now find out the slot number or IO location to show to the
  1185.     ; user.
  1186.     ;
  1187.  
  1188.     ifcontains(i) $(DetectOption) in $(SlotNumberAdapters)
  1189.     ;
  1190.         set TypeList = {{SLOTNUMBER,SlotList,SlotNumber},+
  1191.                         {DMACHANNEL,DmaList,DmaChannel},+
  1192.                         {MULTIPROCESSOR,MpList,MpFlag}}
  1193.     ;
  1194.     else
  1195.     ;
  1196.         set TypeList = {{IOLOCATION,IoList,IoLocation},+
  1197.                         {DMACHANNEL,DmaList,DmaChannel},+
  1198.                         {INTERRUPTNUMBER,IrqList,IrqNumber},+
  1199.                         {MULTIPROCESSOR,MpList,MpFlag}}
  1200.     ;
  1201.     endif
  1202.  
  1203.     Shell $(ParamInf) Param_BuildTypeLists $(DetectOption) $(TypeList)
  1204.  
  1205.     set Status = $($R0)
  1206.  
  1207.     ifstr(i) $(Status) != STATUS_SUCCESSFUL
  1208.     ;
  1209.     goto Fatal
  1210.     ;
  1211.     endif
  1212.  
  1213.     Shell $(ParamInf) Param_QueryCard $(DetectIndex)
  1214.  
  1215.     set Status    = $($R0)
  1216.     set ParamList = $($R1)
  1217.  
  1218.     ifstr(i) $(Status) != STATUS_SUCCESSFUL
  1219.     ;
  1220.     goto Fatal
  1221.     ;
  1222.     endif
  1223.  
  1224.     Shell $(ParamInf) Param_SetDefaults $(ParamList)
  1225.  
  1226.     ;
  1227.     ; Build a list of adapters to show to the user.
  1228.     ;
  1229.  
  1230.     set AdapterOptionList = >($(AdapterOptionList),$(DetectOption))
  1231.     set AdapterIndexList  = >($(AdapterIndexList),$(DetectIndex))
  1232.     set AdapterDesc       = #(OptionsChoice$(!STF_LANGUAGE),$(DetectOption),1)
  1233.  
  1234.     ifcontains(i) $(DetectOption) in $(SlotNumberAdapters)
  1235.     ;
  1236.         set AdapterDesc     = $(AdapterDesc)$(SlotNumber)
  1237.         set AdapterDescList = >($(AdapterDescList),$(AdapterDesc))
  1238.     ;
  1239.     else
  1240.     ;
  1241.         set IoLocation      = *($(IoUserList),~($(IoRawList),$(IoLocation)))
  1242.         set AdapterDesc     = $(AdapterDesc)$(IoLocation)
  1243.         set AdapterDescList = >($(AdapterDescList),$(AdapterDesc))
  1244.     ;
  1245.     endif
  1246.  
  1247.     ;
  1248.     ; And look for another adapter.
  1249.     ;
  1250.  
  1251.     goto DA_Loop
  1252.  
  1253. DA_Loop_End = +
  1254.  
  1255.     EndWait
  1256.  
  1257.     Debug-Output "MADGE: AdapterOptionList  = "$(AdapterOptionList)
  1258.     Debug-Output "MADGE: AdapterDescList    = "$(AdapterDescList)
  1259.     Debug-Output "MADGE: AdapterIndexList   = "$(AdapterIndexList)
  1260.  
  1261.     ;
  1262.     ; Give up if we can't find any adapters.
  1263.     ;
  1264.  
  1265.     ifstr(i) $(AdapterOptionList) == {}
  1266.     ;
  1267.         set Error = $(CANNOT_FIND_ANY_CARD)
  1268.         goto Fatal
  1269.     ;
  1270.     endif
  1271.  
  1272. ;------------------------------------------------------------------------
  1273. ; We now have a list of adapter descriptions and detection indexes. 
  1274. ; Pop up a dialog box from which the user can choose which adapter
  1275. ; to install.
  1276. ;------------------------------------------------------------------------
  1277.  
  1278. Choose_Adapter = +
  1279.  
  1280.     StartWait
  1281.  
  1282.     ;
  1283.     ; Set the default choice.
  1284.     ;
  1285.  
  1286.     set AdapterType = *(AdapterDescList,1)
  1287.  
  1288.     read-syms FileDependentDlg$(!STF_LANGUAGE)
  1289.  
  1290.     set DlgTemplate = "MDGADAPTERS"
  1291.  
  1292.     ;
  1293.     ; Load the DLL.
  1294.     ;
  1295.  
  1296.     LoadLibrary "x" $(DialogDllName) MdgDialog
  1297.  
  1298.     ;
  1299.     ; Display the dialog box.
  1300.     ;
  1301.  
  1302.     EndWait
  1303.  
  1304.     ui start "InputDlg" $(MdgDialog)
  1305.  
  1306.     StartWait
  1307.  
  1308.     ifstr(i) $(DLGEVENT) == "EXIT"
  1309.     ;
  1310.     set CommonStatus = STATUS_USERCANCEL
  1311.     ui pop 1
  1312.     FreeLibrary $(MdgDialog)
  1313.     goto End
  1314.     ;
  1315.     else-ifstr(i) $(DLGEVENT) != "CONTINUE"
  1316.     ;
  1317.     ui pop 1
  1318.     FreeLibrary $(MdgDialog)
  1319.     goto End
  1320.     ;
  1321.     endif
  1322.  
  1323.     set AdapterType = $(Combo6Out)
  1324.  
  1325.     ui pop 1
  1326.     FreeLibrary $(MdgDialog)
  1327.  
  1328.     ;
  1329.     ; AdapterType now contains the description of the adapter
  1330.     ; the user wants to install. Find the option and detection index 
  1331.     ; value this corresponds to.
  1332.     ;
  1333.  
  1334.     Debug-Output "MADGE: AdapterType  = "$(AdapterType)
  1335.  
  1336.     set DetectOption = *($(AdapterOptionList),~($(AdapterDescList),$(AdapterType)))
  1337.     set DetectIndex  = *($(AdapterIndexList),~($(AdapterDescList),$(AdapterType)))
  1338.  
  1339.     Debug-Output "MADGE: DetectOption = "$(DetectOption)
  1340.     Debug-Output "MADGE: DetectIndex  = "$(DetectIndex)
  1341.  
  1342.     ;
  1343.     ; Set the flag to say that the adapter was detected and change the
  1344.     ; Option to the detected type.
  1345.     ;
  1346.  
  1347.     set AdapterDetected = TRUE
  1348.     set Option          = $(DetectOption)
  1349.  
  1350.     EndWait
  1351.  
  1352. ; -----------------------------------------------------------------------
  1353. ; Set some defaults that apply to all card types
  1354. ; -----------------------------------------------------------------------
  1355.  
  1356. Set_Installation_Defaults = +
  1357.  
  1358.     StartWait
  1359.  
  1360.     ; 
  1361.     ; Set up some defaults that are not affected by automatic detection.
  1362.     ;
  1363.  
  1364.     set MaxFrameSize  = 4096
  1365.     set LAA           = ""
  1366.     set RxTxSlots     = *($(RxTxRawList),3)
  1367.     set StatsFlag     = *($(StatsRawList),1)
  1368.     set SpeedFlag     = 0
  1369.  
  1370.     set OldIrqNumber  = $(VALUE_UNKNOWN)
  1371.     set OldDmaChannel = $(VALUE_UNKNOWN)
  1372.     set OldIoLocation = $(VALUE_UNKNOWN)
  1373.     set OldSlotNumber = $(VALUE_UNKNOWN)
  1374.     set OldMpFlag     = $(VALUE_UNKNOWN)
  1375.  
  1376.     ;
  1377.     ; Now set up the options for adapter options.
  1378.     ;
  1379.  
  1380.     ifcontains(i) $(Option) in $(SlotNumberAdapters)
  1381.     ;
  1382.         set TypeList = {{SLOTNUMBER,SlotList,SlotNumber},+
  1383.                         {DMACHANNEL,DmaList,DmaChannel},+
  1384.                         {MULTIPROCESSOR,MpList,MpFlag}}
  1385.     ;
  1386.     else
  1387.     ;
  1388.         set TypeList = {{IOLOCATION,IoList,IoLocation},+
  1389.                         {DMACHANNEL,DmaList,DmaChannel},+
  1390.                         {INTERRUPTNUMBER,IrqList,IrqNumber},+
  1391.                         {MULTIPROCESSOR,MpList,MpFlag}}
  1392.     ;
  1393.     endif
  1394.  
  1395.     Shell $(ParamInf) Param_BuildTypeLists $(Option) $(TypeList)
  1396.  
  1397.     set Status = $($R0)
  1398.  
  1399.     ifstr(i) $(Status) != STATUS_SUCCESSFUL
  1400.     ;
  1401.         goto Fatal
  1402.     ;
  1403.     endif
  1404.  
  1405.     ;
  1406.     ; If the adapter was automatically detected then call the
  1407.     ; DLL to find out what the parameters are.
  1408.     ;
  1409.  
  1410.     ifstr(i) $(AdapterDetected) == TRUE
  1411.     ;
  1412.         Shell $(ParamInf) Param_QueryCard $(DetectIndex)
  1413.  
  1414.         set Status    = $($R0)
  1415.         set ParamList = $($R1)
  1416.  
  1417.         ifstr(i) $(Status) != STATUS_SUCCESSFUL
  1418.         ;
  1419.             goto Fatal
  1420.         ;
  1421.         endif
  1422.     ;
  1423.     endif
  1424.  
  1425.     ;
  1426.     ; And set the defaults. This will be the automatically detected
  1427.     ; value if the adapter was detected or the first allowable choice
  1428.     ; otherwise. 
  1429.     ;
  1430.  
  1431.     Shell $(ParamInf) Param_SetDefaults $(ParamList)
  1432.  
  1433.     Debug-Output "MADGE: SlotNumber = "$(SlotNumber)
  1434.     Debug-Output "MADGE: IoLocation = "$(IoLocation)
  1435.     Debug-Output "MADGE: IrqNumber  = "$(IrqNumber)
  1436.     Debug-Output "MADGE: DmaChannel = "$(DmaChannel)
  1437.     Debug-Output "MADGE: MpFlag     = "$(MpFlag)
  1438.     Debug-Output "MADGE: SlotList   = "$(SlotList)
  1439.     Debug-Output "MADGE: IoList     = "$(IoList)
  1440.     Debug-Output "MADGE: IrqList    = "$(IrqList)
  1441.     Debug-Output "MADGE: DmaList    = "$(DmaList)
  1442.     Debug-Output "MADGE: MpList     = "$(MpList)
  1443.  
  1444.     ;
  1445.     ; Note what the hardware detectable values are for later.
  1446.     ;
  1447.  
  1448.     ifstr(i) $(AdapterDetected) == TRUE
  1449.     ;
  1450.         set OldSlotNumber = $(SlotNumber)
  1451.         set OldIoLocation = $(IoLocation)
  1452.         set OldIrqNumber  = $(IrqNumber)
  1453.         set OldDmaChannel = $(DmaChannel)
  1454.         set OldMpFlag     = $(MpFlag)
  1455.     ;
  1456.     endif
  1457.  
  1458.     set OldValueTitle = $(OldValueTitleInstall)
  1459.  
  1460.     EndWait
  1461.  
  1462.     goto Get_Adapter_Options
  1463.  
  1464. ; -----------------------------------------------------------------------
  1465. ; Configuration Section
  1466. ; -----------------------------------------------------------------------
  1467.  
  1468. Configure_Adapter = +
  1469.  
  1470.     StartWait
  1471.  
  1472.     ;
  1473.     ; Initialise the detection DLL.
  1474.     ;
  1475.  
  1476.     Shell $(ParamInf) Param_ControlDetection DTEND
  1477.     Shell $(ParamInf) Param_ControlDetection DTSTART
  1478.  
  1479.     ;
  1480.     ; Now set up the options for adapter options.
  1481.     ;
  1482.  
  1483.     ifcontains(i) $(Option) in $(SlotNumberAdapters)
  1484.     ;
  1485.         set TypeList = {{SLOTNUMBER,SlotList,SlotNumber},+
  1486.                         {DMACHANNEL,DmaList,DmaChannel},+
  1487.                         {MULTIPROCESSOR,MpList,MpFlag}}
  1488.     ;
  1489.     else
  1490.     ;
  1491.         set TypeList = {{IOLOCATION,IoList,IoLocation},+
  1492.                         {DMACHANNEL,DmaList,DmaChannel},+
  1493.                         {INTERRUPTNUMBER,IrqList,IrqNumber},+
  1494.                         {MULTIPROCESSOR,MpList,MpFlag}}
  1495.     ;
  1496.     endif
  1497.  
  1498.     Shell $(ParamInf) Param_BuildTypeLists $(Option) $(TypeList)
  1499.  
  1500.     set Status = $($R0)
  1501.  
  1502.     ifstr(i) $(Status) != STATUS_SUCCESSFUL
  1503.     ;
  1504.         goto Fatal
  1505.     ;
  1506.     endif
  1507.  
  1508.     ;
  1509.     ; And set the defaults. 
  1510.     ;
  1511.  
  1512.     Shell $(ParamInf) Param_SetDefaults $(ParamList)
  1513.  
  1514.     ;
  1515.     ; Set up the defaults not done by the help interface the
  1516.     ; detection DLL above.
  1517.     ;
  1518.  
  1519.     set MaxFrameSize = 4096
  1520.     set LAA          = ""
  1521.     set RxTxSlots    = *($(RxTxRawList),3)
  1522.     set StatsFlag    = *($(StatsRawList),1)
  1523.     set NoMmioFlag   = 0
  1524.     set SpeedFlag    = 0
  1525.  
  1526.     ;
  1527.     ; NB !NTN_RegBase, for hardware components, is :
  1528.     ;    \SOFTWARE\Microsoft\Windows NT\CurrentVersion\NetworkCards\0x
  1529.     ;
  1530.  
  1531.     ;
  1532.     ; This next IF is redundant - it will always be NULL
  1533.     ;
  1534.  
  1535.     ifstr $(KeyProduct) == $(KeyNull)
  1536.     ;
  1537.     OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_RegBase) $(MAXIMUM_ALLOWED) KeyProduct
  1538.  
  1539.     ifstr $(KeyProduct) == $(KeyNull)
  1540.         ;
  1541.         set RegistryErrorIndex = CANNOT_FIND_COMPONENT_SERVICE
  1542.         goto Fatal_Registry
  1543.         ;
  1544.     endif
  1545.     ;
  1546.     endif
  1547.  
  1548.     ;
  1549.     ; Get the other parameters; they're attached to the service 
  1550.     ; parameters key
  1551.     ;
  1552.  
  1553.     Shell $(UtilityInf) FindService, $(KeyProduct)
  1554.  
  1555.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  1556.     ;
  1557.         goto Shell_Code_Error
  1558.     ;
  1559.     endif
  1560.  
  1561.     ifstr(i) $($R0) != NO_ERROR
  1562.     ;
  1563.         goto Fatal_Registry
  1564.     ;
  1565.     endif
  1566.  
  1567.     set KeyParameters = $($R2)
  1568.  
  1569.     ;
  1570.     ; We don't need the services key, so close it.
  1571.     ;
  1572.  
  1573.     CloseRegKey $($R1)
  1574.  
  1575.     ifstr $(KeyParameters) == $(KeyNull)
  1576.     ;
  1577.         set RegistryErrorIndex = CANNOT_FIND_COMPONENT_SERVICE
  1578.         goto Fatal_Registry
  1579.     ;
  1580.     endif
  1581.  
  1582.     set OldVersionExisted = $(TRUE)
  1583.  
  1584.     ;
  1585.     ; Get the old values
  1586.     ;
  1587.  
  1588.     set ValueName = ""
  1589.     set ValueData = ""
  1590.     set ValueStr  = ""
  1591.     set ValueList = {}
  1592.  
  1593.     EnumRegValue $(KeyParameters) ValueList
  1594.  
  1595.     ForListDo $(ValueList)
  1596.     ;
  1597.     set ValueItem = $($)
  1598.     set ValueName = *($(ValueItem),1)
  1599.     set ValueData = *($(ValueItem),4)
  1600.  
  1601.     ifstr(i) $(ValueName) == "InterruptNumber"
  1602.         ;
  1603.         set IrqNumber = $(ValueData)
  1604.         ;
  1605.     else-ifstr(i) $(ValueName) == "IoLocation"
  1606.         ;
  1607.         set IoLocation = $(ValueData)
  1608.         ;
  1609.     else-ifstr(i) $(ValueName) == "IoBaseAddress"
  1610.         ;
  1611.         set IoLocation = $(ValueData)
  1612.         ;
  1613.     else-ifstr(i) $(ValueName) == "DmaChannel"
  1614.         ;
  1615.         set DmaChannel = $(ValueData)
  1616.         ;
  1617.     else-ifstr(i) $(ValueName) == "SlotNumber"
  1618.         ;
  1619.         set SlotNumber = $(ValueData)
  1620.         ;
  1621.     else-ifstr(i) $(ValueName) == $(McaEisaKeyword)
  1622.         ;
  1623.         set McaEisaId = $(ValueData)
  1624.         ;
  1625.     else-ifstr(i) $(ValueName) == "MaxFrameSize"
  1626.         ;
  1627.         set MaxFrameSize = $(ValueData)
  1628.         ;
  1629.     else-ifstr(i) $(ValueName) == "NetworkAddress"
  1630.         ;
  1631.         set LAA = $(ValueData)
  1632.         ;
  1633.         else-ifstr(i) $(ValueName) == "RxTxSlots"
  1634.         ;
  1635.             set RxTxSlots = $(ValueData)
  1636.         ;
  1637.         else-ifstr(i) $(ValueName) == "PromiscuousModeX"
  1638.         ;
  1639.             set StatsFlag = $(ValueData)
  1640.         ;
  1641.         else-ifstr(i) $(ValueName) == "Multiprocessor"
  1642.         ;
  1643.             set MpFlag = $(ValueData)
  1644.         ;
  1645.         else-ifstr(i) $(ValueName) == "NoMmio"
  1646.         ;
  1647.             set NoMmioFlag = $(ValueData)
  1648.         ;
  1649.         else-ifstr(i) $(ValueName) == "Force16"
  1650.         ;
  1651.             set SpeedFlag = 2
  1652.         ;
  1653.         else-ifstr(i) $(ValueName) == "Force4"
  1654.         ;
  1655.             set SpeedFlag = 1
  1656.         ;
  1657.     endif
  1658.  
  1659.     ;
  1660.     EndForListDo
  1661.  
  1662.     ;
  1663.     ; For backward compatibility we translate a DMA channel of 0x8000
  1664.     ; into a DMA channel of $(GENERAL_PIO) and a multiprocessor flag of 1.
  1665.     ; 
  1666.  
  1667.     ifint $(DmaChannel) == 32768
  1668.     ;
  1669.         set DmaChannel = $(GENERAL_PIO)
  1670.         set MpFlag     = 1
  1671.     ;
  1672.     endif
  1673.  
  1674.     ;
  1675.     ; We now need to merge the DmaChannel and NoMmioFlag to produce a
  1676.     ; DmaChannel that completely specifies the transfer mode. When
  1677.     ; we called the detection DLL to get the defaults DmaChannel will
  1678.     ; have been set up properly, including setting unspecific DMA for
  1679.     ; EISA and MC. If we have an MMIO supporting adapter the rule is
  1680.     ; as follows. 
  1681.     ;
  1682.     ; If the NoMmio flag is set then we must not use MMIO, so:
  1683.     ;
  1684.     ;     If DmaChannel is NOT set to $(GENERAL_MMIO) then we leave it
  1685.     ;     as it is. If DmaChannel is set to $(GENERAL_MMIO) then we
  1686.     ;     change it to $(GENERAL_PIO). This rule assumes that the 
  1687.     ;     detection routine will return a none $(GENERAL_MMIO) value
  1688.     ;     as the default OR the adapter supports PIO.
  1689.     ;
  1690.     ; If the NoMmio flag is not set then we may use MMIO, so:
  1691.     ;     
  1692.     ;     We set DmaChannel to $(GENERAL_MMIO).
  1693.     ;     
  1694.  
  1695.     ifcontains(i) $(Option) in $(MmioAdapters)
  1696.     ;
  1697.         ifint $(NoMmioFlag) == 0
  1698.         ;
  1699.             set DmaChannel = $(GENERAL_MMIO)
  1700.         ;
  1701.         else
  1702.         ;
  1703.             ifstr(i) $(DmaChannel) == $(GENERAL_MMIO)
  1704.             ;
  1705.                 set DmaChannel = $(GENERAL_PIO)
  1706.             ;
  1707.             endif
  1708.         ;
  1709.         endif
  1710.     ;
  1711.     endif
  1712.  
  1713.     ;
  1714.     ; Make a note of the current values.
  1715.     ;
  1716.  
  1717.     set OldSlotNumber = $(SlotNumber)
  1718.     set OldIoLocation = $(IoLocation)
  1719.     set OldIrqNumber  = $(IrqNumber)
  1720.     set OldDmaChannel = $(DmaChannel)
  1721.     set OldMpFlag     = $(MpFlag)
  1722.     
  1723.     set OldValueTitle = $(OldValueTitleConfigure)
  1724.  
  1725.     EndWait
  1726.  
  1727. ; -----------------------------------------------------------------------
  1728. ; Let the user set options.
  1729. ; -----------------------------------------------------------------------
  1730.  
  1731. Get_Adapter_Options = +
  1732.  
  1733.     StartWait
  1734.  
  1735.     ;
  1736.     ; Need to be able to tell if the LAA or statistics gathering
  1737.     ; flag have changed.
  1738.     ;
  1739.  
  1740.     set OldLAA       = $(LAA)
  1741.     set OldStatsFlag = $(StatsFlag)
  1742.     set OldSpeedFlag = $(SpeedFlag)
  1743.  
  1744.     ;
  1745.     ; Set up the list of adapter ring speeds.
  1746.     ;
  1747.  
  1748.     set SpeedRawList  = $(SpeedRawList$(Option))
  1749.     set SpeedUserList = $(SpeedUserList$(Option))
  1750.     
  1751.     ;
  1752.     ; Map the parameter lists into the form we present to the user.
  1753.     ; We only ever do this once.
  1754.     ;
  1755.  
  1756.     ifstr(i) $(MappedRawParameters) == FALSE
  1757.     ;
  1758.         ifcontains(i) $(Option) not-in $(SlotNumberAdapters)
  1759.         ;
  1760.             set TempList = $(IoList)
  1761.             set IoList   = {}
  1762.             ForListDo $(TempList)
  1763.             ;
  1764.                 set IoList = >($(IoList), *($(IoUserList),~($(IoRawList),$($))))
  1765.             ;
  1766.             EndForListDo
  1767.  
  1768.             set TempList = $(IrqList)
  1769.             set IrqList  = {}
  1770.             ForListDo $(TempList)
  1771.             ;
  1772.                 set IrqList = >($(IrqList), *($(IrqUserList),~($(IrqRawList),$($))))
  1773.             ;
  1774.             EndForListDo
  1775.         ;
  1776.         else
  1777.         ;
  1778.             set TempList = $(SlotList)
  1779.             set SlotList  = {}
  1780.             ForListDo $(TempList)
  1781.             ;
  1782.                 set SlotList = >($(SlotList), *($(SlotUserList),~($(SlotRawList),$($))))
  1783.             ;
  1784.             EndForListDo
  1785.         ;
  1786.         endif
  1787.  
  1788.         set TempList = $(DmaList)
  1789.         set DmaList  = {}
  1790.         ForListDo $(TempList)
  1791.         ;
  1792.             set DmaList = >($(DmaList), *($(DmaUserList),~($(DmaRawList),$($))))
  1793.         ;
  1794.         EndForListDo
  1795.  
  1796.         set TempList = $(MpList)
  1797.         set MpList   = {}
  1798.         ForListDo $(TempList)
  1799.         ;
  1800.             set MpList = >($(MpList), *($(MpUserList),~($(MpRawList),$($))))
  1801.         ;
  1802.         EndForListDo
  1803.  
  1804.         set MappedRawParameters = TRUE
  1805.     ;
  1806.     endif
  1807.  
  1808.     EndWait
  1809.  
  1810. Get_Adapter_Options_Restart = +
  1811.  
  1812.     ;
  1813.     ; We will start here if parameter validation fails.
  1814.     ;
  1815.  
  1816.     StartWait
  1817.  
  1818.     set From = Get_Adapter_Options_Restart
  1819.  
  1820.     ;
  1821.     ; Map the currently selected values into user from.
  1822.     ;
  1823.  
  1824.     ifcontains(i) $(Option) not-in $(SlotNumberAdapters)
  1825.     ;
  1826.         set IoLocation    = *($(IoUserList),~($(IoRawList),$(IoLocation)))
  1827.         set OldIoLocation = *($(IoUserList),~($(IoRawList),$(OldIoLocation)))
  1828.         set IrqNumber     = *($(IrqUserList),~($(IrqRawList),$(IrqNumber)))
  1829.         set OldIrqNumber  = *($(IrqUserList),~($(IrqRawList),$(OldIrqNumber)))
  1830.     ;
  1831.     else
  1832.     ;
  1833.         set SlotNumber    = *($(SlotUserList),~($(SlotRawList),$(SlotNumber)))
  1834.         set OldSlotNumber = *($(SlotUserList),~($(SlotRawList),$(OldSlotNumber)))
  1835.     ;
  1836.     endif
  1837.  
  1838.     set DmaChannel    = *($(DmaUserList),~($(DmaRawList),$(DmaChannel)))
  1839.     set OldDmaChannel = *($(DmaUserList),~($(DmaRawList),$(OldDmaChannel)))
  1840.     set MpFlag        = *($(MpUserList),~($(MpRawList),$(MpFlag)))
  1841.     set OldMpFlag     = *($(MpUserList),~($(MpRawList),$(OldMpFlag)))
  1842.     set StatsFlag     = *($(StatsUserList),~($(StatsRawList),$(StatsFlag)))
  1843.     set RxTxSlots     = *($(RxTxUserList),~($(RxTxRawList),$(RxTxSlots)))
  1844.     set SpeedFlag     = *($(SpeedUserList),~($(SpeedRawList),$(SpeedFlag)))
  1845.  
  1846.     ;
  1847.     ; Set up the input dialog box text and lists.
  1848.     ;
  1849.  
  1850.     read-syms FileDependentDlg$(!STF_LANGUAGE)
  1851.  
  1852.     ;
  1853.     ; Decide which dialog box to use.
  1854.     ;
  1855.  
  1856.     Debug-Output "MADGE: Option             = "$(Option)
  1857.     Debug-Output "MADGE: SlotNumberAdapters = "$(SlotNumberAdapters)
  1858.  
  1859.     ifcontains(i) $(Option) in $(SlotNumberAdapters)
  1860.     ;
  1861.     set DlgTemplate = "MDGEISA"
  1862.     ;
  1863.     else
  1864.     ;
  1865.         set DlgTemplate = "MDGISA"
  1866.     ;
  1867.     endif
  1868.  
  1869.     Debug-Output "MADGE: DlgTemplate = "$(DlgTemplate)
  1870.  
  1871.     ;
  1872.     ; To allow us to re-use the EISA/MCA dialog box for PCI we need
  1873.     ; to change Combo8Label.
  1874.     ;
  1875.  
  1876.     ifstr(i) $(Option) == "MDGMPPCI"
  1877.     ;
  1878.         set Combo8Label = $(PciCombo8Label)
  1879.     ;
  1880.     endif
  1881.  
  1882.     ;
  1883.     ; Let the user press some keys.
  1884.     ;
  1885.  
  1886.     LoadLibrary "x" $(DialogDllName) MdgDialog
  1887.  
  1888.     EndWait
  1889.  
  1890.     ui start "InputDlg" $(MdgDialog)
  1891.  
  1892.     StartWait
  1893.  
  1894.     ifstr(i) $(DLGEVENT) == "EXIT"
  1895.     ;
  1896.     set CommonStatus = STATUS_USERCANCEL
  1897.     ui pop 1
  1898.     FreeLibrary $(MdgDialog)
  1899.     goto End
  1900.     ;
  1901.     else-ifstr(i) $(DLGEVENT) != "CONTINUE"
  1902.     ;
  1903.     ui pop 1
  1904.     FreeLibrary $(MdgDialog)
  1905.     goto End
  1906.     ;
  1907.     endif
  1908.  
  1909.     ;
  1910.     ; Get the values the user selected out of the dialog box.
  1911.     ;
  1912.  
  1913.     set IrqNumber    = $(Combo1Out)
  1914.     set IoLocation   = $(Combo2Out)
  1915.     set DmaChannel   = $(Combo3Out)
  1916.     set RxTxSlots    = $(Combo4Out)
  1917.     set StatsFlag    = $(Combo5Out)
  1918.     set MpFlag       = $(Combo7Out)
  1919.     set SlotNumber   = $(Combo8Out)
  1920.     set SpeedFlag    = $(Combo9Out)
  1921.  
  1922.     set MaxFrameSize = *($(EditTextOut), 1)
  1923.     set LAA          = *($(EditTextOut), 2)
  1924.  
  1925.     ui pop 1
  1926.     FreeLibrary $(MdgDialog)
  1927.  
  1928.     Debug-Output "MADGE: SlotNumber = "$(SlotNumber)
  1929.     Debug-Output "MADGE: IoLocation = "$(IoLocation)
  1930.     Debug-Output "MADGE: IrqNumber  = "$(IrqNumber)
  1931.     Debug-Output "MADGE: DmaChannel = "$(DmaChannel)
  1932.     Debug-Output "MADGE: MpFlag     = "$(MpFlag)
  1933.     Debug-Output "MADGE: RxTxSlots  = "$(RxTxSlots)
  1934.     Debug-Output "MADGE: StatsFlag  = "$(StatsFlag)
  1935.  
  1936.     ;
  1937.     ; Convert the values the user has chosen into internal form.
  1938.     ;
  1939.  
  1940.     ifcontains(i) $(Option) not-in $(SlotNumberAdapters)
  1941.     ;
  1942.         set IoLocation    = *($(IoRawList),~($(IoUserList),$(IoLocation)))
  1943.         set OldIoLocation = *($(IoRawList),~($(IoUserList),$(OldIoLocation)))
  1944.         set IrqNumber     = *($(IrqRawList),~($(IrqUserList),$(IrqNumber)))
  1945.         set OldIrqNumber  = *($(IrqRawList),~($(IrqUserList),$(OldIrqNumber)))
  1946.     ;
  1947.     else
  1948.     ;
  1949.         set SlotNumber    = *($(SlotRawList),~($(SlotUserList),$(SlotNumber)))
  1950.         set OldSlotNumber = *($(SlotRawList),~($(SlotUserList),$(OldSlotNumber)))
  1951.     ;
  1952.     endif
  1953.  
  1954.     set DmaChannel    = *($(DmaRawList),~($(DmaUserList),$(DmaChannel)))
  1955.     set OldDmaChannel = *($(DmaRawList),~($(DmaUserList),$(OldDmaChannel)))
  1956.     set MpFlag        = *($(MpRawList),~($(MpUserList),$(MpFlag)))
  1957.     set OldMpFlag     = *($(MpRawList),~($(MpUserList),$(OldMpFlag)))
  1958.     set StatsFlag     = *($(StatsRawList),~($(StatsUserList),$(StatsFlag)))
  1959.     set RxTxSlots     = *($(RxTxRawList),~($(RxTxUserList),$(RxTxSlots)))
  1960.     set SpeedFlag     = *($(SpeedRawList),~($(SpeedUserList),$(SpeedFlag)))
  1961.  
  1962.     Debug-Output "MADGE: SlotNumber = "$(SlotNumber)
  1963.     Debug-Output "MADGE: IoLocation = "$(IoLocation)
  1964.     Debug-Output "MADGE: IrqNumber  = "$(IrqNumber)
  1965.     Debug-Output "MADGE: DmaChannel = "$(DmaChannel)
  1966.     Debug-Output "MADGE: MpFlag     = "$(MpFlag)
  1967.     Debug-Output "MADGE: RxTxSlots  = "$(RxTxSlots)
  1968.     Debug-Output "MADGE: StatsFlag  = "$(StatsFlag)
  1969.  
  1970.     EndWait
  1971.  
  1972. ; -----------------------------------------------------------------------
  1973. ; Verify the adapter options.
  1974. ; -----------------------------------------------------------------------
  1975.  
  1976. Adapter_Verify = +
  1977.  
  1978.     StartWait
  1979.  
  1980.     ;
  1981.     ; If the user entered an LAA then validate it.
  1982.     ;
  1983.  
  1984.     ifstr $(LAA) != ""
  1985.     ;
  1986.         ;
  1987.     ; NB A line of spaces will come through here, and will fail the
  1988.     ;    check - do we want this?
  1989.         ;
  1990.  
  1991.         LoadLibrary "x" $(DialogDllName) MdgDialog
  1992.  
  1993.     set FLibraryErrCtl = 1
  1994.  
  1995.     LibraryProcedure MdgResult $(MdgDialog) MadgeLAACheck $(LAA)
  1996.  
  1997.     set FLibraryErrCtl = 0
  1998.  
  1999.         FreeLibrary $(MdgDialog)
  2000.  
  2001.     ifstr $(MdgResult) != "MADGE_STATUS_SUCCESS"
  2002.         ;
  2003.             ;
  2004.         ; Illegal LAA supplied in the install dialog
  2005.         ; Display error message and go around again
  2006.             ;
  2007.  
  2008.         set Error = $(MdgResult)
  2009.  
  2010.             ;
  2011.             ; This will go back to Get_Adapter_Options or to end.
  2012.             ;
  2013.  
  2014.         goto Non_Fatal 
  2015.         ;
  2016.     endif
  2017.     ;
  2018.     endif
  2019.  
  2020.     ifint $(MaxFrameSize) > 17839
  2021.     ;
  2022.         ;
  2023.         ; 17839 is the maximum frame size at 16Mbps, while at 4Mbps it is 4472.
  2024.         ; Unfortunately, we can't tell here what the ring speed is, so guess at
  2025.         ; 16Mbps, which is the most sensible.
  2026.         ;
  2027.  
  2028.     set MaxFrameSize = 17839
  2029.     set Error        = $(TRIMMED_MFS)
  2030.     set From         = Update_Registry
  2031.  
  2032.     goto Non_Fatal_Info
  2033.     ;
  2034.     endif
  2035.  
  2036.     EndWait
  2037.  
  2038. ; -----------------------------------------------------------------------
  2039. ; We have checked the options so add the software parameters to the
  2040. ; registry.
  2041. ; -----------------------------------------------------------------------
  2042.  
  2043. Update_Registry = +
  2044.  
  2045.     ;
  2046.     ; If installing, go create the necessary keys;
  2047.     ; if configuring, they're already open.
  2048.     ;
  2049.  
  2050.     ifint $(OldVersionExisted) == $(TRUE)
  2051.     ;
  2052.     ifstr(i) $(!NTN_InstallMode) == configure
  2053.         ;
  2054.         goto Write_Parameters
  2055.         ;
  2056.     endif
  2057.     ;
  2058.     endif
  2059.  
  2060.     StartWait
  2061.  
  2062.     ;
  2063.     ; Add Software Component.
  2064.     ;
  2065.  
  2066.     ifint $(OldVersionExisted) == $(FALSE)
  2067.     ;
  2068.     Shell $(UtilityInf), AddSoftwareComponent, $(Manufacturer), +
  2069.         $(ProductSoftwareName), +
  2070.         $(ProductSoftwareName), +
  2071.         $(ProductSoftwareTitle), $(STF_CONTEXTINFNAME), +
  2072.         $(ProductSoftwareImagePath), "kernel", "NDIS", {}, "",+
  2073.         $(MadgeEventLogFile)
  2074.  
  2075.     Set OEM_ABANDON_SOFTWARE = TRUE
  2076.  
  2077.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2078.         ;
  2079.         goto Shell_Code_Error
  2080.         ;
  2081.     endif
  2082.  
  2083.     ;
  2084.     ; At this point:
  2085.     ;     $R1 contains the product version key handle;
  2086.     ;     $R2 contains the NetRules subkey handle;
  2087.     ;     $R3 contains the new Services key handle; and
  2088.     ;     $R4 contains the Parameters key
  2089.     ;     $R5 contains the Linkage Key
  2090.     ;
  2091.  
  2092.     set RegistryErrorIndex = $($R0)
  2093.     set KeyProduct         = $($R1)
  2094.     Set SoftNetRulesKey    = $($R2)
  2095.     CloseRegKey $($R3)
  2096.     CloseRegKey $($R4)
  2097.     CloseRegKey $($R5)
  2098.  
  2099.     ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  2100.         ;
  2101.         CloseRegKey $(KeyProduct)
  2102.         CloseRegKey $(SoftNetRulesKey)
  2103.         goto Fatal_Registry
  2104.         ;
  2105.     endif
  2106.  
  2107.     set NewValueList = {{SoftwareType,$(NoTitle),$(!REG_VT_SZ),$(SoftwareType)},+
  2108.                {MajorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMajorVersion)},+
  2109.                {MinorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMinorVersion)},+
  2110.                {Title,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareTitle)},+
  2111.                {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareDescription)},+
  2112.                {PathName,$(NoTitle),$(!REG_VT_SZ),$(!STF_CWDDIR)},+
  2113.                {ServiceName,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareName)},+
  2114.                {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}}
  2115.  
  2116.     Shell $(UtilityInf), AddValueList, $(KeyProduct), $(NewValueList)
  2117.  
  2118.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2119.         ;
  2120.         goto Shell_Code_Error
  2121.         ;
  2122.     endif
  2123.  
  2124.     set RegistryErrorIndex = $($R0)
  2125.  
  2126.     ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  2127.         ;
  2128.         CloseRegKey $(KeyProduct)
  2129.         CloseRegKey $(SoftNetRulesKey)
  2130.  
  2131.         goto Fatal_Registry
  2132.         ;
  2133.     endif
  2134.  
  2135.     set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareType)},+
  2136.                 {use,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareUse)}, +
  2137.                 {bindform,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareBindForm)}, +
  2138.                 {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleSoftwareClass)}, +
  2139.                 {bindable,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleSoftwareBindable)}, +
  2140.                 {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}, +
  2141.                 {Infname ,$(NoTitle),$(!REG_VT_SZ),$(STF_CONTEXTINFNAME)} }
  2142.  
  2143.     Shell $(UtilityInf), AddValueList, $(SoftNetRulesKey), $(NewValueList)
  2144.  
  2145.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2146.         ;
  2147.         goto Shell_Code_Error
  2148.         ;
  2149.     endif
  2150.  
  2151.     set RegistryErrorIndex = $($R0)
  2152.  
  2153.     CloseRegKey $(KeyProduct)
  2154.     CloseRegKey $(SoftNetRulesKey)
  2155.  
  2156.     ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  2157.         ;
  2158.         goto Fatal_Registry
  2159.         ;
  2160.     endif
  2161.     ;
  2162.     endif
  2163.  
  2164.     ;
  2165.     ; Create the HARDWARE\Netcard region and its corresponding service
  2166.     ;
  2167.  
  2168.     Shell $(UtilityInf), AddHardwareComponent, $(ProductHardwareName),$(STF_CONTEXTINFNAME),$(ProductKeyName)
  2169.  
  2170.     ifint $($R4) != -1
  2171.     ;
  2172.     Set OEM_ABANDON_OPTIONS = >($(OEM_ABANDON_OPTIONS), $(!NTN_SoftwareBase)"\Microsoft\Windows NT\CurrentVersion\NetworkCards\"$($R4))
  2173.     ;
  2174.     endif
  2175.         
  2176.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2177.     ;
  2178.     goto Shell_Code_Error
  2179.     ;
  2180.     endif
  2181.  
  2182.     set RegistryErrorIndex = $($R0)
  2183.  
  2184.     ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  2185.     ;
  2186.     CloseRegKey $($R1)
  2187.     CloseRegKey $($R2)
  2188.     CloseRegKey $($R3)
  2189.     goto Fatal_Registry
  2190.     ;
  2191.     endif
  2192.  
  2193.     ;
  2194.     ; At this point:
  2195.     ;     $R1  Registry key variable for HARDWARE\Netcard\(n)
  2196.     ;     $R2  Registry key variable for HARDWARE\Netcard\(n)\\NetRules
  2197.     ;     $R3  Registry key handle for <service>\Parameters key
  2198.     ;     $R4  Adapter number assigned to adapter
  2199.     ;     $R5  Service name generated by combining svc name with adapter number
  2200.     ;
  2201.  
  2202.     set KeyParameters   = $($R3)
  2203.     set KeyAdapterRules = $($R2)
  2204.     set AdapterNumber   = $($R4)
  2205.  
  2206.     set NewValueList = {{Manufacturer,$(NoTitle),$(!REG_VT_SZ),$(Manufacturer)},+
  2207.                {Title,$(NoTitle),$(!REG_VT_SZ),"["$($R4)"] "$(ProductHardware$(Option)Title)},+
  2208.                {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductHardware$(Option)Description)},+
  2209.                {ProductName,$(NoTitle),$(!REG_VT_SZ),$(ProductHardwareName)},+
  2210.                {ServiceName,$(NoTitle),$(!REG_VT_SZ),$($R5)},+
  2211.                {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}}
  2212.  
  2213.     Shell $(UtilityInf), AddValueList, $($R1), $(NewValueList)
  2214.  
  2215.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2216.     ;
  2217.     goto Shell_Code_Error
  2218.     ;
  2219.     endif
  2220.  
  2221.     CloseRegKey $($R1)
  2222.  
  2223.     set TempProdName = """"$(ProductHardwareName)$(AdapterNumber)""""
  2224.     set TempBindForm = $(TempProdName)$(NetRuleHardwareBindForm)
  2225.  
  2226.     set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleHardwareType)},+
  2227.             {bindform,$(NoTitle),$(!REG_VT_SZ),$(TempBindForm)}, +
  2228.             {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleHardwareClass)}, +
  2229.             {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}, +
  2230.             {Infname ,$(NoTitle),$(!REG_VT_SZ),$(STF_CONTEXTINFNAME)}}
  2231.  
  2232.     Shell $(UtilityInf), AddValueList, $(KeyAdapterRules), $(NewValueList)
  2233.  
  2234.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2235.     ;
  2236.     goto Shell_Code_Error
  2237.     ;
  2238.     endif
  2239.  
  2240.     set RegistryErrorIndex = $($R0)
  2241.  
  2242.     ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  2243.     ;
  2244.     CloseRegKey $(KeyParameters)
  2245.     CloseRegKey $(KeyAdapterRules)
  2246.     goto Fatal_Registry
  2247.     ;
  2248.     endif
  2249.  
  2250.     CloseRegKey $(KeyAdapterRules)
  2251.  
  2252.     EndWait
  2253.  
  2254. ; ----------------------------------------------------------------------
  2255. ; Write the adapter parameters into the registry.
  2256. ; ----------------------------------------------------------------------
  2257.  
  2258. ;
  2259. ; REQUIRED: $(KeyParameters) contains service Parameters key handle.
  2260. ;
  2261.  
  2262. Write_Parameters = +
  2263.  
  2264.     StartWait
  2265.  
  2266.     Shell $(UtilityInf), GetBusTypeDialog, $(ProductHardware$(Option)Description)
  2267.  
  2268.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2269.     ;
  2270.     goto Shell_Code_Error
  2271.     ;
  2272.     endif
  2273.  
  2274.     ifstr(i) $($R0) == ERROR
  2275.     ;
  2276.         Shell $(UtilityInf), GetBusTypeNum
  2277.  
  2278.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2279.         ;
  2280.             goto Shell_Code_Error
  2281.         ;
  2282.         endif
  2283.  
  2284.         set BusTypeNum = $($R1)
  2285.         set BusNumber  = 0
  2286.     ;
  2287.     else
  2288.     ;
  2289.         set BusTypeNum = $($R1)
  2290.         set BusNumber  = $($R2)
  2291.     ;
  2292.     endif
  2293.  
  2294.     ;
  2295.     ; We need to examine DmaChannel to decide on how to set DmaChannel
  2296.     ; and NoMmio. We use a very simple test - if DmaChannel is not
  2297.     ; $(GENERAL_MMIO) then we set NoMMio, otherwise we clear it.
  2298.     ; Note that at the moment we don't register the DmaChannel
  2299.     ; parameter for slot number adapters. This may need to change
  2300.     ; if PCI adapters ever get DMA.
  2301.     ;
  2302.  
  2303.     ifstr(i) $(DmaChannel) == $(GENERAL_MMIO)
  2304.     ;
  2305.         set NoMmioFlag = 0
  2306.     ;
  2307.     else
  2308.     ;
  2309.         set NoMmioFlag = 1
  2310.     ;
  2311.     endif
  2312.  
  2313.     ;
  2314.     ; Derive the adapter type.
  2315.     ;
  2316.  
  2317.     set AdapterTypeFlag = $(AdapterTypeFlag$(Option))
  2318.  
  2319.     ;
  2320.     ; Add the rest of the parameters to the Services adapter area.
  2321.     ;
  2322.  
  2323.     ifcontains(i) $(Option) not-in $(SlotNumberAdapters)
  2324.     ;
  2325.     set NewValueList = {{InterruptNumber,$(NoTitle),$(!REG_VT_DWORD),$(IrqNumber)},+
  2326.             {BusType,        $(NoTitle),$(!REG_VT_DWORD),$(BusTypeNum)},+
  2327.             {BusNumber,      $(NoTitle),$(!REG_VT_DWORD),$(BusNumber)},+
  2328.             {MediaType,      $(NoTitle),$(!REG_VT_DWORD),2},+
  2329.             {IoLocation,     $(NoTitle),$(!REG_VT_DWORD),$(IoLocation)},+
  2330.             {IoBaseAddress,  $(NoTitle),$(!REG_VT_DWORD),$(IoLocation)},+
  2331.             {DmaChannel,     $(NoTitle),$(!REG_VT_DWORD),$(DmaChannel)},+
  2332.             {NoMmio,         $(NoTitle),$(!REG_VT_DWORD),$(NoMmioFlag)},+
  2333.                         {RxTxSlots,      $(NoTitle),$(!REG_VT_DWORD),$(RxTxSlots)},+
  2334.                         {Multiprocessor, $(NoTitle),$(!REG_VT_DWORD),$(MpFlag)},+
  2335.             {MaxFrameSize,   $(NoTitle),$(!REG_VT_DWORD),$(MaxFrameSize)},+
  2336.                         {AdapterType,    $(NoTitle),$(!REG_VT_DWORD),$(AdapterTypeFlag)}}
  2337.     else
  2338.     set NewValueList = {+
  2339.             {BusType,        $(NoTitle),$(!REG_VT_DWORD),$(BusTypeNum)},+
  2340.             {BusNumber,      $(NoTitle),$(!REG_VT_DWORD),$(BusNumber)},+
  2341.             {MediaType,      $(NoTitle),$(!REG_VT_DWORD),2},+
  2342. ;;;;            {$(McaEisaKeyword), $(NoTitle), $(!REG_VT_DWORD), $(McaEisaId)},+
  2343.             {SlotNumber,     $(NoTitle),$(!REG_VT_DWORD),$(SlotNumber)},+
  2344.             {NoMmio,         $(NoTitle),$(!REG_VT_DWORD),$(NoMmioFlag)},+
  2345.                         {RxTxSlots,      $(NoTitle),$(!REG_VT_DWORD),$(RxTxSlots)},+
  2346.                         {Multiprocessor, $(NoTitle),$(!REG_VT_DWORD),$(MpFlag)},+
  2347.             {MaxFrameSize,   $(NoTitle),$(!REG_VT_DWORD),$(MaxFrameSize)},+
  2348.                         {AdapterType,    $(NoTitle),$(!REG_VT_DWORD),$(AdapterTypeFlag)}}
  2349.     ;
  2350.     endif
  2351.     
  2352.     ;
  2353.     ; Add the LAA if there is one.
  2354.     ;
  2355.  
  2356.     ifstr $(LAA) != ""
  2357.     ;
  2358.     set NewValueList = >($(NewValueList),+
  2359.                  {NetworkAddress, $(NoTitle), $(!REG_VT_SZ), $(LAA)})
  2360.     ;
  2361.     endif
  2362.  
  2363.     ;
  2364.     ; Enable promiscuous mode if required.
  2365.     ;
  2366.  
  2367.     ifstr $(StatsFlag) == "1"
  2368.     ;
  2369.     set NewValueList = >($(NewValueList),+
  2370.                  {PromiscuousModeX, $(NoTitle), $(!REG_VT_DWORD), $(StatsFlag)})
  2371.     ;
  2372.     endif
  2373.  
  2374.     ;
  2375.     ; Enable Force4 mode if required.
  2376.     ;
  2377.  
  2378.     ifstr $(SpeedFlag) == "1"
  2379.     ;
  2380.     set NewValueList = >($(NewValueList),+
  2381.                  {Force4, $(NoTitle), $(!REG_VT_DWORD), 1})
  2382.     ;
  2383.     endif
  2384.  
  2385.     ;
  2386.     ; Enable Force16 mode if required.
  2387.     ;
  2388.  
  2389.     ifstr $(SpeedFlag) == "2"
  2390.     ;
  2391.     set NewValueList = >($(NewValueList),+
  2392.                  {Force16, $(NoTitle), $(!REG_VT_DWORD), 1})
  2393.     ;
  2394.     endif
  2395.  
  2396.     ;
  2397.     ; If this is a PCMCIA adapter we need to a PCMCIA flag.
  2398.     ;
  2399.  
  2400.     ifstr(i) $(Option) == "MDGMPPCMCIA"
  2401.     ;
  2402.     set NewValueList = >($(NewValueList),+
  2403.                  {Pcmcia, $(NoTitle), $(!REG_VT_DWORD), 1})
  2404.     ;
  2405.     endif
  2406.  
  2407.       
  2408.     ;
  2409.     ; And add the parameters to the registry.
  2410.     ;
  2411.  
  2412.     Shell  $(UtilityInf), AddValueList, $(KeyParameters), $(NewValueList)
  2413.  
  2414.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2415.     ;
  2416.     goto Shell_Code_Error
  2417.     ;
  2418.     endif
  2419.  
  2420.     set RegistryErrorIndex = $($R0)
  2421.  
  2422.     Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  2423.     ;
  2424.     CloseRegKey $(KeyParameters)
  2425.     goto Fatal_Registry
  2426.     ;
  2427.     endif
  2428.  
  2429.     ;
  2430.     ; If the old LAA has been cleared then so delete the key 
  2431.     ; from registry.
  2432.     ;
  2433.  
  2434.     ifstr $(OldLAA) != ""
  2435.     ;
  2436.     ifstr $(LAA) == ""
  2437.         ;
  2438.         DeleteRegValue $(KeyParameters) NetworkAddress
  2439.         ;
  2440.     endif
  2441.     ;
  2442.     endif
  2443.  
  2444.     ;
  2445.     ; If Force4 mode has been disabled then delete the key.
  2446.     ;
  2447.  
  2448.     ifstr $(OldSpeedFlag) == "1"
  2449.     ;
  2450.     ifstr $(SpeedFlag) != "1"
  2451.         ;
  2452.         DeleteRegValue $(KeyParameters) Force4
  2453.         ;
  2454.     endif
  2455.     ;
  2456.     endif
  2457.  
  2458.     ;
  2459.     ; If Force16 mode has been disabled then delete the key.
  2460.     ;
  2461.  
  2462.     ifstr $(OldSpeedFlag) == "2"
  2463.     ;
  2464.     ifstr $(SpeedFlag) != "2"
  2465.         ;
  2466.         DeleteRegValue $(KeyParameters) Force16
  2467.         ;
  2468.     endif
  2469.     ;
  2470.     endif
  2471.  
  2472.     ;
  2473.     ; If promiscuous mode has been disabled then delete the key.
  2474.     ;
  2475.  
  2476.     ifstr $(OldStatsFlag) != "0"
  2477.     ;
  2478.     ifstr $(StatsFlag) == "0"
  2479.         ;
  2480.         DeleteRegValue $(KeyParameters) PromiscuousModeX
  2481.         ;
  2482.     endif
  2483.     ;
  2484.     endif
  2485.  
  2486.     CloseRegKey $(KeyParameters)
  2487.  
  2488.     EndWait
  2489.  
  2490.     goto Successful
  2491.  
  2492. ; -----------------------------------------------------------------------
  2493. ; Binding section
  2494. ; -----------------------------------------------------------------------
  2495.  
  2496. Binding_Adapter =+
  2497.  
  2498.     set Error = "Binding: Sorry, not yet implemented."
  2499.  
  2500.     goto Fatal
  2501.  
  2502. ; -----------------------------------------------------------------------
  2503. ; Removal section
  2504. ; -----------------------------------------------------------------------
  2505.  
  2506. Remove_Adapter = +
  2507.  
  2508.     StartWait
  2509.  
  2510.     ;
  2511.     ; Remove the software component if required.
  2512.     ;
  2513.  
  2514.     ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
  2515.     ;
  2516.     Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), +
  2517.         $(ProductSoftwareName)
  2518.  
  2519.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2520.         ;
  2521.         goto Shell_Code_Error
  2522.         ;
  2523.     endif
  2524.  
  2525.     set RegistryErrorIndex = $($R0)
  2526.  
  2527.     ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  2528.         ;
  2529.         goto Fatal_Registry
  2530.         ;
  2531.     endif
  2532.     ;
  2533.  
  2534.     ;
  2535.     ; Or, the hardware component.
  2536.     ;
  2537.  
  2538.     else
  2539.     ;
  2540.     Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), +
  2541.         $(ProductSoftwareName), $(!NTN_RegBase)     
  2542.  
  2543.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2544.         ;
  2545.         goto Shell_Code_Error
  2546.         ;
  2547.     endif
  2548.  
  2549.     set RegistryErrorIndex = $($R0)
  2550.  
  2551.     ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  2552.         ;
  2553.         goto Fatal_Registry
  2554.         ;
  2555.     endif
  2556.     ;
  2557.     endif
  2558.  
  2559.     EndWait
  2560.  
  2561.     goto End
  2562.  
  2563. ; -----------------------------------------------------------------------
  2564. ; Upgrade Software section.
  2565. ; -----------------------------------------------------------------------
  2566.  
  2567. Upgrade_Software = +
  2568.  
  2569.     StartWait
  2570.  
  2571.     ;
  2572.     ; First determine whether we want to do upgrade or update for software
  2573.     ; or hardware component. Then we will determine whether the Mode is
  2574.     ; update or upgrade.
  2575.     ;
  2576.  
  2577.     ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
  2578.     ;
  2579.         ;
  2580.     ; Upgrade software component
  2581.     ;
  2582.     ; see whether the same version exist or not
  2583.     ;
  2584.  
  2585.     OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct
  2586.  
  2587.     ifstr $(KeyProduct) != $(KeyNull)
  2588.         ;
  2589.         GetRegValue $(KeyProduct),"MajorVersion", VersionInfo
  2590.         set Version = *($(VersionInfo), 4)
  2591.  
  2592.         ;
  2593.         ; Update the binaries
  2594.         ;
  2595.  
  2596.         shell $(UtilityInf) GetInfFileNameFromRegistry $(KeyProduct)
  2597.  
  2598.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2599.             ;
  2600.         goto Shell_Code_Error
  2601.             ;
  2602.         endif
  2603.  
  2604.         set !UG_Filename = $($R0)
  2605.  
  2606.         ifstr(i) $(!UG_Filename) != ""
  2607.             ;
  2608.         install "Install-Update"
  2609.  
  2610.         ifstr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS
  2611.                 ;
  2612.             goto Fatal
  2613.                 ;
  2614.         endif
  2615.             ;
  2616.         endif
  2617.  
  2618.         CloseRegKey $(KeyProduct)
  2619.         OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct
  2620.  
  2621.             ;
  2622.         ; Upgrade the version number
  2623.         ;
  2624.  
  2625.         SetRegValue $(KeyProduct) {MajorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMajorVersion)}
  2626.         SetRegValue $(KeyProduct) {MinorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMinorVersion)}
  2627.  
  2628.         ifint $(Version) != $(ProductMajorVersion)
  2629.             ;
  2630.            ;
  2631.            ; If the major version number is not the same,
  2632.            ; it is major upgrade. So let Upgrade the product
  2633.            ;
  2634.            ;
  2635.            ; make other upgrade change if necessary
  2636.            ;
  2637.             ;
  2638.         endif
  2639.  
  2640.         CloseRegKey $(KeyProduct)
  2641.  
  2642.             ;
  2643.             ; Install the detection DLL in case we are upgrading from a
  2644.             ; version that did not use detection.
  2645.             ;
  2646.  
  2647.             Shell "" PrepareDetectionDll $(DetectDllName)
  2648.  
  2649.             ifstr(i) $($R0) != STATUS_SUCCESSFUL
  2650.             ;
  2651.                 goto Fatal
  2652.             ;
  2653.             endif
  2654.  
  2655.         ;
  2656.     else
  2657.         ;
  2658.         ;
  2659.         ; Cannot Open software key, goto ERROR
  2660.         ;
  2661.  
  2662.         goto Fatal_Registry
  2663.         ;
  2664.     endif
  2665.     ;
  2666.     else
  2667.     ;
  2668.         ;
  2669.         ; We cannot upgrade the hardware component.
  2670.         ;
  2671.  
  2672.         set Error          = ""
  2673.         set OEM_ABANDON_ON = FALSE
  2674.  
  2675.         goto Not_Supported
  2676.     ;
  2677.     endif
  2678.      
  2679.     EndWait
  2680.                                         
  2681.     goto End
  2682.  
  2683. ; -----------------------------------------------------------------------
  2684. ; Escape hatches
  2685. ; -----------------------------------------------------------------------
  2686.  
  2687. Successful = +
  2688.  
  2689.     goto End
  2690.  
  2691. ; -----------------------------------------------------------------------
  2692.  
  2693. Abandon = +
  2694.  
  2695.     ForListDo $(OEM_ABANDON_OPTIONS)
  2696.     ;
  2697.     Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), +
  2698.         $(ProductSoftwareName), $($)        
  2699.  
  2700.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2701.         ;
  2702.         goto Shell_Code_Error
  2703.         ;
  2704.     endif
  2705.  
  2706.     set RegistryErrorIndex = $($R0)
  2707.  
  2708.     Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  2709.         ;
  2710.         goto Fatal_Registry
  2711.         ;
  2712.     endif
  2713.     ;
  2714.     EndForListDo
  2715.  
  2716.     ifstr(i) $(OEM_ABANDON_SOFTWARE) == TRUE
  2717.     ;
  2718.         ;
  2719.     ; Remove Software Component
  2720.         ;
  2721.  
  2722.     Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), +
  2723.         $(ProductSoftwareName), FALSE
  2724.  
  2725.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2726.         ;
  2727.         goto Shell_Code_Error
  2728.         ;
  2729.     endif
  2730.  
  2731.     set RegistryErrorIndex = $($R0)
  2732.  
  2733.     ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  2734.         ;
  2735.         goto Fatal_Registry
  2736.         ;
  2737.     endif
  2738.     ;
  2739.     endif
  2740.  
  2741.     goto End
  2742.  
  2743. ; -----------------------------------------------------------------------
  2744.  
  2745. Warning = +
  2746.  
  2747.     EndWait
  2748.  
  2749.     Shell $(SubroutineInf) SetupMessage, $(!STF_LANGUAGE), "WARNING", $(Error)
  2750.  
  2751.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2752.     ;
  2753.     goto Shell_Code_Error
  2754.     ;
  2755.     endif
  2756.  
  2757.     ifstr(i) $($R1) == "OK"
  2758.     ;
  2759.     goto $(To)
  2760.     ;
  2761.     else-ifstr(i) $($R1) == "CANCEL"
  2762.     ;
  2763.     goto $(From)
  2764.     ;
  2765.     endif
  2766.  
  2767.     goto End
  2768.  
  2769. ; -----------------------------------------------------------------------
  2770.  
  2771. Non_Fatal_Info = +
  2772.  
  2773.     set Severity     = STATUS
  2774.     set CommonStatus = STATUS_USERCANCEL
  2775.     goto Non_Fatal_Msg
  2776.  
  2777. ; -----------------------------------------------------------------------
  2778.  
  2779. Non_Fatal = +
  2780.  
  2781.     set  Severity = NONFATAL
  2782.     goto Non_Fatal_Msg
  2783.  
  2784. ; -----------------------------------------------------------------------
  2785.  
  2786. Non_Fatal_Msg = +
  2787.  
  2788.     EndWait
  2789.  
  2790.     ifstr(i) $(Error) == ""
  2791.     ;
  2792.     set Severity = NONFATAL
  2793.  
  2794.     Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL"
  2795.  
  2796.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2797.         ;
  2798.         goto Shell_Code_Error
  2799.         ;
  2800.     endif
  2801.  
  2802.     set Error = $($R0)
  2803.     ;
  2804.     endif
  2805.  
  2806.     Shell $(SubroutineInf) SetupMessage, $(!STF_LANGUAGE), "NONFATAL", $(Error)
  2807.  
  2808.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2809.     ;
  2810.     goto Shell_Code_Error
  2811.     ;
  2812.     endif
  2813.  
  2814.     ifstr(i) $($R1) == "OK"
  2815.     ;
  2816.     goto $(From)
  2817.     ;
  2818.     endif
  2819.  
  2820.     goto End
  2821.  
  2822. ; -----------------------------------------------------------------------
  2823.  
  2824. Fatal_Registry = +
  2825.  
  2826.     Shell $(UtilityInf) RegistryErrorString $(RegistryErrorIndex)
  2827.  
  2828.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2829.     ;
  2830.     goto Shell_Code_Error
  2831.     ;
  2832.     endif
  2833.  
  2834.     set Error = $($R0)
  2835.  
  2836.     goto Fatal
  2837.  
  2838. ; -----------------------------------------------------------------------
  2839.  
  2840. Fatal = +
  2841.  
  2842.     EndWait
  2843.  
  2844.     ifstr(i) $(Error) == ""
  2845.     ;
  2846.     Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL"
  2847.  
  2848.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2849.         ;
  2850.         goto Shell_Code_Error
  2851.         ;
  2852.     endif
  2853.  
  2854.     set Error = $($R0)
  2855.     ;
  2856.     endif
  2857.  
  2858.     Shell $(SubroutineInf) SetupMessage, $(!STF_LANGUAGE), "FATAL", $(Error)
  2859.  
  2860.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2861.     ;
  2862.     goto Shell_Code_Error
  2863.     ;
  2864.     endif
  2865.  
  2866.     goto Set_Failed
  2867.  
  2868. ; -----------------------------------------------------------------------
  2869.  
  2870. Not_Supported = +
  2871.  
  2872.     EndWait
  2873.  
  2874.     ifstr(i) $(Error) == ""
  2875.     ;
  2876.     Shell $(UtilityInf) RegistryErrorString "OPERATION_UNIMPLEMENTED"
  2877.  
  2878.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2879.         ;
  2880.         goto Shell_Code_Error
  2881.         ;
  2882.     endif
  2883.  
  2884.     set Error = $($R0)
  2885.     ;
  2886.     endif
  2887.  
  2888.     Shell $(SubroutineInf) SetupMessage, $(!STF_LANGUAGE), "FATAL", $(Error)
  2889.  
  2890.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  2891.     ;
  2892.     goto Shell_Code_Error
  2893.     ;
  2894.     endif
  2895.  
  2896.     goto End
  2897.  
  2898. ; -----------------------------------------------------------------------
  2899.  
  2900. Shell_Code_Error = +
  2901.  
  2902.     EndWait
  2903.  
  2904.     set DlgType      = "MessageBox"
  2905.     set STF_MB_TITLE = $(ShellCodeErrorTitle)
  2906.     set STF_MB_TEXT  = $(ShellCodeErrorText)
  2907.     set STF_MB_TYPE  = 1
  2908.     set STF_MB_ICON  = 3
  2909.     set STF_MB_DEF   = 1
  2910.     ui start "Error Message"
  2911.     goto Set_Failed
  2912.  
  2913. ; -----------------------------------------------------------------------
  2914.  
  2915. Set_Failed = +
  2916.  
  2917.     set CommonStatus = STATUS_FAILED
  2918.  
  2919.     ;
  2920.     ; if OEM_ABANDON_ON == TRUE, then remove the registry entries
  2921.     ;
  2922.  
  2923.     ifstr(i) $(OEM_ABANDON_ON) == TRUE
  2924.     ;
  2925.     set OEM_ABANDON_ON = FALSE
  2926.     goto Abandon
  2927.     ;
  2928.     endif
  2929.  
  2930.     goto End
  2931.  
  2932. ; -----------------------------------------------------------------------
  2933.  
  2934. End = +
  2935.  
  2936.     goto Term
  2937.  
  2938. ; -----------------------------------------------------------------------
  2939.  
  2940. Term = +
  2941.  
  2942.     Return $(CommonStatus)
  2943.  
  2944. ; -----------------------------------------------------------------------
  2945. ; Install sections
  2946. ; -----------------------------------------------------------------------
  2947.  
  2948. [Files-Inf]
  2949. 1, oemsetup.inf, SIZE=1000, RENAME=$(!UG_Filename)
  2950.  
  2951. [Files-Driver]
  2952. 1, mdgmport.sys, SIZE=40080
  2953. 1, mdgmport.bin, SIZE=46558
  2954.  
  2955. [Files-Helper]
  2956. 1, mdgmpdlg.dll, SIZE=17920
  2957. 1, mdgmpdlg.hlp, SIZE=12672
  2958.  
  2959. [Files-MDGNCDET.DLL]
  2960. 1, mdgncdet.dll, SIZE=47616
  2961.  
  2962. ; -----------------------------------------------------------------------
  2963.  
  2964. [Install-Update]
  2965.  
  2966.    set STF_VITAL        = ""
  2967.    set STF_OVERWRITE    = "VERIFYSOURCEOLDER"
  2968.  
  2969.    AddSectionFilesToCopyList Files-Inf $(SrcDir) $(!STF_WINDOWSSYSPATH)
  2970.    AddSectionFilesToCopyList Files-Helper $(SrcDir) $(!STF_WINDOWSSYSPATH)
  2971.    AddSectionFilesToCopyList Files-Driver $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers
  2972.    AddSectionFilesToCopyList Files-MDGNCDET.DLL $(SrcDir) $(!STF_WINDOWSSYSPATH)
  2973.  
  2974.    set !STF_NCPA_FLUSH_COPYLIST = TRUE
  2975.    CopyFilesInCopyList
  2976.  
  2977.    exit
  2978.  
  2979. [Install-Option]
  2980.  
  2981.    set STF_VITAL        = ""
  2982.  
  2983.    AddSectionFilesToCopyList Files-Helper $(SrcDir) $(!STF_WINDOWSSYSPATH)
  2984.    AddSectionFilesToCopyList Files-Driver $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers
  2985.    AddSectionFilesToCopyList Files-MDGNCDET.DLL $(SrcDir) $(!STF_WINDOWSSYSPATH)
  2986.  
  2987.    set !STF_NCPA_FLUSH_COPYLIST = TRUE
  2988.    CopyFilesInCopyList
  2989.  
  2990.    exit
  2991.  
  2992. [Source Media Descriptions]
  2993.     1  = "Madge Driver Disk" 
  2994.     2  = "Windows NT Setup CD-ROM Disk"  
  2995.  
  2996. [ProductType]
  2997. STF_PRODUCT  = Winnt
  2998. STF_PLATFORM = I386
  2999.  
  3000. ; ******** End of file OEMSETUP.INF *****************************************
  3001.  
  3002.