home *** CD-ROM | disk | FTP | other *** search
/ Inside Multimedia 1995 December / IMM1295.ISO / driver / cirrus / disk3 / oemsetup.inf < prev    next >
INI File  |  1994-05-25  |  22KB  |  619 lines
  1. ;-----------------------------------------------------------------------
  2. ; OPTION TYPE
  3. ; -----------
  4. ; This identifies the Option type we are dealing with.  The different
  5. ; possible types are:
  6. ;
  7. ; COMPUTER, VIDEO, MOUSE, KEYBOARD, LAYOUT, SCSI, PRINTER, ...
  8. ;-----------------------------------------------------------------------
  9.  
  10. [Identification]
  11.     OptionType = VIDEO
  12.  
  13. ;-----------------------------------------------------------------------
  14. ; LANGUAGES SUPPORTED
  15. ; -------------------
  16. ;
  17. ; The languages supported by the OEM INF, For every language supported
  18. ; we need to have a separate text section for every displayable text
  19. ; section.
  20. ;
  21. ;-----------------------------------------------------------------------
  22.  
  23. [LanguagesSupported]
  24.     ENG
  25.  
  26. ;-----------------------------------------------------------------------
  27. ; OPTION LIST
  28. ; -----------
  29. ; This section lists the OEM Option key names.  These keys are locale
  30. ; independent and used to represent the option in a locale independent
  31. ; manner.
  32. ;
  33. ;-----------------------------------------------------------------------
  34.  
  35. ;
  36. ; Option list order: Option = Miniport driver, BitsPerPel, XResolution, YResolution, VRefresh, Interlaced
  37. ;
  38. ; If you don't want to create a VRefresh or Interlaced value under the service
  39. ; parameters then use the value ""
  40. ;
  41.  
  42. [Options]
  43.     "ALP640x480x4x60"    = cirrus4m, 4, 640,  480, 60, 0
  44.     "ALP640x480x4x75"    = cirrus4m, 4, 640,  480, 75, 0
  45.     "ALP640x480x8x60"    = cirrus4m, 8, 640,  480, 60, 0
  46.     "ALP640x480x8x75"    = cirrus4m, 8, 640,  480, 75, 0
  47.     "ALP800x600x4x60"    = cirrus4m, 4, 800,  600, 60, 0
  48.     "ALP800x600x4x72"    = cirrus4m, 4, 800,  600, 72, 0
  49.     "ALP800x600x4x75"    = cirrus4m, 4, 800,  600, 75, 0
  50.     "ALP800x600x8x60"    = cirrus4m, 8, 800,  600, 60, 0
  51.     "ALP800x600x8x72"    = cirrus4m, 8, 800,  600, 72, 0
  52.     "ALP800x600x8x75"    = cirrus4m, 8, 800,  600, 75, 0
  53.     "ALP1024x768x4x60"   = cirrus4m, 4, 1024, 768, 60, 0
  54.     "ALP1024x768x4x70"   = cirrus4m, 4, 1024, 768, 70, 0
  55.     "ALP1024x768x4x72"   = cirrus4m, 4, 1024, 768, 72, 0
  56.     "ALP1024x768x4x75"   = cirrus4m, 4, 1024, 768, 75, 0
  57.     "ALP1024x768x8x60"   = cirrus4m, 8, 1024, 768, 60, 0
  58.     "ALP1024x768x8x70"   = cirrus4m, 8, 1024, 768, 70, 0
  59.     "ALP1024x768x8x72"   = cirrus4m, 8, 1024, 768, 72, 0
  60.     "ALP1024x768x8x75"   = cirrus4m, 8, 1024, 768, 75, 0
  61.     "ALP1280x1024x4x60"  = cirrus4m, 4, 1280, 1024, 60, 0
  62.     "ALP1280x1024x4x45I" = cirrus4m, 4, 1280, 1024, 45, 1
  63.     "ALP1280x1024x8x60"  = cirrus4m, 8, 1280, 1024, 60, 0
  64.     "ALP1280x1024x8x45I" = cirrus4m, 8, 1280, 1024, 45, 1
  65.  
  66. ;
  67. ; This maps detected options into the options we support
  68. ;
  69. ; Format: DetectedOption = MappedOption
  70. ;
  71.  
  72. [MapOfOptions]
  73.     "VGA"                       = "VGA"
  74.     "COMPAQ AVGA"               = "VGA"
  75.     "COMPAQ AGB"                = "VGA"
  76.     "8514 MONITOR UNKNOWN"      = "VGA"
  77.     "8514 VGA MONITOR"          = "VGA"
  78.     "8514 8503 MONO"            = "VGA"
  79.     "8514 8514 GAD"             = "VGA"
  80.     "GENOA VGA"                 = "VGA"
  81.     "VIDEO7 VGA DRAM"           = "VIDEO7 VGA VRAM 640x480x4"
  82.     "VIDEO7 VGA VRAM"           = "VIDEO7 VGA VRAM 640x480x4"
  83.     "TRIDENT VGA"               = "VGA"
  84.     "TRIDENT VGA 9100"          = "VGA"
  85.     "PARADISE VGA"              = "VGA"
  86.     "PARADISE VGA PROM"         = "VGA"
  87.     "PARADISE VGA CHIP 1F"      = "VGA"
  88.     "ATI VGA"                   = "VGA"
  89.     "ATI VGA WONDDER3"          = "VGA"
  90.     "TSENGLAB VGA ET3000"       = "VGA"
  91.     "TSENGLAB VGA ET4000"       = "VGA"
  92.     "CIRRUS ALPINE VGA"         = "ALP640x480x4x60"
  93.     "CIRRUS VGA 610-620 REVC"   = "VGA"
  94.     "XGA"                       = "XGA 640x480x8"
  95.     "DELL DGX"                  = "DELL DGX 640x480x8"
  96.     "S3 VGA"                    = "S3 VGA 640x480x8"
  97.     "PRODESIGNER II"            = "TSENGLAB VGA ET4000 640x480x4x60"
  98.  
  99.  
  100. ;
  101. ; Order of the information:
  102. ;
  103. ; Port driver = Type, Group, ErrorControl, Tag, InstalledDisplay, VgaCompatible( 0/1 ), EventMessageFile, TypesSupported
  104. ;
  105.  
  106. [MiniportDrivers]
  107.     cirrus4m   = !SERVICE_KERNEL_DRIVER, Video, !SERVICE_ERROR_NORMAL, 16, {clvga16,clblt256}, 1 , %SystemRoot%\System32\IoLogMsg.dll , 7
  108.  
  109.  
  110. ;-----------------------------------------------------------------------
  111. ; OPTION TEXT SECTION
  112. ; -------------------
  113. ; These are text strings used to identify the option to the user.  There
  114. ; are separate sections for each language supported.  The format of the
  115. ; section name is "OptionsText" concatenated with the Language represented
  116. ; by the section.
  117. ;
  118. ;-----------------------------------------------------------------------
  119.  
  120. [OptionsTextENG]
  121.     "ALP640x480x4x60"   = "Cirrus Logic Gd543x 640x480, 16 colors 60Hz"
  122.     "ALP640x480x4x75"   = "Cirrus Logic Gd543x 640x480, 16 colors 75Hz"
  123.     "ALP640x480x8x60"   = "Cirrus Logic Gd543x 640x480, 256 colors 60Hz"
  124.     "ALP640x480x8x75"   = "Cirrus Logic Gd543x 640x480, 256 colors 75Hz"
  125.     "ALP800x600x4x60"   = "Cirrus Logic Gd543x 800x600, 16 colors 60Hz"
  126.     "ALP800x600x4x72"   = "Cirrus Logic Gd543x 800x600, 16 colors 72Hz"
  127.     "ALP800x600x4x75"   = "Cirrus Logic Gd543x 800x600, 16 colors 75Hz"
  128.     "ALP800x600x8x60"   = "Cirrus Logic Gd543x 800x600, 256 colors 60Hz"
  129.     "ALP800x600x8x72"   = "Cirrus Logic Gd543x 800x600, 256 colors 72Hz"
  130.     "ALP800x600x8x75"   = "Cirrus Logic Gd543x 800x600, 256 colors 75Hz"
  131.     "ALP1024x768x4x60"  = "Cirrus Logic Gd543x 1024x768, 16 colors 60Hz"
  132.     "ALP1024x768x4x70"  = "Cirrus Logic Gd543x 1024x768, 16 colors 70Hz"
  133.     "ALP1024x768x4x72"  = "Cirrus Logic Gd543x 1024x768, 16 colors 72Hz"
  134.     "ALP1024x768x4x75"  = "Cirrus Logic Gd543x 1024x768, 16 colors 75Hz"
  135.     "ALP1024x768x8x60"  = "Cirrus Logic Gd543x 1024x768, 256 colors 60Hz"
  136.     "ALP1024x768x8x70"  = "Cirrus Logic Gd543x 1024x768, 256 colors 70Hz"
  137.     "ALP1024x768x8x72"  = "Cirrus Logic Gd543x 1024x768, 256 colors 72Hz"
  138.     "ALP1024x768x8x75"  = "Cirrus Logic Gd543x 1024x768, 256 colors 75Hz"
  139.     "ALP1280x1024x4x60"  = "Cirrus Logic Gd543x 1280x1024, 16 colors 60Hz"
  140.     "ALP1280x1024x4x45I" = "Cirrus Logic Gd543x 1280x1024, 16 colors Interlaced"
  141.     "ALP1280x1024x8x60"  = "Cirrus Logic Gd543x 1280x1024, 256 colors 60Hz"
  142.     "ALP1280x1024x8x45I" = "Cirrus Logic Gd543x 1280x1024, 256 colors Interlaced"
  143.  
  144.  
  145.  
  146. ;---------------------------------------------------------------------------
  147. ; 1. Identify
  148. ;
  149. ; DESCRIPTION:   To verify that this INF deals with the same type of options
  150. ;                as we are choosing currently.
  151. ;
  152. ; INPUT:         None
  153. ;
  154. ; OUTPUT:        $($R0): STATUS: STATUS_SUCCESSFUL
  155. ;                $($R1): Option Type (COMPUTER ...)
  156. ;                $($R2): Diskette description
  157. ;---------------------------------------------------------------------------
  158.  
  159. [Identify]
  160.     ;
  161.     ;
  162.     read-syms Identification
  163.  
  164.     set Status     = STATUS_SUCCESSFUL
  165.     set Identifier = $(OptionType)
  166.     set Media      = #("Source Media Descriptions", 1, 1)
  167.  
  168.     Return $(Status) $(Identifier) $(Media)
  169.  
  170.  
  171.  
  172. ;------------------------------------------------------------------------
  173. ; 2. ReturnOptions:
  174. ;
  175. ; DESCRIPTION:   To return the option list supported by this INF and the
  176. ;                localised text list representing the options.
  177. ;
  178. ;
  179. ; INPUT:         $($0):  Language used. ( ENG | FRN | ... )
  180. ;
  181. ; OUTPUT:        $($R0): STATUS: STATUS_SUCCESSFUL |
  182. ;                                STATUS_NOLANGUAGE
  183. ;                                STATUS_FAILED
  184. ;
  185. ;                $($R1): Option List
  186. ;                $($R2): Option Text List
  187. ;------------------------------------------------------------------------
  188.  
  189. [ReturnOptions]
  190.     ;
  191.     ;
  192.     set Status        = STATUS_FAILED
  193.     set OptionList     = {}
  194.     set OptionTextList = {}
  195.  
  196.     ;
  197.     ; Check if the language requested is supported
  198.     ;
  199.     set LanguageList = ^(LanguagesSupported, 1)
  200.     Ifcontains(i) $($0) in $(LanguageList)
  201.         goto returnoptions
  202.     else
  203.         set Status = STATUS_NOLANGUAGE
  204.         goto finish_ReturnOptions
  205.     endif
  206.  
  207.     ;
  208.     ; form a list of all the options and another of the text representing
  209.     ;
  210.  
  211. returnoptions = +
  212.     set OptionList     = ^(Options, 0)
  213.     set OptionTextList = ^(OptionsText$($0), 1)
  214.     set Status         = STATUS_SUCCESSFUL
  215.  
  216. finish_ReturnOptions = +
  217.     Return $(Status) $(OptionList) $(OptionTextList)
  218.  
  219.  
  220.  
  221. ;---------------------------------------------------------------------------
  222. ; MapToSupportedOption
  223. ;
  224. ; DESCRIPTION:   To map a hardware detected option to the NT Supported
  225. ;                option which represents it.
  226. ;
  227. ; INPUT:         $($0): Option
  228. ;
  229. ; OUTPUT:        $($R0): STATUS: STATUS_SUCCESSFUL
  230. ;                $($R1): Mapped Option
  231. ;
  232. ;---------------------------------------------------------------------------
  233.  
  234. [MapToSupportedOption]
  235.     ;
  236.     set Status = STATUS_FAILED
  237.     set MappedOption = $($0)
  238.  
  239.     ;
  240.     ; If the option is one we can support using one of our standard options
  241.     ; then map it to the standard option else map it to the default option
  242.     ; which is VGA.
  243.     ;
  244.  
  245.     set OptionList = ^(MapOfOptions, 0)
  246.     ifcontains $($0) in $(OptionList)
  247.         set MappedOption = #(MapOfOptions, $($0), 1)
  248.     else
  249.         set MappedOption = "VGA"
  250.     endif
  251.  
  252.     set Status = STATUS_SUCCESSFUL
  253.     Return $(Status) $(MappedOption)
  254.  
  255.  
  256.  
  257. [ServicesEntry]
  258.     CurrentEntry = "" ? $(!LIBHANDLE) GetDevicemapValue Video \Device\Video0
  259.  
  260.  
  261. ;
  262. ; InstallOption:
  263. ;
  264. ; FUNCTION:  To copy files representing Options
  265. ;            To configure the installed option
  266. ;            To update the registry for the installed option
  267. ;
  268. ; INPUT:     $($0):  Language to use
  269. ;            $($1):  OptionID to install
  270. ;            $($2):  SourceDirectory
  271. ;            $($3):  AddCopy  (YES | NO)
  272. ;            $($4):  DoCopy   (YES | NO)
  273. ;            $($5):  DoConfig (YES | NO)
  274. ;
  275. ; OUTPUT:    $($R0): STATUS: STATUS_SUCCESSFUL |
  276. ;                            STATUS_NOLANGUAGE |
  277. ;                            STATUS_USERCANCEL |
  278. ;                            STATUS_FAILED
  279. ;
  280.  
  281. [InstallOption]
  282.  
  283.     ;
  284.     ; Set default values for
  285.     ;
  286.     set Status       = STATUS_FAILED
  287.     set DrivesToFree = {}
  288.  
  289.     ;
  290.     ; extract parameters
  291.     ;
  292.     set Option   = $($1)
  293.     set SrcDir   = $($2)
  294.     set AddCopy  = $($3)
  295.     set DoCopy   = $($4)
  296.     set DoConfig = $($5)
  297.  
  298.     ;
  299.     ; Check if the language requested is supported
  300.     ;
  301.     set LanguageList = ^(LanguagesSupported, 1)
  302.     Ifcontains(i) $($0) in $(LanguageList)
  303.     else
  304.         set Status = STATUS_NOLANGUAGE
  305.         goto finish_InstallOption
  306.     endif
  307.     read-syms Strings$($0)
  308.  
  309.     ;
  310.     ; check to see if Option is supported.
  311.     ;
  312.  
  313.     set OptionList = ^(Options, 0)
  314.     ifcontains $(Option) in $(OptionList)
  315.     else
  316.         goto finish_InstallOption
  317.     endif
  318.     set OptionList = ""
  319.  
  320.     ;
  321.     ; Option has been defined already
  322.     ;
  323.     set MiniportDriver    = #(Options, $(Option), 1)
  324.     set BitsPerPel        = #(Options, $(Option), 2)
  325.     set XResolution       = #(Options, $(Option), 3)
  326.     set YResolution       = #(Options, $(Option), 4)
  327.     set VRefresh          = #(Options, $(Option), 5)
  328.     set Interlaced        = #(Options, $(Option), 6)
  329.  
  330.     set Type              = $(#(MiniportDrivers, $(MiniportDriver), 1))
  331.     set Group             =   #(MiniportDrivers, $(MiniportDriver), 2)
  332.     set ErrorControl      = $(#(MiniportDrivers, $(MiniportDriver), 3))
  333.     set Tag               =   #(MiniportDrivers, $(MiniportDriver), 4)
  334.     set InstalledDisplays =   #(MiniportDrivers, $(MiniportDriver), 5)
  335.     set VgaCompatible     =   #(MiniportDrivers, $(MiniportDriver), 6)
  336.     set EventMessageFile  =   #(MiniportDrivers, $(MiniportDriver), 7)
  337.     set TypesSupported    =   #(MiniportDrivers, $(MiniportDriver), 8)
  338.  
  339.     read-syms ServicesEntry
  340.     detect    ServicesEntry
  341.  
  342. installtheoption = +
  343.  
  344.     ;
  345.     ; Code to add files to copy list
  346.     ;
  347.  
  348.     ifstr(i) $(AddCopy) == "YES"
  349.         set DoActualCopy = NO
  350.         set FileToCheck = #(Files-DisplayMiniportDrivers, $(MiniportDriver), 2)
  351.         LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\drivers\"$(FileToCheck)
  352.         ifstr(i) $(STATUS) == NO
  353.             set DoActualCopy = YES
  354.             goto addfiles
  355.         endif
  356.         ForListDo $(InstalledDisplays)
  357.             set FileToCheck = #(Files-DisplayDLLs, $($), 2)
  358.             LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\"$(FileToCheck)
  359.             ifstr(i) $(STATUS) == NO
  360.                 set DoActualCopy = YES
  361.             endif
  362.         EndForListDo
  363.  
  364. addfiles = +
  365.         ifstr(i) $(DoActualCopy) == NO
  366.             shell "subroutn.inf" DriversExist $($0) $(String1)
  367.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  368.                 Debug-Output "VIDEO.INF: shelling DriversExist failed"
  369.                 goto finish_InstallOption
  370.             endif
  371.  
  372.             ifstr(i) $($R0) == STATUS_CURRENT
  373.             else-ifstr(i) $($R0) == STATUS_NEW
  374.                 set DoActualCopy = YES
  375.             else-ifstr(i) $($R0) == STATUS_USERCANCEL
  376.                 Debug-Output "VIDEO.INF: User cancelled video installation"
  377.                 goto finish_InstallOption
  378.             else
  379.                 Debug-Output "VIDEO.INF: Error reported in DriversExist routine in SUBROUTN.INF"
  380.                 goto finish_InstallOption
  381.             endif
  382.         endif
  383.  
  384.         ifstr(i) $(DoActualCopy) == YES
  385.  
  386.             shell "subroutn.inf" DoAskSourceEx $(SrcDir) $(String2)
  387.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  388.                 Debug-Output "VIDEO.INF: shelling DoAskSourceEx failed"
  389.                 goto finish_InstallOption
  390.             endif
  391.  
  392.             ifstr(i) $($R0) == STATUS_SUCCESSFUL
  393.                 set SrcDir = $($R1)
  394.                 ifstr(i) $($R2) != ""
  395.                     set DrivesToFree = >($(DrivesToFree), $($R2))
  396.                 endif
  397.             else
  398.                 Debug-Output "VIDEO.INF: User cancelled asking source."
  399.                 goto finish_InstallOption
  400.             endif
  401.  
  402.             install Install-AddCopyOption
  403.             ifstr(i) $(STF_INSTALL_OUTCOME) != "STF_SUCCESS"
  404.                 Debug-Output "VIDEO.INF: Adding video files to copy list failed"
  405.                 goto finish_InstallOption
  406.             endif
  407.         else
  408.             set DoCopy = NO
  409.         endif
  410.  
  411.     endif
  412.  
  413.     ifstr(i) $(DoCopy) == "YES"
  414.         read-syms ProgressCopy$($0)
  415.         install Install-DoCopyOption
  416.         ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_FAILURE"
  417.             Debug-Output "Copying files failed"
  418.             goto finish_InstallOption
  419.         else-ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_USERQUIT"
  420.             set Status = STATUS_USERCANCEL
  421.             goto finish_InstallOption
  422.         endif
  423.     endif
  424.  
  425.     ifstr(i) $(DoConfig) == "YES"
  426.  
  427.         ;
  428.         ; first run a privilege check on modifying the setup node
  429.         ;
  430.  
  431.         shell "registry.inf" CheckSetupModify
  432.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  433.             goto finish_InstallOption
  434.         endif
  435.  
  436.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  437.             goto finish_InstallOption
  438.         endif
  439.  
  440.         ;
  441.         ; first make a new video entry, the entry is created automatically
  442.         ; enabled
  443.         ;
  444.  
  445.         set ServiceNode   = $(MiniportDriver)
  446.         set ServiceBinary = %SystemRoot%\System32\drivers\#(Files-DisplayMiniportDrivers, $(MiniportDriver), 2)
  447.  
  448.         set ServicesValues   = { +
  449.                 {Type,           0, $(!REG_VT_DWORD),     $(Type)                  }, +
  450.                 {Start,          0, $(!REG_VT_DWORD),     $(!SERVICE_SYSTEM_START) }, +
  451.                 {Group,          0, $(!REG_VT_SZ),        $(Group)                 }, +
  452.                 {ErrorControl,   0, $(!REG_VT_DWORD),     $(ErrorControl)          }, +
  453.                 {Tag,            0, $(!REG_VT_DWORD),     $(Tag)                   }, +
  454.                 {BinaryPathName, 0, $(!REG_VT_EXPAND_SZ), $(ServiceBinary)         }  +
  455.                 }
  456.  
  457.         set ParametersValues = { +
  458.                 {InstalledDisplayDrivers,     0, $(!REG_VT_MULTI_SZ), $(InstalledDisplays) }, +
  459.                 {VgaCompatible,               0, $(!REG_VT_DWORD),    $(VgaCompatible)     }, +
  460.                 {DefaultSettings.BitsPerPel,  0, $(!REG_VT_DWORD),    $(BitsPerPel)        }, +
  461.                 {DefaultSettings.XResolution, 0, $(!REG_VT_DWORD),    $(XResolution)       }, +
  462.                 {DefaultSettings.YResolution, 0, $(!REG_VT_DWORD),    $(YResolution)       }  +
  463.                 }
  464.  
  465.         ifstr(i) $(VRefresh) != ""
  466.             set VRefreshValue = {DefaultSettings.VRefresh, 0, $(!REG_VT_DWORD), $(VRefresh)}
  467.             set ParametersValues = >($(ParametersValues), $(VRefreshValue))
  468.         endif
  469.  
  470.         ifstr(i) $(Interlaced) != ""
  471.             set InterlacedValue = {DefaultSettings.Interlaced, 0, $(!REG_VT_DWORD), $(Interlaced)}
  472.             set ParametersValues = >($(ParametersValues), $(InterlacedValue))
  473.         endif
  474.  
  475.         set DeviceValues     = {}
  476.         set EventLogValues   = { +
  477.                 {EventMessageFile, 0, $(!REG_VT_EXPAND_SZ), $(EventMessageFile) }, +
  478.                 {TypesSupported,   0, $(!REG_VT_DWORD),     $(TypesSupported)   }  +
  479.                 }
  480.  
  481.         shell "registry.inf"  MakeServicesEntry $(ServiceNode)      +
  482.                                                 $(ServicesValues)   +
  483.                                                 $(ParametersValues) +
  484.                                                 $(DeviceValues)     +
  485.                                                 $(EventLogValues)   +
  486.                                                 Device0
  487.  
  488.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  489.             Debug-Output "Couldn't execute MakeServicesEntry in registry.inf"
  490.             goto finish_InstallOption
  491.         endif
  492.  
  493.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  494.             Debug-Output "MakeServicesEntry failed for video"
  495.             goto finish_InstallOption
  496.         endif
  497.  
  498.         ;
  499.         ;
  500.         ; then disable the previous video entry
  501.         ;
  502.  
  503.         ifstr(i) $(CurrentEntry) != $(MiniportDriver)
  504.             ifstr(i) $(CurrentEntry) != VGA
  505.                 ifstr(i) $(CurrentEntry) != ""
  506.                     shell "registry.inf" ModifyServicesEntry $(CurrentEntry) $(!SERVICE_DISABLED)
  507.  
  508.                     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  509.                         Debug-Output "Couldn't find DisableServicesEntry in registry.inf"
  510.                         goto errorconfig
  511.                     endif
  512.  
  513.                     ifstr(i) $($R0) != STATUS_SUCCESSFUL
  514.                         Debug-Output "DisableServices entry failed"
  515.                     endif
  516.                 endif
  517.             endif
  518.         endif
  519.  
  520.         goto configdone
  521.  
  522. errorconfig = +
  523.         ifstr(i) $(CurrentEntry) != $(MiniportDriver)
  524.             shell "registry.inf" ModifyServicesEntry $(MiniportDriver) $(!SERVICE_DISABLED)
  525.             ifstr(i) $(CurrentEntry) != ""
  526.                 shell "registry.inf" ModifyServicesEntry $(CurrentEntry) $(!SERVICE_SYSTEM_START)
  527.             endif
  528.         endif
  529.         goto finish_InstallOption
  530.  
  531. configdone = +
  532.  
  533.     endif
  534.  
  535.     set Status = STATUS_SUCCESSFUL
  536.  
  537. finish_InstallOption = +
  538.     ForListDo $(DrivesToFree)
  539.         LibraryProcedure STATUS,$(!LIBHANDLE), DeleteNetConnection $($) "TRUE"
  540.     EndForListDo
  541.  
  542.     Return $(Status)
  543.  
  544.  
  545. [Install-AddCopyOption]
  546.  
  547.     set STF_VITAL = ""
  548.     ;
  549.     ; Add the files to the copy list
  550.     ;
  551.     AddSectionKeyFileToCopyList   Files-DisplayMiniportDrivers   +
  552.                                   $(MiniportDriver)              +
  553.                                   $(SrcDir)                      +
  554.                                   $(!STF_WINDOWSSYSPATH)\drivers
  555.  
  556.     ForListDo $(InstalledDisplays)
  557.         AddSectionKeyFileToCopyList   Files-DisplayDLLs          +
  558.                                       $($)                       +
  559.                                       $(SrcDir)                  +
  560.                                       $(!STF_WINDOWSSYSPATH)
  561.  
  562.     EndForListDo
  563.  
  564.     exit
  565.  
  566.  
  567. [Install-DoCopyOption]
  568.  
  569.     ;
  570.     ; Copy files in the copy list
  571.     ;
  572.     CopyFilesInCopyList
  573.     exit
  574.  
  575. ;**************************************************************************
  576. ; PROGRESS GAUGE VARIABLES
  577. ;**************************************************************************
  578.  
  579. [ProgressCopyENG]
  580.     ProCaption   = "Windows NT Setup"
  581.     ProCancel    = "Cancel"
  582.     ProCancelMsg = "Windows NT is not correcly installed.  Are you sure you want "+
  583.                    "to cancel copying files?"
  584.     ProCancelCap = "Setup Message"
  585.     ProText1     = "Copying:"
  586.     ProText2     = "To:"
  587.  
  588. [StringsENG]
  589.     String1 = "Display"
  590.     String2 = "Please enter the full path to the Cirrus Logic Gd543x "+
  591.               "Display driver files.  Then choose Continue."
  592.  
  593. ;-----------------------------------------------------------------------
  594. ; SOURCE MEDIA DESCRIPTIONS
  595. ; -------------------------
  596. ; The OEM should list all the diskette labels here.  The source media
  597. ; description is used during copy to prompt the user for a diskette
  598. ; if the source is diskettes.
  599. ;
  600. ; Use 1 = "Diskette 1 Label" , TAGFILE = disk1
  601. ;     2 = "Diskette 2 Label" , TAGFILE = disk2
  602. ;     ...
  603. ;-----------------------------------------------------------------------
  604.  
  605. ;--------------------------------------------------------------------
  606. ; THE SECTIONS BELOW SHOULD BE AUTOMATICALLY GENERATED BY THE EXCEL
  607. ; SPREAD SHEETS
  608. ;--------------------------------------------------------------------
  609.  
  610. [Source Media Descriptions]
  611.     1  = "CIRRUS LOGIC Gd543x VGA DRIVERS"  , TAGFILE = disk1
  612.  
  613. [Files-DisplayDLLs]
  614. clvga16 = 1,clvga16.dll , SIZE=999
  615. clblt256 = 1,clblt256.dll , SIZE=999
  616.  
  617. [Files-DisplayMiniportDrivers]
  618. cirrus4m = 1,cirrus4m.sys , SIZE=999
  619.