home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / d / d423_liu / 8.ddi / OTHER.IN_ / OTHER.IN
Encoding:
INI File  |  1993-07-24  |  13.8 KB  |  395 lines
  1. [Options]
  2.     Computer            = cpt
  3.     Video               = vio
  4.     Pointer             = ptr
  5.     Keyboard            = kbd
  6.     Layout              = lay
  7.     Language            = lng
  8.     Printer             = prn
  9.     Scsi                = scs
  10.     Tape                = tap
  11.     Sound               = snd
  12.     Driver              = drv
  13.     NetAdapter          = nad
  14.     NetDriver           = ndr
  15.     NetTransport        = nxp
  16.     NetService          = nsv
  17.     Network             = nwk
  18.     NetProvider         = npr
  19. [OemOptionFiles]
  20.     OemFiles = {} ? $(!LIBHANDLE) FindFileInstances $(!STF_WINDOWSSYSPATH)"\oem"$(Abb)"*.inf"
  21. [ReturnOemOptions]
  22.     set Status         = STATUS_FAILED
  23.     set OemOptionList  = {}
  24.     set Abb = #(Options, $($1), 1)
  25.     read-syms OemOptionFiles
  26.     detect OemOptionFiles
  27.     ForListDo $(OemFiles)
  28.         set OemFileName = $(!STF_WINDOWSSYSPATH)"\"$($)
  29.         set Found = FALSE
  30.         shell "", GetOptionsFromINF $($0) $($1) $(OemFileName)
  31.         ifstr(i) $($R0) == STATUS_SUCCESSFUL
  32.             ForListDo $(OemOptionList)
  33.                 ifstr(i) *($($), 2) == $($R1)
  34.                     set Found = TRUE
  35.                 endif
  36.             EndForListDo
  37.             ifstr(i) $(Found) == FALSE
  38.                 set OemOptionList = >($(OemOptionList), {$($), $($R1), $($R2)})
  39.             endif
  40.         endif
  41.     EndForListDo
  42.     set Status = STATUS_SUCCESSFUL
  43. finish_GetCurrentOemOptions = +
  44.     Return $(Status) $(OemOptionList)
  45. [GetOptionsFromINF]
  46.     set Status         = STATUS_FAILED
  47.     set OptionList     = {}
  48.     set OptionTextList = {}
  49.     set FileToCheck = $($2)
  50.     install Install-SeeIfFileIsPresent
  51.     ifstr(i) $(STATUS) != "YES"
  52.         set Status = STATUS_INFNOTFOUND
  53.         goto finish_GetOptionsFromINF
  54.     endif
  55.     shell $($2) Identify
  56.     ifstr(i) $($R0) == "STATUS_SUCCESSFUL"
  57.         ifstr(i) $($R1) == $($1)
  58.             shell $($2) ReturnOptions $($0) $(!STF_BUSTYPE)
  59.             ifstr(i) $($R0) == STATUS_SUCCESSFUL
  60.                  set  OptionList     = $($R1)
  61.                  set  OptionTextList = $($R2)
  62.                  set  Status         = STATUS_SUCCESSFUL
  63.                  goto finish_GetOptionsFromINF
  64.             endif
  65.         endif
  66.     endif
  67. finish_GetOptionsFromINF = +
  68.     Return $(Status) $(OptionList) $(OptionTextList)
  69. [GetNewOEMOption]
  70.     set Status            = STATUS_FAILED
  71.     set Option            = $($2)
  72.     set OptDisketteSrc    = $($3)
  73.     set OptDiskette       = #(OptionDiskettes$($0), $($2), 1)
  74.     set InfName1          = "OEMSETUP.INF"
  75.     set InfName2          = "OEMSETNT.INF"
  76.     set Abb = #(Options, $(Option), 1)
  77.     set NewOemOptionList  = $($1)
  78.     set OptionChosen      = ""
  79.     set OptionChosenText  = ""
  80. ask_dodiskette = +
  81.     set InfName = $(InfName1)
  82.     shell "" DoDiskette $($0) $(OptDiskette) $(OptDisketteSrc)
  83.     set Status = STATUS_FAILED
  84.     ifstr(i) $($R0) == STATUS_USERCANCEL
  85.         set Status = STATUS_USERCANCEL
  86.         goto finish_GetOEMOption
  87.     else-ifstr(i) $($R0) == STATUS_FAILED
  88.         goto finish_GetOEMOption
  89.     endif
  90.     set OptDisketteSrc = $($R1)
  91. ask_inf_retry = +
  92.     FlushInf $(InfName)
  93.     LibraryProcedure FileToCheck, $(!LIBHANDLE), AppendBackSlash $(OptDisketteSrc)
  94.     set FileToCheck = $(FileToCheck)$(InfName)
  95.     install Install-SeeIfFileIsPresent
  96.     set OemSetupFilePath = $(FileToCheck)
  97.     set NfError = 1
  98.     ifstr(i) $(STATUS) == YES
  99.         set NfError = 2
  100.         shell $(OemSetupFilePath) Identify
  101.         ifstr(i) $($R0) == "STATUS_SUCCESSFUL"
  102.             ifstr(i) $($R1) == $(Option)
  103.                 shell $(OemSetupFilePath) ReturnOptions $($0) $(!STF_BUSTYPE)
  104.                 ifstr(i) $($R0) == STATUS_SUCCESSFUL
  105.                      set OemList     = $($R1)
  106.                      set OemTextList = $($R2)
  107.                      goto asksingleselection
  108.                 endif
  109.             endif
  110.         endif
  111.     endif
  112.     ifstr(i) $(InfName) == $(InfName1)
  113.         Set InfName = $(InfName2)
  114.         goto ask_inf_retry
  115.     endif
  116.     read-syms NonFatalError$(NfError)$($0)
  117.     shell "subroutn.inf" SetupMessage $($0) "NONFATAL" $(NonFatal)
  118.     goto ask_dodiskette
  119. asksingleselection = +
  120.     shell "" DoSingleOption $(OemList) $(OemTextList) $(OptDiskette)
  121.     ifstr(i) $($R0) == STATUS_FAILED
  122.         set Status = STATUS_FAILED
  123.         goto finish_GetOEMOption
  124.     else-ifstr(i) $($R0) == STATUS_USERCANCEL
  125.         set Status = STATUS_USERCANCEL
  126.         goto finish_GetOEMOption
  127.     endif
  128.     set OptionChosen     = $($R1)
  129.     set OptionChosenText = $($R2)
  130.     set Duplicate = FALSE
  131.     ForListDo $($1)
  132.         ifstr(i) *($($), 2) == $(OemList)
  133.             set OemFileName = *($($), 1)
  134.             set Duplicate = TRUE
  135.             FlushInf $(OemFileName)
  136.             goto copyinf
  137.         endif
  138.     EndForListDo
  139.     set Num = 0
  140. nextinf = +
  141.     ifint $(Num) < 99
  142.         set OemFileName = "oem"$(Abb)$(Num)".inf"
  143.         set FileToCheck = $(!STF_WINDOWSSYSPATH)"\"$(OemFileName)
  144.         install Install-SeeIfFileIsPresent
  145.         ifstr(i) $(STATUS) == "YES"
  146.             set-add Num = $(Num) 1
  147.             goto nextinf
  148.         else
  149.             goto copyinf
  150.         endif
  151.     endif
  152.     goto finish_GetOEMOption
  153. copyinf = +
  154.     set OemSrc = $(OemSetupFilePath)
  155.     set OemDst = $(!STF_WINDOWSSYSPATH)"\"$(OemFileName)
  156.     install Install-OemINF
  157.     ifstr(i) $(Duplicate) == TRUE
  158.     else
  159.         set NewOemOptionList = >($(NewOemOptionList), {$(OemFileName), $(OemList), $(OemTextList)})
  160.     endif
  161.     set Status = STATUS_SUCCESSFUL
  162. finish_GetOEMOption = +
  163.     FlushInf $(InfName)
  164.     Return $(Status) $(NewOemOptionList) $(OptionChosen) $(OptionChosenText) $(OptDisketteSrc)
  165. [GetNewOEMMultiOption]
  166.     Debug-Output $(STF_CONTEXTINFNAME)": GetNewOEMMultiOption called"
  167.     set Status            = STATUS_FAILED
  168.     set OptionType        = ""
  169.     set OptionTypeList    = $($2)
  170.     set OptDisketteSrc    = $($3)
  171.     set InfName1          = "OEMSETUP.INF"
  172.     set InfName2          = "OEMSETNT.INF"
  173.     read-syms OptionDisketteMulti$($0)
  174.     Set TypeNames = ^(Options,0)
  175.     Set TypeAbbs  = ^(Options,1)
  176.     set NewOemOptionList  = $($1)
  177.     set OptionChosen      = ""
  178.     set OptionChosenText  = ""
  179. m_ask_dodiskette = +
  180.     Debug-Output $(STF_CONTEXTINFNAME)": GetNewOEMMultiOption shelling DoDiskette"
  181.     set InfName = $(InfName1)
  182.     shell "" DoDiskette $($0) $(OptDiskette) $(OptDisketteSrc)
  183.     set Status = STATUS_FAILED
  184.     ifstr(i) $($R0) == STATUS_USERCANCEL
  185.         set Status = STATUS_USERCANCEL
  186.         goto m_finish_GetOEMOption
  187.     else-ifstr(i) $($R0) == STATUS_FAILED
  188.         goto m_finish_GetOEMOption
  189.     endif
  190.     set OptDisketteSrc = $($R1)
  191. m_ask_inf_retry = +
  192.     FlushInf $(InfName)
  193.     LibraryProcedure FileToCheck, $(!LIBHANDLE), AppendBackSlash $(OptDisketteSrc)
  194.     set FileToCheck = $(FileToCheck)$(InfName)
  195.     install Install-SeeIfFileIsPresent
  196.     set OemSetupFilePath = $(FileToCheck)
  197.     set NfError = 1
  198.     ifstr(i) $(STATUS) == YES
  199.         set NfError = 2
  200.         shell $(OemSetupFilePath) Identify
  201.         ifstr(i) $($R0) == "STATUS_SUCCESSFUL"
  202.             ifcontains(i) $($R1) in $(OptionTypeList)
  203.                 Set OptionType = $($R1)
  204.                 shell $(OemSetupFilePath) ReturnOptions $($0) $(!STF_BUSTYPE)
  205.                 ifstr(i) $($R0) == STATUS_SUCCESSFUL
  206.                      set OemList     = $($R1)
  207.                      set OemTextList = $($R2)
  208.                      goto m_asksingleselection
  209.                 endif
  210.             endif
  211.         endif
  212.     endif
  213.     ifstr(i) $(InfName) == $(InfName1)
  214.         Set InfName = $(InfName2)
  215.         goto m_ask_inf_retry
  216.     endif
  217.     read-syms NonFatalError$(NfError)$($0)
  218.     shell "subroutn.inf" SetupMessage $($0) "NONFATAL" $(NonFatal)
  219.     goto m_ask_dodiskette
  220. m_asksingleselection = +
  221.     shell "" DoSingleOption $(OemList) $(OemTextList) $(OptDiskette)
  222.     ifstr(i) $($R0) == STATUS_FAILED
  223.         set Status = STATUS_FAILED
  224.         goto m_finish_GetOEMOption
  225.     else-ifstr(i) $($R0) == STATUS_USERCANCEL
  226.         set Status = STATUS_USERCANCEL
  227.         goto m_finish_GetOEMOption
  228.     endif
  229.     set OptionChosen     = $($R1)
  230.     set OptionChosenText = $($R2)
  231.     set Duplicate = FALSE
  232.     ForListDo $($1)
  233.         ifstr(i) *($($), 2) == $(OemList)
  234.             set OemFileName = *($($), 1)
  235.             set Duplicate = TRUE
  236.             FlushInf $(OemFileName)
  237.             goto m_copyinf
  238.         endif
  239.     EndForListDo
  240.     set Num = 0
  241.     Set Abb = *($(TypeAbbs),~($(TypeNames),$(OptionType)))
  242. m_nextinf = +
  243.     ifint $(Num) < 99
  244.         set OemFileName = "oem"$(Abb)$(Num)".inf"
  245.         Debug-Output "OTHER.INF: Checking winsyspath for "$(OemFileName)
  246.         set FileToCheck = $(!STF_WINDOWSSYSPATH)"\"$(OemFileName)
  247.         install Install-SeeIfFileIsPresent
  248.         ifstr(i) $(STATUS) == "YES"
  249.             set-add Num = $(Num) 1
  250.             goto m_nextinf
  251.         else
  252.             goto m_copyinf
  253.         endif
  254.     endif
  255.     goto m_finish_GetOEMOption
  256. m_copyinf = +
  257.     set OemSrc = $(OemSetupFilePath)
  258.     set OemDst = $(!STF_WINDOWSSYSPATH)"\"$(OemFileName)
  259.     install Install-OemINF
  260.     ifstr(i) $(Duplicate) == TRUE
  261.     else
  262.         set NewOemOptionList = >($(NewOemOptionList), {$(OemFileName), $(OemList), $(OemTextList)})
  263.     endif
  264.     set Status = STATUS_SUCCESSFUL
  265. m_finish_GetOEMOption = +
  266.     FlushInf $(InfName)
  267.     Return $(Status) $(NewOemOptionList) $(OptionChosen) $(OptionChosenText) $(OptDisketteSrc)
  268. [DoDiskette]
  269.     set Status         = STATUS_FAILED
  270.     set OemDiskette    = $($1)
  271.     set OemDisketteSrc = $($2)
  272.     Debug-Output $(STF_CONTEXTINFNAME)": DoDiskette called"
  273.     read-syms DisketteDlg$($0)
  274.     ui start "Diskette"
  275.     ifstr(i) $(DLGEVENT) == "CONTINUE"
  276.         set OemDisketteSrc = $(EditTextOut)
  277.         ui pop 1
  278.         set Status = STATUS_SUCCESSFUL
  279.         goto finish_dodiskette
  280.     else-ifstr(i) $(DLGEVENT) == "BACK"
  281.         ui pop 1
  282.         set Status = STATUS_USERCANCEL
  283.         goto finish_dodiskette
  284.     else
  285.         ui pop 1
  286.         goto finish_dodiskette
  287.     endif
  288. finish_dodiskette = +
  289.     Return $(Status) $(OemDisketteSrc)
  290. [DoSingleOption]
  291.     set Status              = STATUS_FAILED
  292.     set OemOptionChosen     = ""
  293.     set OemOptionChosenText = ""
  294.     set OemOptionList       = $($0)
  295.     set OemOptionTextList   = $($1)
  296.     set OemOptionTypeText   = $($2)
  297.     read-syms OemSingleOptionDlg$(!STF_LANGUAGE)
  298.     ui start "Diskette"
  299.     ifstr(i) $(DLGEVENT) == "CONTINUE"
  300.         ui pop 1
  301.         ifstr(i) $(ListItemsOut) == ""
  302.             set Status = STATUS_USERCANCEL
  303.         else
  304.             set OemOptionChosenText = $(ListItemsOut)
  305.             set OemOptionChosen = *($($0), ~($(ListItemsIn), $(ListItemsOut)))
  306.             set Status = STATUS_SUCCESSFUL
  307.         endif
  308.         goto finish_dosingleoption
  309.     else-ifstr(i) $(DLGEVENT) == "BACK"
  310.         ui pop 1
  311.         set Status = STATUS_USERCANCEL
  312.         goto finish_dosingleoption
  313.     else
  314.         ui pop 1
  315.         set Status = STATUS_FAILED
  316.         goto finish_dosingleoption
  317.     endif
  318. finish_dosingleoption = +
  319.     Return $(Status) $(OemOptionChosen) $(OemOptionChosenText)
  320. [Install-SeeIfFileIsPresent]
  321. LibraryProcedure STATUS,$(!LIBHANDLE), CheckFileExistance $(FileToCheck)
  322. exit
  323. [Install-OemINF]
  324. LibraryProcedure STATUS,$(!LIBHANDLE), CopySingleFile $(OemSrc) $(OemDst)
  325. exit
  326. [LanguagesSupported]
  327.     ENG
  328. [OptionDiskettesENG]
  329.     Computer     = "Computer Driver"
  330.     Video        = "Display Driver"
  331.     Pointer      = "Mouse Driver"
  332.     Keyboard     = "Keyboard Driver"
  333.     Layout       = "Keyboard Layout"
  334.     Language     = "Language Driver"
  335.     Printer      = "Printer Driver"
  336.     Scsi         = "Scsi Driver"
  337.     Tape         = "Tape Driver"
  338.     Sound        = "Sound Driver"
  339.     Driver       = "Driver"
  340.     NetAdapter   = "Network Adapter"
  341.     NetDriver    = "Network Driver"
  342.     NetTransport = "Network Transport"
  343.     NetService   = "Network Service"
  344.     Network      = "Network"
  345.     NetProvider  = "Network Provider"
  346. [OptionDisketteMultiENG]
  347.     OptDiskette = "software"
  348. [DisketteDlgENG]
  349.     Caption        = "Insert Diskette"
  350.     DlgText        = "Insert disk with "$(OemDiskette)" provided by the "+
  351.                      "software or hardware manufacturer.  If the files can be found at "+
  352.                      "a different location, for example on another drive "+
  353.                      "type a new path to the files below."
  354.     Continue       = "OK"
  355.     Cancel         = "Cancel"
  356.     DlgType        = "Edit"
  357.     DlgTemplate    = "DISKETTE"
  358.     Edit1Label     = ""
  359.     EditTextIn     = $(OemDisketteSrc)
  360.     EditFocus      = "ALL"
  361. [OemSingleOptionDlgENG]
  362.     Caption        = "Select OEM Option"
  363.     DlgText        = "Choose a "$(OemOptionTypeText)" supported by this hardware "+
  364.                      "manufacturer's disk."
  365.     Continue       = "OK"
  366.     Cancel         = "Cancel"
  367.     Help           = "&Help"
  368.     DlgType        = List
  369.     DlgTemplate    = "OEMSINGLESEL"
  370.     HelpContext    = $(!IDH_DB_OEMSINGLESEL_INS)
  371.     ListItemsIn    = $(OemOptionTextList)
  372.     ListItemsOut   = *($(OemOptionTextList),1)
  373. [OemMultiOptionENG]
  374.     Caption        = "Select OEM Option(s)"
  375.     DlgText        = "Choose "$(DeviceOem)"(s) supported by this hardware "+
  376.                      "manufacturer's disk."
  377.     Continue       = "OK"
  378.     Cancel         = "Cancel"
  379.     Help           = "&Help"
  380.     DlgType        = List
  381.     DlgTemplate    = "OEMMULTISEL"
  382.     HelpContext    = $(!IDH_DB_OEMMULTISEL_INS)
  383.     ListItemsIn    = $(OemTextList)
  384.     ListItemsOut   = {}
  385. [NonFatalError1ENG]
  386. NonFatal = "Setup cannot find OEMSETUP.INF or OEMSETNT.INF."$(!LF)$(!LF)+
  387.            "Please type a new path to the OEMSETUP.INF file."
  388. [NonFatalError2ENG]
  389. NonFatal = "The OEMSETUP.INF or OEMSETNT.INF file found is not valid "+
  390.            "for the current option."$(!LF)$(!LF)+
  391.            "Please type a new path to the OEMSETUP.INF file."
  392.  
  393.  
  394.  
  395.