mq5.0-source.src.share.install.uninstaller.vbs Maven / Gradle / Ivy
'
' DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
'
' Copyright (c) 2000-2010 Oracle and/or its affiliates. All rights reserved.
'
' The contents of this file are subject to the terms of either the GNU
' General Public License Version 2 only ("GPL") or the Common Development
' and Distribution License("CDDL") (collectively, the "License"). You
' may not use this file except in compliance with the License. You can
' obtain a copy of the License at
' https://glassfish.dev.java.net/public/CDDL+GPL_1_1.html
' or packager/legal/LICENSE.txt. See the License for the specific
' language governing permissions and limitations under the License.
'
' When distributing the software, include this License Header Notice in each
' file and include the License file at packager/legal/LICENSE.txt.
'
' GPL Classpath Exception:
' Oracle designates this particular file as subject to the "Classpath"
' exception as provided by Oracle in the GPL Version 2 section of the License
' file that accompanied this code.
'
' Modifications:
' If applicable, add the following below the License Header, with the fields
' enclosed by brackets [] replaced by your own identifying information:
' "Portions Copyright [year] [name of copyright owner]"
'
' Contributor(s):
' If you wish your version of this file to be governed by only the CDDL or
' only the GPL Version 2, indicate your decision by adding "[Contributor]
' elects to include this software in this distribution under the [CDDL or GPL
' Version 2] license." If you don't indicate a single choice of license, a
' recipient has the option to distribute your version of this file under
' either the CDDL, the GPL Version 2 or to extend the choice of license to
' its licensees as provided above. However, if you add GPL Version 2 code
' and therefore, elected the GPL Version 2 license, then the option applies
' only if the new code is made subject to such option by the copyright
' holder.
'
PRODUCTNAME="mq"
Set wShell = CreateObject("WScript.Shell")
gReturnValue = wshell.Run("regsvr32 /s scrrun.dll", 0 ,True)
set gFileSystem = CreateObject("Scripting.FileSystemObject")
Set gWshEnv = wshell.Environment("SYSTEM")
JAVA_HOME=""
CMDLINEJAVA_HOME=""
SILENT=""
MYDIR=trim(Replace(Wscript.scriptFullName, Wscript.scriptName, ""))
' Relative paths to directories from top of umbrella directory
META_DATA_REL_PATH="var\install\contents\"+PRODUCTNAME
INIT_CONFIG_REL_PATH="\"+PRODUCTNAME+"\lib\install"
CONFIG_DIR_REL_PATH="var\install\config\"+PRODUCTNAME
' Construct umbrella directory based on where this script lives - in the Metadata directory
UMBRELLA_DIR=Left(Wscript.scriptFullName, Len(Wscript.scriptFullName)-Len(META_DATA_REL_PATH+"\")-Len(Wscript.scriptName))
' Construct absolute directory paths based on umbrella dir + relative paths
ENGINE_DIR=UMBRELLA_DIR+"install"
META_DATA_DIR=UMBRELLA_DIR+META_DATA_REL_PATH
INIT_CONFIG_DIR=UMBRELLA_DIR+INIT_CONFIG_REL_PATH
CONFIG_DIR=UMBRELLA_DIR+CONFIG_DIR_REL_PATH
UNINSTALL_PROP=MYDIR+"uninstaller.properties"
'LOGDIR=gFileSystem.GetSpecialFolder(2)
'-------------------------------------------------------------------------------
' perfor actual operation for the script: install/uninstall
' input(s): none
' output(s): instCode
'-------------------------------------------------------------------------------
Function perform
ENGINE_OPS="-m ""file:///"+META_DATA_DIR+""""
ENGINE_OPS=ENGINE_OPS+" -p Default-Product-ID="+PRODUCTNAME
ENGINE_OPS=ENGINE_OPS+" -s """+CONFIG_DIR+""""
ENGINE_OPS=ENGINE_OPS+" -p ""Init-Config-Locations="+PRODUCTNAME+":"+INIT_CONFIG_DIR + """"
ENGINE_OPS=ENGINE_OPS+" -p UI-Options=internalBrowserOnly"
if DRYRUN <> "" Then
ENGINE_OPS=ENGINE_OPS+" -n """+DRYRUN+""""
end if
if ANSWERFILE <> "" Then
ENGINE_OPS=ENGINE_OPS+" -a """+ANSWERFILE+""""
end if
if SILENT <> "" Then
ENGINE_OPS=ENGINE_OPS+" -p Display-Mode=SILENT"
end if
if ALTROOT <> "" Then
ENGINE_OPS=ENGINE_OPS + " -R " + ALTROOT
end if
if LOGLEVEL <> "" Then
ENGINE_OPS=ENGINE_OPS+" -l "+LOGLEVEL
end if
if LOGDIR <> "" Then
ENGINE_OPS=ENGINE_OPS+" -p ""Logs-Location="+LOGDIR+""""
end if
if JAVA_HOME <> "" Then
ENGINE_OPS=ENGINE_OPS+" -j """+JAVA_HOME+""""
end if
if JAVA_OPTIONS <> "" Then
ENGINE_OPS=ENGINE_OPS+" -J "+JAVA_OPTIONS
end if
if INSTALLPROPS <> "" Then
ENGINE_OPS=ENGINE_OPS+INSTALLPROPS
end if
if INSTALLABLES <> "" Then
ENGINE_OPS=ENGINE_OPS+" -i "+INSTALLABLES
end if
'WScript.echo "wscript //nologo " & chr(34) & ENGINE_DIR & "\bin\engine-wrapper.vbs" & chr(34) & " " & ENGINE_OPS
mycmd = "wscript //nologo " & chr(34) & ENGINE_DIR & "\bin\engine-wrapper.vbs" & chr(34) & " " & ENGINE_OPS
set oExec=wShell.exec(mycmd)
Do while oExec.Status = 0
WScript.Sleep 500
Loop
End Function
'-------------------------------------------------------------------------------
' usage only: define what parameters are available here
' input(s): exitCode
'-------------------------------------------------------------------------------
Function usage
'note: no way to make this silent because we don't know the setting yet
WScript.echo "Usage: " + Wscript.scriptName + " [OPTION]" & VBCr _
& "" & VBCr _
& "Options:" & VBCr _
& " -a " & VBCr _
& " Specify an answer file to be used by installer in non interactive mode." & VBCr _
& "" & VBCr _
& " -h" & VBCr _
& " Show usage help" & VBCr _
& "" & VBCr _
& " -s" & VBCr _
& " Silent mode. No output will be displayed. Typically used with an answer file" & VBCr _
& " specified with -a" & VBCr _
& "" & VBCr _
& " -t" & VBCr _
& " Select Text mode instead of GUI mode." & VBCr _
& "" & VBCr _
& " -n " & VBCr _
& " Dry run mode. Does not uninstall anything. Uninstall responses are saved to and " & VBCr _
& " can be used with -a to replicate this uninstall. " & VBCr _
& "" & VBCr _
& " Exit status" & VBCr _
& " 0 Success" & VBCr _
& " >0 An error occurred" & VBCr _
& "" & VBCr _
& " Usage examples:" & VBCr _
& " Generate answer file" & VBCr _
& " uninstaller -n file1" & VBCr _
& "" & VBCr _
& " Using an answer file in silent mode" & VBCr _
& " uninstaller -a file1 -s" & VBCr _
WScript.Quit(1)
End Function
' Set JAVA_HOME. This is done by looking for the JDK location in a file named jdklocation or
' by using what the user specified via -j
' Some fallback is needed in case none of the above was specified
Function setJavaHome
' overwrite check if user specify javahome to use
if CMDLINEJAVA_HOME = "" Then
' Determine JDK location by looking for file named jdklocation
Set filesys = CreateObject("Scripting.FileSystemObject")
If filesys.FileExists(UNINSTALL_PROP)=True Then
Set fIn = filesys.OpenTextFile(UNINSTALL_PROP)
Do Until fIn.AtEndOfStream
sLine = fIn.ReadLine
If (sLine <> "") then
JAVA_HOME=trim(sLine)
Exit Do
End If
Loop
' Close file
fIn.close
Else
' Need to determine VM location some other way
JAVA_HOME="C:\Program Files\Java\jdk1.5.0_11"
End If
else
JAVA_HOME=CMDLINEJAVA_HOME
if SILENT = "" Then
WScript.Echo "Using the user specified JAVA_HOME "+CMDLINEJAVA_HOME
end if
end if
End Function
'-------------------------------------------------------------------------------
' ****************************** MAIN THREAD ***********************************
'-------------------------------------------------------------------------------
' check arguments
Set args = WScript.Arguments
argumentCounter=0
do while argumentCounter < args.Length
argName=args.Item(argumentCounter)
select case argName
case "-a"
if argumentCounter + 1 < args.Length Then
ANSWERFILE=trim(args.Item(argumentCounter+1))
argumentCounter=argumentCounter+2
if Not gFileSystem.FileExists(ANSWERFILE) Then
' we don't know yet if we are silent so echo anyway
WScript.Echo "Cannot read the answer file"+ANSWERFILE
WScript.Quit(1)
end if
Else
usage
End if
case "-R"
if argumentCounter + 1 < args.Length Then
ALTROOT=trim(args.Item(argumentCounter+1))
argumentCounter=argumentCounter+2
if Not gFileSystem.FolderExists(ALTROOT) Then
' we don't know yet if we are silent to echo anyway
WScript.Echo ALTROOT+" is not a valid alternate root"
WScript.Quit(1)
end if
Else
usage
End if
case "-l"
if argumentCounter + 1 < args.Length Then
LOGDIR=trim(args.Item(argumentCounter+1))
argumentCounter=argumentCounter+2
if Not gFileSystem.FolderExists(LOGDIR) Then
'we don't know yet if we are silent so echo anyway
WScript.Echo LOGDIR+" is not a directory or is not writable"
WScript.Quit(1)
end if
Else
usage
End if
case "-q"
LOGLEVEL="WARNING"
argumentCounter=argumentCounter+1
case "-v"
LOGLEVEL="FINEST"
argumentCounter=argumentCounter+1
case "-s"
SILENT="true"
argumentCounter=argumentCounter+1
case "-t"
'we dont know yet if we are silent so echo anyway
WScript.Echo "TextUI is not supported for Windows."
argumentCounter=argumentCounter+1
case "-n"
if argumentCounter + 1 < args.Length Then
DRYRUN=trim(args.Item(argumentCounter+1))
argumentCounter=argumentCounter+2
Else
usage
End if
case "-j"
if argumentCounter + 1 < args.Length Then
CMDLINEJAVA_HOME=trim(args.Item(argumentCounter+1))
argumentCounter=argumentCounter+2
if Not gFileSystem.FolderExists(CMDLINEJAVA_HOME) Then
'we don't know yet if we are silent so echo anyway
WScript.Echo CMDLINEJAVA_HOME+" must be the root directory of a valid JVM installation"
WScript.Quit(1)
end if
Else
usage
End if
case "-J"
if argumentCounter + 1 < args.Length Then
JAVAOPTIONS=trim(args.Item(argumentCounter+1))
argumentCounter=argumentCounter+2
Else
usage
End if
case "-p"
if argumentCounter + 1 < args.Length Then
INSTALLPROPS=INSTALLPROPS+" -p "+trim(args.Item(argumentCounter+1))
argumentCounter=argumentCounter+2
Else
usage
End if
case "-h"
usage
argumentCounter=argumentCounter+1
case Else
usage
end select
Loop
setJavaHome
perform