Context Navigation

ogAdmServer.cpp @ d8f592d

Visit:

918-git-images-111dconfigfileconfigure-oglivegit-imageslgromero-new-oglivemainmaint-cronmount-efivarfsmultivmmultivm-ogboot-installerogClonningEngineogboot-installer-jenkinsoglive-ipv6test-python-scriptsticket-301ticket-50ticket-50-oldticket-577ticket-585ticket-611ticket-612ticket-693ticket-700ubu24tplunification2use-local-agent-oglivevarios-instalacionwebconsole3

Last change on this file since d8f592d was ac933ca, checked in by ramon <ramongomez@…>, 9 years ago

#713 #743: Corregir erratas de revisiones r4906 y r4927.

git-svn-id: https://opengnsys.es/svn/branches/version1.1@4929 a21b9725-9963-47de-94b9-378ad31fedc9

Property mode set to 100644

File size: 128.0 KB

Line
1	// *******************************************************************************************************
2	// Servicio: ogAdmServer
3	// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
4	// Fecha Creación: Marzo-2010
5	// Fecha Última modificación: Marzo-2010
6	// Nombre del fichero: ogAdmServer.cpp
7	// Descripción :Este fichero implementa el servicio de administración general del sistema
8	// *******************************************************************************************************
9	#include "ogAdmServer.h"
10	#include "ogAdmLib.c"
11	//________________________________________________________________________________________________________
12	// Función: tomaConfiguracion
13	//
14	// Descripción:
15	// Lee el fichero de configuración del servicio
16	// Parámetros:
17	// filecfg : Ruta completa al fichero de configuración
18	// Devuelve:
19	// TRUE: Si el proceso es correcto
20	// FALSE: En caso de ocurrir algún error
21	//________________________________________________________________________________________________________
22	BOOLEAN tomaConfiguracion(char* filecfg) {
23	char modulo[] = "tomaConfiguracion()";
24
25	if (filecfg == NULL \|\| strlen(filecfg) == 0) {
26	errorLog(modulo, 1, FALSE); // Fichero de configuración del servicio vacío
27	return (FALSE);
28	}
29	FILE *fcfg;
30	long lSize;
31	char * buffer, lineas[MAXPRM], dualparametro[2];
32	int i, numlin, resul;
33
34	fcfg = fopen(filecfg, "rt");
35	if (fcfg == NULL) {
36	errorLog(modulo, 2, FALSE); // No existe fichero de configuración del servicio
37	return (FALSE);
38	}
39
40	fseek(fcfg, 0, SEEK_END);
41	lSize = ftell(fcfg); // Obtiene tamaño del fichero.
42	rewind(fcfg);
43	buffer = (char*) reservaMemoria(lSize + 1); // Toma memoria para el buffer de lectura.
44	if (buffer == NULL) { // No hay memoria suficiente para el buffer
45	errorLog(modulo, 3, FALSE);
46	return (FALSE);
47	}
48	fread(buffer, 1, lSize, fcfg); // Lee contenido del fichero
49	buffer[lSize] = (char) NULL;
50	fclose(fcfg);
51
52	servidoradm[0] = (char) NULL; //inicializar variables globales
53	usuario[0] = (char) NULL;
54	pasguor[0] = (char) NULL;
55	datasource[0] = (char) NULL;
56	catalog[0] = (char) NULL;
57	aulaup[0] = (char) NULL;
58
59	numlin = splitCadena(lineas, buffer, '\n');
60	for (i = 0; i < numlin; i++) {
61	splitCadena(dualparametro, lineas[i], '=');
62	resul = strcmp(StrToUpper(dualparametro[0]), "SERVIDORADM");
63	if (resul == 0)
64	strcpy(servidoradm, dualparametro[1]);
65	resul = strcmp(StrToUpper(dualparametro[0]), "PUERTO");
66	if (resul == 0)
67	strcpy(puerto, dualparametro[1]);
68	resul = strcmp(StrToUpper(dualparametro[0]), "USUARIO");
69	if (resul == 0)
70	strcpy(usuario, dualparametro[1]);
71	resul = strcmp(StrToUpper(dualparametro[0]), "PASSWORD");
72	if (resul == 0)
73	strcpy(pasguor, dualparametro[1]);
74	resul = strcmp(StrToUpper(dualparametro[0]), "DATASOURCE");
75	if (resul == 0)
76	strcpy(datasource, dualparametro[1]);
77	resul = strcmp(StrToUpper(dualparametro[0]), "CATALOG");
78	if (resul == 0)
79	strcpy(catalog, dualparametro[1]);
80	resul = strcmp(StrToUpper(dualparametro[0]), "AULAUP");
81	if (resul == 0)
82	strcpy(catalog, dualparametro[1]);
83	}
84	if (servidoradm[0] == (char) NULL) {
85	liberaMemoria(buffer);
86	errorLog(modulo, 4, FALSE); // Falta parámetro SERVIDORADM
87	return (FALSE);
88	}
89	if (puerto[0] == (char) NULL) {
90	liberaMemoria(buffer);
91	errorLog(modulo, 5, FALSE); // Falta parámetro PUERTO
92	return (FALSE);
93	}
94	if (usuario[0] == (char) NULL) {
95	liberaMemoria(buffer);
96	errorLog(modulo, 6, FALSE); // Falta parámetro USUARIO
97	return (FALSE);
98	}
99	if (pasguor[0] == (char) NULL) {
100	liberaMemoria(buffer);
101	errorLog(modulo, 7, FALSE); // Falta parámetro PASSWORD
102	return (FALSE);
103	}
104	if (datasource[0] == (char) NULL) {
105	liberaMemoria(buffer);
106	errorLog(modulo, 8, FALSE); // Falta parámetro DATASOURCE
107	return (FALSE);
108	}
109	if (catalog[0] == (char) NULL) {
110	liberaMemoria(buffer);
111	errorLog(modulo, 9, FALSE); // Falta parámetro CATALOG
112	return (FALSE);
113	}
114	if (aulaup[0] == (char) NULL) {
115	strcpy(aulaup, "0"); // Por defecto el conmutador de registro automático esta en off
116
117	}
118	liberaMemoria(buffer);
119	return (TRUE);
120	}
121	// ________________________________________________________________________________________________________
122	// Función: gestionaTrama
123	//
124	// Descripción:
125	// Procesa las tramas recibidas .
126	// Parametros:
127	// - s : Socket usado para comunicaciones
128	// Devuelve:
129	// TRUE: Si el proceso es correcto
130	// FALSE: En caso de ocurrir algún error
131	// ________________________________________________________________________________________________________
132	BOOLEAN gestionaTrama(SOCKET *socket_c)
133	{
134	TRAMA* ptrTrama;
135	int i, res;
136	char *nfn;
137	char modulo[] = "gestionaTrama()";
138
139	ptrTrama=recibeTrama(socket_c);
140
141	if (ptrTrama){
142	INTROaFINCAD(ptrTrama);
143	nfn = copiaParametro("nfn",ptrTrama); // Toma nombre de la función
144
145	for (i = 0; i < MAXIMAS_FUNCIONES; i++) { // Recorre funciones que procesan las tramas
146	res = strcmp(tbfuncionesServer[i].nf, nfn);
147	if (res == 0) { // Encontrada la función que procesa el mensaje
148	liberaMemoria(nfn);
149	res=tbfuncionesServer[i].fptr(socket_c, ptrTrama); // Invoca la función
150	liberaMemoria((char*)ptrTrama);
151	return(res);
152	}
153	}
154
155	/*
156	Sólo puede ser un comando personalizado o su notificación
157	if (ptrTrama->tipo == MSG_COMANDO)
158	return (Comando(socket_c, ptrTrama));
159	else {
160	if (ptrTrama->tipo == MSG_NOTIFICACION)
161	return (RESPUESTA_Comando(socket_c, ptrTrama));
162	else
163	errorLog(modulo, 18, FALSE); // No se reconoce el mensaje
164	}
165	*/
166	}
167	else
168	errorLog(modulo, 17, FALSE); // Error en la recepción
169	return (TRUE);
170	}
171	// ________________________________________________________________________________________________________
172	// Función: Sondeo
173	//
174	// Descripción:
175	// Solicita a los clientes su disponibiliad para recibir comandos interactivos
176	// Parámetros:
177	// - socket_c: Socket del cliente que envió el mensaje
178	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros del mensaje
179	// Devuelve:
180	// TRUE: Si el proceso es correcto
181	// FALSE: En caso de ocurrir algún error
182	// ________________________________________________________________________________________________________
183	BOOLEAN Sondeo(SOCKET socket_c, TRAMA ptrTrama) {
184	char msglog[LONSTD];
185	char modulo[] = "Sondeo()";
186
187	if (!enviaComando(ptrTrama, CLIENTE_APAGADO)) {
188	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
189	errorInfo(modulo, msglog);
190	respuestaConsola(socket_c, ptrTrama, FALSE);
191	return (FALSE);
192	}
193	respuestaConsola(socket_c, ptrTrama, TRUE);
194	return (TRUE);
195	}
196	// ________________________________________________________________________________________________________
197	// Función: respuestaSondeo
198	//
199	// Descripción:
200	// Recupera el estatus de los ordenadores solicitados leyendo la tabla de sockets
201	// Parámetros:
202	// - socket_c: Socket del cliente que envió el mensaje
203	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros del mensaje
204	// Devuelve:
205	// TRUE: Si el proceso es correcto
206	// FALSE: En caso de ocurrir algún error
207	// ________________________________________________________________________________________________________
208	BOOLEAN respuestaSondeo(SOCKET socket_c, TRAMA ptrTrama) {
209	int i;
210	long lSize;
211	char iph, Ipes;
212	char modulo[] = "respuestaSondeo()";
213
214	iph = copiaParametro("iph",ptrTrama); // Toma dirección/es IP
215	lSize = strlen(iph); // Calcula longitud de la cadena de direccion/es IPE/S
216	Ipes = (char*) reservaMemoria(lSize + 1);
217	if (Ipes == NULL) {
218	errorLog(modulo, 3, FALSE);
219	return (FALSE);
220	}
221	strcpy(Ipes, iph); // Copia cadena de IPES
222	liberaMemoria(iph);
223	initParametros(ptrTrama,0);
224	strcpy(ptrTrama->parametros, "tso="); // Compone retorno tso (sistemas operativos de los clientes )
225	for (i = 0; i < MAXIMOS_CLIENTES; i++) {
226	if (strncmp(tbsockets[i].ip, "\0", 1) != 0) { // Si es un cliente activo
227	if (contieneIP(Ipes, tbsockets[i].ip)) { // Si existe la IP en la cadena
228	strcat(ptrTrama->parametros, tbsockets[i].ip); // Compone retorno
229	strcat(ptrTrama->parametros, "/"); // "ip/sistema operativo;"
230	strcat(ptrTrama->parametros, tbsockets[i].estado);
231	strcat(ptrTrama->parametros, ";");
232	}
233	}
234	}
235	strcat(ptrTrama->parametros, "\r");
236	liberaMemoria(Ipes);
237	if (!mandaTrama(socket_c, ptrTrama)) {
238	errorLog(modulo, 26, FALSE);
239	return (FALSE);
240	}
241	return (TRUE);
242	}
243	// ________________________________________________________________________________________________________
244	// Función: Actualizar
245	//
246	// Descripción:
247	// Obliga a los clientes a iniciar sesión en el sistema
248	// Parámetros:
249	// - socket_c: Socket del cliente que envió el mensaje
250	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros del mensaje
251	// Devuelve:
252	// TRUE: Si el proceso es correcto
253	// FALSE: En caso de ocurrir algún error
254	// ________________________________________________________________________________________________________
255	BOOLEAN Actualizar(SOCKET socket_c, TRAMA ptrTrama) {
256	char msglog[LONSTD];
257	char modulo[] = "Actualizar()";
258
259	if (!enviaComando(ptrTrama, CLIENTE_APAGADO)) {
260	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
261	errorInfo(modulo, msglog);
262	return (FALSE);
263	}
264	respuestaConsola(socket_c, ptrTrama, TRUE);
265	return (TRUE);
266	}
267	// ________________________________________________________________________________________________________
268	// Función: Purgar
269	//
270	// Descripción:
271	// Detiene la ejecución del browser en el cliente
272	// Parámetros:
273	// - socket_c: Socket del cliente que envió el mensaje
274	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros del mensaje
275	// Devuelve:
276	// TRUE: Si el proceso es correcto
277	// FALSE: En caso de ocurrir algún error
278	// ________________________________________________________________________________________________________
279	BOOLEAN Purgar(SOCKET socket_c, TRAMA ptrTrama) {
280	char msglog[LONSTD];
281	char modulo[] = "Purgar()";
282
283	if (!enviaComando(ptrTrama, CLIENTE_APAGADO)) {
284	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
285	errorInfo(modulo, msglog);
286	return (FALSE);
287	}
288	respuestaConsola(socket_c, ptrTrama, TRUE);
289	return (TRUE);
290	}
291	// ________________________________________________________________________________________________________
292	// Función: ConsolaRemota
293	//
294	// Descripción:
295	// Envia un script al cliente, éste lo ejecuta y manda el archivo que genera la salida por pantalla
296	// Parámetros:
297	// - socket_c: Socket del cliente que envió el mensaje
298	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros del mensaje
299	// Devuelve:
300	// TRUE: Si el proceso es correcto
301	// FALSE: En caso de ocurrir algún error
302	// ________________________________________________________________________________________________________
303	BOOLEAN ConsolaRemota(SOCKET socket_c, TRAMA ptrTrama)
304	{
305	char iph,fileco[LONPRM],msglog[LONSTD],ptrIpes[MAXIMOS_CLIENTES];;
306	FILE* f;
307	int i,lon;
308	char modulo[] = "ConsolaRemota()";
309
310	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
311	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
312	errorInfo(modulo, msglog);
313	respuestaConsola(socket_c, ptrTrama, FALSE);
314	return (FALSE);
315	}
316	INTROaFINCAD(ptrTrama);
317	/* Destruye contenido del fichero de eco anterior */
318	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip del cliente
319	lon = splitCadena(ptrIpes,iph,';');
320	for (i = 0; i < lon; i++) {
321	sprintf(fileco,"/tmp/_Seconsola_%s",ptrIpes[i]); // Nombre que tendra el archivo en el Servidor
322	f = fopen(fileco, "wt");
323	fclose(f);
324	}
325	liberaMemoria(iph);
326	respuestaConsola(socket_c, ptrTrama, TRUE);
327	return (TRUE);
328	}
329	// ________________________________________________________________________________________________________
330	// Función: EcoConsola
331	//
332	// Descripción:
333	// Solicita el eco de una consola remota almacenado en un archivo de eco
334	// Parámetros:
335	// - socket_c: Socket del cliente que envió el mensaje
336	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros del mensaje
337	// Devuelve:
338	// TRUE: Si el proceso es correcto
339	// FALSE: En caso de ocurrir algún error
340	// ________________________________________________________________________________________________________
341	BOOLEAN EcoConsola(SOCKET socket_c, TRAMA ptrTrama)
342	{
343	char iph,fileco[LONPRM],buffer;
344	int lSize;
345	char modulo[] = "EcoConsola()";
346
347	INTROaFINCAD(ptrTrama);
348	// Lee archivo de eco de consola
349	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip del cliente
350	sprintf(fileco,"/tmp/_Seconsola_%s",iph); // Nombre del archivo en el Servidor
351	lSize=lonArchivo(fileco);
352	if(lSize>0){ // Si el fichero tiene contenido...
353	initParametros(ptrTrama,lSize+LONGITUD_PARAMETROS);
354	buffer=leeArchivo(fileco);
355	sprintf(ptrTrama->parametros,"res=%s\r",buffer);
356	liberaMemoria(buffer);
357	}
358	else{
359	initParametros(ptrTrama,0);
360	sprintf(ptrTrama->parametros,"res=\r");
361	}
362	ptrTrama->tipo=MSG_RESPUESTA; // Tipo de mensaje
363	if (!mandaTrama(socket_c, ptrTrama)) {
364	errorLog(modulo, 26, FALSE);
365	return (FALSE);
366	}
367	return (TRUE);
368	}
369	// ________________________________________________________________________________________________________
370	// Función: clienteDisponible
371	//
372	// Descripción:
373	// Comprueba la disponibilidad del cliente para recibir comandos interactivos
374	// Parametros:
375	// - ip : La ip del cliente a buscar
376	// - idx: (Salida) Indice que ocupa el cliente, de estar ya registrado
377	// Devuelve:
378	// TRUE: Si el cliente está disponible
379	// FALSE: En caso contrario
380	// ________________________________________________________________________________________________________
381	BOOLEAN clienteDisponible(char ip, int idx) {
382	int estado;
383
384	if (clienteExistente(ip, idx)) {
385	estado = strcmp(tbsockets[*idx].estado, CLIENTE_OCUPADO); // Cliente ocupado
386	if (estado == 0)
387	return (FALSE);
388
389	estado = strcmp(tbsockets[*idx].estado, CLIENTE_APAGADO); // Cliente apagado
390	if (estado == 0)
391	return (FALSE);
392
393	estado = strcmp(tbsockets[*idx].estado, CLIENTE_INICIANDO); // Cliente en proceso de inclusión
394	if (estado == 0)
395	return (FALSE);
396
397	return (TRUE); // En caso contrario el cliente está disponible
398	}
399	return (FALSE); // Cliente no está registrado en el sistema
400	}
401	// ________________________________________________________________________________________________________
402	// Función: clienteExistente
403	//
404	// Descripción:
405	// Comprueba si el cliente está registrado en la tabla de socket del sistema
406	// Parametros:
407	// - ip : La ip del cliente a buscar
408	// - idx:(Salida) Indice que ocupa el cliente, de estar ya registrado
409	// Devuelve:
410	// TRUE: Si el cliente está registrado
411	// FALSE: En caso contrario
412	// ________________________________________________________________________________________________________
413	BOOLEAN clienteExistente(char ip, int idx) {
414	int i;
415	for (i = 0; i < MAXIMOS_CLIENTES; i++) {
416	if (contieneIP(ip, tbsockets[i].ip)) { // Si existe la IP en la cadena
417	*idx = i;
418	return (TRUE);
419	}
420	}
421	return (FALSE);
422	}
423	// ________________________________________________________________________________________________________
424	// Función: hayHueco
425	//
426	// Descripción:
427	// Esta función devuelve TRUE o FALSE dependiendo de que haya hueco en la tabla de sockets para un nuevo cliente.
428	// Parametros:
429	// - idx: Primer indice libre que se podrn utilizar
430	// Devuelve:
431	// TRUE: Si el proceso es correcto
432	// FALSE: En caso de ocurrir algún error
433	// ________________________________________________________________________________________________________
434	BOOLEAN hayHueco(int *idx) {
435	int i;
436
437	for (i = 0; i < MAXIMOS_CLIENTES; i++) {
438	if (strncmp(tbsockets[i].ip, "\0", 1) == 0) { // Hay un hueco
439	*idx = i;
440	return (TRUE);
441	}
442	}
443	return (FALSE);
444	}
445	// ________________________________________________________________________________________________________
446	// Función: InclusionClienteWin
447	//
448	// Descripción:
449	// Esta función incorpora el socket de un nuevo cliente Windows o Linux a la tabla de clientes
450	// Parámetros:
451	// - socket_c: Socket del cliente que envió el mensaje
452	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
453	// Devuelve:
454	// TRUE: Si el proceso es correcto
455	// FALSE: En caso de ocurrir algún error
456	// ________________________________________________________________________________________________________
457	BOOLEAN InclusionClienteWinLnx(SOCKET socket_c, TRAMA ptrTrama)
458	{
459	char modulo[] = "InclusionClienteWinLnx()";
460	int res,idordenador,lon;
461	char nombreordenador[LONFIL];
462
463	res=procesoInclusionClienteWinLnx(socket_c, ptrTrama,&idordenador,nombreordenador);
464
465	// Prepara la trama de respuesta
466
467	initParametros(ptrTrama,0);
468	ptrTrama->tipo=MSG_RESPUESTA;
469	lon = sprintf(ptrTrama->parametros, "nfn=RESPUESTA_InclusionClienteWinLnx\r");
470	lon += sprintf(ptrTrama->parametros + lon, "ido=%d\r", idordenador);
471	lon += sprintf(ptrTrama->parametros + lon, "npc=%s\r", nombreordenador);
472	lon += sprintf(ptrTrama->parametros + lon, "res=%d\r", res);
473
474	if (!mandaTrama(socket_c, ptrTrama)) {
475	errorLog(modulo, 26, FALSE);
476	return (FALSE);
477	}
478	return (TRUE);
479	}
480	// ________________________________________________________________________________________________________
481	// Función: procesoInclusionClienteWinLnx
482	//
483	// Descripción:
484	// Implementa el proceso de inclusión en el sistema del Cliente Windows o Linux
485	// Parámetros de entrada:
486	// - socket_c: Socket del cliente que envió el mensaje
487	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
488	// Parámetros de salida:
489	// - ido: Identificador del ordenador
490	// - nombreordenador: Nombre del ordenador
491	// Devuelve:
492	// Código del error producido en caso de ocurrir algún error, 0 si el proceso es correcto
493	// ________________________________________________________________________________________________________
494	BOOLEAN procesoInclusionClienteWinLnx(SOCKET socket_c, TRAMA ptrTrama,int idordenador,char nombreordenador)
495	{
496	char msglog[LONSTD], sqlstr[LONSQL];
497	Database db;
498	Table tbl;
499
500	char *iph;
501	char modulo[] = "procesoInclusionClienteWinLnx()";
502
503	// Toma parámetros
504	iph = copiaParametro("iph",ptrTrama); // Toma ip
505
506	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexión con la BD
507	errorLog(modulo, 20, FALSE);
508	db.GetErrorErrStr(msglog);
509	errorInfo(modulo, msglog);
510	return (20);
511	}
512
513	// Recupera los datos del cliente
514	sprintf(sqlstr,
515	"SELECT idordenador,nombreordenador FROM ordenadores "
516	" WHERE ordenadores.ip = '%s'", iph);
517
518	if (!db.Execute(sqlstr, tbl)) { // Error al recuperar los datos
519	errorLog(modulo, 21, FALSE);
520	db.GetErrorErrStr(msglog);
521	errorInfo(modulo, msglog);
522	return (21);
523	}
524
525	if (tbl.ISEOF()) { // Si no existe el cliente
526	errorLog(modulo, 22, FALSE);
527	return (22);
528	}
529
530	if (ndebug == DEBUG_ALTO) {
531	sprintf(msglog, "%s IP:%s", tbMensajes[2], iph);
532	infoDebug(msglog);
533	}
534	if (!tbl.Get("idordenador", *idordenador)) {
535	tbl.GetErrorErrStr(msglog);
536	errorInfo(modulo, msglog);
537	return (FALSE);
538	}
539	if (!tbl.Get("nombreordenador", nombreordenador)) {
540	tbl.GetErrorErrStr(msglog);
541	errorInfo(modulo, msglog);
542	return (FALSE);
543	}
544	db.Close();
545
546	if (!registraCliente(iph)) { // Incluyendo al cliente en la tabla de sokets
547	liberaMemoria(iph);
548	errorLog(modulo, 25, FALSE);
549	return (25);
550	}
551	liberaMemoria(iph);
552	return(0);
553	}
554	// ________________________________________________________________________________________________________
555	// Función: InclusionCliente
556	//
557	// Descripción:
558	// Esta función incorpora el socket de un nuevo cliente a la tabla de clientes y le devuelve alguna de sus propiedades:
559	// nombre, identificador, tamaño de la caché , etc ...
560	// Parámetros:
561	// - socket_c: Socket del cliente que envió el mensaje
562	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
563	// Devuelve:
564	// TRUE: Si el proceso es correcto
565	// FALSE: En caso de ocurrir algún error
566	// ________________________________________________________________________________________________________
567	BOOLEAN InclusionCliente(SOCKET socket_c, TRAMA ptrTrama) {
568	char modulo[] = "InclusionCliente()";
569
570	if (!procesoInclusionCliente(socket_c, ptrTrama)) { // Ha habido algún error...
571	initParametros(ptrTrama,0);
572	strcpy(ptrTrama->parametros, "nfn=RESPUESTA_InclusionCliente\rres=0\r");
573	if (!mandaTrama(socket_c, ptrTrama)) {
574	errorLog(modulo, 26, FALSE);
575	return (FALSE);
576	}
577	}
578	return (TRUE);
579	}
580	// ________________________________________________________________________________________________________
581	// Función: procesoInclusionCliente
582	//
583	// Descripción:
584	// Implementa el proceso de inclusión en el sistema del Cliente
585	// Parámetros:
586	// - socket_c: Socket del cliente que envió el mensaje
587	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
588	// Devuelve:
589	// TRUE: Si el proceso es correcto
590	// FALSE: En caso de ocurrir algún error
591	// ________________________________________________________________________________________________________
592	BOOLEAN procesoInclusionCliente(SOCKET socket_c, TRAMA ptrTrama) {
593	char msglog[LONSTD], sqlstr[LONSQL];
594	Database db;
595	Table tbl;
596
597	char iph, cfg;
598	char nombreordenador[LONFIL];
599	int lon, resul, idordenador, idmenu, cache, idproautoexec, idaula, idcentro;
600	char modulo[] = "procesoInclusionCliente()";
601
602	// Toma parámetros
603	iph = copiaParametro("iph",ptrTrama); // Toma ip
604	cfg = copiaParametro("cfg",ptrTrama); // Toma configuracion
605
606	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexión con la BD
607	errorLog(modulo, 20, FALSE);
608	db.GetErrorErrStr(msglog);
609	errorInfo(modulo, msglog);
610	return (FALSE);
611	}
612
613	// Recupera los datos del cliente
614	sprintf(sqlstr,
615	"SELECT ordenadores.*,aulas.idaula,centros.idcentro FROM ordenadores "
616	" INNER JOIN aulas ON aulas.idaula=ordenadores.idaula"
617	" INNER JOIN centros ON centros.idcentro=aulas.idcentro"
618	" WHERE ordenadores.ip = '%s'", iph);
619
620	if (!db.Execute(sqlstr, tbl)) { // Error al recuperar los datos
621	errorLog(modulo, 21, FALSE);
622	db.GetErrorErrStr(msglog);
623	errorInfo(modulo, msglog);
624	return (FALSE);
625	}
626
627	if (tbl.ISEOF()) { // Si no existe el cliente
628	errorLog(modulo, 22, FALSE);
629	return (FALSE);
630	}
631
632	if (ndebug == DEBUG_ALTO) {
633	sprintf(msglog, "%s IP:%s", tbMensajes[2], iph);
634	infoDebug(msglog);
635	}
636	if (!tbl.Get("idordenador", idordenador)) {
637	tbl.GetErrorErrStr(msglog);
638	errorInfo(modulo, msglog);
639	return (FALSE);
640	}
641	if (!tbl.Get("nombreordenador", nombreordenador)) {
642	tbl.GetErrorErrStr(msglog);
643	errorInfo(modulo, msglog);
644	return (FALSE);
645	}
646	if (!tbl.Get("idmenu", idmenu)) {
647	tbl.GetErrorErrStr(msglog);
648	errorInfo(modulo, msglog);
649	return (FALSE);
650	}
651	if (!tbl.Get("cache", cache)) {
652	tbl.GetErrorErrStr(msglog);
653	errorInfo(modulo, msglog);
654	return (FALSE);
655	}
656	if (!tbl.Get("idproautoexec", idproautoexec)) {
657	tbl.GetErrorErrStr(msglog);
658	errorInfo(modulo, msglog);
659	return (FALSE);
660	}
661	if (!tbl.Get("idaula", idaula)) {
662	tbl.GetErrorErrStr(msglog);
663	errorInfo(modulo, msglog);
664	return (FALSE);
665	}
666	if (!tbl.Get("idcentro", idcentro)) {
667	tbl.GetErrorErrStr(msglog);
668	errorInfo(modulo, msglog);
669	return (FALSE);
670	}
671
672	resul = actualizaConfiguracion(db, tbl, cfg, idordenador); // Actualiza la configuración del ordenador
673	liberaMemoria(cfg);
674	db.Close();
675
676	if (!resul) {
677	liberaMemoria(iph);
678	errorLog(modulo, 29, FALSE);
679	return (FALSE);
680	}
681
682	if (!registraCliente(iph)) { // Incluyendo al cliente en la tabla de sokets
683	liberaMemoria(iph);
684	errorLog(modulo, 25, FALSE);
685	return (FALSE);
686	}
687
688	/*------------------------------------------------------------------------------------------------------------------------------
689	Prepara la trama de respuesta
690	-------------------------------------------------------------------------------------------------------------------------------*/
691	initParametros(ptrTrama,0);
692	ptrTrama->tipo=MSG_RESPUESTA;
693	lon = sprintf(ptrTrama->parametros, "nfn=RESPUESTA_InclusionCliente\r");
694	lon += sprintf(ptrTrama->parametros + lon, "ido=%d\r", idordenador);
695	lon += sprintf(ptrTrama->parametros + lon, "npc=%s\r", nombreordenador);
696	lon += sprintf(ptrTrama->parametros + lon, "che=%d\r", cache);
697	lon += sprintf(ptrTrama->parametros + lon, "exe=%d\r", idproautoexec);
698	lon += sprintf(ptrTrama->parametros + lon, "ida=%d\r", idaula);
699	lon += sprintf(ptrTrama->parametros + lon, "idc=%d\r", idcentro);
700	lon += sprintf(ptrTrama->parametros + lon, "res=%d\r", 1); // Confirmación proceso correcto
701
702	if (!mandaTrama(socket_c, ptrTrama)) {
703	errorLog(modulo, 26, FALSE);
704	return (FALSE);
705	}
706	liberaMemoria(iph);
707	return (TRUE);
708	}
709	// ________________________________________________________________________________________________________
710	// Función: actualizaConfiguracion
711	//
712	// Descripción:
713	// Esta función actualiza la base de datos con la configuracion de particiones de un cliente
714	// Parámetros:
715	// - db: Objeto base de datos (ya operativo)
716	// - tbl: Objeto tabla
717	// - cfg: cadena con una Configuración
718	// - ido: Identificador del ordenador cliente
719	// Devuelve:
720	// TRUE: Si el proceso es correcto
721	// FALSE: En caso de ocurrir algún error
722	// Especificaciones:
723	// Los parametros de la configuración son:
724	// par= Número de partición
725	// cpt= Codigo o tipo de partición
726	// sfi= Sistema de ficheros que está implementado en la partición
727	// soi= Nombre del sistema de ficheros instalado en la partición
728	// tam= Tamaño de la partición
729	// ________________________________________________________________________________________________________
730	BOOLEAN actualizaConfiguracion(Database db, Table tbl, char* cfg, int ido)
731	{
732	char msglog[LONSTD], sqlstr[LONSQL];
733	int lon, p, c,i, dato, swu, idsoi, idsfi,k;
734	char ptrPar[MAXPAR], ptrCfg[6], *ptrDual[2], tbPar[LONSTD];
735	char ser, disk, par, cpt, sfi, soi, tam, uso; // Parametros de configuración.
736	char modulo[] = "actualizaConfiguracion()";
737
738	lon = 0;
739	p = splitCadena(ptrPar, cfg, '\n');
740	for (i = 0; i < p; i++) {
741	c = splitCadena(ptrCfg, ptrPar[i], '\t');
742
743	// Si la 1ª línea solo incluye el número de serie del equipo; actualizar BD.
744	if (i == 0 && c == 1) {
745	splitCadena(ptrDual, ptrCfg[0], '=');
746	ser = ptrDual[1];
747	if (strlen(ser) > 0) {
748	// Solo actualizar si número de serie no existía.
749	sprintf(sqlstr, "UPDATE ordenadores SET numserie='%s'"
750	" WHERE idordenador=%d AND numserie IS NULL",
751	ser, ido);
752	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
753	db.GetErrorErrStr(msglog);
754	errorInfo(modulo, msglog);
755	return (FALSE);
756	}
757	}
758	continue;
759	}
760
761	// Distribución de particionado.
762	disk = par = cpt = sfi = soi = tam = uso = NULL;
763
764	splitCadena(ptrDual, ptrCfg[0], '=');
765	disk = ptrDual[1]; // Número de disco
766
767	splitCadena(ptrDual, ptrCfg[1], '=');
768	par = ptrDual[1]; // Número de partición
769
770	k=splitCadena(ptrDual, ptrCfg[2], '=');
771	if(k==2){
772	cpt = ptrDual[1]; // Código de partición
773	}else{
774	cpt = (char*)"0";
775	}
776
777	k=splitCadena(ptrDual, ptrCfg[3], '=');
778	if(k==2){
779	sfi = ptrDual[1]; // Sistema de ficheros
780	/* Comprueba existencia del s0xistema de ficheros instalado */
781	idsfi = checkDato(db, tbl, sfi, "sistemasficheros", "descripcion","idsistemafichero");
782	}
783	else
784	idsfi=0;
785
786	k=splitCadena(ptrDual, ptrCfg[4], '=');
787	if(k==2){ // Sistema operativo detecdtado
788	soi = ptrDual[1]; // Nombre del S.O. instalado
789	/* Comprueba existencia del sistema operativo instalado */
790	idsoi = checkDato(db, tbl, soi, "nombresos", "nombreso", "idnombreso");
791	}
792	else
793	idsoi=0;
794
795	splitCadena(ptrDual, ptrCfg[5], '=');
796	tam = ptrDual[1]; // Tamaño de la partición
797
798	splitCadena(ptrDual, ptrCfg[6], '=');
799	uso = ptrDual[1]; // Porcentaje de uso del S.F.
800
801	lon += sprintf(tbPar + lon, "(%s, %s),", disk, par);
802
803	sprintf(sqlstr, "SELECT numdisk, numpar, codpar, tamano, uso, idsistemafichero, idnombreso"
804	" FROM ordenadores_particiones"
805	" WHERE idordenador=%d AND numdisk=%s AND numpar=%s",
806	ido, disk, par);
807
808
809	if (!db.Execute(sqlstr, tbl)) { // Error al recuperar los datos
810	errorLog(modulo, 21, FALSE);
811	db.GetErrorErrStr(msglog);
812	errorInfo(modulo, msglog);
813	return (FALSE);
814	}
815	if (tbl.ISEOF()) { // Si no existe el registro
816	sprintf(sqlstr, "INSERT INTO ordenadores_particiones(idordenador,numdisk,numpar,codpar,tamano,uso,idsistemafichero,idnombreso,idimagen)"
817	" VALUES(%d,%s,%s,0x%s,%s,%s,%d,%d,0)",
818	ido, disk, par, cpt, tam, uso, idsfi, idsoi);
819
820
821	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
822	db.GetErrorErrStr(msglog);
823	errorInfo(modulo, msglog);
824	return (FALSE);
825	}
826	} else { // Existe el registro
827	swu = TRUE; // Se supone que algún dato ha cambiado
828	if (!tbl.Get("codpar", dato)) { // Toma dato
829	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
830	errorInfo(modulo, msglog);
831	return (FALSE);
832	}
833	if (strtol(cpt, NULL, 16) == dato) {// Parámetro tipo de partición (hexadecimal) igual al almacenado (decimal)
834	if (!tbl.Get("tamano", dato)) { // Toma dato
835	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
836	errorInfo(modulo, msglog);
837	return (FALSE);
838	}
839	if (atoi(tam) == dato) {// Parámetro tamaño igual al almacenado
840	if (!tbl.Get("idsistemafichero", dato)) { // Toma dato
841	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
842	errorInfo(modulo, msglog);
843	return (FALSE);
844	}
845	if (idsfi == dato) {// Parámetro sistema de fichero igual al almacenado
846	if (!tbl.Get("idnombreso", dato)) { // Toma dato
847	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
848	errorInfo(modulo, msglog);
849	return (FALSE);
850	}
851	if (idsoi == dato) {// Parámetro sistema de fichero distinto al almacenado
852	swu = FALSE; // Todos los parámetros de la partición son iguales, no se actualiza
853	}
854	}
855	}
856	}
857	if (swu) { // Hay que actualizar los parámetros de la partición
858	sprintf(sqlstr, "UPDATE ordenadores_particiones SET "
859	" codpar=0x%s,"
860	" tamano=%s,"
861	" uso=%s,"
862	" idsistemafichero=%d,"
863	" idnombreso=%d,"
864	" idimagen=0,"
865	" idperfilsoft=0,"
866	" fechadespliegue=NULL"
867	" WHERE idordenador=%d AND numdisk=%s AND numpar=%s",
868	cpt, tam, uso, idsfi, idsoi, ido, disk, par);
869	} else { // Actualizar porcentaje de uso.
870	sprintf(sqlstr, "UPDATE ordenadores_particiones SET "
871	" uso=%s"
872	" WHERE idordenador=%d AND numdisk=%s AND numpar=%s",
873	uso, ido, disk, par);
874	}
875	if (!db.Execute(sqlstr, tbl)) { // Error al recuperar los datos
876	errorLog(modulo, 21, FALSE);
877	db.GetErrorErrStr(msglog);
878	errorInfo(modulo, msglog);
879	return (FALSE);
880	}
881	}
882	}
883	lon += sprintf(tbPar + lon, "(0,0)");
884	// Eliminar particiones almacenadas que ya no existen
885	sprintf(sqlstr, "DELETE FROM ordenadores_particiones WHERE idordenador=%d AND (numdisk, numpar) NOT IN (%s)",
886	ido, tbPar);
887	if (!db.Execute(sqlstr, tbl)) { // Error al recuperar los datos
888	errorLog(modulo, 21, FALSE);
889	db.GetErrorErrStr(msglog);
890	errorInfo(modulo, msglog);
891	return (FALSE);
892	}
893	return (TRUE);
894	}
895	// ________________________________________________________________________________________________________
896	// Función: checkDato
897	//
898	// Descripción:
899	// Esta función comprueba si existe un dato en una tabla y si no es así lo incluye. devuelve en
900	// cualquier caso el identificador del registro existenet o del insertado
901	// Parámetros:
902	// - db: Objeto base de datos (ya operativo)
903	// - tbl: Objeto tabla
904	// - dato: Dato
905	// - tabla: Nombre de la tabla
906	// - nomdato: Nombre del dato en la tabla
907	// - nomidentificador: Nombre del identificador en la tabla
908	// Devuelve:
909	// El identificador del registro existente o el del insertado
910	//
911	// Especificaciones:
912	// En caso de producirse algún error se devuelve el valor 0
913	// ________________________________________________________________________________________________________
914
915	int checkDato(Database db, Table tbl, char dato, const chartabla,
916	const char* nomdato, const char *nomidentificador) {
917	char msglog[LONSTD], sqlstr[LONSQL];
918	char modulo[] = "checkDato()";
919	int identificador;
920
921	if (strlen(dato) == 0)
922	return (0); // EL dato no tiene valor
923	sprintf(sqlstr, "SELECT %s FROM %s WHERE %s ='%s'", nomidentificador,
924	tabla, nomdato, dato);
925
926	// Ejecuta consulta
927	if (!db.Execute(sqlstr, tbl)) { // Error al leer
928	errorLog(modulo, 21, FALSE);
929	db.GetErrorErrStr(msglog);
930	errorInfo(modulo, msglog);
931	return (0);
932	}
933	if (tbl.ISEOF()) { // Software NO existente
934	sprintf(sqlstr, "INSERT INTO %s (%s) VALUES('%s')", tabla, nomdato, dato);
935	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
936	db.GetErrorErrStr(msglog); // Error al acceder al registro
937	errorInfo(modulo, msglog);
938	return (0);
939	}
940	// Recupera el identificador del software
941	sprintf(sqlstr, "SELECT LAST_INSERT_ID() as identificador");
942	if (!db.Execute(sqlstr, tbl)) { // Error al leer
943	db.GetErrorErrStr(msglog); // Error al acceder al registro
944	errorInfo(modulo, msglog);
945	return (0);
946	}
947	if (!tbl.ISEOF()) { // Si existe registro
948	if (!tbl.Get("identificador", identificador)) {
949	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
950	errorInfo(modulo, msglog);
951	return (0);
952	}
953	}
954	} else {
955	if (!tbl.Get(nomidentificador, identificador)) { // Toma dato
956	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
957	errorInfo(modulo, msglog);
958	return (0);
959	}
960	}
961	return (identificador);
962	}
963	// ________________________________________________________________________________________________________
964	// Función: registraCliente
965	//
966	// Descripción:
967	// Incluye al cliente en la tabla de sokets
968	// Parámetros:
969	// - iph: Dirección ip del cliente
970	// Devuelve:
971	// TRUE: Si el proceso es correcto
972	// FALSE: En caso de ocurrir algún error
973	// ________________________________________________________________________________________________________
974	BOOLEAN registraCliente(char *iph) {
975	int idx;
976
977	if (!clienteExistente(iph, &idx)) { // Si no existe la IP ...
978	if (!hayHueco(&idx)) { // Busca hueco para el nuevo cliente
979	return (FALSE); // No hay huecos
980	}
981	}
982	strcpy(tbsockets[idx].ip, iph); // Copia IP
983	strcpy(tbsockets[idx].estado, CLIENTE_INICIANDO); // Actualiza el estado del cliente
984	return (TRUE);
985	}
986	// ________________________________________________________________________________________________________
987	// Función: AutoexecCliente
988	//
989	// Descripción:
990	// Envía archivo de autoexec al cliente
991	// Parámetros:
992	// - socket_c: Socket del cliente que envió el mensaje
993	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
994	// Devuelve:
995	// TRUE: Si el proceso es correcto
996	// FALSE: En caso de ocurrir algún error
997	// ________________________________________________________________________________________________________
998	BOOLEAN AutoexecCliente(SOCKET socket_c, TRAMA ptrTrama) {
999	int lon;
1000	char iph, exe, msglog[LONSTD];
1001	Database db;
1002	FILE *fileexe;
1003	char fileautoexec[LONPRM];
1004	char parametros[LONGITUD_PARAMETROS];
1005	char modulo[] = "AutoexecCliente()";
1006
1007	iph = copiaParametro("iph",ptrTrama); // Toma dirección IP del cliente
1008	exe = copiaParametro("exe",ptrTrama); // Toma identificador del procedimiento inicial
1009
1010	sprintf(fileautoexec, "/tmp/Sautoexec-%s", iph);
1011	liberaMemoria(iph);
1012	fileexe = fopen(fileautoexec, "wb"); // Abre fichero de script
1013	if (fileexe == NULL) {
1014	errorLog(modulo, 52, FALSE);
1015	return (FALSE);
1016	}
1017
1018	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexión con la BD
1019	errorLog(modulo, 20, FALSE);
1020	db.GetErrorErrStr(msglog);
1021	errorInfo(modulo, msglog);
1022	return (FALSE);
1023	}
1024	initParametros(ptrTrama,0);
1025	if (recorreProcedimientos(db, parametros, fileexe, exe)) {
1026	lon = sprintf(ptrTrama->parametros, "nfn=RESPUESTA_AutoexecCliente\r");
1027	lon += sprintf(ptrTrama->parametros + lon, "nfl=%s\r", fileautoexec);
1028	lon += sprintf(ptrTrama->parametros + lon, "res=1\r");
1029	} else {
1030	lon = sprintf(ptrTrama->parametros, "nfn=RESPUESTA_AutoexecCliente\r");
1031	lon += sprintf(ptrTrama->parametros + lon, "res=0\r");
1032	}
1033
1034	db.Close();
1035	fclose(fileexe);
1036
1037	if (!mandaTrama(socket_c, ptrTrama)) {
1038	liberaMemoria(exe);
1039	errorLog(modulo, 26, FALSE);
1040	return (FALSE);
1041	}
1042	liberaMemoria(exe);
1043	return (TRUE);
1044	}
1045	// ________________________________________________________________________________________________________
1046	// Función: recorreProcedimientos
1047	//
1048	// Descripción:
1049	// Crea un archivo con el código de un procedimiento separando cada comando por un salto de linea
1050	// Parámetros:
1051	// Database db,char* parametros,FILE* fileexe,char* idp
1052	// Devuelve:
1053	// TRUE: Si el proceso es correcto
1054	// FALSE: En caso de ocurrir algún error
1055	// ________________________________________________________________________________________________________
1056	BOOLEAN recorreProcedimientos(Database db, char* parametros, FILE* fileexe,
1057	char* idp) {
1058	int procedimientoid, lsize;
1059	char idprocedimiento[LONPRM], msglog[LONSTD], sqlstr[LONSQL];
1060	Table tbl;
1061	char modulo[] = "recorreProcedimientos()";
1062
1063	/* Busca procedimiento */
1064	sprintf(sqlstr,
1065	"SELECT procedimientoid,parametros FROM procedimientos_acciones"
1066	" WHERE idprocedimiento=%s ORDER BY orden", idp);
1067	// Ejecuta consulta
1068	if (!db.Execute(sqlstr, tbl)) { // Error al leer
1069	errorLog(modulo, 21, FALSE);
1070	db.GetErrorErrStr(msglog);
1071	errorInfo(modulo, msglog);
1072	return (FALSE);
1073	}
1074	while (!tbl.ISEOF()) { // Recorre procedimientos
1075	if (!tbl.Get("procedimientoid", procedimientoid)) { // Toma dato
1076	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
1077	errorInfo(modulo, msglog);
1078	return (FALSE);
1079	}
1080	if (procedimientoid > 0) { // Procedimiento recursivo
1081	sprintf(idprocedimiento, "%d", procedimientoid);
1082	if (!recorreProcedimientos(db, parametros, fileexe, idprocedimiento)) {
1083	return (FALSE);
1084	}
1085	} else {
1086	if (!tbl.Get("parametros", parametros)) { // Toma dato
1087	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
1088	errorInfo(modulo, msglog);
1089	return (FALSE);
1090	}
1091	strcat(parametros, "@");
1092	lsize = strlen(parametros);
1093	fwrite(parametros, 1, lsize, fileexe); // Escribe el código a ejecutar
1094	}
1095	tbl.MoveNext();
1096	}
1097	return (TRUE);
1098	}
1099	// ________________________________________________________________________________________________________
1100	// Función: ComandosPendientes
1101	//
1102	// Descripción:
1103	// Esta función busca en la base de datos,comandos pendientes de ejecutar por un ordenador concreto
1104	// Parámetros:
1105	// - socket_c: Socket del cliente que envió el mensaje
1106	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1107	// Devuelve:
1108	// TRUE: Si el proceso es correcto
1109	// FALSE: En caso de ocurrir algún error
1110	// ________________________________________________________________________________________________________
1111	BOOLEAN ComandosPendientes(SOCKET socket_c, TRAMA ptrTrama)
1112	{
1113	char ido,iph,pids[LONPRM];
1114	int ids, idx;
1115	char modulo[] = "ComandosPendientes()";
1116
1117	iph = copiaParametro("iph",ptrTrama); // Toma dirección IP
1118	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
1119
1120	if (!clienteExistente(iph, &idx)) { // Busca índice del cliente
1121	liberaMemoria(iph);
1122	liberaMemoria(ido);
1123	errorLog(modulo, 47, FALSE);
1124	return (FALSE);
1125	}
1126	if (buscaComandos(ido, ptrTrama, &ids)) { // Existen comandos pendientes
1127	ptrTrama->tipo = MSG_COMANDO;
1128	sprintf(pids, "\rids=%d\r", ids);
1129	strcat(ptrTrama->parametros, pids);
1130	strcpy(tbsockets[idx].estado, CLIENTE_OCUPADO);
1131	} else {
1132	initParametros(ptrTrama,0);
1133	strcpy(ptrTrama->parametros, "nfn=NoComandosPtes\r");
1134	}
1135	if (!mandaTrama(socket_c, ptrTrama)) {
1136	liberaMemoria(iph);
1137	liberaMemoria(ido);
1138	errorLog(modulo, 26, FALSE);
1139	return (FALSE);
1140	}
1141	liberaMemoria(iph);
1142	liberaMemoria(ido);
1143	return (TRUE);
1144	}
1145	// ________________________________________________________________________________________________________
1146	// Función: buscaComandos
1147	//
1148	// Descripción:
1149	// Busca en la base de datos,comandos pendientes de ejecutar por el cliente
1150	// Parámetros:
1151	// - ido: Identificador del ordenador
1152	// - cmd: Parámetros del comando (Salida)
1153	// - ids: Identificador de la sesion(Salida)
1154	// Devuelve:
1155	// TRUE: Si el proceso es correcto
1156	// FALSE: En caso de ocurrir algún error
1157	// ________________________________________________________________________________________________________
1158	BOOLEAN buscaComandos(char ido, TRAMA ptrTrama, int *ids)
1159	{
1160	char msglog[LONSTD], sqlstr[LONSQL];
1161	Database db;
1162	Table tbl;
1163	int lonprm;
1164
1165	char modulo[] = "buscaComandos()";
1166
1167	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexión con la BD
1168	errorLog(modulo, 20, FALSE);
1169	db.GetErrorErrStr(msglog);
1170	errorInfo(modulo, msglog);
1171	return (FALSE);
1172	}
1173	sprintf(sqlstr,"SELECT sesion,parametros,length( parametros) as lonprm"\
1174	" FROM acciones WHERE idordenador=%s AND estado='%d' ORDER BY idaccion", ido, ACCION_INICIADA);
1175	if (!db.Execute(sqlstr, tbl)) { // Error al recuperar los datos
1176	errorLog(modulo, 21, FALSE);
1177	db.GetErrorErrStr(msglog);
1178	errorInfo(modulo, msglog);
1179	return (FALSE);
1180	}
1181	if (tbl.ISEOF()) {
1182	db.Close();
1183	return (FALSE); // No hay comandos pendientes
1184	} else { // Busca entre todas las acciones de diversos ambitos
1185	if (!tbl.Get("sesion", *ids)) { // Toma identificador de la sesion
1186	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
1187	errorInfo(modulo, msglog);
1188	return (FALSE);
1189	}
1190	if (!tbl.Get("lonprm", lonprm)) { // Toma parámetros del comando
1191	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
1192	errorInfo(modulo, msglog);
1193	return (FALSE);
1194	}
1195	if(!initParametros(ptrTrama,lonprm+LONGITUD_PARAMETROS)){
1196	db.Close();
1197	errorLog(modulo, 3, FALSE);
1198	return (FALSE);
1199	}
1200	if (!tbl.Get("parametros", ptrTrama->parametros)) { // Toma parámetros del comando
1201	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
1202	errorInfo(modulo, msglog);
1203	return (FALSE);
1204	}
1205	}
1206	db.Close();
1207	return (TRUE); // Hay comandos pendientes, se toma el primero de la cola
1208	}
1209	// ________________________________________________________________________________________________________
1210	// Función: DisponibilidadComandos
1211	//
1212	// Descripción:
1213	// Esta función habilita a un cliente para recibir comandos desde la consola
1214	// Parámetros:
1215	// - socket_c: Socket del cliente que envió el mensaje
1216	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1217	// Devuelve:
1218	// TRUE: Si el proceso es correcto
1219	// FALSE: En caso de ocurrir algún error
1220	// ________________________________________________________________________________________________________
1221	//
1222	BOOLEAN DisponibilidadComandos(SOCKET socket_c, TRAMA ptrTrama)
1223	{
1224	char iph, tpc;
1225	int idx,port_old=0,port_new;
1226	char modulo[] = "DisponibilidadComandos()";
1227
1228
1229
1230	iph = copiaParametro("iph",ptrTrama); // Toma ip
1231	if (!clienteExistente(iph, &idx)) { // Busca índice del cliente
1232	liberaMemoria(iph);
1233	errorLog(modulo, 47, FALSE);
1234	return (FALSE);
1235	}
1236	tpc = copiaParametro("tpc",ptrTrama); // Tipo de cliente (Plataforma y S.O.)
1237	strcpy(tbsockets[idx].estado, tpc);
1238
1239	port_new=tomaPuerto(*socket_c);
1240
1241	if(tbsockets[idx].sock!=INVALID_SOCKET){
1242	port_old=tomaPuerto(tbsockets[idx].sock);
1243	if(port_old!=port_new){
1244	close(tbsockets[idx].sock); // Cierra el socket si ya existia uno
1245	}
1246	}
1247
1248	tbsockets[idx].sock = *socket_c;
1249	swcSocket = TRUE; // El socket permanece abierto para recibir comandos desde el servidor
1250	liberaMemoria(iph);
1251	liberaMemoria(tpc);
1252	return (TRUE);
1253	}
1254	// ________________________________________________________________________________________________________
1255	// Función: respuestaEstandar
1256	//
1257	// Descripción:
1258	// Esta función actualiza la base de datos con el resultado de la ejecución de un comando con seguimiento
1259	// Parámetros:
1260	// - res: resultado de la ejecución del comando
1261	// - der: Descripción del error si hubiese habido
1262	// - iph: Dirección IP
1263	// - ids: identificador de la sesión
1264	// - ido: Identificador del ordenador que notifica
1265	// - db: Objeto base de datos (operativo)
1266	// - tbl: Objeto tabla
1267	// Devuelve:
1268	// TRUE: Si el proceso es correcto
1269	// FALSE: En caso de ocurrir algún error
1270	// ________________________________________________________________________________________________________
1271	BOOLEAN respuestaEstandar(TRAMA ptrTrama, char iph, char *ido, Database db,
1272	Table tbl) {
1273	char msglog[LONSTD], sqlstr[LONSQL];
1274	char res, ids, *der;
1275	char fechafin[LONPRM];
1276	struct tm* st;
1277	int idaccion;
1278	char modulo[] = "respuestaEstandar()";
1279
1280	ids = copiaParametro("ids",ptrTrama); // Toma identificador de la sesión
1281
1282	if (ids == NULL) // No existe seguimiento de la acción
1283	return (TRUE);
1284
1285	if (atoi(ids) == 0){ // No existe seguimiento de la acción
1286	liberaMemoria(ids);
1287	return (TRUE);
1288	}
1289
1290	sprintf(sqlstr,
1291	"SELECT * FROM acciones WHERE idordenador=%s"
1292	" AND sesion=%s ORDER BY idaccion", ido,ids);
1293
1294	liberaMemoria(ids);
1295
1296	if (!db.Execute(sqlstr, tbl)) { // Error al consultar
1297	errorLog(modulo, 21, FALSE);
1298	db.GetErrorErrStr(msglog);
1299	errorInfo(modulo, msglog);
1300	return (FALSE);
1301	}
1302	if (tbl.ISEOF()) { // No existe registro de acciones
1303	errorLog(modulo, 31, FALSE);
1304	return (TRUE);
1305	}
1306	if (!tbl.Get("idaccion", idaccion)) { // Toma identificador de la accion
1307	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
1308	errorInfo(modulo, msglog);
1309	return (FALSE);
1310	}
1311	st = tomaHora();
1312	sprintf(fechafin, "%d/%d/%d %d:%d:%d", st->tm_year + 1900, st->tm_mon + 1,
1313	st->tm_mday, st->tm_hour, st->tm_min, st->tm_sec);
1314
1315	res = copiaParametro("res",ptrTrama); // Toma resultado
1316	der = copiaParametro("der",ptrTrama); // Toma descripción del error (si hubiera habido)
1317
1318	sprintf(sqlstr,
1319	"UPDATE acciones"\
1320	" SET resultado='%s',estado='%d',fechahorafin='%s',descrinotificacion='%s'"\
1321	" WHERE idordenador=%s AND idaccion=%d",
1322	res, ACCION_FINALIZADA, fechafin, der, ido, idaccion);
1323
1324	if (!db.Execute(sqlstr, tbl)) { // Error al actualizar
1325	liberaMemoria(res);
1326	liberaMemoria(der);
1327	db.GetErrorErrStr(msglog);
1328	errorInfo(modulo, msglog);
1329	return (FALSE);
1330	}
1331
1332	liberaMemoria(der);
1333
1334	if (atoi(res) == ACCION_FALLIDA) {
1335	liberaMemoria(res);
1336	return (FALSE); // Error en la ejecución del comando
1337	}
1338
1339	liberaMemoria(res);
1340	return (TRUE);
1341	}
1342	// ________________________________________________________________________________________________________
1343	// Función: enviaComando
1344	//
1345	// Descripción:
1346	// Envía un comando a los clientes
1347	// Parámetros:
1348	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1349	// - estado: Estado en el se deja al cliente mientras se ejecuta el comando
1350	// Devuelve:
1351	// TRUE: Si el proceso es correcto
1352	// FALSE: En caso de ocurrir algún error
1353	// ________________________________________________________________________________________________________
1354	BOOLEAN enviaComando(TRAMA* ptrTrama, const char *estado)
1355	{
1356	char iph, Ipes, *ptrIpes[MAXIMOS_CLIENTES];
1357	int i, idx, lon;
1358	char modulo[] = "enviaComando()";
1359
1360	iph = copiaParametro("iph",ptrTrama); // Toma dirección/es IP
1361	lon = strlen(iph); // Calcula longitud de la cadena de direccion/es IPE/S
1362	Ipes = (char*) reservaMemoria(lon + 1);
1363	if (Ipes == NULL) {
1364	errorLog(modulo, 3, FALSE);
1365	return (FALSE);
1366	}
1367
1368	strcpy(Ipes, iph); // Copia cadena de IPES
1369	liberaMemoria(iph);
1370
1371	lon = splitCadena(ptrIpes, Ipes, ';');
1372	FINCADaINTRO(ptrTrama);
1373	for (i = 0; i < lon; i++) {
1374	if (clienteDisponible(ptrIpes[i], &idx)) { // Si el cliente puede recibir comandos
1375	strcpy(tbsockets[idx].estado, estado); // Actualiza el estado del cliente
1376	if (!mandaTrama(&tbsockets[idx].sock, ptrTrama)) {
1377	errorLog(modulo, 26, FALSE);
1378	return (FALSE);
1379	}
1380	//close(tbsockets[idx].sock); // Cierra el socket del cliente hasta nueva disponibilidad
1381	}
1382	}
1383	liberaMemoria(Ipes);
1384	return (TRUE);
1385	}
1386	//______________________________________________________________________________________________________
1387	// Función: respuestaConsola
1388	//
1389	// Descripción:
1390	// Envia una respuesta a la consola sobre el resultado de la ejecución de un comando
1391	// Parámetros:
1392	// - socket_c: (Salida) Socket utilizado para el envío
1393	// - res: Resultado del envío del comando
1394	// Devuelve:
1395	// TRUE: Si el proceso es correcto
1396	// FALSE: En caso de ocurrir algún error
1397	// ________________________________________________________________________________________________________
1398	BOOLEAN respuestaConsola(SOCKET socket_c, TRAMA ptrTrama, int res) {
1399	char modulo[] = "respuestaConsola()";
1400	initParametros(ptrTrama,0);
1401	sprintf(ptrTrama->parametros, "res=%d\r", res);
1402	if (!mandaTrama(socket_c, ptrTrama)) {
1403	errorLog(modulo, 26, FALSE);
1404	return (FALSE);
1405	}
1406	return (TRUE);
1407	}
1408	// ________________________________________________________________________________________________________
1409	// Función: Arrancar
1410	//
1411	// Descripción:
1412	// Procesa el comando Arrancar
1413	// Parámetros:
1414	// - socket_c: Socket de la consola al envió el mensaje
1415	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1416	// Devuelve:
1417	// TRUE: Si el proceso es correcto
1418	// FALSE: En caso de ocurrir algún error
1419	// ________________________________________________________________________________________________________
1420	BOOLEAN Arrancar(SOCKET socket_c, TRAMA ptrTrama) {
1421	char iph,mac,*mar, msglog[LONSTD];
1422	BOOLEAN res;
1423	char modulo[] = "Arrancar()";
1424
1425	iph = copiaParametro("iph",ptrTrama); // Toma dirección/es IP
1426	mac = copiaParametro("mac",ptrTrama); // Toma dirección/es MAC
1427	mar = copiaParametro("mar",ptrTrama); // Método de arranque (Broadcast o Unicast)
1428
1429	res=Levanta(iph,mac,mar);
1430
1431	liberaMemoria(iph);
1432	liberaMemoria(mac);
1433	liberaMemoria(mar);
1434
1435	if(!res){
1436	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
1437	errorInfo(modulo, msglog);
1438	respuestaConsola(socket_c, ptrTrama, FALSE);
1439	return (FALSE);
1440	}
1441
1442	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
1443	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
1444	errorInfo(modulo, msglog);
1445	respuestaConsola(socket_c, ptrTrama, FALSE);
1446	return (FALSE);
1447	}
1448	respuestaConsola(socket_c, ptrTrama, TRUE);
1449	return (TRUE);
1450	}
1451	// ________________________________________________________________________________________________________
1452	// Función: Levanta
1453	//
1454	// Descripción:
1455	// Enciende ordenadores a través de la red cuyas macs se pasan como parámetro
1456	// Parámetros:
1457	// - iph: Cadena de direcciones ip separadas por ";"
1458	// - mac: Cadena de direcciones mac separadas por ";"
1459	// - mar: Método de arranque (1=Broadcast, 2=Unicast)
1460	// Devuelve:
1461	// TRUE: Si el proceso es correcto
1462	// FALSE: En caso de ocurrir algún error
1463	// ________________________________________________________________________________________________________
1464	BOOLEAN Levanta(char* iph,char mac, char mar)
1465	{
1466	char ptrIP[MAXIMOS_CLIENTES],ptrMacs[MAXIMOS_CLIENTES];
1467	int i, lon, res;
1468	SOCKET s;
1469	BOOLEAN bOpt;
1470	sockaddr_in local;
1471	char modulo[] = "Levanta()";
1472
1473	/* Creación de socket para envío de magig packet */
1474	s = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
1475	if (s == SOCKET_ERROR) { // Error al crear el socket del servicio
1476	errorLog(modulo, 13, TRUE);
1477	return (FALSE);
1478	}
1479	bOpt = TRUE; // Pone el socket en modo Broadcast
1480	res = setsockopt(s, SOL_SOCKET, SO_BROADCAST, (char *) &bOpt, sizeof(bOpt));
1481	if (res == SOCKET_ERROR) {
1482	errorLog(modulo, 48, TRUE);
1483	return (FALSE);
1484	}
1485	local.sin_family = AF_INET;
1486	local.sin_port = htons((short) PUERTO_WAKEUP);
1487	local.sin_addr.s_addr = htonl(INADDR_ANY); // cualquier interface
1488	if (bind(s, (sockaddr *) &local, sizeof(local)) == SOCKET_ERROR) {
1489	errorLog(modulo, 14, TRUE);
1490	exit(EXIT_FAILURE);
1491	}
1492	/* fin creación de socket */
1493	lon = splitCadena(ptrIP, iph, ';');
1494	lon = splitCadena(ptrMacs, mac, ';');
1495	for (i = 0; i < lon; i++) {
1496	if (!WakeUp(&s,ptrIP[i],ptrMacs[i],mar)) {
1497	errorLog(modulo, 49, TRUE);
1498	close(s);
1499	return (FALSE);
1500	}
1501	}
1502	close(s);
1503	return (TRUE);
1504	}
1505	//_____________________________________________________________________________________________________________
1506	// Función: WakeUp
1507	//
1508	// Descripción:
1509	// Enciende el ordenador cuya MAC se pasa como parámetro
1510	// Parámetros:
1511	// - s : Socket para enviar trama magic packet
1512	// - iph : Cadena con la dirección ip
1513	// - mac : Cadena con la dirección mac en formato XXXXXXXXXXXX
1514	// - mar: Método de arranque (1=Broadcast, 2=Unicast)
1515	// Devuelve:
1516	// TRUE: Si el proceso es correcto
1517	// FALSE: En caso de ocurrir algún error
1518	//_____________________________________________________________________________________________________________
1519	//
1520	BOOLEAN WakeUp(SOCKET s, char iph,char mac,char mar)
1521	{
1522	int i, res;
1523	char HDaddress_bin[6];
1524	struct {
1525	BYTE secuencia_FF[6];
1526	char macbin[16][6];
1527	} Trama_WakeUp;
1528	sockaddr_in WakeUpCliente;
1529	char modulo[] = "WakeUp()";
1530
1531	for (i = 0; i < 6; i++) // Primera secuencia de la trama Wake Up (0xFFFFFFFFFFFF)
1532	Trama_WakeUp.secuencia_FF[i] = 0xFF;
1533
1534	PasaHexBin(mac, HDaddress_bin); // Pasa a binario la MAC
1535
1536	for (i = 0; i < 16; i++) // Segunda secuencia de la trama Wake Up , repetir 16 veces su la MAC
1537	memcpy(&Trama_WakeUp.macbin[i][0], &HDaddress_bin, 6);
1538
1539	/* Creación de socket del cliente que recibe la trama magic packet */
1540	WakeUpCliente.sin_family = AF_INET;
1541	WakeUpCliente.sin_port = htons((short) PUERTO_WAKEUP);
1542	if(atoi(mar)==2)
1543	WakeUpCliente.sin_addr.s_addr = inet_addr(iph); // Para hacerlo con IP
1544	else
1545	WakeUpCliente.sin_addr.s_addr = htonl(INADDR_BROADCAST); // Para hacerlo con broadcast
1546
1547	res = sendto(s, (char ) &Trama_WakeUp, sizeof(Trama_WakeUp), 0,
1548	(sockaddr *) &WakeUpCliente, sizeof(WakeUpCliente));
1549	if (res == SOCKET_ERROR) {
1550	errorLog(modulo, 26, FALSE);
1551	return (FALSE);
1552	}
1553	return (TRUE);
1554	}
1555	//_____________________________________________________________________________________________________________
1556	// Función: PasaHexBin
1557	//
1558	// Descripción:
1559	// Convierte a binario una dirección mac desde una cadena con formato XXXXXXXXXXXX
1560	//
1561	// Parámetros de entrada:
1562	// - cadena : Cadena con el contenido de la mac
1563	// - numero : la dirección mac convertida a binario (6 bytes)
1564	//_____________________________________________________________________________________________________________
1565	void PasaHexBin(char cadena, char numero) {
1566	int i, j, p;
1567	char matrizHex[] = "0123456789ABCDEF";
1568	char Ucadena[12], aux;
1569
1570	for (i = 0; i < 12; i++)
1571	Ucadena[i] = toupper(cadena[i]);
1572	p = 0;
1573	for (i = 0; i < 12; i++) {
1574	for (j = 0; j < 16; j++) {
1575	if (Ucadena[i] == matrizHex[j]) {
1576	if (i % 2) {
1577	aux = numero[p];
1578	aux = (aux << 4);
1579	numero[p] = j;
1580	numero[p] = numero[p] \| aux;
1581	p++;
1582	} else
1583	numero[p] = j;
1584	break;
1585	}
1586	}
1587	}
1588	}
1589	// ________________________________________________________________________________________________________
1590	// Función: RESPUESTA_Arrancar
1591	//
1592	// Descripción:
1593	// Respuesta del cliente al comando Arrancar
1594	// Parámetros:
1595	// - socket_c: Socket del cliente que envió el mensaje
1596	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1597	// Devuelve:
1598	// TRUE: Si el proceso es correcto
1599	// FALSE: En caso de ocurrir algún error
1600	// ________________________________________________________________________________________________________
1601	BOOLEAN RESPUESTA_Arrancar(SOCKET socket_c, TRAMA ptrTrama) {
1602	char msglog[LONSTD];
1603	Database db;
1604	Table tbl;
1605	int i;
1606	char iph, ido;
1607	char *tpc;
1608	char modulo[] = "RESPUESTA_Arrancar()";
1609
1610	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
1611	errorLog(modulo, 20, FALSE);
1612	db.GetErrorErrStr(msglog);
1613	errorInfo(modulo, msglog);
1614	return (FALSE);
1615	}
1616
1617	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
1618	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
1619
1620	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
1621	liberaMemoria(iph);
1622	liberaMemoria(ido);
1623	errorLog(modulo, 30, FALSE);
1624	return (FALSE); // Error al registrar notificacion
1625	}
1626
1627	tpc = copiaParametro("tpc",ptrTrama); // Tipo de cliente (Plataforma y S.O.)
1628	if (clienteExistente(iph, &i)) // Actualiza estado
1629	strcpy(tbsockets[i].estado, tpc);
1630
1631	liberaMemoria(iph);
1632	liberaMemoria(ido);
1633	liberaMemoria(tpc);
1634
1635	db.Close(); // Cierra conexión
1636	return (TRUE);
1637	}
1638	// ________________________________________________________________________________________________________
1639	// Función: Comando
1640	//
1641	// Descripción:
1642	// Procesa un comando personalizado
1643	// Parámetros:
1644	// - socket_c: Socket de la consola al envió el mensaje
1645	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1646	// Devuelve:
1647	// TRUE: Si el proceso es correcto
1648	// FALSE: En caso de ocurrir algún error
1649	// ________________________________________________________________________________________________________
1650	BOOLEAN Comando(SOCKET socket_c, TRAMA ptrTrama) {
1651	char msglog[LONSTD];
1652	char modulo[] = "Comando()";
1653
1654	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
1655	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
1656	errorInfo(modulo, msglog);
1657	respuestaConsola(socket_c, ptrTrama, FALSE);
1658	return (FALSE);
1659	}
1660	respuestaConsola(socket_c, ptrTrama, TRUE);
1661	return (TRUE);
1662	}
1663	// ________________________________________________________________________________________________________
1664	// Función: RESPUESTA_Comando
1665	//
1666	// Descripción:
1667	// Respuesta del cliente al un comando personalizado
1668	// Parámetros:
1669	// - socket_c: Socket del cliente que envió el mensaje
1670	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1671	// Devuelve:
1672	// TRUE: Si el proceso es correcto
1673	// FALSE: En caso de ocurrir algún error
1674	// ________________________________________________________________________________________________________
1675	BOOLEAN RESPUESTA_Comando(SOCKET socket_c, TRAMA ptrTrama)
1676	{
1677	char msglog[LONSTD];
1678	Database db;
1679	Table tbl;
1680	char iph, ido;
1681	char modulo[] = "RESPUESTA_Comando()";
1682
1683	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
1684	errorLog(modulo, 20, FALSE);
1685	db.GetErrorErrStr(msglog);
1686	errorInfo(modulo, msglog);
1687	return (FALSE);
1688	}
1689
1690	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
1691	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
1692
1693	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
1694	liberaMemoria(iph);
1695	liberaMemoria(ido);
1696	errorLog(modulo, 30, FALSE);
1697	return (FALSE); // Error al registrar notificacion
1698	}
1699	liberaMemoria(iph);
1700	liberaMemoria(ido);
1701	db.Close(); // Cierra conexión
1702	return (TRUE);
1703	}
1704	// ________________________________________________________________________________________________________
1705	// Función: Apagar
1706	//
1707	// Descripción:
1708	// Procesa el comando Apagar
1709	// Parámetros:
1710	// - socket_c: Socket de la consola al envió el mensaje
1711	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1712	// Devuelve:
1713	// TRUE: Si el proceso es correcto
1714	// FALSE: En caso de ocurrir algún error
1715	// ________________________________________________________________________________________________________
1716	BOOLEAN Apagar(SOCKET socket_c, TRAMA ptrTrama) {
1717	char msglog[LONSTD];
1718	char modulo[] = "Apagar()";
1719
1720	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
1721	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
1722	errorInfo(modulo, msglog);
1723	respuestaConsola(socket_c, ptrTrama, FALSE);
1724	return (FALSE);
1725	}
1726	respuestaConsola(socket_c, ptrTrama, TRUE);
1727	return (TRUE);
1728	}
1729	// ________________________________________________________________________________________________________
1730	// Función: RESPUESTA_Apagar
1731	//
1732	// Descripción:
1733	// Respuesta del cliente al comando Apagar
1734	// Parámetros:
1735	// - socket_c: Socket del cliente que envió el mensaje
1736	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1737	// Devuelve:
1738	// TRUE: Si el proceso es correcto
1739	// FALSE: En caso de ocurrir algún error
1740	// ________________________________________________________________________________________________________
1741	BOOLEAN RESPUESTA_Apagar(SOCKET socket_c, TRAMA ptrTrama) {
1742	char msglog[LONSTD];
1743	Database db;
1744	Table tbl;
1745	int i;
1746	char iph, ido;
1747	char modulo[] = "RESPUESTA_Apagar()";
1748
1749	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
1750	errorLog(modulo, 20, FALSE);
1751	db.GetErrorErrStr(msglog);
1752	errorInfo(modulo, msglog);
1753	return (FALSE);
1754	}
1755
1756	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
1757	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
1758
1759	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
1760	liberaMemoria(iph);
1761	liberaMemoria(ido);
1762	errorLog(modulo, 30, FALSE);
1763	return (FALSE); // Error al registrar notificacion
1764	}
1765
1766	if (clienteExistente(iph, &i)) // Actualiza estado
1767	strcpy(tbsockets[i].estado, CLIENTE_APAGADO);
1768
1769	liberaMemoria(iph);
1770	liberaMemoria(ido);
1771
1772	db.Close(); // Cierra conexión
1773	return (TRUE);
1774	}
1775	// ________________________________________________________________________________________________________
1776	// Función: Reiniciar
1777	//
1778	// Descripción:
1779	// Procesa el comando Reiniciar
1780	// Parámetros:
1781	// - socket_c: Socket de la consola al envió el mensaje
1782	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1783	// Devuelve:
1784	// TRUE: Si el proceso es correcto
1785	// FALSE: En caso de ocurrir algún error
1786	// ________________________________________________________________________________________________________
1787	BOOLEAN Reiniciar(SOCKET socket_c, TRAMA ptrTrama) {
1788	char msglog[LONSTD];
1789	char modulo[] = "Reiniciar()";
1790
1791	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
1792	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
1793	errorInfo(modulo, msglog);
1794	respuestaConsola(socket_c, ptrTrama, FALSE);
1795	return (FALSE);
1796	}
1797	respuestaConsola(socket_c, ptrTrama, TRUE);
1798	return (TRUE);
1799	}
1800	// ________________________________________________________________________________________________________
1801	// Función: RESPUESTA_Reiniciar
1802	//
1803	// Descripción:
1804	// Respuesta del cliente al comando Reiniciar
1805	// Parámetros:
1806	// - socket_c: Socket del cliente que envió el mensaje
1807	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1808	// Devuelve:
1809	// TRUE: Si el proceso es correcto
1810	// FALSE: En caso de ocurrir algún error
1811	// ________________________________________________________________________________________________________
1812	BOOLEAN RESPUESTA_Reiniciar(SOCKET socket_c, TRAMA ptrTrama) {
1813	char msglog[LONSTD];
1814	Database db;
1815	Table tbl;
1816	int i;
1817	char iph, ido;
1818	char modulo[] = "RESPUESTA_Reiniciar()";
1819
1820	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
1821	errorLog(modulo, 20, FALSE);
1822	db.GetErrorErrStr(msglog);
1823	errorInfo(modulo, msglog);
1824	return (FALSE);
1825	}
1826
1827	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
1828	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
1829
1830	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
1831	liberaMemoria(iph);
1832	liberaMemoria(ido);
1833	errorLog(modulo, 30, FALSE);
1834	return (FALSE); // Error al registrar notificacion
1835	}
1836
1837	if (clienteExistente(iph, &i)) // Actualiza estado
1838	strcpy(tbsockets[i].estado, CLIENTE_APAGADO);
1839
1840	liberaMemoria(iph);
1841	liberaMemoria(ido);
1842
1843	db.Close(); // Cierra conexión
1844	return (TRUE);
1845	}
1846	// ________________________________________________________________________________________________________
1847	// Función: IniciarSesion
1848	//
1849	// Descripción:
1850	// Procesa el comando Iniciar Sesión
1851	// Parámetros:
1852	// - socket_c: Socket de la consola al envió el mensaje
1853	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1854	// Devuelve:
1855	// TRUE: Si el proceso es correcto
1856	// FALSE: En caso de ocurrir algún error
1857	// ________________________________________________________________________________________________________
1858	BOOLEAN IniciarSesion(SOCKET socket_c, TRAMA ptrTrama) {
1859	char msglog[LONSTD];
1860	char modulo[] = "IniciarSesion()";
1861
1862	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
1863	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
1864	errorInfo(modulo, msglog);
1865	respuestaConsola(socket_c, ptrTrama, FALSE);
1866	return (FALSE);
1867	}
1868	respuestaConsola(socket_c, ptrTrama, TRUE);
1869	return (TRUE);
1870	}
1871	// ________________________________________________________________________________________________________
1872	// Función: RESPUESTA_IniciarSesion
1873	//
1874	// Descripción:
1875	// Respuesta del cliente al comando Iniciar Sesión
1876	// Parámetros:
1877	// - socket_c: Socket del cliente que envió el mensaje
1878	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1879	// Devuelve:
1880	// TRUE: Si el proceso es correcto
1881	// FALSE: En caso de ocurrir algún error
1882	// ________________________________________________________________________________________________________
1883	BOOLEAN RESPUESTA_IniciarSesion(SOCKET socket_c, TRAMA ptrTrama) {
1884	char msglog[LONSTD];
1885	Database db;
1886	Table tbl;
1887	int i;
1888	char iph, ido;
1889	char modulo[] = "RESPUESTA_IniciarSesion()";
1890
1891	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
1892	errorLog(modulo, 20, FALSE);
1893	db.GetErrorErrStr(msglog);
1894	errorInfo(modulo, msglog);
1895	return (FALSE);
1896	}
1897
1898	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
1899	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
1900
1901	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
1902	liberaMemoria(iph);
1903	liberaMemoria(ido);
1904	errorLog(modulo, 30, FALSE);
1905	return (FALSE); // Error al registrar notificacion
1906	}
1907
1908	if (clienteExistente(iph, &i)) // Actualiza estado
1909	strcpy(tbsockets[i].estado, CLIENTE_APAGADO);
1910
1911	liberaMemoria(iph);
1912	liberaMemoria(ido);
1913
1914	db.Close(); // Cierra conexión
1915	return (TRUE);
1916	}
1917	// ________________________________________________________________________________________________________
1918	// Función: CrearImagen
1919	//
1920	// Descripción:
1921	// Crea una imagen de una partición de un disco y la guarda o bien en un repositorio
1922	// Parámetros:
1923	// - socket_c: Socket de la consola al envió el mensaje
1924	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1925	// Devuelve:
1926	// TRUE: Si el proceso es correcto
1927	// FALSE: En caso de ocurrir algún error
1928	// ________________________________________________________________________________________________________
1929	BOOLEAN CrearImagen(SOCKET socket_c, TRAMA ptrTrama) {
1930	char msglog[LONSTD];
1931	char modulo[] = "CrearImagen()";
1932
1933	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
1934	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
1935	errorInfo(modulo, msglog);
1936	respuestaConsola(socket_c, ptrTrama, FALSE);
1937	return (FALSE);
1938	}
1939	respuestaConsola(socket_c, ptrTrama, TRUE);
1940	return (TRUE);
1941	}
1942	// ________________________________________________________________________________________________________
1943	// Función: RESPUESTA_CrearImagen
1944	//
1945	// Descripción:
1946	// Respuesta del cliente al comando CrearImagen
1947	// Parámetros:
1948	// - socket_c: Socket del cliente que envió el mensaje
1949	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
1950	// Devuelve:
1951	// TRUE: Si el proceso es correcto
1952	// FALSE: En caso de ocurrir algún error
1953	// ________________________________________________________________________________________________________
1954	BOOLEAN RESPUESTA_CrearImagen(SOCKET socket_c, TRAMA ptrTrama)
1955	{
1956	char msglog[LONSTD];
1957	Database db;
1958	Table tbl;
1959	char iph, dsk, par, cpt, ipr, ido;
1960	char *idi;
1961	BOOLEAN res;
1962	char modulo[] = "RESPUESTA_CrearImagen()";
1963
1964	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
1965	errorLog(modulo, 20, FALSE);
1966	db.GetErrorErrStr(msglog);
1967	errorInfo(modulo, msglog);
1968	return (FALSE);
1969	}
1970
1971	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
1972	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
1973
1974	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
1975	liberaMemoria(iph);
1976	liberaMemoria(ido);
1977	errorLog(modulo, 30, FALSE);
1978	return (FALSE); // Error al registrar notificacion
1979	}
1980
1981	// Acciones posteriores
1982	idi = copiaParametro("idi",ptrTrama);
1983	dsk = copiaParametro("dsk",ptrTrama);
1984	par = copiaParametro("par",ptrTrama);
1985	cpt = copiaParametro("cpt",ptrTrama);
1986	ipr = copiaParametro("ipr",ptrTrama);
1987
1988	res=actualizaCreacionImagen(db, tbl, idi, dsk, par, cpt, ipr, ido);
1989
1990	liberaMemoria(idi);
1991	liberaMemoria(par);
1992	liberaMemoria(cpt);
1993	liberaMemoria(ipr);
1994
1995	if(!res){
1996	errorLog(modulo, 94, FALSE);
1997	db.Close(); // Cierra conexión
1998	return (FALSE);
1999	}
2000
2001	db.Close(); // Cierra conexión
2002	return (TRUE);
2003	}
2004	// ________________________________________________________________________________________________________
2005	// Función: actualizaCreacionImagen
2006	//
2007	// Descripción:
2008	// Esta función actualiza la base de datos con el resultado de la creación de una imagen
2009	// Parámetros:
2010	// - db: Objeto base de datos (ya operativo)
2011	// - tbl: Objeto tabla
2012	// - idi: Identificador de la imagen
2013	// - dsk: Disco de donde se creó
2014	// - par: Partición de donde se creó
2015	// - cpt: Código de partición
2016	// - ipr: Ip del repositorio
2017	// - ido: Identificador del ordenador modelo
2018	// Devuelve:
2019	// TRUE: Si el proceso es correcto
2020	// FALSE: En caso de ocurrir algún error
2021	// ________________________________________________________________________________________________________
2022	BOOLEAN actualizaCreacionImagen(Database db, Table tbl, char* idi, char* dsk,
2023	char* par, char* cpt, char* ipr, char *ido) {
2024	char msglog[LONSTD], sqlstr[LONSQL];
2025	char modulo[] = "actualizaCreacionImagen()";
2026	int idr,ifs;
2027
2028	/* Toma identificador del repositorio correspondiente al ordenador modelo */
2029	snprintf(sqlstr, LONSQL,
2030	"SELECT repositorios.idrepositorio"
2031	" FROM repositorios"
2032	" LEFT JOIN ordenadores USING (idrepositorio)"
2033	" WHERE repositorios.ip='%s' AND ordenadores.idordenador=%s", ipr, ido);
2034
2035	if (!db.Execute(sqlstr, tbl)) { // Error al leer
2036	errorLog(modulo, 21, FALSE);
2037	db.GetErrorErrStr(msglog);
2038	errorInfo(modulo, msglog);
2039	return (FALSE);
2040	}
2041	if (!tbl.Get("idrepositorio", idr)) { // Toma dato
2042	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
2043	errorInfo(modulo, msglog);
2044	return (FALSE);
2045	}
2046
2047	/* Toma identificador del perfilsoftware */
2048	snprintf(sqlstr, LONSQL,
2049	"SELECT idperfilsoft"
2050	" FROM ordenadores_particiones"
2051	" WHERE idordenador=%s AND numdisk=%s AND numpar=%s", ido, dsk, par);
2052
2053	if (!db.Execute(sqlstr, tbl)) { // Error al leer
2054	errorLog(modulo, 21, FALSE);
2055	db.GetErrorErrStr(msglog);
2056	errorInfo(modulo, msglog);
2057	return (FALSE);
2058	}
2059	if (!tbl.Get("idperfilsoft", ifs)) { // Toma dato
2060	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
2061	errorInfo(modulo, msglog);
2062	return (FALSE);
2063	}
2064
2065	/* Actualizar los datos de la imagen */
2066	snprintf(sqlstr, LONSQL,
2067	"UPDATE imagenes"
2068	" SET idordenador=%s, numdisk=%s, numpar=%s, codpar=%s,"
2069	" idperfilsoft=%d, idrepositorio=%d,"
2070	" fechacreacion=NOW(), revision=revision+1"
2071	" WHERE idimagen=%s", ido, dsk, par, cpt, ifs, idr, idi);
2072
2073	if (!db.Execute(sqlstr, tbl)) { // Error al recuperar los datos
2074	errorLog(modulo, 21, FALSE);
2075	db.GetErrorErrStr(msglog);
2076	errorInfo(modulo, msglog);
2077	return (FALSE);
2078	}
2079	return (TRUE);
2080	}
2081	// ________________________________________________________________________________________________________
2082	// Función: CrearImagenBasica
2083	//
2084	// Descripción:
2085	// Crea una imagen basica usando sincronización
2086	// Parámetros:
2087	// - socket_c: Socket de la consola al envió el mensaje
2088	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2089	// Devuelve:
2090	// TRUE: Si el proceso es correcto
2091	// FALSE: En caso de ocurrir algún error
2092	// ________________________________________________________________________________________________________
2093	BOOLEAN CrearImagenBasica(SOCKET socket_c, TRAMA ptrTrama) {
2094	char msglog[LONSTD];
2095	char modulo[] = "CrearImagenBasica()";
2096
2097	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
2098	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
2099	errorInfo(modulo, msglog);
2100	respuestaConsola(socket_c, ptrTrama, FALSE);
2101	return (FALSE);
2102	}
2103	respuestaConsola(socket_c, ptrTrama, TRUE);
2104	return (TRUE);
2105	}
2106	// ________________________________________________________________________________________________________
2107	// Función: RESPUESTA_CrearImagenBasica
2108	//
2109	// Descripción:
2110	// Respuesta del cliente al comando CrearImagenBasica
2111	// Parámetros:
2112	// - socket_c: Socket del cliente que envió el mensaje
2113	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2114	// Devuelve:
2115	// TRUE: Si el proceso es correcto
2116	// FALSE: En caso de ocurrir algún error
2117	// ________________________________________________________________________________________________________
2118	BOOLEAN RESPUESTA_CrearImagenBasica(SOCKET socket_c, TRAMA ptrTrama) {
2119	return(RESPUESTA_CrearImagen(socket_c,ptrTrama)); // La misma respuesta que la creación de imagen monolítica
2120	}
2121	// ________________________________________________________________________________________________________
2122	// Función: CrearSoftIncremental
2123	//
2124	// Descripción:
2125	// Crea una imagen incremental entre una partición de un disco y una imagen ya creada guardandola en el
2126	// mismo repositorio y en la misma carpeta donde está la imagen básica
2127	// Parámetros:
2128	// - socket_c: Socket de la consola al envió el mensaje
2129	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2130	// Devuelve:
2131	// TRUE: Si el proceso es correcto
2132	// FALSE: En caso de ocurrir algún error
2133	// ________________________________________________________________________________________________________
2134	BOOLEAN CrearSoftIncremental(SOCKET socket_c, TRAMA ptrTrama) {
2135	char msglog[LONSTD];
2136	char modulo[] = "CrearSoftIncremental()";
2137
2138	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
2139	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
2140	errorInfo(modulo, msglog);
2141	respuestaConsola(socket_c, ptrTrama, FALSE);
2142	return (FALSE);
2143	}
2144	respuestaConsola(socket_c, ptrTrama, TRUE);
2145	return (TRUE);
2146	}
2147	// ________________________________________________________________________________________________________
2148	// Función: RESPUESTA_CrearSoftIncremental
2149	//
2150	// Descripción:
2151	// Respuesta del cliente al comando crearImagenDiferencial
2152	// Parámetros:
2153	// - socket_c: Socket del cliente que envió el mensaje
2154	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2155	// Devuelve:
2156	// TRUE: Si el proceso es correcto
2157	// FALSE: En caso de ocurrir algún error
2158	// ________________________________________________________________________________________________________
2159	BOOLEAN RESPUESTA_CrearSoftIncremental(SOCKET socket_c, TRAMA ptrTrama)
2160	{
2161	Database db;
2162	Table tbl;
2163	char iph,par,ido,idf;
2164	int ifs;
2165	char msglog[LONSTD],sqlstr[LONSQL];
2166	char modulo[] = "RESPUESTA_CrearSoftIncremental()";
2167
2168	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
2169	errorLog(modulo, 20, FALSE);
2170	db.GetErrorErrStr(msglog);
2171	errorInfo(modulo, msglog);
2172	return (FALSE);
2173	}
2174
2175	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
2176	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
2177
2178	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
2179	liberaMemoria(iph);
2180	liberaMemoria(ido);
2181	errorLog(modulo, 30, FALSE);
2182	return (FALSE); // Error al registrar notificacion
2183	}
2184
2185	par = copiaParametro("par",ptrTrama);
2186
2187	/* Toma identificador del perfilsoftware creado por el inventario de software */
2188	sprintf(sqlstr,"SELECT idperfilsoft FROM ordenadores_particiones WHERE idordenador=%s AND numpar=%s",ido,par);
2189
2190	liberaMemoria(iph);
2191	liberaMemoria(ido);
2192	liberaMemoria(par);
2193
2194	if (!db.Execute(sqlstr, tbl)) { // Error al leer
2195	errorLog(modulo, 21, FALSE);
2196	db.GetErrorErrStr(msglog);
2197	errorInfo(modulo, msglog);
2198	return (FALSE);
2199	}
2200	if (!tbl.Get("idperfilsoft", ifs)) { // Toma dato
2201	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
2202	errorInfo(modulo, msglog);
2203	return (FALSE);
2204	}
2205
2206	/* Actualizar los datos de la imagen */
2207	idf = copiaParametro("idf",ptrTrama);
2208	sprintf(sqlstr,"UPDATE imagenes SET idperfilsoft=%d WHERE idimagen=%s",ifs,idf);
2209	liberaMemoria(idf);
2210
2211	if (!db.Execute(sqlstr, tbl)) { // Error al recuperar los datos
2212	errorLog(modulo, 21, FALSE);
2213	db.GetErrorErrStr(msglog);
2214	errorInfo(modulo, msglog);
2215	return (FALSE);
2216	}
2217	db.Close(); // Cierra conexión
2218	return (TRUE);
2219	}
2220	// ________________________________________________________________________________________________________
2221	// Función: actualizaCreacionSoftIncremental
2222	//
2223	// Descripción:
2224	// Esta función actualiza la base de datos con el resultado de la creación de software incremental
2225	// Parámetros:
2226	// - db: Objeto base de datos (ya operativo)
2227	// - tbl: Objeto tabla
2228	// - idi: Identificador de la imagen
2229	// - idf: Identificador del software incremental
2230	// Devuelve:
2231	// TRUE: Si el proceso es correcto
2232	// FALSE: En caso de ocurrir algún error
2233	// ________________________________________________________________________________________________________
2234	BOOLEAN actualizaCreacionSoftIncremental(Database db, Table tbl, char* idi,char* idf)
2235	{
2236	char msglog[LONSTD], sqlstr[LONSQL];
2237	char modulo[] = "actualizaCreacionSoftIncremental()";
2238
2239
2240	/* Comprueba si existe ya relación entre la imagen y el software incremental */
2241	sprintf(sqlstr, "SELECT * FROM imagenes_softincremental"
2242	" WHERE idimagen=%s AND idsoftincremental=%s", idi,idf);
2243
2244	if (!db.Execute(sqlstr, tbl)) { // Error al leer
2245	errorLog(modulo, 21, FALSE);
2246	db.GetErrorErrStr(msglog);
2247	errorInfo(modulo, msglog);
2248	return (FALSE);
2249	}
2250	if (!tbl.ISEOF())
2251	return (TRUE); // Ya existe relación
2252
2253	// Crea relación entre la imagen y el software incremental
2254	sprintf(sqlstr,"INSERT INTO imagenes_softincremental (idimagen,idsoftincremental) VALUES (%s,%s)",idi,idf);
2255	if (!db.Execute(sqlstr, tbl)) { // Error al ejecutar la sentencia
2256	errorLog(modulo, 21, FALSE);
2257	db.GetErrorErrStr(msglog);
2258	errorInfo(modulo, msglog);
2259	return (FALSE);
2260	}
2261	return (TRUE);
2262	}
2263	// ________________________________________________________________________________________________________
2264	// Función: RestaurarImagen
2265	//
2266	// Descripción:
2267	// Restaura una imagen en una partición
2268	// Parámetros:
2269	// - socket_c: Socket de la consola al envió el mensaje
2270	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2271	// Devuelve:
2272	// TRUE: Si el proceso es correcto
2273	// FALSE: En caso de ocurrir algún error
2274	// ________________________________________________________________________________________________________
2275	BOOLEAN RestaurarImagen(SOCKET socket_c, TRAMA ptrTrama) {
2276	char msglog[LONSTD];
2277	char modulo[] = "RestaurarImagen()";
2278
2279	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
2280	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
2281	errorInfo(modulo, msglog);
2282	respuestaConsola(socket_c, ptrTrama, FALSE);
2283	return (FALSE);
2284	}
2285	respuestaConsola(socket_c, ptrTrama, TRUE);
2286	return (TRUE);
2287	}
2288	// ________________________________________________________________________________________________________
2289	// Función: RestaurarImagenBasica
2290	//
2291	// Descripción:
2292	// Restaura una imagen básica en una partición
2293	// Parámetros:
2294	// - socket_c: Socket de la consola al envió el mensaje
2295	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2296	// Devuelve:
2297	// TRUE: Si el proceso es correcto
2298	// FALSE: En caso de ocurrir algún error
2299	// ________________________________________________________________________________________________________
2300	BOOLEAN RestaurarImagenBasica(SOCKET socket_c, TRAMA ptrTrama) {
2301	char msglog[LONSTD];
2302	char modulo[] = "RestaurarImagenBasica()";
2303
2304	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
2305	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
2306	errorInfo(modulo, msglog);
2307	respuestaConsola(socket_c, ptrTrama, FALSE);
2308	return (FALSE);
2309	}
2310	respuestaConsola(socket_c, ptrTrama, TRUE);
2311	return (TRUE);
2312	}
2313	// ________________________________________________________________________________________________________
2314	// Función: RestaurarSoftIncremental
2315	//
2316	// Descripción:
2317	// Restaura una imagen básica junto con software incremental en una partición
2318	// Parámetros:
2319	// - socket_c: Socket de la consola al envió el mensaje
2320	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2321	// Devuelve:
2322	// TRUE: Si el proceso es correcto
2323	// FALSE: En caso de ocurrir algún error
2324	// ________________________________________________________________________________________________________
2325	BOOLEAN RestaurarSoftIncremental(SOCKET socket_c, TRAMA ptrTrama) {
2326	char msglog[LONSTD];
2327	char modulo[] = "RestaurarSoftIncremental()";
2328
2329	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
2330	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
2331	errorInfo(modulo, msglog);
2332	respuestaConsola(socket_c, ptrTrama, FALSE);
2333	return (FALSE);
2334	}
2335	respuestaConsola(socket_c, ptrTrama, TRUE);
2336	return (TRUE);
2337	}
2338	// ________________________________________________________________________________________________________
2339	// Función: RESPUESTA_RestaurarImagen
2340	//
2341	// Descripción:
2342	// Respuesta del cliente al comando RestaurarImagen
2343	// Parámetros:
2344	// - socket_c: Socket del cliente que envió el mensaje
2345	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2346	// Devuelve:
2347	// TRUE: Si el proceso es correcto
2348	// FALSE: En caso de ocurrir algún error
2349	// ________________________________________________________________________________________________________
2350	//
2351	BOOLEAN RESPUESTA_RestaurarImagen(SOCKET socket_c, TRAMA ptrTrama)
2352	{
2353	char msglog[LONSTD];
2354	Database db;
2355	Table tbl;
2356	BOOLEAN res;
2357	char iph, ido, idi, dsk, par, ifs;
2358	char modulo[] = "RESPUESTA_RestaurarImagen()";
2359
2360	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
2361	errorLog(modulo, 20, FALSE);
2362	db.GetErrorErrStr(msglog);
2363	errorInfo(modulo, msglog);
2364	return (FALSE);
2365	}
2366
2367	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
2368	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
2369
2370	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
2371	liberaMemoria(iph);
2372	liberaMemoria(ido);
2373	errorLog(modulo, 30, FALSE);
2374	return (FALSE); // Error al registrar notificacion
2375	}
2376
2377	// Acciones posteriores
2378	idi = copiaParametro("idi",ptrTrama); // Toma identificador de la imagen
2379	dsk = copiaParametro("dsk",ptrTrama); // Número de disco
2380	par = copiaParametro("par",ptrTrama); // Número de partición
2381	ifs = copiaParametro("ifs",ptrTrama); // Identificador del perfil software contenido
2382
2383	res=actualizaRestauracionImagen(db, tbl, idi, dsk, par, ido, ifs);
2384
2385	liberaMemoria(iph);
2386	liberaMemoria(ido);
2387	liberaMemoria(idi);
2388	liberaMemoria(par);
2389	liberaMemoria(ifs);
2390
2391	if(!res){
2392	errorLog(modulo, 95, FALSE);
2393	db.Close(); // Cierra conexión
2394	return (FALSE);
2395	}
2396
2397	db.Close(); // Cierra conexión
2398	return (TRUE);
2399	}
2400	// ________________________________________________________________________________________________________
2401	//
2402	// Función: RESPUESTA_RestaurarImagenBasica
2403	//
2404	// Descripción:
2405	// Respuesta del cliente al comando RestaurarImagen
2406	// Parámetros:
2407	// - socket_c: Socket del cliente que envió el mensaje
2408	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2409	// Devuelve:
2410	// TRUE: Si el proceso es correcto
2411	// FALSE: En caso de ocurrir algún error
2412	// ________________________________________________________________________________________________________
2413	//
2414	BOOLEAN RESPUESTA_RestaurarImagenBasica(SOCKET socket_c, TRAMA ptrTrama) {
2415	return(RESPUESTA_RestaurarImagen(socket_c,ptrTrama));
2416	}
2417	// ________________________________________________________________________________________________________
2418	// Función: RESPUESTA_RestaurarSoftIncremental
2419	//
2420	// Descripción:
2421	// Respuesta del cliente al comando RestaurarSoftIncremental
2422	// Parámetros:
2423	// - socket_c: Socket del cliente que envió el mensaje
2424	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2425	// Devuelve:
2426	// TRUE: Si el proceso es correcto
2427	// FALSE: En caso de ocurrir algún error
2428	// ________________________________________________________________________________________________________
2429	BOOLEAN RESPUESTA_RestaurarSoftIncremental(SOCKET socket_c, TRAMA ptrTrama) {
2430	return(RESPUESTA_RestaurarImagen(socket_c,ptrTrama));
2431	}
2432	// ________________________________________________________________________________________________________
2433	// Función: actualizaRestauracionImagen
2434	//
2435	// Descripción:
2436	// Esta función actualiza la base de datos con el resultado de la restauración de una imagen
2437	// Parámetros:
2438	// - db: Objeto base de datos (ya operativo)
2439	// - tbl: Objeto tabla
2440	// - idi: Identificador de la imagen
2441	// - dsk: Disco de donde se restauró
2442	// - par: Partición de donde se restauró
2443	// - ido: Identificador del cliente donde se restauró
2444	// - ifs: Identificador del perfil software contenido en la imagen
2445	// Devuelve:
2446	// TRUE: Si el proceso es correcto
2447	// FALSE: En caso de ocurrir algún error
2448	// ________________________________________________________________________________________________________
2449	BOOLEAN actualizaRestauracionImagen(Database db, Table tbl, char* idi,
2450	char* dsk, char* par, char* ido, char* ifs) {
2451	char msglog[LONSTD], sqlstr[LONSQL];
2452	char modulo[] = "actualizaRestauracionImagen()";
2453
2454	/* Actualizar los datos de la imagen */
2455	snprintf(sqlstr, LONSQL,
2456	"UPDATE ordenadores_particiones"
2457	" SET idimagen=%s, idperfilsoft=%s, fechadespliegue=NOW(),"
2458	" revision=(SELECT revision FROM imagenes WHERE idimagen=%s),"
2459	" idnombreso=(SELECT idnombreso FROM perfilessoft WHERE idperfilsoft=%s)"
2460	" WHERE idordenador=%s AND numdisk=%s AND numpar=%s", idi, ifs, idi, ifs, ido, dsk, par);
2461
2462	if (!db.Execute(sqlstr, tbl)) { // Error al recuperar los datos
2463	errorLog(modulo, 21, FALSE);
2464	db.GetErrorErrStr(msglog);
2465	errorInfo(modulo, msglog);
2466	return (FALSE);
2467	}
2468	return (TRUE);
2469	}
2470	// ________________________________________________________________________________________________________
2471	// Función: Configurar
2472	//
2473	// Descripción:
2474	// Configura la tabla de particiones
2475	// Parámetros:
2476	// - socket_c: Socket de la consola al envió el mensaje
2477	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2478	// Devuelve:
2479	// TRUE: Si el proceso es correcto
2480	// FALSE: En caso de ocurrir algún error
2481	// ________________________________________________________________________________________________________
2482	BOOLEAN Configurar(SOCKET socket_c, TRAMA ptrTrama) {
2483	char msglog[LONSTD];
2484	char modulo[] = "Configurar()";
2485
2486	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
2487	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
2488	errorInfo(modulo, msglog);
2489	respuestaConsola(socket_c, ptrTrama, FALSE);
2490	return (FALSE);
2491	}
2492	respuestaConsola(socket_c, ptrTrama, TRUE);
2493	return (TRUE);
2494	}
2495	// ________________________________________________________________________________________________________
2496	// Función: RESPUESTA_Configurar
2497	//
2498	// Descripción:
2499	// Respuesta del cliente al comando Configurar
2500	// Parámetros:
2501	// - socket_c: Socket del cliente que envió el mensaje
2502	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2503	// Devuelve:
2504	// TRUE: Si el proceso es correcto
2505	// FALSE: En caso de ocurrir algún error
2506	// ________________________________________________________________________________________________________
2507	//
2508	BOOLEAN RESPUESTA_Configurar(SOCKET socket_c, TRAMA ptrTrama)
2509	{
2510	char msglog[LONSTD];
2511	Database db;
2512	Table tbl;
2513	BOOLEAN res;
2514	char iph, ido,*cfg;
2515	char modulo[] = "RESPUESTA_Configurar()";
2516
2517	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
2518	errorLog(modulo, 20, FALSE);
2519	db.GetErrorErrStr(msglog);
2520	errorInfo(modulo, msglog);
2521	return (FALSE);
2522	}
2523
2524	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
2525	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
2526
2527	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
2528	liberaMemoria(iph);
2529	liberaMemoria(ido);
2530	errorLog(modulo, 30, FALSE);
2531	return (FALSE); // Error al registrar notificacion
2532	}
2533
2534	cfg = copiaParametro("cfg",ptrTrama); // Toma configuración de particiones
2535	res=actualizaConfiguracion(db, tbl, cfg, atoi(ido)); // Actualiza la configuración del ordenador
2536
2537	liberaMemoria(iph);
2538	liberaMemoria(ido);
2539	liberaMemoria(cfg);
2540
2541	if(!res){
2542	errorLog(modulo, 24, FALSE);
2543	return (FALSE); // Error al registrar notificacion
2544	}
2545
2546	db.Close(); // Cierra conexión
2547	return (TRUE);
2548	}
2549	// ________________________________________________________________________________________________________
2550	// Función: EjecutarScript
2551	//
2552	// Descripción:
2553	// Ejecuta un script de código
2554	// Parámetros:
2555	// - socket_c: Socket de la consola al envió el mensaje
2556	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2557	// Devuelve:
2558	// TRUE: Si el proceso es correcto
2559	// FALSE: En caso de ocurrir algún error
2560	// ________________________________________________________________________________________________________
2561	BOOLEAN EjecutarScript(SOCKET socket_c, TRAMA ptrTrama) {
2562	char msglog[LONSTD];
2563	char modulo[] = "EjecutarScript()";
2564
2565	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
2566	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
2567	errorInfo(modulo, msglog);
2568	respuestaConsola(socket_c, ptrTrama, FALSE);
2569	return (FALSE);
2570	}
2571	respuestaConsola(socket_c, ptrTrama, TRUE);
2572	return (TRUE);
2573	}
2574	// ________________________________________________________________________________________________________
2575	// Función: RESPUESTA_EjecutarScript
2576	//
2577	// Descripción:
2578	// Respuesta del cliente al comando EjecutarScript
2579	// Parámetros:
2580	// - socket_c: Socket del cliente que envió el mensaje
2581	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2582	// Devuelve:
2583	// TRUE: Si el proceso es correcto
2584	// FALSE: En caso de ocurrir algún error
2585	// ________________________________________________________________________________________________________
2586	BOOLEAN RESPUESTA_EjecutarScript(SOCKET socket_c, TRAMA ptrTrama)
2587	{
2588	char msglog[LONSTD];
2589	Database db;
2590	Table tbl;
2591	char iph, ido,*cfg;
2592
2593	char modulo[] = "RESPUESTA_EjecutarScript()";
2594
2595	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
2596	errorLog(modulo, 20, FALSE);
2597	db.GetErrorErrStr(msglog);
2598	errorInfo(modulo, msglog);
2599	return (FALSE);
2600	}
2601
2602	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
2603	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
2604
2605	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
2606	liberaMemoria(iph);
2607	liberaMemoria(ido);
2608	errorLog(modulo, 30, FALSE);
2609	return (FALSE); // Error al registrar notificacion
2610	}
2611
2612	cfg = copiaParametro("cfg",ptrTrama); // Toma configuración de particiones
2613
2614	if(cfg){
2615	actualizaConfiguracion(db, tbl, cfg, atoi(ido)); // Actualiza la configuración del ordenador
2616	liberaMemoria(cfg);
2617	}
2618
2619	liberaMemoria(iph);
2620	liberaMemoria(ido);
2621
2622
2623	db.Close(); // Cierra conexión
2624	return (TRUE);
2625	}
2626	// ________________________________________________________________________________________________________
2627	// Función: InventarioHardware
2628	//
2629	// Descripción:
2630	// Solicita al cliente un inventario de su hardware
2631	// Parámetros:
2632	// - socket_c: Socket de la consola al envió el mensaje
2633	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2634	// Devuelve:
2635	// TRUE: Si el proceso es correcto
2636	// FALSE: En caso de ocurrir algún error
2637	// ________________________________________________________________________________________________________
2638	BOOLEAN InventarioHardware(SOCKET socket_c, TRAMA ptrTrama) {
2639	char msglog[LONSTD];
2640	char modulo[] = "InventarioHardware()";
2641
2642	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
2643	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
2644	errorInfo(modulo, msglog);
2645	respuestaConsola(socket_c, ptrTrama, FALSE);
2646	return (FALSE);
2647	}
2648	respuestaConsola(socket_c, ptrTrama, TRUE);
2649	return (TRUE);
2650	}
2651	// ________________________________________________________________________________________________________
2652	// Función: RESPUESTA_InventarioHardware
2653	//
2654	// Descripción:
2655	// Respuesta del cliente al comando InventarioHardware
2656	// Parámetros:
2657	// - socket_c: Socket del cliente que envió el mensaje
2658	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
2659	// Devuelve:
2660	// TRUE: Si el proceso es correcto
2661	// FALSE: En caso de ocurrir algún error
2662	// ________________________________________________________________________________________________________
2663	BOOLEAN RESPUESTA_InventarioHardware(SOCKET socket_c, TRAMA ptrTrama) {
2664	char msglog[LONSTD];
2665	Database db;
2666	Table tbl;
2667	BOOLEAN res;
2668	char iph, ido, idc, npc, hrd, buffer;
2669	char modulo[] = "RESPUESTA_InventarioHardware()";
2670
2671	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
2672	errorLog(modulo, 20, FALSE);
2673	db.GetErrorErrStr(msglog);
2674	errorInfo(modulo, msglog);
2675	return (FALSE);
2676	}
2677
2678	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip del cliente
2679	ido = copiaParametro("ido",ptrTrama); // Toma identificador del cliente
2680
2681	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
2682	liberaMemoria(iph);
2683	liberaMemoria(ido);
2684	errorLog(modulo, 30, FALSE);
2685	return (FALSE); // Error al registrar notificacion
2686	}
2687	// Lee archivo de inventario enviado anteriormente
2688	hrd = copiaParametro("hrd",ptrTrama);
2689	buffer = rTrim(leeArchivo(hrd));
2690
2691	npc = copiaParametro("npc",ptrTrama);
2692	idc = copiaParametro("idc",ptrTrama); // Toma identificador del Centro
2693
2694	if (buffer)
2695	res=actualizaHardware(db, tbl, buffer, ido, npc, idc);
2696
2697	liberaMemoria(iph);
2698	liberaMemoria(ido);
2699	liberaMemoria(npc);
2700	liberaMemoria(idc);
2701	liberaMemoria(buffer);
2702
2703	if(!res){
2704	errorLog(modulo, 53, FALSE);
2705	return (FALSE);
2706	}
2707
2708	db.Close(); // Cierra conexión
2709	return (TRUE);
2710	}
2711	// ________________________________________________________________________________________________________
2712	// Función: actualizaHardware
2713	//
2714	// Descripción:
2715	// Actualiza la base de datos con la configuracion hardware del cliente
2716	// Parámetros:
2717	// - db: Objeto base de datos (ya operativo)
2718	// - tbl: Objeto tabla
2719	// - hrd: cadena con el inventario hardware
2720	// - ido: Identificador del ordenador
2721	// - npc: Nombre del ordenador
2722	// - idc: Identificador del centro o Unidad organizativa
2723	// ________________________________________________________________________________________________________
2724	//
2725	BOOLEAN actualizaHardware(Database db, Table tbl, char* hrd, charido,char npc, char *idc)
2726	{
2727	char msglog[LONSTD], sqlstr[LONSQL];
2728	int idtipohardware, idperfilhard;
2729	int lon, i, j, aux;
2730	bool retval;
2731	char *whard;
2732	int tbidhardware[MAXHARDWARE];
2733	char tbHardware[MAXHARDWARE],dualHardware[2], descripcion[250], strInt[LONINT], *idhardwares;
2734	char modulo[] = "actualizaHardware()";
2735
2736	/* Toma Centro (Unidad Organizativa) */
2737	sprintf(sqlstr, "SELECT * FROM ordenadores WHERE idordenador=%s", ido);
2738
2739	if (!db.Execute(sqlstr, tbl)) { // Error al leer
2740	errorLog(modulo, 21, FALSE);
2741	db.GetErrorErrStr(msglog);
2742	errorInfo(modulo, msglog);
2743	return (FALSE);
2744	}
2745	if (!tbl.Get("idperfilhard", idperfilhard)) { // Toma dato
2746	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
2747	errorInfo(modulo, msglog);
2748	return (FALSE);
2749	}
2750	whard=escaparCadena(hrd); // Codificar comillas simples
2751	if(!whard)
2752	return (FALSE);
2753	/* Recorre componentes hardware*/
2754	lon = splitCadena(tbHardware, whard, '\n');
2755	if (lon > MAXHARDWARE)
2756	lon = MAXHARDWARE; // Limita el número de componentes hardware
2757	/*
2758	for (i=0;i<lon;i++){
2759	sprintf(msglog,"Linea de inventario: %s",tbHardware[i]);
2760	RegistraLog(msglog,FALSE);
2761	}
2762	*/
2763	for (i = 0; i < lon; i++) {
2764	splitCadena(dualHardware, rTrim(tbHardware[i]), '=');
2765	//sprintf(msglog,"nemonico: %s",dualHardware[0]);
2766	//RegistraLog(msglog,FALSE);
2767	//sprintf(msglog,"valor: %s",dualHardware[1]);
2768	//RegistraLog(msglog,FALSE);
2769	sprintf(sqlstr, "SELECT idtipohardware,descripcion FROM tipohardwares "
2770	" WHERE nemonico='%s'", dualHardware[0]);
2771	if (!db.Execute(sqlstr, tbl)) { // Error al leer
2772	errorLog(modulo, 21, FALSE);
2773	db.GetErrorErrStr(msglog);
2774	errorInfo(modulo, msglog);
2775	return (FALSE);
2776	}
2777	if (tbl.ISEOF()) { // Tipo de Hardware NO existente
2778	sprintf(msglog, "%s: %s)", tbErrores[54], dualHardware[0]);
2779	errorInfo(modulo, msglog);
2780	return (FALSE);
2781	} else { // Tipo de Hardware Existe
2782	if (!tbl.Get("idtipohardware", idtipohardware)) { // Toma dato
2783	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
2784	errorInfo(modulo, msglog);
2785	return (FALSE);
2786	}
2787	if (!tbl.Get("descripcion", descripcion)) { // Toma dato
2788	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
2789	errorInfo(modulo, msglog);
2790	return (FALSE);
2791	}
2792
2793	sprintf(sqlstr, "SELECT idhardware FROM hardwares "
2794	" WHERE idtipohardware=%d AND descripcion='%s'",
2795	idtipohardware, dualHardware[1]);
2796
2797	// Ejecuta consulta
2798	if (!db.Execute(sqlstr, tbl)) { // Error al leer
2799	errorLog(modulo, 21, FALSE);
2800	db.GetErrorErrStr(msglog);
2801	errorInfo(modulo, msglog);
2802	return (FALSE);
2803	}
2804
2805	if (tbl.ISEOF()) { // Hardware NO existente
2806	sprintf(sqlstr, "INSERT hardwares (idtipohardware,descripcion,idcentro,grupoid) "
2807	" VALUES(%d,'%s',%s,0)", idtipohardware,
2808	dualHardware[1], idc);
2809	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
2810	db.GetErrorErrStr(msglog); // Error al acceder al registro
2811	errorInfo(modulo, msglog);
2812	return (FALSE);
2813	}
2814	// Recupera el identificador del hardware
2815	sprintf(sqlstr, "SELECT LAST_INSERT_ID() as identificador");
2816	if (!db.Execute(sqlstr, tbl)) { // Error al leer
2817	errorLog(modulo, 21, FALSE);
2818	db.GetErrorErrStr(msglog);
2819	errorInfo(modulo, msglog);
2820	return (FALSE);
2821	}
2822	if (!tbl.ISEOF()) { // Si existe registro
2823	if (!tbl.Get("identificador", tbidhardware[i])) {
2824	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
2825	errorInfo(modulo, msglog);
2826	return (FALSE);
2827	}
2828	}
2829	} else {
2830	if (!tbl.Get("idhardware", tbidhardware[i])) { // Toma dato
2831	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
2832	errorInfo(modulo, msglog);
2833	return (FALSE);
2834	}
2835	}
2836	}
2837	}
2838	// Ordena tabla de identificadores para cosultar si existe un pefil con esas especificaciones
2839
2840	for (i = 0; i < lon - 1; i++) {
2841	for (j = i + 1; j < lon; j++) {
2842	if (tbidhardware[i] > tbidhardware[j]) {
2843	aux = tbidhardware[i];
2844	tbidhardware[i] = tbidhardware[j];
2845	tbidhardware[j] = aux;
2846	}
2847	}
2848	}
2849	/* Crea cadena de identificadores de componentes hardware separados por coma */
2850	sprintf(strInt, "%d", tbidhardware[lon - 1]); // Pasa a cadena el último identificador que es de mayor longitud
2851	aux = strlen(strInt); // Calcula longitud de cadena para reservar espacio a todos los perfiles
2852	idhardwares = reservaMemoria(sizeof(aux) * lon + lon);
2853	if (idhardwares == NULL) {
2854	errorLog(modulo, 3, FALSE);
2855	return (FALSE);
2856	}
2857	aux = sprintf(idhardwares, "%d", tbidhardware[0]);
2858	for (i = 1; i < lon; i++)
2859	aux += sprintf(idhardwares + aux, ",%d", tbidhardware[i]);
2860
2861	if (!cuestionPerfilHardware(db, tbl, idc, ido, idperfilhard, idhardwares,
2862	npc, tbidhardware, lon)) {
2863	errorLog(modulo, 55, FALSE);
2864	errorInfo(modulo, msglog);
2865	retval=FALSE;
2866	}
2867	else {
2868	retval=TRUE;
2869	}
2870	liberaMemoria(whard);
2871	liberaMemoria(idhardwares);
2872	return (retval);
2873	}
2874	// ________________________________________________________________________________________________________
2875	// Función: cuestionPerfilHardware
2876	//
2877	// Descripción:
2878	// Comprueba existencia de perfil hardware y actualización de éste para el ordenador
2879	// Parámetros:
2880	// - db: Objeto base de datos (ya operativo)
2881	// - tbl: Objeto tabla
2882	// - idc: Identificador de la Unidad organizativa donde se encuentra el cliente
2883	// - ido: Identificador del ordenador
2884	// - tbidhardware: Identificador del tipo de hardware
2885	// - con: Número de componentes detectados para configurar un el perfil hardware
2886	// - npc: Nombre del cliente
2887	// ________________________________________________________________________________________________________
2888	BOOLEAN cuestionPerfilHardware(Database db, Table tbl, char* idc, char* ido,
2889	int idperfilhardware, charidhardwares, char npc, int *tbidhardware,
2890	int lon)
2891	{
2892	char msglog[LONSTD], *sqlstr;
2893	int i;
2894	int nwidperfilhard;
2895	char modulo[] = "cuestionPerfilHardware()";
2896
2897	sqlstr = reservaMemoria(strlen(idhardwares)+LONSQL); // Reserva para escribir sentencia SQL
2898	if (sqlstr == NULL) {
2899	errorLog(modulo, 3, FALSE);
2900	return (FALSE);
2901	}
2902	// Busca perfil hard del ordenador que contenga todos los componentes hardware encontrados
2903	sprintf(sqlstr, "SELECT idperfilhard FROM"
2904	" (SELECT perfileshard_hardwares.idperfilhard as idperfilhard,"
2905	" group_concat(cast(perfileshard_hardwares.idhardware AS char( 11) )"
2906	" ORDER BY perfileshard_hardwares.idhardware SEPARATOR ',' ) AS idhardwares"
2907	" FROM perfileshard_hardwares"
2908	" GROUP BY perfileshard_hardwares.idperfilhard) AS temp"
2909	" WHERE idhardwares LIKE '%s'", idhardwares);
2910	// Ejecuta consulta
2911	if (!db.Execute(sqlstr, tbl)) { // Error al leer
2912	errorLog(modulo, 21, FALSE);
2913	db.GetErrorErrStr(msglog);
2914	errorInfo(modulo, msglog);
2915	liberaMemoria(sqlstr);
2916	return (false);
2917	}
2918	if (tbl.ISEOF()) { // No existe un perfil hardware con esos componentes de componentes hardware, lo crea
2919	sprintf(sqlstr, "INSERT perfileshard (descripcion,idcentro,grupoid)"
2920	" VALUES('Perfil hardware (%s) ',%s,0)", npc, idc);
2921	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
2922	db.GetErrorErrStr(msglog);
2923	errorInfo(modulo, msglog);
2924	liberaMemoria(sqlstr);
2925	return (false);
2926	}
2927	// Recupera el identificador del nuevo perfil hardware
2928	sprintf(sqlstr, "SELECT LAST_INSERT_ID() as identificador");
2929	if (!db.Execute(sqlstr, tbl)) { // Error al leer
2930	db.GetErrorErrStr(msglog);
2931	errorInfo(modulo, msglog);
2932	liberaMemoria(sqlstr);
2933	return (false);
2934	}
2935	if (!tbl.ISEOF()) { // Si existe registro
2936	if (!tbl.Get("identificador", nwidperfilhard)) {
2937	tbl.GetErrorErrStr(msglog);
2938	errorInfo(modulo, msglog);
2939	liberaMemoria(sqlstr);
2940	return (false);
2941	}
2942	}
2943	// Crea la relación entre perfiles y componenetes hardware
2944	for (i = 0; i < lon; i++) {
2945	sprintf(sqlstr, "INSERT perfileshard_hardwares (idperfilhard,idhardware)"
2946	" VALUES(%d,%d)", nwidperfilhard, tbidhardware[i]);
2947	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
2948	db.GetErrorErrStr(msglog);
2949	errorInfo(modulo, msglog);
2950	liberaMemoria(sqlstr);
2951	return (false);
2952	}
2953	}
2954	} else { // Existe un perfil con todos esos componentes
2955	if (!tbl.Get("idperfilhard", nwidperfilhard)) {
2956	tbl.GetErrorErrStr(msglog);
2957	errorInfo(modulo, msglog);
2958	liberaMemoria(sqlstr);
2959	return (false);
2960	}
2961	}
2962	if (idperfilhardware != nwidperfilhard) { // No coinciden los perfiles
2963	// Actualiza el identificador del perfil hardware del ordenador
2964	sprintf(sqlstr, "UPDATE ordenadores SET idperfilhard=%d"
2965	" WHERE idordenador=%s", nwidperfilhard, ido);
2966	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
2967	db.GetErrorErrStr(msglog);
2968	errorInfo(modulo, msglog);
2969	liberaMemoria(sqlstr);
2970	return (false);
2971	}
2972	}
2973	/* Eliminar Relación de hardwares con Perfiles hardware que quedan húerfanos */
2974	sprintf(sqlstr, "DELETE FROM perfileshard_hardwares WHERE idperfilhard IN "
2975	" (SELECT idperfilhard FROM perfileshard WHERE idperfilhard NOT IN"
2976	" (SELECT DISTINCT idperfilhard from ordenadores))");
2977	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
2978	db.GetErrorErrStr(msglog);
2979	errorInfo(modulo, msglog);
2980	liberaMemoria(sqlstr);
2981	return (false);
2982	}
2983
2984	/* Eliminar Perfiles hardware que quedan húerfanos */
2985	sprintf(sqlstr, "DELETE FROM perfileshard WHERE idperfilhard NOT IN"
2986	" (SELECT DISTINCT idperfilhard FROM ordenadores)");
2987	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
2988	db.GetErrorErrStr(msglog);
2989	errorInfo(modulo, msglog);
2990	liberaMemoria(sqlstr);
2991	return (false);
2992	}
2993	/* Eliminar Relación de hardwares con Perfiles hardware que quedan húerfanos */
2994	sprintf(sqlstr, "DELETE FROM perfileshard_hardwares WHERE idperfilhard NOT IN"
2995	" (SELECT idperfilhard FROM perfileshard)");
2996	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
2997	db.GetErrorErrStr(msglog);
2998	errorInfo(modulo, msglog);
2999	liberaMemoria(sqlstr);
3000	return (false);
3001	}
3002	liberaMemoria(sqlstr);
3003	return (TRUE);
3004	}
3005	// ________________________________________________________________________________________________________
3006	// Función: InventarioSoftware
3007	//
3008	// Descripción:
3009	// Solicita al cliente un inventario de su software
3010	// Parámetros:
3011	// - socket_c: Socket de la consola al envió el mensaje
3012	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
3013	// Devuelve:
3014	// TRUE: Si el proceso es correcto
3015	// FALSE: En caso de ocurrir algún error
3016	// ________________________________________________________________________________________________________
3017	BOOLEAN InventarioSoftware(SOCKET socket_c, TRAMA ptrTrama) {
3018	char msglog[LONSTD];
3019	char modulo[] = "InventarioSoftware()";
3020
3021	if (!enviaComando(ptrTrama, CLIENTE_OCUPADO)) {
3022	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
3023	errorInfo(modulo, msglog);
3024	respuestaConsola(socket_c, ptrTrama, FALSE);
3025	return (FALSE);
3026	}
3027	respuestaConsola(socket_c, ptrTrama, TRUE);
3028	return (TRUE);
3029	}
3030	// ________________________________________________________________________________________________________
3031	// Función: RESPUESTA_InventarioSoftware
3032	//
3033	// Descripción:
3034	// Respuesta del cliente al comando InventarioSoftware
3035	// Parámetros:
3036	// - socket_c: Socket del cliente que envió el mensaje
3037	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
3038	// Devuelve:
3039	// TRUE: Si el proceso es correcto
3040	// FALSE: En caso de ocurrir algún error
3041	// ________________________________________________________________________________________________________
3042	BOOLEAN RESPUESTA_InventarioSoftware(SOCKET socket_c, TRAMA ptrTrama) {
3043	char msglog[LONSTD];
3044	Database db;
3045	Table tbl;
3046	BOOLEAN res;
3047	char iph, ido, npc, idc, par, sft, *buffer;
3048	char modulo[] = "RESPUESTA_InventarioSoftware()";
3049
3050	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
3051	errorLog(modulo, 20, FALSE);
3052	db.GetErrorErrStr(msglog);
3053	errorInfo(modulo, msglog);
3054	return (FALSE);
3055	}
3056
3057	iph = copiaParametro("iph",ptrTrama); // Toma dirección ip
3058	ido = copiaParametro("ido",ptrTrama); // Toma identificador del ordenador
3059
3060	if (!respuestaEstandar(ptrTrama, iph, ido, db, tbl)) {
3061	liberaMemoria(iph);
3062	liberaMemoria(ido);
3063	errorLog(modulo, 30, FALSE);
3064	return (FALSE); // Error al registrar notificacion
3065	}
3066
3067	npc = copiaParametro("npc",ptrTrama);
3068	idc = copiaParametro("idc",ptrTrama); // Toma identificador del Centro
3069	par = copiaParametro("par",ptrTrama);
3070	sft = copiaParametro("sft",ptrTrama);
3071
3072	buffer = rTrim(leeArchivo(sft));
3073	if (buffer)
3074	res=actualizaSoftware(db, tbl, buffer, par, ido, npc, idc);
3075
3076	liberaMemoria(iph);
3077	liberaMemoria(ido);
3078	liberaMemoria(npc);
3079	liberaMemoria(idc);
3080	liberaMemoria(par);
3081	liberaMemoria(sft);
3082
3083	if(!res){
3084	errorLog(modulo, 82, FALSE);
3085	return (FALSE);
3086	}
3087
3088	db.Close(); // Cierra conexión
3089	return (TRUE);
3090	}
3091	// ________________________________________________________________________________________________________
3092	// Función: actualizaSoftware
3093	//
3094	// Descripción:
3095	// Actualiza la base de datos con la configuración software del cliente
3096	// Parámetros:
3097	// - db: Objeto base de datos (ya operativo)
3098	// - tbl: Objeto tabla
3099	// - sft: cadena con el inventario software
3100	// - par: Número de la partición
3101	// - ido: Identificador del ordenador del cliente en la tabla
3102	// - npc: Nombre del ordenador
3103	// - idc: Identificador del centro o Unidad organizativa
3104	// Devuelve:
3105	// TRUE: Si el proceso es correcto
3106	// FALSE: En caso de ocurrir algún error
3107	//
3108	// Versión 1.1.0: Se incluye el sistema operativo. Autora: Irina Gómez - ETSII Universidad Sevilla
3109	// ________________________________________________________________________________________________________
3110	BOOLEAN actualizaSoftware(Database db, Table tbl, char* sft, char* par,char* ido, char* npc, char* idc)
3111	{
3112	int i, j, lon, aux, idperfilsoft, idnombreso;
3113	bool retval;
3114	char *wsft;
3115	int tbidsoftware[MAXSOFTWARE];
3116	char tbSoftware[MAXSOFTWARE],msglog[LONSTD], sqlstr[LONSQL], strInt[LONINT], idsoftwares;
3117	char modulo[] = "actualizaSoftware()";
3118
3119	/* Toma Centro (Unidad Organizativa) y perfil software */
3120	sprintf(sqlstr, "SELECT idperfilsoft,numpar"
3121	" FROM ordenadores_particiones"
3122	" WHERE idordenador=%s", ido);
3123
3124	if (!db.Execute(sqlstr, tbl)) { // Error al leer
3125	errorLog(modulo, 21, FALSE);
3126	db.GetErrorErrStr(msglog);
3127	errorInfo(modulo, msglog);
3128	return (FALSE);
3129	}
3130	idperfilsoft = 0; // Por defecto se supone que el ordenador no tiene aún detectado el perfil software
3131	while (!tbl.ISEOF()) { // Recorre particiones
3132	if (!tbl.Get("numpar", aux)) {
3133	tbl.GetErrorErrStr(msglog);
3134	errorInfo(modulo, msglog);
3135	return (FALSE);
3136	}
3137	if (aux == atoi(par)) { // Se encuentra la partición
3138	if (!tbl.Get("idperfilsoft", idperfilsoft)) {
3139	tbl.GetErrorErrStr(msglog);
3140	errorInfo(modulo, msglog);
3141	return (FALSE);
3142	}
3143	break;
3144	}
3145	tbl.MoveNext();
3146	}
3147	wsft=escaparCadena(sft); // Codificar comillas simples
3148	if(!wsft)
3149	return (FALSE);
3150
3151	/* Recorre componentes software*/
3152	lon = splitCadena(tbSoftware, wsft, '\n');
3153
3154	if (lon == 0)
3155	return (true); // No hay lineas que procesar
3156	if (lon > MAXSOFTWARE)
3157	lon = MAXSOFTWARE; // Limita el número de componentes software
3158
3159	for (i = 0; i < lon; i++) {
3160	// Primera línea es el sistema operativo: se obtiene identificador
3161	if (i == 0) {
3162	idnombreso = checkDato(db, tbl, rTrim(tbSoftware[i]), "nombresos", "nombreso", "idnombreso");
3163	continue;
3164	}
3165
3166	sprintf(sqlstr,
3167	"SELECT idsoftware FROM softwares WHERE descripcion ='%s'",
3168	rTrim(tbSoftware[i]));
3169
3170	// Ejecuta consulta
3171	if (!db.Execute(sqlstr, tbl)) { // Error al leer
3172	errorLog(modulo, 21, FALSE);
3173	db.GetErrorErrStr(msglog);
3174	errorInfo(modulo, msglog);
3175	return (FALSE);
3176	}
3177
3178	if (tbl.ISEOF()) { // Software NO existente
3179	sprintf(sqlstr, "INSERT INTO softwares (idtiposoftware,descripcion,idcentro,grupoid)"
3180	" VALUES(2,'%s',%s,0)", tbSoftware[i], idc);
3181
3182	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
3183	db.GetErrorErrStr(msglog); // Error al acceder al registro
3184	errorInfo(modulo, msglog);
3185	return (FALSE);
3186	}
3187	// Recupera el identificador del software
3188	sprintf(sqlstr, "SELECT LAST_INSERT_ID() as identificador");
3189	if (!db.Execute(sqlstr, tbl)) { // Error al leer
3190	db.GetErrorErrStr(msglog); // Error al acceder al registro
3191	errorInfo(modulo, msglog);
3192	return (FALSE);
3193	}
3194	if (!tbl.ISEOF()) { // Si existe registro
3195	if (!tbl.Get("identificador", tbidsoftware[i])) {
3196	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
3197	errorInfo(modulo, msglog);
3198	return (FALSE);
3199	}
3200	}
3201	} else {
3202	if (!tbl.Get("idsoftware", tbidsoftware[i])) { // Toma dato
3203	tbl.GetErrorErrStr(msglog); // Error al acceder al registro
3204	errorInfo(modulo, msglog);
3205	return (FALSE);
3206	}
3207	}
3208	}
3209
3210	// Ordena tabla de identificadores para cosultar si existe un pefil con esas especificaciones
3211
3212	for (i = 0; i < lon - 1; i++) {
3213	for (j = i + 1; j < lon; j++) {
3214	if (tbidsoftware[i] > tbidsoftware[j]) {
3215	aux = tbidsoftware[i];
3216	tbidsoftware[i] = tbidsoftware[j];
3217	tbidsoftware[j] = aux;
3218	}
3219	}
3220	}
3221	/* Crea cadena de identificadores de componentes software separados por coma */
3222	sprintf(strInt, "%d", tbidsoftware[lon - 1]); // Pasa a cadena el último identificador que es de mayor longitud
3223	aux = strlen(strInt); // Calcula longitud de cadena para reservar espacio a todos los perfiles
3224	idsoftwares = reservaMemoria((sizeof(aux)+1) * lon + lon);
3225	if (idsoftwares == NULL) {
3226	errorLog(modulo, 3, FALSE);
3227	return (FALSE);
3228	}
3229	aux = sprintf(idsoftwares, "%d", tbidsoftware[0]);
3230	for (i = 1; i < lon; i++)
3231	aux += sprintf(idsoftwares + aux, ",%d", tbidsoftware[i]);
3232
3233	// Comprueba existencia de perfil software y actualización de éste para el ordenador
3234	if (!cuestionPerfilSoftware(db, tbl, idc, ido, idperfilsoft, idnombreso, idsoftwares,
3235	npc, par, tbidsoftware, lon)) {
3236	errorLog(modulo, 83, FALSE);
3237	errorInfo(modulo, msglog);
3238	retval=FALSE;
3239	}
3240	else {
3241	retval=TRUE;
3242	}
3243	liberaMemoria(wsft);
3244	liberaMemoria(idsoftwares);
3245	return (retval);
3246	}
3247	// ________________________________________________________________________________________________________
3248	// Función: CuestionPerfilSoftware
3249	//
3250	// Parámetros:
3251	// - db: Objeto base de datos (ya operativo)
3252	// - tbl: Objeto tabla
3253	// - idcentro: Identificador del centro en la tabla
3254	// - ido: Identificador del ordenador del cliente en la tabla
3255	// - idnombreso: Identificador del sistema operativo
3256	// - idsoftwares: Cadena con los identificadores de componentes software separados por comas
3257	// - npc: Nombre del ordenador del cliente
3258	// - particion: Número de la partición
3259	// - tbidsoftware: Array con los identificadores de componentes software
3260	// - lon: Número de componentes
3261	// Devuelve:
3262	// TRUE: Si el proceso es correcto
3263	// FALSE: En caso de ocurrir algún error
3264	//
3265	// Versión 1.1.0: Se incluye el sistema operativo. Autora: Irina Gómez - ETSII Universidad Sevilla
3266	//_________________________________________________________________________________________________________
3267	BOOLEAN cuestionPerfilSoftware(Database db, Table tbl, char* idc, char* ido,
3268	int idperfilsoftware, int idnombreso, char idsoftwares, char npc, char *par,
3269	int *tbidsoftware, int lon) {
3270	char *sqlstr, msglog[LONSTD];
3271	int i, nwidperfilsoft;
3272	char modulo[] = "cuestionPerfilSoftware()";
3273
3274	sqlstr = reservaMemoria(strlen(idsoftwares)+LONSQL); // Reserva para escribir sentencia SQL
3275	if (sqlstr == NULL) {
3276	errorLog(modulo, 3, FALSE);
3277	return (FALSE);
3278	}
3279	// Busca perfil soft del ordenador que contenga todos los componentes software encontrados
3280	sprintf(sqlstr, "SELECT idperfilsoft FROM"
3281	" (SELECT perfilessoft_softwares.idperfilsoft as idperfilsoft,"
3282	" group_concat(cast(perfilessoft_softwares.idsoftware AS char( 11) )"
3283	" ORDER BY perfilessoft_softwares.idsoftware SEPARATOR ',' ) AS idsoftwares"
3284	" FROM perfilessoft_softwares"
3285	" GROUP BY perfilessoft_softwares.idperfilsoft) AS temp"
3286	" WHERE idsoftwares LIKE '%s'", idsoftwares);
3287	// Ejecuta consulta
3288	if (!db.Execute(sqlstr, tbl)) { // Error al leer
3289	errorLog(modulo, 21, FALSE);
3290	db.GetErrorErrStr(msglog);
3291	errorInfo(modulo, msglog);
3292	liberaMemoria(sqlstr);
3293	return (false);
3294	}
3295	if (tbl.ISEOF()) { // No existe un perfil software con esos componentes de componentes software, lo crea
3296	sprintf(sqlstr, "INSERT perfilessoft (descripcion, idcentro, grupoid, idnombreso)"
3297	" VALUES('Perfil Software (%s, Part:%s) ',%s,0,%i)", npc, par, idc,idnombreso);
3298	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
3299	db.GetErrorErrStr(msglog);
3300	errorInfo(modulo, msglog);
3301	return (false);
3302	}
3303	// Recupera el identificador del nuevo perfil software
3304	sprintf(sqlstr, "SELECT LAST_INSERT_ID() as identificador");
3305	if (!db.Execute(sqlstr, tbl)) { // Error al leer
3306	tbl.GetErrorErrStr(msglog);
3307	errorInfo(modulo, msglog);
3308	liberaMemoria(sqlstr);
3309	return (false);
3310	}
3311	if (!tbl.ISEOF()) { // Si existe registro
3312	if (!tbl.Get("identificador", nwidperfilsoft)) {
3313	tbl.GetErrorErrStr(msglog);
3314	errorInfo(modulo, msglog);
3315	liberaMemoria(sqlstr);
3316	return (false);
3317	}
3318	}
3319	// Crea la relación entre perfiles y componenetes software
3320	for (i = 0; i < lon; i++) {
3321	sprintf(sqlstr, "INSERT perfilessoft_softwares (idperfilsoft,idsoftware)"
3322	" VALUES(%d,%d)", nwidperfilsoft, tbidsoftware[i]);
3323	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
3324	db.GetErrorErrStr(msglog);
3325	errorInfo(modulo, msglog);
3326	liberaMemoria(sqlstr);
3327	return (false);
3328	}
3329	}
3330	} else { // Existe un perfil con todos esos componentes
3331	if (!tbl.Get("idperfilsoft", nwidperfilsoft)) {
3332	tbl.GetErrorErrStr(msglog);
3333	errorInfo(modulo, msglog);
3334	liberaMemoria(sqlstr);
3335	return (false);
3336	}
3337	}
3338
3339	if (idperfilsoftware != nwidperfilsoft) { // No coinciden los perfiles
3340	// Actualiza el identificador del perfil software del ordenador
3341	sprintf(sqlstr, "UPDATE ordenadores_particiones SET idperfilsoft=%d,idimagen=0"
3342	" WHERE idordenador=%s AND numpar=%s", nwidperfilsoft, ido, par);
3343	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
3344	db.GetErrorErrStr(msglog);
3345	errorInfo(modulo, msglog);
3346	liberaMemoria(sqlstr);
3347	return (false);
3348	}
3349	}
3350
3351	/* DEPURACIÓN DE PERFILES SOFTWARE */
3352
3353	/* Eliminar Relación de softwares con Perfiles software que quedan húerfanos */
3354	sprintf(sqlstr, "DELETE FROM perfilessoft_softwares WHERE idperfilsoft IN "\
3355	" (SELECT idperfilsoft FROM perfilessoft WHERE idperfilsoft NOT IN"\
3356	" (SELECT DISTINCT idperfilsoft from ordenadores_particiones) AND idperfilsoft NOT IN"\
3357	" (SELECT DISTINCT idperfilsoft from imagenes))");
3358	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
3359	db.GetErrorErrStr(msglog);
3360	errorInfo(modulo, msglog);
3361	liberaMemoria(sqlstr);
3362	return (false);
3363	}
3364	/* Eliminar Perfiles software que quedan húerfanos */
3365	sprintf(sqlstr, "DELETE FROM perfilessoft WHERE idperfilsoft NOT IN"
3366	" (SELECT DISTINCT idperfilsoft from ordenadores_particiones)"\
3367	" AND idperfilsoft NOT IN"\
3368	" (SELECT DISTINCT idperfilsoft from imagenes)");
3369	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
3370	db.GetErrorErrStr(msglog);
3371	errorInfo(modulo, msglog);
3372	liberaMemoria(sqlstr);
3373	return (false);
3374	}
3375	/* Eliminar Relación de softwares con Perfiles software que quedan húerfanos */
3376	sprintf(sqlstr, "DELETE FROM perfilessoft_softwares WHERE idperfilsoft NOT IN"
3377	" (SELECT idperfilsoft from perfilessoft)");
3378	if (!db.Execute(sqlstr, tbl)) { // Error al insertar
3379	db.GetErrorErrStr(msglog);
3380	errorInfo(modulo, msglog);
3381	liberaMemoria(sqlstr);
3382	return (false);
3383	}
3384	liberaMemoria(sqlstr);
3385	return (TRUE);
3386	}
3387	// ________________________________________________________________________________________________________
3388	// Función: enviaArchivo
3389	//
3390	// Descripción:
3391	// Envia un archivo por la red, por bloques
3392	// Parámetros:
3393	// - socket_c: Socket del cliente que envió el mensaje
3394	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
3395	// Devuelve:
3396	// TRUE: Si el proceso es correcto
3397	// FALSE: En caso de ocurrir algún error
3398	// ________________________________________________________________________________________________________
3399	BOOLEAN enviaArchivo(SOCKET socket_c, TRAMA ptrTrama) {
3400	char *nfl;
3401	char modulo[] = "enviaArchivo()";
3402
3403	// Toma parámetros
3404	nfl = copiaParametro("nfl",ptrTrama); // Toma nombre completo del archivo
3405	if (!sendArchivo(socket_c, nfl)) {
3406	liberaMemoria(nfl);
3407	errorLog(modulo, 57, FALSE);
3408	return (FALSE);
3409	}
3410	liberaMemoria(nfl);
3411	return (TRUE);
3412	}
3413	// ________________________________________________________________________________________________________
3414	// Función: enviaArchivo
3415	//
3416	// Descripción:
3417	// Envia un archivo por la red, por bloques
3418	// Parámetros:
3419	// - socket_c: Socket del cliente que envió el mensaje
3420	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
3421	// Devuelve:
3422	// TRUE: Si el proceso es correcto
3423	// FALSE: En caso de ocurrir algún error
3424	// ________________________________________________________________________________________________________
3425	BOOLEAN recibeArchivo(SOCKET socket_c, TRAMA ptrTrama) {
3426	char *nfl;
3427	char modulo[] = "recibeArchivo()";
3428
3429	// Toma parámetros
3430	nfl = copiaParametro("nfl",ptrTrama); // Toma nombre completo del archivo
3431	ptrTrama->tipo = MSG_NOTIFICACION;
3432	enviaFlag(socket_c, ptrTrama);
3433	if (!recArchivo(socket_c, nfl)) {
3434	liberaMemoria(nfl);
3435	errorLog(modulo, 58, FALSE);
3436	return (FALSE);
3437	}
3438	liberaMemoria(nfl);
3439	return (TRUE);
3440	}
3441	// ________________________________________________________________________________________________________
3442	// Función: envioProgramacion
3443	//
3444	// Descripción:
3445	// Envia un comando de actualización a todos los ordenadores que han sido programados con
3446	// alguna acción para que entren en el bucle de comandos pendientes y las ejecuten
3447	// Parámetros:
3448	// - socket_c: Socket del cliente que envió el mensaje
3449	// - ptrTrama: Trama recibida por el servidor con el contenido y los parámetros
3450	// Devuelve:
3451	// TRUE: Si el proceso es correcto
3452	// FALSE: En caso de ocurrir algún error
3453	// ________________________________________________________________________________________________________
3454	BOOLEAN envioProgramacion(SOCKET socket_c, TRAMA ptrTrama)
3455	{
3456	char sqlstr[LONSQL], msglog[LONSTD];
3457	char *idp,iph[LONIP],mac[LONMAC];
3458	Database db;
3459	Table tbl;
3460	int idx,idcomando;
3461	char modulo[] = "envioProgramacion()";
3462
3463	if (!db.Open(usuario, pasguor, datasource, catalog)) { // Error de conexion
3464	errorLog(modulo, 20, FALSE);
3465	db.GetErrorErrStr(msglog);
3466	errorInfo(modulo, msglog);
3467	return (FALSE);
3468	}
3469
3470	idp = copiaParametro("idp",ptrTrama); // Toma identificador de la programación de la tabla acciones
3471
3472	sprintf(sqlstr, "SELECT ordenadores.ip,ordenadores.mac,acciones.idcomando FROM acciones "\
3473	" INNER JOIN ordenadores ON ordenadores.ip=acciones.ip"\
3474	" WHERE acciones.idprogramacion=%s",idp);
3475
3476	liberaMemoria(idp);
3477
3478	if (!db.Execute(sqlstr, tbl)) { // Error al leer
3479	errorLog(modulo, 21, FALSE);
3480	db.GetErrorErrStr(msglog);
3481	errorInfo(modulo, msglog);
3482	return (FALSE);
3483	}
3484	db.Close();
3485	if(tbl.ISEOF())
3486	return (TRUE); // No existen registros
3487
3488	/* Prepara la trama de actualizacion */
3489
3490	initParametros(ptrTrama,0);
3491	ptrTrama->tipo=MSG_COMANDO;
3492	sprintf(ptrTrama->parametros, "nfn=Actualizar\r");
3493
3494	while (!tbl.ISEOF()) { // Recorre particiones
3495	if (!tbl.Get("ip", iph)) {
3496	tbl.GetErrorErrStr(msglog);
3497	errorInfo(modulo, msglog);
3498	return (FALSE);
3499	}
3500	if (!tbl.Get("idcomando", idcomando)) {
3501	tbl.GetErrorErrStr(msglog);
3502	errorInfo(modulo, msglog);
3503	return (FALSE);
3504	}
3505	if(idcomando==1){ // Arrancar
3506	if (!tbl.Get("mac", mac)) {
3507	tbl.GetErrorErrStr(msglog);
3508	errorInfo(modulo, msglog);
3509	return (FALSE);
3510	}
3511
3512	// Se manda por broadcast y por unicast
3513	if (!Levanta(iph, mac, (char*)"1")) {
3514	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
3515	errorInfo(modulo, msglog);
3516	return (FALSE);
3517	}
3518
3519	if (!Levanta(iph, mac, (char*)"2")) {
3520	sprintf(msglog, "%s:%s", tbErrores[32], modulo);
3521	errorInfo(modulo, msglog);
3522	return (FALSE);
3523	}
3524
3525	}
3526	if (clienteDisponible(iph, &idx)) { // Si el cliente puede recibir comandos
3527	strcpy(tbsockets[idx].estado, CLIENTE_OCUPADO); // Actualiza el estado del cliente
3528	if (!mandaTrama(&tbsockets[idx].sock, ptrTrama)) {
3529	errorLog(modulo, 26, FALSE);
3530	return (FALSE);
3531	}
3532	//close(tbsockets[idx].sock); // Cierra el socket del cliente hasta nueva disponibilidad
3533	}
3534	tbl.MoveNext();
3535	}
3536	return (TRUE); // No existen registros
3537	}
3538	// ********************************************************************************************************
3539	// PROGRAMA PRINCIPAL (SERVICIO)
3540	// ********************************************************************************************************
3541	int main(int argc, char *argv[]) {
3542	int i;
3543	SOCKET socket_s; // Socket donde escucha el servidor
3544	SOCKET socket_c; // Socket de los clientes que se conectan
3545	socklen_t iAddrSize;
3546	struct sockaddr_in local, cliente;
3547	char modulo[] = "main()";
3548
3549	/*--------------------------------------------------------------------------------------------------------
3550	Validación de parámetros de ejecución y lectura del fichero de configuración del servicio
3551	---------------------------------------------------------------------------------------------------------*/
3552	if (!validacionParametros(argc, argv, 1)) // Valida parámetros de ejecución
3553	exit(EXIT_FAILURE);
3554
3555	if (!tomaConfiguracion(szPathFileCfg)) { // Toma parametros de configuracion
3556	exit(EXIT_FAILURE);
3557	}
3558	/*--------------------------------------------------------------------------------------------------------
3559	Carga del catálogo de funciones que procesan las tramas (referencia directa por puntero a función)
3560	---------------------------------------------------------------------------------------------------------*/
3561	int cf = 0;
3562
3563	strcpy(tbfuncionesServer[cf].nf, "Sondeo");
3564	tbfuncionesServer[cf++].fptr = &Sondeo;
3565	strcpy(tbfuncionesServer[cf].nf, "respuestaSondeo");
3566	tbfuncionesServer[cf++].fptr = &respuestaSondeo;
3567
3568	strcpy(tbfuncionesServer[cf].nf, "ConsolaRemota");
3569	tbfuncionesServer[cf++].fptr = &ConsolaRemota;
3570
3571	strcpy(tbfuncionesServer[cf].nf, "EcoConsola");
3572	tbfuncionesServer[cf++].fptr = &EcoConsola;
3573
3574	strcpy(tbfuncionesServer[cf].nf, "Actualizar");
3575	tbfuncionesServer[cf++].fptr = &Actualizar;
3576
3577	strcpy(tbfuncionesServer[cf].nf, "Purgar");
3578	tbfuncionesServer[cf++].fptr = &Purgar;
3579
3580	strcpy(tbfuncionesServer[cf].nf, "InclusionCliente");
3581	tbfuncionesServer[cf++].fptr = &InclusionCliente;
3582
3583	strcpy(tbfuncionesServer[cf].nf, "InclusionClienteWinLnx");
3584	tbfuncionesServer[cf++].fptr = &InclusionClienteWinLnx;
3585
3586	strcpy(tbfuncionesServer[cf].nf, "AutoexecCliente");
3587	tbfuncionesServer[cf++].fptr = &AutoexecCliente;
3588
3589	strcpy(tbfuncionesServer[cf].nf, "ComandosPendientes");
3590	tbfuncionesServer[cf++].fptr = &ComandosPendientes;
3591
3592	strcpy(tbfuncionesServer[cf].nf, "DisponibilidadComandos");
3593	tbfuncionesServer[cf++].fptr = &DisponibilidadComandos;
3594
3595	strcpy(tbfuncionesServer[cf].nf, "Arrancar");
3596	tbfuncionesServer[cf++].fptr = &Arrancar;
3597	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_Arrancar");
3598	tbfuncionesServer[cf++].fptr = &RESPUESTA_Arrancar;
3599
3600	strcpy(tbfuncionesServer[cf].nf, "Apagar");
3601	tbfuncionesServer[cf++].fptr = &Apagar;
3602	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_Apagar");
3603	tbfuncionesServer[cf++].fptr = &RESPUESTA_Apagar;
3604
3605	strcpy(tbfuncionesServer[cf].nf, "Reiniciar");
3606	tbfuncionesServer[cf++].fptr = &Reiniciar;
3607	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_Reiniciar");
3608	tbfuncionesServer[cf++].fptr = &RESPUESTA_Reiniciar;
3609
3610	strcpy(tbfuncionesServer[cf].nf, "IniciarSesion");
3611	tbfuncionesServer[cf++].fptr = &IniciarSesion;
3612	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_IniciarSesion");
3613	tbfuncionesServer[cf++].fptr = &RESPUESTA_IniciarSesion;
3614
3615	strcpy(tbfuncionesServer[cf].nf, "CrearImagen");
3616	tbfuncionesServer[cf++].fptr = &CrearImagen;
3617	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_CrearImagen");
3618	tbfuncionesServer[cf++].fptr = &RESPUESTA_CrearImagen;
3619
3620	strcpy(tbfuncionesServer[cf].nf, "CrearImagenBasica");
3621	tbfuncionesServer[cf++].fptr = &CrearImagenBasica;
3622	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_CrearImagenBasica");
3623	tbfuncionesServer[cf++].fptr = &RESPUESTA_CrearImagenBasica;
3624
3625	strcpy(tbfuncionesServer[cf].nf, "CrearSoftIncremental");
3626	tbfuncionesServer[cf++].fptr = &CrearSoftIncremental;
3627	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_CrearSoftIncremental");
3628	tbfuncionesServer[cf++].fptr = &RESPUESTA_CrearSoftIncremental;
3629
3630	strcpy(tbfuncionesServer[cf].nf, "RestaurarImagen");
3631	tbfuncionesServer[cf++].fptr = &RestaurarImagen;
3632	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_RestaurarImagen");
3633	tbfuncionesServer[cf++].fptr = &RESPUESTA_RestaurarImagen;
3634
3635	strcpy(tbfuncionesServer[cf].nf, "RestaurarImagenBasica");
3636	tbfuncionesServer[cf++].fptr = &RestaurarImagenBasica;
3637	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_RestaurarImagenBasica");
3638	tbfuncionesServer[cf++].fptr = &RESPUESTA_RestaurarImagenBasica;
3639
3640	strcpy(tbfuncionesServer[cf].nf, "RestaurarSoftIncremental");
3641	tbfuncionesServer[cf++].fptr = &RestaurarSoftIncremental;
3642	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_RestaurarSoftIncremental");
3643	tbfuncionesServer[cf++].fptr = &RESPUESTA_RestaurarSoftIncremental;
3644
3645	strcpy(tbfuncionesServer[cf].nf, "Configurar");
3646	tbfuncionesServer[cf++].fptr = &Configurar;
3647	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_Configurar");
3648	tbfuncionesServer[cf++].fptr = &RESPUESTA_Configurar;
3649
3650	strcpy(tbfuncionesServer[cf].nf, "EjecutarScript");
3651	tbfuncionesServer[cf++].fptr = &EjecutarScript;
3652	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_EjecutarScript");
3653	tbfuncionesServer[cf++].fptr = &RESPUESTA_EjecutarScript;
3654
3655	strcpy(tbfuncionesServer[cf].nf, "InventarioHardware");
3656	tbfuncionesServer[cf++].fptr = &InventarioHardware;
3657	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_InventarioHardware");
3658	tbfuncionesServer[cf++].fptr = &RESPUESTA_InventarioHardware;
3659
3660	strcpy(tbfuncionesServer[cf].nf, "InventarioSoftware");
3661	tbfuncionesServer[cf++].fptr = &InventarioSoftware;
3662	strcpy(tbfuncionesServer[cf].nf, "RESPUESTA_InventarioSoftware");
3663	tbfuncionesServer[cf++].fptr = &RESPUESTA_InventarioSoftware;
3664
3665	strcpy(tbfuncionesServer[cf].nf, "enviaArchivo");
3666	tbfuncionesServer[cf++].fptr = &enviaArchivo;
3667
3668	strcpy(tbfuncionesServer[cf].nf, "recibeArchivo");
3669	tbfuncionesServer[cf++].fptr = &recibeArchivo;
3670
3671	strcpy(tbfuncionesServer[cf].nf, "envioProgramacion");
3672	tbfuncionesServer[cf++].fptr = &envioProgramacion;
3673
3674	/*--------------------------------------------------------------------------------------------------------
3675	// Inicializa array de información de los clientes
3676	---------------------------------------------------------------------------------------------------------*/
3677	for (i = 0; i < MAXIMOS_CLIENTES; i++) {
3678	tbsockets[i].ip[0] = '\0';
3679	tbsockets[i].sock = INVALID_SOCKET;
3680	}
3681	/*--------------------------------------------------------------------------------------------------------
3682	Creación y configuración del socket del servicio
3683	---------------------------------------------------------------------------------------------------------*/
3684	socket_s = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP); // Crea socket del servicio
3685	if (socket_s == SOCKET_ERROR) { // Error al crear el socket del servicio
3686	errorLog(modulo, 13, TRUE);
3687	exit(EXIT_FAILURE);
3688	}
3689
3690	local.sin_addr.s_addr = htonl(INADDR_ANY); // Configura el socket del servicio
3691	local.sin_family = AF_INET;
3692	local.sin_port = htons(atoi(puerto));
3693
3694	if (bind(socket_s, (struct sockaddr *) &local, sizeof(local))
3695	== SOCKET_ERROR) { // Enlaza socket
3696	errorLog(modulo, 14, TRUE);
3697	exit(EXIT_FAILURE);
3698	}
3699
3700	listen(socket_s, 250); // Pone a escuchar al socket
3701	iAddrSize = sizeof(cliente);
3702	/*--------------------------------------------------------------------------------------------------------
3703	Bucle para acceptar conexiones
3704	---------------------------------------------------------------------------------------------------------*/
3705	infoLog(1); // Inicio de sesión
3706	while (TRUE) {
3707	socket_c = accept(socket_s, (struct sockaddr *) &cliente, &iAddrSize);
3708	if (socket_c == INVALID_SOCKET) {
3709	errorLog(modulo, 15, TRUE);
3710	exit(EXIT_FAILURE);
3711	}
3712	swcSocket = FALSE; // Por defecto se cerrara el socket de cliente después del anális de la trama
3713	if (!gestionaTrama(&socket_c)) {
3714	errorLog(modulo, 39, TRUE);
3715	//close(socket_c);/tmp/
3716	//break;
3717	}
3718	if (!swcSocket) // Sólo se cierra cuando el cliente NO espera comandos ineractivos
3719	close(socket_c);
3720	}
3721	/*--------------------------------------------------------------------------------------------------------
3722	Fin del servicio
3723	---------------------------------------------------------------------------------------------------------*/
3724	close(socket_s);
3725	exit(EXIT_SUCCESS);
3726	}

Note: See TracBrowser for help on using the repository browser.

Context Navigation

source: admin/Sources/Services/ogAdmServer/sources/ogAdmServer.cpp @ d8f592d

Download in other formats: