PDF de programación - Automatización de puesta en marcha de servidores XENAPP

eManu

AUTOMATIZACIÓN DE PUESTA EN MARCHA DE SERVIDORES XENAPP

Manuel Roldán

[email protected]

jueves 16 de septiembre de 2010

eManu

EN



2009 – VIMOS XenAPPPrep

Descarga XenAPP Prep 2.0

http://support.citrix.com/article/CTX116063

jueves 16 de septiembre de 2010

eManu

AUTOMATIC DEPLOY SERVER

Configuración IP

Añadir al Dominio

Generar LHC

Configuración
Servicios Citrix

Swap Desantendido

Configuración OU

LANZADOR

jueves 16 de septiembre de 2010

eManu

AUTOMATIC DEPLOY SERVER

Configuración de dirección IP Según el
nombre de servidor. Para este servidor, se
debe definir la configuración general de los
servidores para que todas las IP's sean
correlativas
SERVER1000 = 192.168.1.000
SERVER2125 = 192.168.2.125

Configuración IP

Añadir al Dominio

Generar LHC

Configuración
Servicios Citrix

Swap Desantendido

Configuración OU

LANZADOR

jueves 16 de septiembre de 2010

eManu

AUTOMATIC DEPLOY SERVER

Set objNetwork = CreateObject("WScript.Network")
strComputer = objNetwork.ComputerName
……
objComputer.JoinDomainOrWorkGroup(….)

Configuración IP

Añadir al Dominio

Generar LHC

Configuración
Servicios Citrix

Swap Desantendido

Configuración OU

LANZADOR

jueves 16 de septiembre de 2010

eManu

AUTOMATIC DEPLOY SERVER

dsmaint recreatelhc

Configuración IP

Añadir al Dominio

Generar LHC

Configuración
Servicios Citrix

Swap Desantendido

Configuración OU

LANZADOR

jueves 16 de septiembre de 2010

eManu

AUTOMATIC DEPLOY SERVER

Configuración IP

Añadir al Dominio

Generar LHC

Configuración
Servicios Citrix

Swap Desantendido

Configuración OU

LANZADOR

jueves 16 de septiembre de 2010

1. Paramos Servicios
2. Generamos .REG con información

necesaria

3. Lanzamos el fichero .REG
4.

Iniciamos Servicios

eManu

AUTOMATIC DEPLOY SERVER

Configuración IP

Añadir al Dominio

Generar LHC

Configuración
Servicios Citrix

Swap Desantendido

Configuración OU

LANZADOR

jueves 16 de septiembre de 2010

1. Quitamos cualquier configuración

de SWAP

2. Parametrizamos nuestro SWAP

(1,5 x memoria instalada)

eManu

AUTOMATIC DEPLOY SERVER

Configuración IP

Añadir al Dominio

Generar LHC

Configuración
Servicios Citrix

Swap Desantendido

Configuración OU

dsmove

LANZADOR

jueves 16 de septiembre de 2010

eManu

AUTOMATIC DEPLOY SERVER

Configuración IP

Añadir al Dominio

Generar LHC

Configuración
Servicios Citrix

Swap Desantendido

Configuración OU

LANZADOR

jueves 16 de septiembre de 2010

eManu

AUTOMATIC DEPLOY SERVER

Configuración IP

Añadir al Dominio

Generar LHC

Configuración
Servicios Citrix

Swap Desantendido

Configuración OU

LANZADOR

jueves 16 de septiembre de 2010

Por último reiniciar el servidor,
realizando si procede:
- Instalación de agente EdgeSight
- Copia de ficheros
(TNSNames.ora /Source APP, etc)

eManu

Configuración IP

' Obtenemos el numero de servidor que es:
' Obligatoriamente, se necesita hardcodear el nombre del server (sin la numeración).
NumServidor = replace(UCase(GetComputerName),"server","")

' Realizamos los cáculos necesarios, para saber en que zona está ubicado el servidor.
if NumServidor > 999 and NumServidor < 2000 then
NumServidor = NumServidor - 1000
IPValor = "192.168.1." & NumServidor
IPGateway = "192.168.1.254"
else
NumServidor = NumServidor - 2000
IPValor = "192.168.2." & NumServidor
IPGateway = "192.168.2.254"
end if

jueves 16 de septiembre de 2010

eManu

Añadir al Dominio

strDomain = "DOMINIO.COM"
strPassword = "CONTRASEÑA"
strUser = "USUARIO CON PERMISOS ADMINISTRATIVOS"

Set objNetwork = CreateObject("WScript.Network")
strComputer = objNetwork.ComputerName

Set objComputer = GetObject("winmgmts:{impersonationLevel=Impersonate}!\\“_
& strComputer & "\root\cimv2:Win32_ComputerSystem.Name='" & strComputer & "'")

ReturnValue = objComputer.JoinDomainOrWorkGroup(strDomain, strPassword, _
strDomain & "\" & strUser,NULL,JOIN_DOMAIN + ACCT_CREATE)

jueves 16 de septiembre de 2010

eManu

Generar Local Host Cache

dsmaint recreatelhc

jueves 16 de septiembre de 2010

eManu

Configuración Servicios Citrix

net stop IMAService
net stop MFCom
net stop CitrixHealthMon
net stop "Citrix SMA Service"
net stop ctxhttp

echo Windows Registry Editor Version 5.00>>c:\postinstall\temp\Reg_Citrix.reg
echo [HKEY_LOCAL_MACHINE\SOFTWARE\Citrix\IMA]>>c:\postinstall\temp\Reg_Citrix.reg
echo "ServerHost"="%ComputerName%">>c:\postinstall\temp\Reg_Citrix.reg
echo [HKEY_LOCAL_MACHINE\SOFTWARE\Citrix\IMA\RUNTIME]>>c:\postinstall\temp\Reg_Citrix.reg
echo "HostName"="%ComputerName%">>c:\postinstall\temp\Reg_Citrix.reg
echo "PSRequired"=dword:00000001>>c:\postinstall\temp\Reg_Citrix.reg
echo [HKEY_LOCAL_MACHINE\SOFTWARE\Citrix\ICA Client]>>c:\postinstall\temp\Reg_Citrix.reg
echo "ClientName"="%ComputerName%">>c:\postinstall\temp\Reg_Citrix.reg

regedit /s c:\postinstall\temp\Reg_Citrix.reg
del c:\postinstall\temp\Reg_Citrix.reg

sc.exe \\%computername% config ctxhttp start= auto
sc.exe \\%computername% config MFCom start= auto
sc.exe \\%computername% config CitrixHealthMon start= auto
sc.exe \\%computername% config IMAService start= auto
sc.exe \\%computername% config "Citrix SMA Service" start= auto
sc.exe \\%computername% config RSCorSvc start= auto

jueves 16 de septiembre de 2010

eManu

Configuramos el fichero de paginación

' Realizamos una consulta para saber el tamaño del SWAP y en que unidad está
cscript C:\Utilidades\Post\pagefileconfig.vbs /query

' Asignamos los valores máximo y mínimo de SWAP a 3072 en la unidad D:
cscript C:\Utilidades\Post\pagefileconfig.vbs /create /i 3072 /m 3072 /VO D:

' Volvemos a verificar el SWAP, verificando que ahora la unidad D tiene asignado 3072
cscript C:\Utilidades\Post\pagefileconfig.vbs /query

' Eliminamos el SWAP que haya en la unidad C:\
cscript C:\Utilidades\Post\pagefileconfig.vbs /delete /VO C:

' Volvemos a verificar el SWAP, verificando que ahora la unidad C no tiene SWAP asignado
cscript C:\Utilidades\Post\pagefileconfig.vbs /query

jueves 16 de septiembre de 2010

eManu

Configuración en AD

FOR /F "tokens=*" %A in ('dsquery computer "DC=DOMINIO,DC=COM“ _
-name %computername%') do set DNBS=%A

dsmove "%DNBS%" -newparent "OU=OU_GRANJA_CITRIX,OU=Servidores,DC=DOMINIO, _
DC=com" -u DOMINIO\ADMIN -p CONTRASEÑA

Gpupdate /force

jueves 16 de septiembre de 2010

eManu

Otras tareas y reinicio

‘ Copiamos Source de aplicaciones de desarrollo
C:\Tools\Robocopy.exe [……]

‘Generamos Tareas Programadas
schtasks /create /S Localhost /U DOMINIO\USUARIO /P PASSWORD /SC DAILY […..]

‘Realizamos “Tunning” del sistema
Regedit.exe /y C:\Utilidades\Post\tuning.reg

‘Modificamos MF20.DSN
WSID= %computername% >> MF20.dsn

‘Reiniciamos el servidor
%systemroot%\system32\shutdown.exe /r /f /t 20

jueves 16 de septiembre de 2010

eManu

Cómo se lanza?

jueves 16 de septiembre de 2010

eManu

Cómo se lanza?

jueves 16 de septiembre de 2010

Registro Windows:
"HKLM\SOFTWARE\Microsoft\Windows\
CurrentVersion\RunOnce“
(String Value/Alfanumérico)

Sysprep:
[GuiRunOnce]

eManu

jueves 16 de septiembre de 2010

•Preguntas eManu

jueves 16 de septiembre de 2010

Muchas gracias