Guzzter/SDLWeb8PowerShellProfile.ps1

## SDLWeb8PowerShellProfile.ps1
######################################################################################
# SDLWeb8PowerShellProfile.ps1
# Description: Powershell profile script for starting and stopping SDL Web 8 (a.k.a. Tridion) services
# Inspired by Tridion2011PowerShellProfile.ps1 from Nuno Mendes (nmendes@sdl.com) and Daniel Iyoyo
# Modified by Guus Beltman
# Change Date: 22/7/2016
# Product Scope: SDL Web 8
#
# Installation instructions:
# Open PowerShell and execute the following commands:
#> Set-ExecutionPolicy -ExecutionPolicy unrestricted -Force
#> new-item -path $profile -itemtype file -force
#> notepad $profile
# PASTE the contents of this file
# Save and Close notepad
# Restart PowerShell
######################################################################################
if (Get-Module -ListAvailable -Name Tridion-CoreService) {
	Import-Module Tridion-CoreService
    Write-Host "Module Tridion-CoreService"
} else {
    Write-Host "Module Tridion-CoreService not installed, so skipped loading"
}

Set-ExecutionPolicy -ExecutionPolicy unrestricted
Set-Alias -name gacutil -value C:\"Program Files (x86)"\"Microsoft SDKs"\Windows\"v7.0A"\bin\gacutil.exe

# Retrieve SDL Web 8 services present on the system
$services = (Get-Service -DisplayName sdl* | select name)

# Welcome message
" "
"You are now entering PowerShell as : " + $env:Username
" "

function cc() {
	write-host ' editprofile()                               - Open Profile script on notepad ++             ' -BackgroundColor white -ForegroundColor darkblue
	write-host ' '
	write-host ' SDLServices()                               - Display all SDL Web 8 Services                  ' -BackgroundColor white -ForegroundColor darkblue
	write-host ' '
	write-host ' Add-Assembly($assemblyPath)	             - Add Assembly to the GAC                       ' -BackgroundColor white -ForegroundColor darkblue
	write-host ' Remove-Assembly($assemblyDisplayName)       - Remove Assembly from the GAC                  ' -BackgroundColor white -ForegroundColor darkblue
	write-host ' Get-AssemblyInfo($assemblyDisplayName)      - Display Assembly info with references GAC     ' -BackgroundColor white -ForegroundColor darkblue
	write-host ' '
	write-host ' StartTDS($name)                             - Start SDL Web 8 Services by name                ' -BackgroundColor black -ForegroundColor green
	write-host ' StopTDS($name)                              - Stop SDL Web 8 Services by name                 ' -BackgroundColor black -ForegroundColor red
	write-host ' '
	write-host ' Start-TServices()    [sats]                 - Start all SDL Web 8 Services                    ' -BackgroundColor black -ForegroundColor green
	write-host ' Stop-TServices()     [sots]                 - Stop all SDL Web 8 Services                     ' -BackgroundColor black -ForegroundColor red
	write-host ' Restart-Tservices()  [rts]                  - Restart all SDL Web 8 Services                  ' -BackgroundColor black -ForegroundColor yellow
	write-host ' '
	write-host ' Start-ComPlus()                             - Start SDL Web 8 COM+                            ' -BackgroundColor black -ForegroundColor green
	write-host ' Stop-ComPlus()                              - Stop SDL Web 8 COM+                             ' -BackgroundColor black -ForegroundColor red
	write-host ' Restart-ComPlus()                           - Restart SDL Web 8 COM+                             ' -BackgroundColor black -ForegroundColor yellow
	write-host ' '
	write-host ' Start-TcmServiceHost()   [sahost]           - Start TcmServiceHost                          ' -BackgroundColor black -ForegroundColor green
	write-host ' Stop-TcmServiceHost()    [sohost]           - Stop TcmServiceHost                           ' -BackgroundColor black -ForegroundColor red
	write-host ' Restart-TcmServiceHost() [rhost]            - Stop TcmServiceHost                           ' -BackgroundColor black -ForegroundColor yellow
	write-host ' '
	write-host ' AddToGac($assemblyPath)                     - Add assembly to GAC                           ' -BackgroundColor black -ForegroundColor magenta
	write-host ' DeployToIngEventDir($assemblyPath)          - Deploy the assembly to ING extension dir      ' -BackgroundColor black -ForegroundColor magenta
	write-host ' BackupSystemConfig					 		 - Creates a backup of the SDL Web 8 System Config ' -BackgroundColor black -ForegroundColor magenta
	write-host ' IncrementGUIModification					 - Increment GUI Modification nr				 ' -BackgroundColor black -ForegroundColor magenta
	write-host ' '


	#write-host 'Sign-Profile() 	- Sign the Script Profile file' -ForegroundColor red
}
#display the list of available functions
cc

function editprofile { C:\"Program Files (x86)"\"Notepad++"\notepad++.exe $profile }

function SDLServices {
	write-host '******************* SERVICES STATE *************************' -ForegroundColor green

	foreach($service in $services) {
		get-service -name $service.Name
	}

	get-service -name 'COMSysApp'
	get-service -name 'W3SVC'

	write-host '******************* SERVICES STATE *************************' -ForegroundColor green
}

function StartTDS($name) {
	start-service -name $name
	get-service -name $name
}

function StopTDS($name) {
	stop-service -name $name -Force
	get-service -name $name
}

function Sots {
	Stop-TServices
}

function Stop-TServices {
	write-host '.... STOPPING SERVICES ....' -BackgroundColor yellow -ForegroundColor black

	foreach($service in $services) {
		StopTDS($service.Name)
	}

	Stop-ComPlus
	StopTDS( 'COMSysApp')
	StopTDS( 'W3SVC')

	SDLServices
}

function sats {
	Start-TServices
}

function Start-TServices {
	write-host '.... STARTING SERVICES ....' -BackgroundColor yellow -ForegroundColor black

	foreach($service in $services) {
		StartTDS($service.Name)
	}

	Start-ComPlus
	StartTDS('COMSysApp')
	StartTDS('W3SVC')

	SDLServices
}

function rts {
	Restart-Tservices
}

function Restart-Tservices {
	Stop-TServices
	Start-TServices
}

function sohost {
	Stop-TcmServiceHost
}

function Stop-TcmServiceHost() {
	write-host '.... STOPPING ComPlus + TcmServiceHos ....' -BackgroundColor red -ForegroundColor black
	Stop-ComPlus
	StopTDS('TcmServiceHost')
}

function sahost {
	Start-TcmServiceHost
}

function Start-TcmServiceHost {
	write-host '.... STARTING ComPlus + TcmServiceHost ....' -BackgroundColor green -ForegroundColor black
	Start-ComPlus
	StartTDS('TcmServiceHost')
}

function rhost {
	Restart-TcmServiceHost
}

function Restart-TcmServiceHost() {
	Stop-TcmServiceHost
	Start-TcmServiceHost
}

function Get-AssemblyInfo($name) {
	gacutil /lr $name
}

function Add-Assembly($path) {
	AddToGac($path)
	#gacutil /i $path
}

function Remove-Assembly($path) {
	gacutil /u $path
}

function Sign-Profile {
	$cert = @(Get-ChildItem cert:\CurrentUser\My -codesigning)[0]
	Set-AuthenticodeSignature $profile $cert
	exit
}

function Stop-ComPlus() {
	$comAdmin = New-Object -comobject COMAdmin.COMAdminCatalog
	$comAdmin.ShutdownApplication("SDL Web Content Manager")

	Write-Output "COM Plus Ended"
}

function Start-ComPlus() {
	$comAdmin = New-Object -comobject COMAdmin.COMAdminCatalog
	$comAdmin.StartApplication("SDL Web Content Manager")

	Write-Output "COM Plus Started"
}

function Restart-ComPlus() {
	Stop-ComPlus
	Start-ComPlus
}

function AddToGac($Assembly) {
	if ( $null -eq ([AppDomain]::CurrentDomain.GetAssemblies() |? { $_.FullName -eq "System.EnterpriseServices, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" }) ) {
		[System.Reflection.Assembly]::Load("System.EnterpriseServices, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a") | Out-Null
	}
	$PublishObject = New-Object System.EnterpriseServices.Internal.Publish

	if ( -not (Test-Path $Assembly -type Leaf) ) {
		throw "The assembly '$Assembly' does not exist."
	}

	$LoadedAssembly = [System.Reflection.Assembly]::LoadFile($Assembly)

	if ($LoadedAssembly.GetName().GetPublicKey().Length -eq 0) {
		throw "The assembly '$Assembly' must be strongly signed."
	}

	Write-Verbose "Installing: $Assembly"
	$PublishObject.GacInstall($Assembly)
}

function DeployToIngEventDir($Assembly) {
	$defaultEventSystemDir = "O:\Program Files (x86)\SDL Web 8\extensions\eventsystem\"
	if ( -not (Test-Path $Assembly -type Leaf) ) {
		throw "The assembly '$Assembly' does not exist."
	}

	sohost

	write-host '.... Copy assembly to ING location  ....' -BackgroundColor black -ForegroundColor magenta
	cp $Assembly $defaultEventSystemDir

	sahost
}

function IncrementGUIModification {
  $filename = $Env:TRIDION_HOME + '\web\WebUI\WebRoot\Configuration\System.Config'
  $conf = [xml](gc $filename)
  $modification = [int]$conf.Configuration.servicemodel.server.modification
  $modification++
  $conf.Configuration.servicemodel.server.modification = [string]$modification
  write-host "Incremented Configuration.servicemodel.server.modification to $modification" -ForegroundColor yellow
  $conf.Save($filename)
}

function ResetService {
    $comPlusName = "SDL SDL Web 8 Content Manager"
    $comAdmin = New-Object -comobject COMAdmin.COMAdminCatalog
    $tcmServiceHostName = "TcmServiceHost"

    write-host "Stopping TcmServiceHost "  -ForegroundColor yellow
    stop-service -name $tcmServiceHostName -Force
    get-service -name $tcmServiceHostName

    write-host "Stopping COM+"  -ForegroundColor yellow
    $comAdmin.ShutdownApplication($comPlusName)

    write-host "Starting COM+"  -ForegroundColor yellow
    $comAdmin.StartApplication($comPlusName)

    write-host "Starting TcmServiceHost " -ForegroundColor yellow
    start-service -name $tcmServiceHostName
    get-service -name $tcmServiceHostName

    write-host "Done" -ForegroundColor green
}

function CreateTempDirForExportToExtension {
	if (!(Test-Path "c:\SDL Web 8\temp\")) {
		write-host "SDL Web 8 temp not found, create it."
		New-Item -ItemType Directory -Force -Path "c:\SDL Web 8\temp" | Out-null
	}
}

function CreateBackupFile([string]$filepath) {
    if(Test-Path $filepath)
	{
        [string]$directory = [System.IO.Path]::GetDirectoryName($filePath);
        [string]$strippedFileName = [System.IO.Path]::GetFileNameWithoutExtension($filePath);
        [string]$extension = [System.IO.Path]::GetExtension($filePath);
        [string]$newFileName = $strippedFileName + [DateTime]::Now.ToString("yyyyMMdd-HHmmss") + $extension;
        [string]$newFilePath = [System.IO.Path]::Combine($directory, $newFileName);

        Copy-Item -LiteralPath $filePath -Destination $newFilePath;
        if((Test-Path $newFilePath)) {
            Write-Host "Created backup" $newFilePath
        }else {
            Write-Warning ("Failed to create backup " + $newFilePath)
            Break
        }
    }else {
        Write-Warning ($filepath + " does not exist, exiting")
        Break
    }
}

function BackupSystemConfig() {
	CreateBackupFile -filepath ($env:TRIDION_HOME + 'web\WebUI\WebRoot\Configuration\System.config')
}
	######################################################################################
	# SDLWeb8PowerShellProfile.ps1
	# Description: Powershell profile script for starting and stopping SDL Web 8 (a.k.a. Tridion) services
	# Inspired by Tridion2011PowerShellProfile.ps1 from Nuno Mendes (nmendes@sdl.com) and Daniel Iyoyo
	# Modified by Guus Beltman
	# Change Date: 22/7/2016
	# Product Scope: SDL Web 8
	#
	# Installation instructions:
	# Open PowerShell and execute the following commands:
	#> Set-ExecutionPolicy -ExecutionPolicy unrestricted -Force
	#> new-item -path $profile -itemtype file -force
	#> notepad $profile
	# PASTE the contents of this file
	# Save and Close notepad
	# Restart PowerShell
	######################################################################################
	if (Get-Module -ListAvailable -Name Tridion-CoreService) {
	Import-Module Tridion-CoreService
	Write-Host "Module Tridion-CoreService"
	} else {
	Write-Host "Module Tridion-CoreService not installed, so skipped loading"
	}

	Set-ExecutionPolicy -ExecutionPolicy unrestricted
	Set-Alias -name gacutil -value C:\"Program Files (x86)"\"Microsoft SDKs"\Windows\"v7.0A"\bin\gacutil.exe

	# Retrieve SDL Web 8 services present on the system
	$services = (Get-Service -DisplayName sdl* \| select name)

	# Welcome message
	" "
	"You are now entering PowerShell as : " + $env:Username
	" "

	function cc() {
	write-host ' editprofile() - Open Profile script on notepad ++ ' -BackgroundColor white -ForegroundColor darkblue
	write-host ' '
	write-host ' SDLServices() - Display all SDL Web 8 Services ' -BackgroundColor white -ForegroundColor darkblue
	write-host ' '
	write-host ' Add-Assembly($assemblyPath) - Add Assembly to the GAC ' -BackgroundColor white -ForegroundColor darkblue
	write-host ' Remove-Assembly($assemblyDisplayName) - Remove Assembly from the GAC ' -BackgroundColor white -ForegroundColor darkblue
	write-host ' Get-AssemblyInfo($assemblyDisplayName) - Display Assembly info with references GAC ' -BackgroundColor white -ForegroundColor darkblue
	write-host ' '
	write-host ' StartTDS($name) - Start SDL Web 8 Services by name ' -BackgroundColor black -ForegroundColor green
	write-host ' StopTDS($name) - Stop SDL Web 8 Services by name ' -BackgroundColor black -ForegroundColor red
	write-host ' '
	write-host ' Start-TServices() [sats] - Start all SDL Web 8 Services ' -BackgroundColor black -ForegroundColor green
	write-host ' Stop-TServices() [sots] - Stop all SDL Web 8 Services ' -BackgroundColor black -ForegroundColor red
	write-host ' Restart-Tservices() [rts] - Restart all SDL Web 8 Services ' -BackgroundColor black -ForegroundColor yellow
	write-host ' '
	write-host ' Start-ComPlus() - Start SDL Web 8 COM+ ' -BackgroundColor black -ForegroundColor green
	write-host ' Stop-ComPlus() - Stop SDL Web 8 COM+ ' -BackgroundColor black -ForegroundColor red
	write-host ' Restart-ComPlus() - Restart SDL Web 8 COM+ ' -BackgroundColor black -ForegroundColor yellow
	write-host ' '
	write-host ' Start-TcmServiceHost() [sahost] - Start TcmServiceHost ' -BackgroundColor black -ForegroundColor green
	write-host ' Stop-TcmServiceHost() [sohost] - Stop TcmServiceHost ' -BackgroundColor black -ForegroundColor red
	write-host ' Restart-TcmServiceHost() [rhost] - Stop TcmServiceHost ' -BackgroundColor black -ForegroundColor yellow
	write-host ' '
	write-host ' AddToGac($assemblyPath) - Add assembly to GAC ' -BackgroundColor black -ForegroundColor magenta
	write-host ' DeployToIngEventDir($assemblyPath) - Deploy the assembly to ING extension dir ' -BackgroundColor black -ForegroundColor magenta
	write-host ' BackupSystemConfig - Creates a backup of the SDL Web 8 System Config ' -BackgroundColor black -ForegroundColor magenta
	write-host ' IncrementGUIModification - Increment GUI Modification nr ' -BackgroundColor black -ForegroundColor magenta
	write-host ' '


	#write-host 'Sign-Profile() - Sign the Script Profile file' -ForegroundColor red
	}
	#display the list of available functions
	cc

	function editprofile { C:\"Program Files (x86)"\"Notepad++"\notepad++.exe $profile }

	function SDLServices {
	write-host '***************** SERVICES STATE ***********************' -ForegroundColor green

	foreach($service in $services) {
	get-service -name $service.Name
	}

	get-service -name 'COMSysApp'
	get-service -name 'W3SVC'

	write-host '***************** SERVICES STATE ***********************' -ForegroundColor green
	}

	function StartTDS($name) {
	start-service -name $name
	get-service -name $name
	}

	function StopTDS($name) {
	stop-service -name $name -Force
	get-service -name $name
	}

	function Sots {
	Stop-TServices
	}

	function Stop-TServices {
	write-host '.... STOPPING SERVICES ....' -BackgroundColor yellow -ForegroundColor black

	foreach($service in $services) {
	StopTDS($service.Name)
	}

	Stop-ComPlus
	StopTDS( 'COMSysApp')
	StopTDS( 'W3SVC')

	SDLServices
	}

	function sats {
	Start-TServices
	}

	function Start-TServices {
	write-host '.... STARTING SERVICES ....' -BackgroundColor yellow -ForegroundColor black

	foreach($service in $services) {
	StartTDS($service.Name)
	}

	Start-ComPlus
	StartTDS('COMSysApp')
	StartTDS('W3SVC')

	SDLServices
	}

	function rts {
	Restart-Tservices
	}

	function Restart-Tservices {
	Stop-TServices
	Start-TServices
	}

	function sohost {
	Stop-TcmServiceHost
	}

	function Stop-TcmServiceHost() {
	write-host '.... STOPPING ComPlus + TcmServiceHos ....' -BackgroundColor red -ForegroundColor black
	Stop-ComPlus
	StopTDS('TcmServiceHost')
	}

	function sahost {
	Start-TcmServiceHost
	}

	function Start-TcmServiceHost {
	write-host '.... STARTING ComPlus + TcmServiceHost ....' -BackgroundColor green -ForegroundColor black
	Start-ComPlus
	StartTDS('TcmServiceHost')
	}

	function rhost {
	Restart-TcmServiceHost
	}

	function Restart-TcmServiceHost() {
	Stop-TcmServiceHost
	Start-TcmServiceHost
	}

	function Get-AssemblyInfo($name) {
	gacutil /lr $name
	}

	function Add-Assembly($path) {
	AddToGac($path)
	#gacutil /i $path
	}

	function Remove-Assembly($path) {
	gacutil /u $path
	}

	function Sign-Profile {
	$cert = @(Get-ChildItem cert:\CurrentUser\My -codesigning)[0]
	Set-AuthenticodeSignature $profile $cert
	exit
	}

	function Stop-ComPlus() {
	$comAdmin = New-Object -comobject COMAdmin.COMAdminCatalog
	$comAdmin.ShutdownApplication("SDL Web Content Manager")

	Write-Output "COM Plus Ended"
	}

	function Start-ComPlus() {
	$comAdmin = New-Object -comobject COMAdmin.COMAdminCatalog
	$comAdmin.StartApplication("SDL Web Content Manager")

	Write-Output "COM Plus Started"
	}

	function Restart-ComPlus() {
	Stop-ComPlus
	Start-ComPlus
	}

	function AddToGac($Assembly) {
	if ( $null -eq ([AppDomain]::CurrentDomain.GetAssemblies() \|? { $_.FullName -eq "System.EnterpriseServices, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" }) ) {
	[System.Reflection.Assembly]::Load("System.EnterpriseServices, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a") \| Out-Null
	}
	$PublishObject = New-Object System.EnterpriseServices.Internal.Publish

	if ( -not (Test-Path $Assembly -type Leaf) ) {
	throw "The assembly '$Assembly' does not exist."
	}

	$LoadedAssembly = [System.Reflection.Assembly]::LoadFile($Assembly)

	if ($LoadedAssembly.GetName().GetPublicKey().Length -eq 0) {
	throw "The assembly '$Assembly' must be strongly signed."
	}

	Write-Verbose "Installing: $Assembly"
	$PublishObject.GacInstall($Assembly)
	}

	function DeployToIngEventDir($Assembly) {
	$defaultEventSystemDir = "O:\Program Files (x86)\SDL Web 8\extensions\eventsystem\"
	if ( -not (Test-Path $Assembly -type Leaf) ) {
	throw "The assembly '$Assembly' does not exist."
	}

	sohost

	write-host '.... Copy assembly to ING location ....' -BackgroundColor black -ForegroundColor magenta
	cp $Assembly $defaultEventSystemDir

	sahost
	}

	function IncrementGUIModification {
	$filename = $Env:TRIDION_HOME + '\web\WebUI\WebRoot\Configuration\System.Config'
	$conf = [xml](gc $filename)
	$modification = [int]$conf.Configuration.servicemodel.server.modification
	$modification++
	$conf.Configuration.servicemodel.server.modification = [string]$modification
	write-host "Incremented Configuration.servicemodel.server.modification to $modification" -ForegroundColor yellow
	$conf.Save($filename)
	}

	function ResetService {
	$comPlusName = "SDL SDL Web 8 Content Manager"
	$comAdmin = New-Object -comobject COMAdmin.COMAdminCatalog
	$tcmServiceHostName = "TcmServiceHost"

	write-host "Stopping TcmServiceHost " -ForegroundColor yellow
	stop-service -name $tcmServiceHostName -Force
	get-service -name $tcmServiceHostName

	write-host "Stopping COM+" -ForegroundColor yellow
	$comAdmin.ShutdownApplication($comPlusName)

	write-host "Starting COM+" -ForegroundColor yellow
	$comAdmin.StartApplication($comPlusName)

	write-host "Starting TcmServiceHost " -ForegroundColor yellow
	start-service -name $tcmServiceHostName
	get-service -name $tcmServiceHostName

	write-host "Done" -ForegroundColor green
	}

	function CreateTempDirForExportToExtension {
	if (!(Test-Path "c:\SDL Web 8\temp\")) {
	write-host "SDL Web 8 temp not found, create it."
	New-Item -ItemType Directory -Force -Path "c:\SDL Web 8\temp" \| Out-null
	}
	}

	function CreateBackupFile([string]$filepath) {
	if(Test-Path $filepath)
	{
	[string]$directory = [System.IO.Path]::GetDirectoryName($filePath);
	[string]$strippedFileName = [System.IO.Path]::GetFileNameWithoutExtension($filePath);
	[string]$extension = [System.IO.Path]::GetExtension($filePath);
	[string]$newFileName = $strippedFileName + [DateTime]::Now.ToString("yyyyMMdd-HHmmss") + $extension;
	[string]$newFilePath = [System.IO.Path]::Combine($directory, $newFileName);

	Copy-Item -LiteralPath $filePath -Destination $newFilePath;
	if((Test-Path $newFilePath)) {
	Write-Host "Created backup" $newFilePath
	}else {
	Write-Warning ("Failed to create backup " + $newFilePath)
	Break
	}
	}else {
	Write-Warning ($filepath + " does not exist, exiting")
	Break
	}
	}

	function BackupSystemConfig() {
	CreateBackupFile -filepath ($env:TRIDION_HOME + 'web\WebUI\WebRoot\Configuration\System.config')
	}