home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 2000 March / VPR0003B.ISO / alpha / oemnsvin.srv < prev    next >
INI File  |  1999-10-14  |  13KB  |  359 lines
  1. [Identification]
  2.     OptionType = NetService
  3. [Options]
  4.     INETSRV
  5. [FileConstants]
  6. Manufacturer        = "Microsoft"
  7. ProductMajorVersion = "4"
  8. ProductMinorVersion = "0"
  9. ProductVersion      = $(ProductMajorVersion)"."$(ProductMinorVersion)
  10. ProductOpSupport    = 134 
  11. ProductINETSRVName        = "Inetsrv"
  12. ProductKeyName  = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\Inetsrv\CurrentVersion"
  13. [GeneralConstants]
  14. UtilityInf       = "UTILITY.INF"
  15. subroutineinf    = "SUBROUTN.INF"
  16. Exit_Code        = 0
  17. BillboardVisible = 0
  18. from      = ""
  19. to        = ""
  20. ExitCodeOk     = 0
  21. ExitCodeCancel = 1
  22. ExitCodeFatal  = 2
  23. KeyNull         = ""
  24. MAXIMUM_ALLOWED   = 33554432
  25. SERVICE_NO_CHANGE = 4294967295
  26. RegistryErrorIndex = NO_ERROR
  27. KeyProduct      = ""
  28. KeyParameters   = ""
  29. TRUE            = 1
  30. FALSE           = 0
  31. NoTitle         = 0
  32. ExitState   = "Active"
  33. OldVersionExisted = $(FALSE)
  34. [date]
  35.     Now = {} ? $(!LIBHANDLE) GetSystemDate
  36. [Identify]
  37.     read-syms Identification
  38.     set Status     = STATUS_SUCCESSFUL
  39.     set Identifier = $(OptionType)
  40.     set Media      = #("Source Media Descriptions", 1, 1)
  41.     Return $(Status) $(Identifier) $(Media)
  42. [ReturnOptions]
  43.     set Status        = STATUS_FAILED
  44.     set OptionList     = {}
  45.     set OptionTextList = {}
  46.     set LanguageList = ^(LanguagesSupported, 1)
  47.     Ifcontains(i) $($0) in $(LanguageList)
  48.         goto returnoptions
  49.     else
  50.         set Status = STATUS_NOLANGUAGE
  51.         goto finish_ReturnOptions
  52.     endif
  53. returnoptions = +
  54.     set OptionList     = ^(Options, 1)
  55.     ifstr(i) $(!STF_PRODUCT) == "WINNT"
  56.          set OptionTextList = ^(OptionsWINNTText$($0), 1)
  57.     else
  58.          set OptionTextList = ^(OptionsLANMANNTText$($0), 1)
  59.     endif
  60.     set Status         = STATUS_SUCCESSFUL
  61. finish_ReturnOptions = +
  62.     Return $(Status) $(OptionList) $(OptionTextList)
  63. [InstallOption]
  64.     set Option   = $($1)
  65.     set SrcDir   = $($2)
  66.     set AddCopy  = $($3)
  67.     set DoCopy   = $($4)
  68.     set DoConfig = $($5)
  69.     set LanguageList = ^(LanguagesSupported, 1)
  70.     Ifcontains(i) $($0) NOT-IN $(LanguageList)
  71.         Return STATUS_NOLANGUAGE
  72.     endif
  73.     set-subst LF = "\n"
  74.     read-syms GeneralConstants
  75.     read-syms FileConstants
  76.     read-syms DialogConstants$(!STF_LANGUAGE)
  77.     ifstr(i) $(!NTN_Origination) == "NCPA"
  78.         set Continue = $(OK)
  79.     endif
  80.     read-syms FileConstants$(!STF_LANGUAGE)
  81.     detect date
  82.     set-title  $(FunctionTitle)
  83.     set to   = Begin
  84.     set from = Begin
  85.     set CommonStatus = STATUS_NO_EFFECT
  86.     EndWait
  87. Begin = +
  88.     Ifstr(i) $(!NTN_InstallMode) == deinstall
  89.         set StartLabel = removeadapter
  90.     else-Ifstr(i) $(!NTN_InstallMode) == Update
  91.         set StartLabel = UpgradeSoftware
  92.     else-Ifstr(i) $(!NTN_InstallMode) == configure
  93.         Debug-Output "Cannot configure the software."
  94.         set Error = $(Warning1)
  95.         set from = end
  96.         set to = end
  97.         goto nonfatalinfo
  98.     else-Ifstr(i) $(!NTN_InstallMode) == bind
  99.         set StartLabel = bindingadapter
  100.     else
  101.         set StartLabel = installadapter
  102.         set OEM_ABANDON_SOFTWARE = {}
  103.         set OEM_ABANDON_OPTIONS = {}
  104.     endif
  105.     set from = $(fatal)
  106.     set to = $(fatal)
  107.     goto $(StartLabel)
  108. installadapter = +
  109.     Shell "utility.inf" InstallSoftwareProduct "Microsoft" "Inetsrv" "oemnsvin.inf"
  110.     set ISVersion = $($R1)
  111.     set ISNetRule = $($R2)
  112.     ifstr(i) $(!STF_PRODUCT) == "WINNT"
  113.          set ProductTitle = $(FunctionWINNTTitle) 
  114.          set ProductDescription = $(ProductSoftwareWINNTDescription)
  115.          set ProductName = $(ProductTitle)
  116.     else
  117.          set ProductTitle = $(FunctionLANMANNTTitle)
  118.          set ProductDescription = $(ProductSoftwareLANMANNTDescription)
  119.          set ProductName = $(ProductTitle)
  120.     endif
  121.     set NewValueList = {{SoftwareType,$(NoTitle),$(!REG_VT_SZ),"service"},+
  122.                        {MajorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMajorVersion)},+
  123.                        {MinorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMinorVersion)},+
  124.                        {Title,$(NoTitle),$(!REG_VT_SZ),$(ProductTitle)},+
  125.                        {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductDescription)},+
  126.                        {ServiceName,$(NoTitle),$(!REG_VT_SZ),$(ProductName)},+
  127.                        {OperationsSupport,$(NoTitle),$(!REG_VT_DWORD),$(ProductOpSupport)}, +
  128.                        {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}}
  129.     Shell  $(UtilityInf), AddValueList, $(ISVersion), $(NewValueList)
  130.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  131.         Debug-Output "OEMNSVNW.INF: ShellCode error."
  132.         goto ShellCodeError
  133.     endif
  134.     set NewValueList = {{"InfOption",$(NoTitle),$(!REG_VT_SZ),"Inetsrv"}}
  135.     Shell  $(UtilityInf), AddValueList, $(ISNetRule), $(NewValueList)
  136.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  137.         Debug-Output "OEMNSVNW.INF: ShellCode error."
  138.         goto ShellCodeError
  139.     endif
  140.     ifstr(i) $(!NTN_InstallPhase) == primary
  141.         goto end
  142.     endif
  143.     OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_SoftwareBase)"\Microsoft\INetStp" $(MAXIMUM_ALLOWED) BS_INetStp
  144.     ifstr $(BS_INetStp) != $(KeyNull)
  145.         ifstr(i) $(!STF_PRODUCT) == "WINNT"
  146.              set Error = $(Warning3Winnt)
  147.         else
  148.              set Error = $(Warning3LanmanNt)
  149.         endif
  150.         set from = end
  151.         set to = end
  152.         goto warning
  153.     else
  154.         ifstr(i) $(!NTN_Origination) == "install"
  155.             ifstr(i) $(!NTN_InstallPhase) == "secondary"
  156.                 ifstr(i) $(!STF_PRODUCT) == "WINNT"
  157.                      set Error = $(Warning4Winnt)
  158.                 else
  159.                      set Error = $(Warning4LanmanNt)
  160.                 endif
  161.                 Shell "utility.inf" RemoveSoftwareComponent "Microsoft" "Inetsrv" "FALSE"
  162.                 set from = end
  163.                 set to = end
  164.                 goto nonfatal
  165.             endif
  166.         endif
  167.         set FWaitForProcess = 1
  168.         RunProgram RC "" "" $(!STF_WINDOWSSYSPATH)"\inetins.exe"
  169.         set FWaitForProcess = 0
  170.         OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_SoftwareBase)"\Microsoft\INetStp" $(MAXIMUM_ALLOWED) INetStpKey
  171.         ifstr $(INetStpKey) == $(KeyNull)
  172.             Shell "utility.inf" RemoveSoftwareComponent "Microsoft" "Inetsrv" "FALSE"
  173.         endif
  174.     endif
  175.     set CommonStatus = STATUS_NO_EFFECT
  176.     goto successful
  177. configureadapter = +
  178.     goto end
  179. bindingadapter =+
  180.     goto end
  181. removeadapter = +
  182.     OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_SoftwareBase)"\Microsoft\INetStp" $(MAXIMUM_ALLOWED) BS_INetStp
  183.     ifstr $(BS_INetStp) == $(KeyNull)
  184.         Shell "utility.inf" RemoveSoftwareComponent "Microsoft" "Inetsrv" "FALSE"
  185.         set CommonStatus = STATUS_NO_EFFECT
  186.     else
  187.         ifstr(i) $(!NTN_InstallPhase) == primary
  188.             goto end
  189.         endif
  190.         GetRegValue $(BS_INetStp),"InstallPath",InstallPath
  191.         set FWaitForProcess = 1
  192.         RunProgram RC "" "" *($(InstallPath),4)"\setup.exe" "/R"
  193.         set FWaitForProcess = 0
  194.         OpenRegKey $(!REG_H_LOCAL) "" $(!NTN_SoftwareBase)"\Microsoft\INetStp" $(MAXIMUM_ALLOWED) INetStpKey
  195.         ifstr $(INetStpKey) == $(KeyNull)
  196.             Shell "utility.inf" RemoveSoftwareComponent "Microsoft" "Inetsrv" "FALSE"
  197.         endif
  198.     endif
  199.     goto end
  200. UpgradeSoftware = +
  201.     ifstr(i) $(!STF_PRODUCT) == "WINNT"
  202.          set ProductDescription = $(ProductSoftwareWINNTDescription)
  203.     else
  204.          set ProductDescription = $(ProductSoftwareLANMANNTDescription)
  205.     endif
  206.     OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyCurrentVersion
  207.     Ifstr $(KeyCurrentVersion) != $(KeyNull)
  208.         SetRegValue $(KeyCurrentVersion) {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductDescription)}
  209.         SetRegValue $(KeyCurrentVersion) {OperationsSupport,$(NoTitle),$(!REG_VT_DWORD),$(ProductOpSupport)}
  210.         CloseRegKey $(KeyCurrentVersion)
  211.     endif
  212.     goto end
  213. successful = +
  214.     goto end
  215. warning = +
  216.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "WARNING", $(Error)
  217.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  218.         goto ShellCodeError
  219.     endif
  220.     ifstr(i) $($R1) == "OK"
  221.         goto $(to)
  222.     else-ifstr(i) $($R1) == "CANCEL"
  223.         goto $(from)
  224.     else
  225.         goto end
  226.     endif
  227. nonfatalinfo = +
  228.     Set CommonStatus = STATUS_USERCANCEL
  229.     Set Severity = STATUS
  230.     goto nonfatalmsg
  231. nonfatal = +
  232.     Set Severity = NONFATAL
  233.     goto nonfatalmsg
  234. nonfatalmsg = +
  235.     ifstr(i) $(Error) == ""
  236.         Set Severity = NONFATAL
  237.         Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL"
  238.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  239.             goto ShellCodeError
  240.         endif
  241.         set Error = $($R0)
  242.     endif
  243.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), $(Severity), $(Error)
  244.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  245.         goto ShellCodeError
  246.     endif
  247.     ifstr(i) $($R1) == "OK"
  248.         goto $(from)
  249.     else
  250.         goto "end"
  251.     endif
  252. fatalregistry = +
  253.     Shell $(UtilityInf) RegistryErrorString $(RegistryErrorIndex)
  254.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  255.         goto ShellCodeError
  256.     endif
  257.     set Error = $($R0)
  258.     goto fatal
  259. fatal = +
  260.     ifstr(i) $(Error) == ""
  261.         Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL"
  262.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  263.             goto ShellCodeError
  264.         endif
  265.         set Error = $($R0)
  266.     endif
  267.     Ifint $(BillboardVisible) != 0
  268.         Shell "subroutn.inf" PopBillboard
  269.         Set BillboardVisible = 0
  270.     Endif
  271.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "FATAL", $(Error)
  272.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  273.         goto ShellCodeError
  274.     endif
  275.    goto setfailed
  276. ShellCodeError = +
  277.     set DlgType      = "MessageBox"
  278.     set STF_MB_TITLE = $(ShellCodeErrorTitle)
  279.     set STF_MB_TEXT  = $(ShellCodeErrorText)
  280.     set STF_MB_TYPE  = 1
  281.     set STF_MB_ICON  = 3
  282.     set STF_MB_DEF   = 1
  283.     ui start "Error Message"
  284.     goto setfailed
  285. setfailed = +
  286.     set CommonStatus = STATUS_FAILED
  287.     ifstr(i) $(OEM_ABANDON_ON) == TRUE
  288.         set OEM_ABANDON_ON = FALSE
  289.         goto removeadapter
  290.     endif
  291.     goto end
  292. end = +
  293.     goto term
  294. term = +
  295.     Return $(CommonStatus)
  296. [Install-Option]
  297.     set STF_VITAL = ""
  298.     ifstr(i) $(AddCopy) == "YES"
  299.     endif
  300.     ifstr(i) $(DoCopy) == "YES"
  301.        set !STF_NCPA_FLUSH_COPYLIST = TRUE
  302.     endif
  303.     ifstr(i) $(DoConfig) == "YES"
  304.     endif
  305.     Exit
  306. [Install-Update]
  307.    set STF_VITAL        = ""
  308.    set STF_OVERWRITE    = "VERIFYSOURCEOLDER"
  309.    Exit
  310. [Source Media Descriptions]
  311.    1 = "Windows NT Server CD-ROM" , TAGFILE = cdrom_s.40
  312. [Signature]
  313.     FileType = MICROSOFT_FILE
  314. [GetSignature]
  315.     read-syms Signature
  316.     return $(FileType)
  317. [ProductType]
  318. STF_PRODUCT  = LanmanNT
  319. STF_PLATFORM = Alpha
  320. [Files-Inf]
  321. 2,    oemsetup.inf,     SIZE=1000,    RENAME=$(!UG_Filename)
  322. [LanguagesSupported]
  323.     ENG
  324. [OptionsWINNTTextENG]
  325.     INETSRV      = "Microsoft Peer Web Services"
  326. [OptionsLANMANNTTextENG]
  327.     INETSRV      = "Microsoft Internet Information Server"
  328. [FileConstantsENG]
  329. ProCaption   = "Windows NT ｾｯﾄｱｯﾌﾟ"
  330. ProCancel    = "ｷｬﾝｾﾙ"
  331. ProCancelMsg = "Windows NT ﾈｯﾄﾜｰｸは正しくｲﾝｽﾄｰﾙされていません。"+
  332.                "ﾌｧｲﾙのｺﾋﾟｰを中止しますか?"
  333. ProCancelCap = "ﾈｯﾄﾜｰｸ ｾｯﾄｱｯﾌﾟ ﾒｯｾｰｼﾞ"
  334. ProText1     = "ｺﾋﾟｰ元:"
  335. ProText2     = "ｺﾋﾟｰ先:"
  336. FunctionLANMANNTTitle    = "Microsoft Internet Information Server"
  337. FunctionWINNTTitle = "Microsoft Peer Web Services"
  338. ProductSoftwareWINNTDescription      = "Microsoft Peer Web Services"
  339. ProductSoftwareLANMANNTDescription   = "Microsoft Internet Information Server"
  340. OptionList     = ^(Options, 1)
  341. OptionTextList = ^(OptionsTextENG, 1)
  342. ShellCodeErrorTitle     = "ｴﾗｰ: "$(FunctionTitle)
  343. ShellCodeErrorText      = "ｼｪﾙ ｺｰﾄﾞ ｴﾗｰです。"
  344. Warning1 = "ｲﾝﾀｰﾈｯﾄ ﾏﾈｰｼﾞｬを使ってｿﾌﾄｳｪｱを構成してください。"
  345. Warning2Winnt = "Microsoft Peer Web Services が別のﾌﾟﾛｾｽによって削除された可能性があります。ｺﾝﾄﾛｰﾙ ﾊﾟﾈﾙの [ﾈｯﾄﾜｰｸ] を再起動してください。"
  346. Warning2LanmanNt = "Microsoft Internet Information Server が別のﾌﾟﾛｾｽによって削除された可能性があります。ｺﾝﾄﾛｰﾙ ﾊﾟﾈﾙの [ﾈｯﾄﾜｰｸ] を再起動してください。"
  347. Warning3Winnt = "Microsoft Peer Web Services が別のﾌﾟﾛｾｽによってｲﾝｽﾄｰﾙされた可能性があります。ｺﾝﾄﾛｰﾙ ﾊﾟﾈﾙの [ﾈｯﾄﾜｰｸ] を再起動してください。"
  348. Warning3LanmanNt = "Microsoft Internet Information Server が別のﾌﾟﾛｾｽによってｲﾝｽﾄｰﾙされた可能性があります。ｺﾝﾄﾛｰﾙ ﾊﾟﾈﾙの [ﾈｯﾄﾜｰｸ] を再起動してください。"
  349. Warning4Winnt = "ﾈｯﾄﾜｰｸ ﾌﾟﾛﾄｺﾙが正しく設定されていないため、Microsoft Peer Web Services をｲﾝｽﾄｰﾙできません。ﾈｯﾄﾜｰｸ ﾌﾟﾛﾄｺﾙがｲﾝｽﾄｰﾙされているかどうか確認してください。"
  350. Warning4LanmanNt = "ﾈｯﾄﾜｰｸ ﾌﾟﾛﾄｺﾙが正しく設定されていないため、Microsoft Internet Information Server をｲﾝｽﾄｰﾙできません。ﾈｯﾄﾜｰｸ ﾌﾟﾛﾄｺﾙがｲﾝｽﾄｰﾙされているかどうか確認してください。"
  351. [DialogConstantsENG]
  352. Help        = "ﾍﾙﾌﾟ(&H)"
  353. Exit        = "ｷｬﾝｾﾙ"
  354. OK          = "OK"
  355. HelpContext = ""
  356. Continue    = "続行(&O)"
  357. Cancel      = "ｷｬﾝｾﾙ(&A)"
  358. [FileDependentDlgENG]
  359.