$ErrorActionPreference = "SilentlyContinue"
$stop = 0
$errorlevel = 0
 
 
#Webdav-Pfad - Empfehlung: IP-Adresse angeben!
 
$ShareName1 = "https://bbs-ilias.de/info/webdav.php/info/ref_141/"
 
$ShareName2 = "https://bbs-ilias.de/info/webdav.php/info/ref_142/"
 
 
 
#Laufwerksbuchstabe
$DriveName1 = "A:"
$DriveName2 = "B:"
 
#Laufwersnamen
$rename1 = "WebDAV_A"
$rename2 = "WebDAV_B"
 
 
#Soll der Username verwendet werden, wenn der Rechner Domändenmitglied ist? "yes" aktiviert das Feature.
$autouser = "no"
 
$Net = New-Object -ComObject WScript.Network $Rename = New-Object -ComObject Shell.Application
 
 
################################################
#Ab hier sind keine Einstellungen erforderlich.#
################################################
$a = (Get-Host).UI.RawUI
$a.BackgroundColor = "black"
$a.ForegroundColor = "cyan"
 
 
 
$userx = ([Security.Principal.WindowsPrincipal][Security.Principal.WindowsIdentity]::GetCurrent()).IsInRole(`
	[Security.Principal.WindowsBuiltInRole] "Administrator")
 
if ($userx -eq $true)
{
	Write-Host "WebClient wird gestartet"
	Set-Service WebClient -startuptype automatic
	Start-Service WebClient
	If ($webclient.Status -ne "Running")
	{
		write-host "Der Web-Client-Service läuft. Aktivierung erfolgreich. " -f green
		
	}
	
	
}
 
 
 
do
{
	#clear-host
	write-host "________________________________________________________________________________" -foregroundcolor "cyan"
	write-host "ILIAS-WebDAV - Version 0.0.2" -foregroundcolor "cyan"
	Write-Host "Letzte Änderung: 02.18.2017 - BBS-ILIAS.de"
	Write-Host "" -foregroundcolor "cyan"
	write-host "________________________________________________________________________________" -foregroundcolor "cyan"
	write-host
	#Läuft der Service WebClient?
	$webclient = Get-Service WebClient
	If ($webclient.Status -ne "Running")
	{
		write-host "Der Web-Client-Service läuft nicht. " -f red
		write-host
		
		
		write-host "Geben Sie JA ein, um den WebClient-Service auf Ihrem Computer"
		write-host "dauerhaft zu aktivieren!"
		
		$webstart = read-host "Ihre Eingabe (NEIN zum Beenden)"
		
		if ($webstart -ne "JA" -or $webstart -ne "ja")
		{ exit }
		else
		{
			#The script will restart with Admin-rights and aktivate the WebCliebt-Service if possible
			$identity = [System.Security.Principal.WindowsIdentity]::GetCurrent()
			$princ = New-Object System.Security.Principal.WindowsPrincipal($identity)
			if (!$princ.IsInRole( `
					[System.Security.Principal.WindowsBuiltInRole]::Administrator))
			{
				
				
				$powershell = [System.Diagnostics.Process]::GetCurrentProcess()
				$psi = New-Object System.Diagnostics.ProcessStartInfo $powerShell.Path
				$script = $MyInvocation.MyCommand.Path
				$prm = $script
				foreach ($a in $args)
				{
					$prm += ' ' + $a
				}
				$psi.Arguments = $prm
				$psi.Verb = "runas"
				[System.Diagnostics.Process]::Start($psi) | Out-Null
				write-host "ich bin Admin"
				return;
				
			}
			
			
			
			
		}
		
		
		
		
		
	}
	else
	{
		write-host "Der Web-Client-Service läuft." -f green
	}
	
	#Check: Kann es losgehen? Errorlevel OK?
	if ($errorlevel -gt 0)
	{
		write-host
		write-host "Es wurden $errorlevel Fehler festgestellt. Login nicht möglich." -f yellow
		write-host
		read-host "Drücken Sie die Eingabetaste, um das Programm zu beenden."
		exit
		
	}
	
	#Erzeugt Login-Fenster
	write-host "Das Netzwerk wird geprüft..."
	if ((gwmi win32_computersystem).partofdomain -eq $true -and $autouser -eq "yes")
	{
		
		$UserName = $Env:USERNAME
		write-host
		Write-Host "Ihr Username: $UserName"
		
	}
	else
	{
		$UserName = read-host "Bitte ILIAS-Usernamen eingeben"
	}
	if ($Username -eq "")
	{
		Write-Host "Kein Benutzername eingegeben, Programm wird geschlossen." -ForegroundColor red
		Start-Sleep -s 5
		exit
	}
	else
	{
		#Check if User Null
		
		$pass1 = read-host "Bitte ILIAS-Passwort eingeben" -assecurestring
		#decode password
		
		$pass2 = [System.Runtime.InteropServices.Marshal]::SecureStringToBSTR($pass1)
		$Password = [System.Runtime.InteropServices.Marshal]::PtrToStringAuto($pass2)
		if ($Password -eq "")
		{
			
			Write-Host "Kein Passwort eingegeben, Programm wird geschlossen." -ForegroundColor Red
			Start-Sleep -s 5
			exit
		}
	}
	
	write-host "Starte Loginversuch mit User $UserName"
	write-host
	
	
	
	#Alte Verbindung löschen
	net use $DriveName1 /d /y
	net use $DriveName2 /d /y
	
	#Login $ShareName1
	if ($ShareName1)
	{
		$i = 1
		do
		{
			Write-Host "Versuch Nr. $i"
			
			
			$output = net use $DriveName1 $ShareName1 $Password /user:$UserName /persistent:no
			
			$sh = New-Object -com Shell.Application
			$sh.NameSpace($DriveName1).Self.Name = $rename1
			$i++
			Start-Sleep -s 2
		}
		until ($output -like "*erfolgreich*" -or $i -eq 4)
		
		if ($output -like "*erfolgreich*")
		{
			write-host "________________________________________________________________________________" -foregroundcolor "cyan"
			write-host "Login für Laufwerk $DriveName1 erfolgreich!" -f green
			explorer $DriveName1
			#write-host "(Auch wenn die Meldung Netzwerkverbindung nicht gefunden erscheint)." -f green
			write-host
		}
		else
		{
			write-host "Ein Fehler bei der Verbindung mit Laufwerk $DriveName1 aufgetreten." -f red
			write-host "Überprüfen Sie die Logindaten (Benutzername/Passwort)." -f red
			write-host
			read-host "Drücken Sie die Eingabetaste, um das Programm zu beenden"
			exit
		}
		
	}
	else
	{
		write-host "Laufwerk $DriveName1 hat keine URL. Soll das so sein?" -f yellow
	}
	
	
	
	#Login $ShareName2
	if ($ShareName2)
	{
		$i = 1
		do
		{
			Write-Host "Versuch Nr. $i"
			$output2 = net use $DriveName2 $ShareName2 $Password /user:$UserName /persistent:no
			$sh = New-Object -com Shell.Application
			$sh.NameSpace($DriveName2).Self.Name = $rename2
			$i++
			Start-Sleep -s 2
		}
		until ($output -like "*erfolgreich*" -or $i -eq 4)
		
		if ($output2 -like "*erfolgreich*")
		{
			write-host "________________________________________________________________________________" -foregroundcolor "cyan"
			write-host "Login für Laufwerk $DriveName2 erfolgreich!" -f green
			explorer $DriveName2
			#write-host "(Auch wenn die Meldung Netzwerkverbindung nicht gefunden erscheint)." -f green
			write-host
			write-host "Die ILIAS ist nun mit den Laufwerksbuchstaben $DriveName1 und $DriveName2 verbunden."
			Start-Sleep -s 10
			
			
			
		}
		else
		{
			write-host "Ein Fehler bei der Verbindung mit Laufwerk $DriveName2 aufgetreten." -f red
			write-host "Überprüfen Sie die Logindaten (Benutzername/Passwort)." -f red
			write-host
			read-host "Drücken Sie die Eingabetaste, um das Programm zu beenden"
			exit
		}
		
		
	}
	
	else
	{
		write-host "Laufwerk $DriveName2 hat keine URL. Soll das so sein?" -f yellow
		
		if ($output -like "*erfolgreich*")
		{
			write-host
			write-host "Die ILIAS ist nun mit dem Laufwerksbuchstaben $DriveName1 verbunden."
			Start-Sleep -s 10
		}
		
	}
	
	
	
	
	$stop = 1
	
	
}
until ($stop -eq 1)