HO

@echo off
::------------------------------DECLARANDO VARIAVEIS------------------------------------::
::DEFININDO DOMINIO
SET "DOM=dominio.local"
SET "APROGRAMA=\\SERVER\CAMINHO\PROGRAMA\PROGRAMA.EXE"
TITLE AUTENTICANDO NO %DOM%
::CAMINHO POWERSHELL
SET "PSW=%SYSTEMROOT%\System32\WindowsPowerShell\v1.0\powershell.exe"
::UAC CAMINHO
SET "UAC_EXE=%SYSTEMROOT%\System32\UserAccountControlSettings.exe"
::UAC ATALHO
SET "UAC_LNK=%USERPROFILE%\Desktop\UAC.lnk"
::PASTA SUPORTE
SET "P_SUPORTE=%SYSTEMDRIVE%\Suporte"
::CAMINHO PASTA APLICATIVOS HOME OFFICE
SET "APP_PASTA=%P_SUPORTE%\Apphome"
::############LINK ATALHOS HOME OFFICE###########################
::LINK TEAM VIEWERQS
SET "LNK_TEAM=%USERPROFILE%\Desktop\TeamViewerQS.lnk"
::CAMINHO BAT ho.bat
SET "LOGIN_BAT=%PROGRAMDATA%\Microsoft\Windows\Start Menu\Programs\Startup\ho.bat"
::LINK LOGIN ho.bat
SET "LOGIN_LNK=%USERPROFILE%\Desktop\Login.lnk"
::CAMINHO EXECUTAVEL TEAM VIEWERQS
SET "TEAM_EXE=%P_SUPORTE%\Apphome\TeamViewerQS.exe"
::VPN CAMINHO
SET "UVPN=%APP_PASTA%\FortiClientSetup_6.0.9.0277_x86.exe"
::VALIDANDO VPN 32 OU 64 BITS VPN
IF EXIST "%PROGRAMFILES(X86)%\Fortinet\FortiClient\FortiClient.exe" (SET "VPN=%PROGRAMFILES(X86)%\Fortinet\FortiClient\FortiClient.exe") ELSE (SET "VPN=%PROGRAMFILES%\Fortinet\FortiClient\FortiClient.exe")
::------------------------------FIM DECLARANDO VARIAVEIS-------------------------------::
ECHO REALIZANDO AJUSTES...
::------------------------------DESATIVA WINDOWS UPDATE------------------------------------::
::SC query "wuauserv" | FIND /i "STOPPED" >nul & IF ERRORLEVEL 1 SC stop "wuauserv" >nul & SC config "wuauserv" start= disabled >nul
::------------------------------FIM DESATIVA WINDOWS UPDATE--------------------------------::
::------------------------------DESATIVA UAC------------------------------------::
::REG ADD "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System" /v "EnableLUA" /t REG_DWORD /d "0" /f
::------------------------------FIM DESATIVA UAC--------------------------------::
::PASTA HOME OFFICE ATALHO
IF NOT EXIST "%APP_LNK%" %PSW% -c "$s=(New-Object -COM WScript.Shell).CreateShortcut('%APP_LNK%');$s.TargetPath='%APP_PASTA%';$s.Save()"
::CRIANDO ATALHO UAC
IF NOT EXIST "%UAC_LNK%" %PSW% -c "$s=(New-Object -COM WScript.Shell).CreateShortcut('%UAC_LNK%');$s.TargetPath='%UAC_EXE%';$s.Save()"
::ATALHO LOGIN DE REDE
IF NOT EXIST "%LOGIN_LNK%" %PSW% -c "$s=(New-Object -COM WScript.Shell).CreateShortcut('%LOGIN_LNK%');$s.TargetPath='%LOGIN_BAT%';$s.Save()"
::ATALHO TEAM VIEWER
IF NOT EXIST "%LNK_TEAM%" %PSW% -c "$s=(New-Object -COM WScript.Shell).CreateShortcut('%LNK_TEAM%');$s.TargetPath='%TEAM_EXE%';$s.Save()"
::------------------------------FIM CRIANDO ATALHOS E VALIDANDO PASTA DESKTOP---------------------------------::
::CONFIGURANDO REG
::regedit.exe /s %APP_PASTA%\IE_sem_proxy.reg >nul
::FIM CONFIGURANDO REG
::configurando speed para Auto duplex
::Lenovo E73
::REG ADD "HKLM\SYSTEM\CurrentControlSet\Control\Class\{4D36E972-E325-11CE-BFC1-08002BE10318}\0009" /v *SpeedDuplex /t REG_SZ /d 0 /f >NUL
::Lenovo E71
::REG ADD "HKLM\SYSTEM\CurrentControlSet\Control\Class\{4D36E972-E325-11CE-BFC1-08002BE10318}\0007" /v *SpeedDuplex /t REG_SZ /d 0 /f >NUL
::BLOQUEAR USB
::REG ADD "HKCU\Software\Policies\Microsoft\Windows\RemovableStorageDevices" /v "Deny_All" /t REG_DWORD /d 1 /f > nul
::PERFIL PADRAO ( REMOVE USUARIO home do grupo administrador)
::net localgroup "Administrators" home /delete >NUL
CLS
:pro
::CACHE NOME DE USUARIO
::for /f "tokens=1,2* delims=\" %%i in ('cmdkey /list server^|findstr /i "%DOM%"') do SET USC=%%j
::AJUSTE BARRA DE TAREFAS
REG ADD "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" /f /v "TaskbarGlomLevel" /t REG_DWORD /d "1" >NUL
::------------LIMPA CREDENCIAIS COFRE-----------------------------::
SET "SERVERS=teste.%DOM%,server,192.168.x.x,server_01.%DOM%"
for %%i in (%SERVERS%) do (cmdkey /delete:%%i >NUL)
::------------FIM LIMPA CREDENCIAIS COFRE-------------------------::
::INFO MAQUINA TXT
ipconfig.exe /all >"%USERPROFILE%\desktop\Suporte#%COMPUTERNAME%.txt" 2>nul
CLS
::REMOVE LOGON AUTOMATICO
REG ADD "HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "AutoAdminLogon" /t REG_SZ /d 0 /f >NUL
REG ADD "HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "DisableCAD" /t REG_DWORD /d 0 /f >NUL
reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "DefaultPassword" /f >NUL
reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "DefaultUserName" /f >NUL
CLS
::------------LOGIN DE REDE-----------------------------::
TITLE INFORME SUAS CREDENCIAIS
ECHO AUTENTICANDO NO %DOM%
for /f "tokens=1,2* delims= " %%i in ('%PSW% -c "$credential = $host.ui.PromptForCredential('Informe o login de rede', 'Informe o seu nome de usuario e senha:', '%USC%', '%DOM%'); $a=''+$credential.GetNetworkCredential().username+'',''+$credential.GetNetworkCredential().Password+''; $a"') do (SET "USER=%%i" & SET "PASS=%%j")
::------------FIM LOGIN DE REDE-------------------------::
CLS
::------------SALVA CREDENCIAIS COFRE-----------------------------::
SET "SERVERS=teste.%DOM%,server,192.168.x.x,server_01.%DOM%"
for %%i in (%SERVERS%) do (cmdkey /add:%%i /user:%DOM%\%USER% /Pass:%PASS% >NUL)
GOTO AVPN
::------------FIM SALVA CREDENCIAIS COFRE-------------------------::
:AVPN
::------------ABRE VPN E LOGO EM SEGUIDA OUTRO PROGRAMA---------------------------::
IF NOT EXIST "%VPN%" (TITLE INSTALANDO FORTICLIENT && ECHO FORTICLIENTE AUSENTE INSTALANDO AGUARDE... & IF EXIST "%UVPN%" "%UVPN%" /quiet /norestart && ECHO LOGUE NA VPN APOS CONECTAR CLIQUE NO X & Start /wait "" "%VPN%">nul & CLS && TITLE ABRINDO O OUTRO PROGRAMA && ECHO ABRINDO OUTRO PROGRAMA AGUARDE... & Start "" "%APROGRAMA%" >nul &GOTO LOGS)
IF EXIST "%VPN%" (TITLE ABRINDO VPN & ECHO LOGUE NA VPN APOS CONECTAR CLIQUE NO X & Start /wait "" "%VPN%">nul & CLS && TITLE ABRINDO O APROGRAMA && ECHO ABRINDO O PROGRAMA AGUARDE... & Start "" "%APROGRAMA%" >nul & GOTO LOGS)
::------------FIM ABRE VPN E LOGO EM SEGUIDA OUTRO PROGRAMA------------------------::
:LOGS
::------------LOGS-----------------------------::
::LOG USUARIO
SET "USR_LOG=%USERPROFILE%\%COMPUTERNAME%.log"
::LOG PROFILE
SET "HOM_LOG=\\192.168.X.X\log_home.$\%COMPUTERNAME%.log"
SET "HOM_LOGE=\\192.168.X.X\Log_home.$\GERAL\#1_LOG_GERAL.log"
SET "UAC_LOG=\\192.168.X.X\log_home.$\GERAL\UAC\%COMPUTERNAME%-UACELEVADO.log"
::INFO CISCO
::SET "KEY_CISCO=HKLM\SOFTWARE\Cisco Systems, Inc.\Communicator"
::SET "VALUEC=HostName"
::for /F "usebackq tokens=3" %%A IN (`reg query "%KEY_CISCO%" /v "%VALUEC%" 2^>nul ^| find "%VALUEC%"`) do (set HOSTNAME=%%A)
::AGENT ID
::for /F "usebackq tokens=3" %%A IN (`reg query "HKCU\Environment" /v "AgentID" 2^>nul ^| find "AgentID"`) do (set AGENTID=%%A)
::CONSULTA UAC
for /F "usebackq tokens=3" %%A IN (`reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System" /v "EnableLUA" 2^>nul ^| find "EnableLUA"`) do (set UACHECK=%%A)
::IP
for /f %%d in ('%PSW% -c "((ipconfig | findstr [0-9].\.)[0]).Split()[-1]"') do (set IP=%%d)
::REMOVE ATRIBUTO SOMENTE LEITURA E OCULTO
IF EXIST "%USR_LOG%" (attrib "%USR_LOG%" -h -r )
IF EXIST "%HOM_LOG%" (attrib "%HOM_LOG%" -h -r )
IF EXIST "%HOM_LOGE%" (attrib "%HOM_LOGE%" -h -r )
IF EXIST "%UAC_LOG%" (attrib "%UAC_LOG%" -h -r )
::SALVA LOG E ADICIONA ATRIBUTO OCULTO E SOMENTE LEITURA
ECHO %USER%,%RAMAL%,%AGENTID%,%HOSTNAME%,%COMPUTERNAME%,%IP%,%date%-%TIME:~0,8%>"%USR_LOG%" & attrib "%USR_LOG%" +h +r
ECHO %USER%,%RAMAL%,%AGENTID%,%HOSTNAME%,%COMPUTERNAME%,%IP%,%date%-%TIME:~0,8%>"%HOM_LOG%" & attrib "%HOM_LOG%" +h +r
ECHO %USER%,%RAMAL%,%AGENTID%,%HOSTNAME%,%COMPUTERNAME%,%IP%,%date%-%TIME:~0,8%>>"%HOM_LOGE%" & attrib "%HOM_LOGE%" +h +r
::VALIDA UAC SE ESTIVER CORRIGIDO APAGA LOG
IF "%UACHECK%" NEQ "0x0" (ECHO %USER%,UACELEVADO=SIM=%UACHECK%,%RAMAL%,%AGENTID%,%HOSTNAME%,%COMPUTERNAME%,%IP%,%date%-%TIME:~0,8%>"%UAC_LOG%" & attrib "%UAC_LOG%" +h +r) ELSE (IF EXIST "%UAC_LOG%" del /f /q "%UAC_LOG%" )
::------------FIM LOGS-------------------------::
EXIT