home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / d / d423_liu / 4.ddi / KEYBOARD.IN_ / KEYBOARD.IN
Encoding:
INI File  |  1993-07-24  |  17.3 KB  |  366 lines
  1. [Identification]
  2.     OptionType = KEYBOARD
  3. [Options]
  4.     STANDARD           = i8042prt , kbdclass
  5. [MapOfOptions]
  6.     OLI_83KEY          = STANDARD
  7.     OLI_102KEY         = STANDARD
  8.     OLI_86KEY          = STANDARD
  9.     OLI_A101_102KEY    = STANDARD
  10.     XT_83KEY           = STANDARD
  11.     XT_84KEY           = STANDARD
  12.     ATT_301            = STANDARD
  13.     ATT_302            = STANDARD
  14.     PCAT_ENHANCED      = STANDARD
  15.     PCAT_86KEY         = STANDARD
  16.     PCXT_84KEY         = STANDARD
  17.     VECTRA_DIN         = STANDARD
  18. [PortDrivers]
  19.     i8042prt = !SERVICE_KERNEL_DRIVER, "Keyboard Port", !SERVICE_ERROR_NORMAL, 1, "%SystemRoot%\System32\IoLogMsg.dll;%SystemRoot%\System32\drivers\i8042prt.sys" , 7
  20. [ClassDrivers]
  21.     kbdclass = !SERVICE_KERNEL_DRIVER, "Keyboard Class", !SERVICE_ERROR_NORMAL, 1, "%SystemRoot%\System32\IoLogMsg.dll;%SystemRoot%\System32\drivers\kbdclass.sys" , 7
  22. [Identify]
  23.     read-syms Identification
  24.     set Status     = STATUS_SUCCESSFUL
  25.     set Identifier = $(OptionType)
  26.     set Media      = #("Source Media Descriptions", 1, 1)
  27.     Return $(Status) $(Identifier) $(Media)
  28. [ReturnOptions]
  29.     set Status        = STATUS_FAILED
  30.     set OptionList     = {}
  31.     set OptionTextList = {}
  32.     set LanguageList = ^(LanguagesSupported, 1)
  33.     Ifcontains(i) $($0) in $(LanguageList)
  34.         goto returnoptions
  35.     else
  36.         set Status = STATUS_NOLANGUAGE
  37.         goto finish_ReturnOptions
  38.     endif
  39. returnoptions = +
  40.     set OptionList     = ^(Options, 0)
  41.     set OptionTextList = ^(OptionsText$($0), 1)
  42.     set Status         = STATUS_SUCCESSFUL
  43. finish_ReturnOptions = +
  44.     Return $(Status) $(OptionList) $(OptionTextList)
  45. [MapToSupportedOption]
  46.     set Status = STATUS_FAILED
  47.     set MappedOption = $($0)
  48.     set OptionList = ^(MapOfOptions, 0)
  49.     ifcontains $($0) in $(OptionList)
  50.         set MappedOption = #(MapOfOptions, $($0), 1)
  51.     else
  52.         set MappedOption = "STANDARD"
  53.     endif
  54.     set Status = STATUS_SUCCESSFUL
  55.     Return $(Status) $(MappedOption)
  56. [ServicesEntry]
  57.     CurrentPortEntry  = "" ? $(!LIBHANDLE) GetDevicemapValue KeyboardPort  \Device\KeyboardPort0
  58.     CurrentClassEntry = "" ? $(!LIBHANDLE) GetDevicemapValue KeyboardClass \Device\KeyboardClass0
  59. [InstallOption]
  60.     set Status   = STATUS_FAILED
  61.     set DrivesToFree = {}
  62.     set Option   = $($1)
  63.     set SrcDir   = $($2)
  64.     set AddCopy  = $($3)
  65.     set DoCopy   = $($4)
  66.     set DoConfig = $($5)
  67.     set LanguageList = ^(LanguagesSupported, 1)
  68.     Ifcontains(i) $($0) in $(LanguageList)
  69.     else
  70.         set Status = STATUS_NOLANGUAGE
  71.         goto finish_InstallOption
  72.     endif
  73.     read-syms Strings$($0)
  74.     set OptionList = ^(Options, 0)
  75.     ifcontains $(Option) in $(OptionList)
  76.     else
  77.         goto finish_InstallOption
  78.     endif
  79.     set OptionList = ""
  80.     read-syms ServicesEntry
  81.     detect    ServicesEntry
  82.     Debug-Output "KEYBOARD.INF: Current Port Entry is:  "$(CurrentPortEntry)
  83.     Debug-Output "KEYBOARD.INF: Current Class Entry is: "$(CurrentClassEntry)
  84.     set PortDriver  = #(Options, $(Option), 1)
  85.     set ClassDriver = #(Options, $(Option), 2)
  86.     Debug-Output "KEYBOARD.INF: New Port Entry is:      "$(PortDriver)
  87.     Debug-Output "KEYBOARD.INF: New Class Entry is:     "$(ClassDriver)
  88. installtheoption = +
  89.     ifstr(i) $(AddCopy) == "YES"
  90.         set DoActualCopy = NO
  91.         set FileToCheck = #(Files-KeyboardPortDrivers, $(PortDriver), 2)
  92.         LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\drivers\"$(FileToCheck)
  93.         ifstr(i) $(STATUS) == NO
  94.             set DoActualCopy = YES
  95.         else
  96.             set FileToCheck = #(Files-KeyboardClassDrivers, $(ClassDriver), 2)
  97.             LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\drivers\"$(FileToCheck)
  98.             ifstr(i) $(STATUS) == NO
  99.                 set DoActualCopy = YES
  100.             endif
  101.         endif
  102.         ifstr(i) $(DoActualCopy) == NO
  103.             shell "subroutn.inf" DriversExist $($0) $(String1)
  104.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  105.                 Debug-Output "KEYBOARD.INF: shelling DriversExist failed"
  106.                 goto finish_InstallOption
  107.             endif
  108.             ifstr(i) $($R0) == STATUS_CURRENT
  109.             else-ifstr(i) $($R0) == STATUS_NEW
  110.                 set DoActualCopy = YES
  111.             else-ifstr(i) $($R0) == STATUS_USERCANCEL
  112.                 Debug-Output "KEYBOARD.INF: User cancelled Keyboard installation"
  113.                 goto finish_InstallOption
  114.             else
  115.                 Debug-Output "KEYBOARD.INF: Error reported in DriversExist routine in SUBROUTN.INF"
  116.                 goto finish_InstallOption
  117.             endif
  118.         endif
  119.         ifstr(i) $(DoActualCopy) == YES
  120.             shell "subroutn.inf" DoAskSourceEx $(SrcDir) $(String2)
  121.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  122.                 Debug-Output "KEYBOARD.INF: shelling DoAskSourceEx failed"
  123.                 goto finish_InstallOption
  124.             endif
  125.             ifstr(i) $($R0) == STATUS_SUCCESSFUL
  126.                 set SrcDir = $($R1)
  127.                 ifstr(i) $($R2) != ""
  128.                     set DrivesToFree = >($(DrivesToFree), $($R2))
  129.                 endif
  130.             else
  131.                 Debug-Output "KEYBOARD.INF: User cancelled asking source."
  132.                 goto finish_InstallOption
  133.             endif
  134.             install Install-AddCopyOption
  135.             ifstr(i) $(STF_INSTALL_OUTCOME) != "STF_SUCCESS"
  136.                 Debug-Output "KEYBOARD.INF: Adding keyboard files to copy list failed"
  137.                 goto finish_InstallOption
  138.             endif
  139.         else
  140.             set DoCopy = NO
  141.         endif
  142.     endif
  143.     ifstr(i) $(DoCopy) == "YES"
  144.         read-syms ProgressCopy$($0)
  145.         install Install-DoCopyOption
  146.         ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_FAILURE"
  147.             Debug-Output "KEYBOARD.INF: Copying files failed."
  148.             goto finish_InstallOption
  149.         else-ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_USERQUIT"
  150.             Debug-Output "KEYBOARD.INF: User quit copying files."
  151.             set Status = STATUS_USERCANCEL
  152.             goto finish_InstallOption
  153.         endif
  154.     endif
  155.     ifstr(i) $(DoConfig) == "YES"
  156.         shell "registry.inf" CheckSetupModify
  157.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  158.             goto finish_InstallOption
  159.         endif
  160.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  161.             goto finish_InstallOption
  162.         endif
  163.         ifstr(i) $(PortDriver) != ""
  164.             set ServiceNode   = $(PortDriver)
  165.             set ServiceBinary = %SystemRoot%\System32\drivers\#(Files-KeyboardPortDrivers, $(PortDriver), 2)
  166.             set Type             = $(#(PortDrivers, $(PortDriver), 1))
  167.             set Group            =   #(PortDrivers, $(PortDriver), 2)
  168.             set ErrorControl     = $(#(PortDrivers, $(PortDriver), 3))
  169.             set Tag              =   #(PortDrivers, $(PortDriver), 4)
  170.             set EventMessageFile =   #(PortDrivers, $(PortDriver), 5)
  171.             set TypesSupported   =   #(PortDrivers, $(PortDriver), 6)
  172.             set ServicesValues   = { +
  173.                     {Type,           0, $(!REG_VT_DWORD),     $(Type)                  }, +
  174.                     {Start,          0, $(!REG_VT_DWORD),     $(!SERVICE_SYSTEM_START) }, +
  175.                     {Group,          0, $(!REG_VT_SZ),        $(Group)                 }, +
  176.                     {ErrorControl,   0, $(!REG_VT_DWORD),     $(ErrorControl)          }, +
  177.                     {Tag,            0, $(!REG_VT_DWORD),     $(Tag)                   }, +
  178.                     {BinaryPathName, 0, $(!REG_VT_EXPAND_SZ), $(ServiceBinary)         }  +
  179.                     }
  180.             set ParametersValues = ""
  181.             set DeviceValues     = {}
  182.             set EventLogValues   = { +
  183.                     {EventMessageFile, 0, $(!REG_VT_EXPAND_SZ), $(EventMessageFile) }, +
  184.                     {TypesSupported,   0, $(!REG_VT_DWORD),     $(TypesSupported)   }  +
  185.                     }
  186.             shell "registry.inf"  MakeServicesEntry $(ServiceNode)      +
  187.                                                     $(ServicesValues)   +
  188.                                                     $(ParametersValues) +
  189.                                                     $(DeviceValues)     +
  190.                                                     $(EventLogValues)   +
  191.                                                     Parameters
  192.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  193.                 Debug-Output "KEYBOARD.INF: Couldn't execute MakeServicesEntry in registry.inf"
  194.                 goto errorconfig
  195.             endif
  196.             ifstr(i) $($R0) != STATUS_SUCCESSFUL
  197.                 Debug-Output "KEYBOARD.INF: MakeServicesEntry failed for keyboard"
  198.                 goto errorconfig
  199.             endif
  200.         endif
  201.         ifstr(i) $(ClassDriver) != ""
  202.             set ServiceNode   = $(ClassDriver)
  203.             set ServiceBinary = %SystemRoot%\System32\drivers\#(Files-KeyboardClassDrivers, $(ClassDriver), 2)
  204.             set Type             = $(#(ClassDrivers, $(ClassDriver), 1))
  205.             set Group            =   #(ClassDrivers, $(ClassDriver), 2)
  206.             set ErrorControl     = $(#(ClassDrivers, $(ClassDriver), 3))
  207.             set Tag              =   #(ClassDrivers, $(ClassDriver), 4)
  208.             set EventMessageFile =   #(ClassDrivers, $(ClassDriver), 5)
  209.             set TypesSupported   =   #(ClassDrivers, $(ClassDriver), 6)
  210.             set ServicesValues   = { +
  211.                     {Type,           0, $(!REG_VT_DWORD),     $(Type)                  }, +
  212.                     {Start,          0, $(!REG_VT_DWORD),     $(!SERVICE_SYSTEM_START) }, +
  213.                     {Group,          0, $(!REG_VT_SZ),        $(Group)                 }, +
  214.                     {ErrorControl,   0, $(!REG_VT_DWORD),     $(ErrorControl)          }, +
  215.                     {Tag,            0, $(!REG_VT_DWORD),     $(Tag)                   }, +
  216.                     {BinaryPathName, 0, $(!REG_VT_EXPAND_SZ), $(ServiceBinary)         }  +
  217.                     }
  218.             set ParametersValues = ""
  219.             set DeviceValues     = {}
  220.             set EventLogValues   = { +
  221.                     {EventMessageFile, 0, $(!REG_VT_EXPAND_SZ), $(EventMessageFile) }, +
  222.                     {TypesSupported,   0, $(!REG_VT_DWORD),     $(TypesSupported)   }  +
  223.                     }
  224.             shell "registry.inf"  MakeServicesEntry $(ServiceNode)      +
  225.                                                     $(ServicesValues)   +
  226.                                                     $(ParametersValues) +
  227.                                                     $(DeviceValues)     +
  228.                                                     $(EventLogValues)   +
  229.                                                     Parameters
  230.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  231.                 Debug-Output "KEYBOARD.INF: Couldn't execute MakeServicesEntry in registry.inf"
  232.                 goto errorconfig
  233.             endif
  234.             ifstr(i) $($R0) != STATUS_SUCCESSFUL
  235.                 Debug-Output "KEYBOARD.INF: MakeServicesEntry failed for keyboard"
  236.                 goto errorconfig
  237.             endif
  238.         endif
  239.         ifstr(i) $(CurrentPortEntry) != $(PortDriver)
  240.             ifstr(i) $(CurrentPortEntry) != ""
  241.                 ifstr(i) $(CurrentPortEntry) != i8042prt
  242.                     shell "registry.inf" ModifyServicesEntry $(CurrentPortEntry) $(!SERVICE_DISABLED)
  243.                     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  244.                         Debug-Output "KEYBOARD.INF: Couldn't find DisableServicesEntry in registry.inf"
  245.                         goto errorconfig
  246.                     endif
  247.                     ifstr(i) $($R0) != STATUS_SUCCESSFUL
  248.                         Debug-Output "KEYBOARD.INF: DisableServices entry failed"
  249.                         goto errorconfig
  250.                     endif
  251.                 endif
  252.             endif
  253.         endif
  254.         ifstr(i) $(CurrentClassEntry) != $(ClassDriver)
  255.             ifstr(i) $(CurrentClassEntry) != ""
  256.                 shell "registry.inf" ModifyServicesEntry $(CurrentClassEntry) $(!SERVICE_DISABLED)
  257.                 ifint $($ShellCode) != $(!SHELL_CODE_OK)
  258.                     Debug-Output "KEYBOARD.INF: Couldn't find DisableServicesEntry in registry.inf"
  259.                     goto errorconfig
  260.                 endif
  261.                 ifstr(i) $($R0) != STATUS_SUCCESSFUL
  262.                     Debug-Output "KEYBOARD.INF: DisableServices entry failed"
  263.                     goto errorconfig
  264.                 endif
  265.             endif
  266.         endif
  267.         goto configdone
  268. errorconfig = +
  269.         ifstr(i) $(CurrentPortEntry) != $(PortDriver)
  270.             ifstr(i) $(PortDriver) != ""
  271.                 shell "registry.inf" ModifyServicesEntry $(PortDriver) $(!SERVICE_DISABLED)
  272.             endif
  273.             ifstr(i) $(CurrentPortEntry) != ""
  274.                 shell "registry.inf" ModifyServicesEntry $(CurrentPortEntry) $(!SERVICE_SYSTEM_START)
  275.             endif
  276.         endif
  277.         ifstr(i) $(CurrentClassEntry) != $(ClassDriver)
  278.             ifstr(i) $(ClassDriver) != ""
  279.                 shell "registry.inf" ModifyServicesEntry $(ClassDriver) $(!SERVICE_DISABLED)
  280.             endif
  281.             ifstr(i) $(CurrentClassEntry) != ""
  282.                 shell "registry.inf" ModifyServicesEntry $(CurrentClassEntry) $(!SERVICE_SYSTEM_START)
  283.             endif
  284.         endif
  285.         goto finish_InstallOption
  286. configdone = +
  287.     endif
  288.     set Status = STATUS_SUCCESSFUL
  289. finish_InstallOption = +
  290.     ForListDo $(DrivesToFree)
  291.         LibraryProcedure STATUS,$(!LIBHANDLE), DeleteNetConnection $($) "TRUE"
  292.     EndForListDo
  293.     Return $(Status)
  294. [Install-AddCopyOption]
  295.     set STF_VITAL = ""
  296.     AddSectionKeyFileToCopyList   Files-KeyboardPortDrivers     +
  297.                                   $(PortDriver)                 +
  298.                                   $(SrcDir)                     +
  299.                                   $(!STF_WINDOWSSYSPATH)\drivers
  300.     AddSectionKeyFileToCopyList   Files-KeyboardClassDrivers     +
  301.                                   $(ClassDriver)                 +
  302.                                   $(SrcDir)                      +
  303.                                   $(!STF_WINDOWSSYSPATH)\drivers
  304.     exit
  305. [Install-DoCopyOption]
  306.     CopyFilesInCopyList
  307.     exit
  308. [Source Media Descriptions]
  309.     1    = "Windows NT Advanced Server Setup Disk #1"   , TAGFILE = disk1
  310.     2    = "Windows NT Advanced Server Setup Disk #2"   , TAGFILE = disk2
  311.     3    = "Windows NT Advanced Server Setup Disk #3"   , TAGFILE = disk3
  312.     4    = "Windows NT Advanced Server Setup Disk #4"   , TAGFILE = disk4
  313.     5    = "Windows NT Advanced Server Setup Disk #5"   , TAGFILE = disk5
  314.     6    = "Windows NT Advanced Server Setup Disk #6"   , TAGFILE = disk6
  315.     7    = "Windows NT Advanced Server Setup Disk #7"   , TAGFILE = disk7
  316.     8    = "Windows NT Advanced Server Setup Disk #8"   , TAGFILE = disk8
  317.     9    = "Windows NT Advanced Server Setup Disk #9"   , TAGFILE = disk9
  318.     10    = "Windows NT Advanced Server Setup Disk #10"  , TAGFILE = disk10
  319.     11    = "Windows NT Advanced Server Setup Disk #11"  , TAGFILE = disk11
  320.     12    = "Windows NT Advanced Server Setup Disk #12"  , TAGFILE = disk12
  321.     13    = "Windows NT Advanced Server Setup Disk #13"  , TAGFILE = disk13
  322.     14    = "Windows NT Advanced Server Setup Disk #14"  , TAGFILE = disk14
  323.     15    = "Windows NT Advanced Server Setup Disk #15"  , TAGFILE = disk15
  324.     16    = "Windows NT Advanced Server Setup Disk #16"  , TAGFILE = disk16
  325.     17    = "Windows NT Advanced Server Setup Disk #17"  , TAGFILE = disk17
  326.     18    = "Windows NT Advanced Server Setup Disk #18"  , TAGFILE = disk18
  327.     19    = "Windows NT Advanced Server Setup Disk #19"  , TAGFILE = disk19
  328.     20    = "Windows NT Advanced Server Setup Disk #20"  , TAGFILE = disk20
  329.     21    = "Windows NT Advanced Server Setup Disk #21"  , TAGFILE = disk21
  330.     22    = "Windows NT Advanced Server Setup Disk #22"  , TAGFILE = disk22
  331.     23    = "Windows NT Advanced Server Setup Disk #23"  , TAGFILE = disk23
  332.     24    = "Windows NT Advanced Server Setup Disk #24"  , TAGFILE = disk24
  333.     25    = "Windows NT Advanced Server Setup Disk #25"  , TAGFILE = disk25
  334.     26    = "Windows NT Advanced Server Setup Disk #26"  , TAGFILE = disk26
  335.     27    = "Windows NT Advanced Server Setup Disk #27"  , TAGFILE = disk27
  336.     28    = "Windows NT Advanced Server Setup Disk #28"  , TAGFILE = disk28
  337.     29    = "Windows NT Advanced Server Setup Disk #29"  , TAGFILE = disk29
  338. [ProductType]
  339. STF_PRODUCT  = LanmanNT
  340. STF_PLATFORM = I386
  341. [Files-KeyboardClassDrivers]
  342. kbdclass = 8,KBDCLASS.SYS , SIZE=17920
  343. [Files-KeyboardPortDrivers]
  344. i8042prt = 8,I8042PRT.SYS , SIZE=35328
  345. [LanguagesSupported]
  346.     ENG
  347. [OptionsTextENG]
  348.     STANDARD  = "XT, AT or Enhanced Keyboard (83-102 key)"
  349. [ProgressCopyENG]
  350.     ProCaption   = "Windows NT Setup"
  351.     ProCancel    = "Cancel"
  352.     ProCancelMsg = "Windows NT is not correcly installed.  Are you sure you want "+
  353.                    "to cancel copying files?"
  354.     ProCancelCap = "Setup Message"
  355.     ProText1     = "Copying:"
  356.     ProText2     = "To:"
  357. [StringsENG]
  358.     String1 = "Keyboard"
  359.     String2 = "Please enter the full path to the Windows NT Keyboard "+
  360.               "driver files.  If you want to install files from the original "+
  361.               "Setup floppy disks, type a drive letter (such as A:) and "+
  362.               "Setup will prompt you for the correct disk.  Then choose Continue."
  363.  
  364.  
  365.  
  366.