Context Navigation

source: ogServer-Git/sources/ogAdmServer.c @ f6f1f18

Last change on this file since f6f1f18 was 48de515, checked in by OpenGnSys Support Team <soporte-og@…>, 4 years ago

#971 split socket core logic and main files

Extract socket core and main from ogAdmServer file.

Property mode set to 100644

File size: 42.9 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 "dbi.h"
11	#include "utils.h"
12	#include "list.h"
13	#include "rest.h"
14	#include "client.h"
15	#include "json.h"
16	#include "schedule.h"
17	#include <syslog.h>
18	#include <sys/ioctl.h>
19	#include <ifaddrs.h>
20	#include <sys/types.h>
21	#include <sys/stat.h>
22	#include <fcntl.h>
23	#include <jansson.h>
24	#include <time.h>
25
26	static char usuario[LONPRM]; // Usuario de acceso a la base de datos
27	static char pasguor[LONPRM]; // Password del usuario
28	static char datasource[LONPRM]; // Dirección IP del gestor de base de datos
29	static char catalog[LONPRM]; // Nombre de la base de datos
30	static char interface[LONPRM]; // Interface name
31	char auth_token[LONPRM]; // API token
32
33	struct og_dbi_config dbi_config = {
34	.user = usuario,
35	.passwd = pasguor,
36	.host = datasource,
37	.database = catalog,
38	};
39
40	//________________________________________________________________________________________________________
41	// Función: tomaConfiguracion
42	//
43	// Descripción:
44	// Lee el fichero de configuración del servicio
45	// Parámetros:
46	// filecfg : Ruta completa al fichero de configuración
47	// Devuelve:
48	// true: Si el proceso es correcto
49	// false: En caso de ocurrir algún error
50	//________________________________________________________________________________________________________
51	bool tomaConfiguracion(const char *filecfg)
52	{
53	char buf[1024], *line;
54	char key, value;
55	FILE *fcfg;
56
57	if (filecfg == NULL \|\| strlen(filecfg) == 0) {
58	syslog(LOG_ERR, "No configuration file has been specified\n");
59	return false;
60	}
61
62	fcfg = fopen(filecfg, "rt");
63	if (fcfg == NULL) {
64	syslog(LOG_ERR, "Cannot open configuration file `%s'\n",
65	filecfg);
66	return false;
67	}
68
69	servidoradm[0] = '\0'; //inicializar variables globales
70
71	line = fgets(buf, sizeof(buf), fcfg);
72	while (line != NULL) {
73	const char *delim = "=";
74
75	line[strlen(line) - 1] = '\0';
76
77	key = strtok(line, delim);
78	value = strtok(NULL, delim);
79
80	if (!strcmp(str_toupper(key), "SERVIDORADM"))
81	snprintf(servidoradm, sizeof(servidoradm), "%s", value);
82	else if (!strcmp(str_toupper(key), "PUERTO"))
83	snprintf(puerto, sizeof(puerto), "%s", value);
84	else if (!strcmp(str_toupper(key), "USUARIO"))
85	snprintf(usuario, sizeof(usuario), "%s", value);
86	else if (!strcmp(str_toupper(key), "PASSWORD"))
87	snprintf(pasguor, sizeof(pasguor), "%s", value);
88	else if (!strcmp(str_toupper(key), "DATASOURCE"))
89	snprintf(datasource, sizeof(datasource), "%s", value);
90	else if (!strcmp(str_toupper(key), "CATALOG"))
91	snprintf(catalog, sizeof(catalog), "%s", value);
92	else if (!strcmp(str_toupper(key), "INTERFACE"))
93	snprintf(interface, sizeof(interface), "%s", value);
94	else if (!strcmp(str_toupper(key), "APITOKEN"))
95	snprintf(auth_token, sizeof(auth_token), "%s", value);
96
97	line = fgets(buf, sizeof(buf), fcfg);
98	}
99
100	fclose(fcfg);
101
102	if (!servidoradm[0]) {
103	syslog(LOG_ERR, "Missing SERVIDORADM in configuration file\n");
104	return false;
105	}
106	if (!puerto[0]) {
107	syslog(LOG_ERR, "Missing PUERTO in configuration file\n");
108	return false;
109	}
110	if (!usuario[0]) {
111	syslog(LOG_ERR, "Missing USUARIO in configuration file\n");
112	return false;
113	}
114	if (!pasguor[0]) {
115	syslog(LOG_ERR, "Missing PASSWORD in configuration file\n");
116	return false;
117	}
118	if (!datasource[0]) {
119	syslog(LOG_ERR, "Missing DATASOURCE in configuration file\n");
120	return false;
121	}
122	if (!catalog[0]) {
123	syslog(LOG_ERR, "Missing CATALOG in configuration file\n");
124	return false;
125	}
126	if (!interface[0])
127	syslog(LOG_ERR, "Missing INTERFACE in configuration file\n");
128
129	return true;
130	}
131
132	#define OG_CMD_MAXLEN 64
133
134	// ________________________________________________________________________________________________________
135	// Función: clienteDisponible
136	//
137	// Descripción:
138	// Comprueba la disponibilidad del cliente para recibir comandos interactivos
139	// Parametros:
140	// - ip : La ip del cliente a buscar
141	// - idx: (Salida) Indice que ocupa el cliente, de estar ya registrado
142	// Devuelve:
143	// true: Si el cliente está disponible
144	// false: En caso contrario
145	// ________________________________________________________________________________________________________
146	bool clienteDisponible(char ip, int idx)
147	{
148	int estado;
149
150	if (clienteExistente(ip, idx)) {
151	estado = strcmp(tbsockets[*idx].estado, CLIENTE_OCUPADO); // Cliente ocupado
152	if (estado == 0)
153	return false;
154
155	estado = strcmp(tbsockets[*idx].estado, CLIENTE_APAGADO); // Cliente apagado
156	if (estado == 0)
157	return false;
158
159	estado = strcmp(tbsockets[*idx].estado, CLIENTE_INICIANDO); // Cliente en proceso de inclusión
160	if (estado == 0)
161	return false;
162
163	return true; // En caso contrario el cliente está disponible
164	}
165	return false; // Cliente no está registrado en el sistema
166	}
167	// ________________________________________________________________________________________________________
168	// Función: clienteExistente
169	//
170	// Descripción:
171	// Comprueba si el cliente está registrado en la tabla de socket del sistema
172	// Parametros:
173	// - ip : La ip del cliente a buscar
174	// - idx:(Salida) Indice que ocupa el cliente, de estar ya registrado
175	// Devuelve:
176	// true: Si el cliente está registrado
177	// false: En caso contrario
178	// ________________________________________________________________________________________________________
179	bool clienteExistente(char ip, int idx)
180	{
181	int i;
182	for (i = 0; i < MAXIMOS_CLIENTES; i++) {
183	if (contieneIP(ip, tbsockets[i].ip)) { // Si existe la IP en la cadena
184	*idx = i;
185	return true;
186	}
187	}
188	return false;
189	}
190	// ________________________________________________________________________________________________________
191	// Función: actualizaConfiguracion
192	//
193	// Descripción:
194	// Esta función actualiza la base de datos con la configuracion de particiones de un cliente
195	// Parámetros:
196	// - db: Objeto base de datos (ya operativo)
197	// - tbl: Objeto tabla
198	// - cfg: cadena con una Configuración
199	// - ido: Identificador del ordenador cliente
200	// Devuelve:
201	// true: Si el proceso es correcto
202	// false: En caso de ocurrir algún error
203	// Especificaciones:
204	// Los parametros de la configuración son:
205	// par= Número de partición
206	// cpt= Codigo o tipo de partición
207	// sfi= Sistema de ficheros que está implementado en la partición
208	// soi= Nombre del sistema de ficheros instalado en la partición
209	// tam= Tamaño de la partición
210	// ________________________________________________________________________________________________________
211	bool actualizaConfiguracion(struct og_dbi dbi, char cfg, int ido)
212	{
213	int lon, p, c,i, dato, swu, idsoi, idsfi,k;
214	char ptrPar[MAXPAR], ptrCfg[7], *ptrDual[2], tbPar[LONSTD];
215	char ser, disk, par, cpt, sfi, soi, tam, uso; // Parametros de configuración.
216	dbi_result result, result_update;
217	const char *msglog;
218
219	lon = 0;
220	p = splitCadena(ptrPar, cfg, '\n');
221	for (i = 0; i < p; i++) {
222	c = splitCadena(ptrCfg, ptrPar[i], '\t');
223
224	// Si la 1ª línea solo incluye el número de serie del equipo; actualizar BD.
225	if (i == 0 && c == 1) {
226	splitCadena(ptrDual, ptrCfg[0], '=');
227	ser = ptrDual[1];
228	if (strlen(ser) > 0) {
229	// Solo actualizar si número de serie no existía.
230	result = dbi_conn_queryf(dbi->conn,
231	"UPDATE ordenadores SET numserie='%s'"
232	" WHERE idordenador=%d AND numserie IS NULL",
233	ser, ido);
234	if (!result) {
235	dbi_conn_error(dbi->conn, &msglog);
236	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
237	__func__, __LINE__, msglog);
238	return false;
239	}
240	dbi_result_free(result);
241	}
242	continue;
243	}
244
245	// Distribución de particionado.
246	disk = par = cpt = sfi = soi = tam = uso = NULL;
247
248	splitCadena(ptrDual, ptrCfg[0], '=');
249	disk = ptrDual[1]; // Número de disco
250
251	splitCadena(ptrDual, ptrCfg[1], '=');
252	par = ptrDual[1]; // Número de partición
253
254	k=splitCadena(ptrDual, ptrCfg[2], '=');
255	if(k==2){
256	cpt = ptrDual[1]; // Código de partición
257	}else{
258	cpt = (char*)"0";
259	}
260
261	k=splitCadena(ptrDual, ptrCfg[3], '=');
262	if(k==2){
263	sfi = ptrDual[1]; // Sistema de ficheros
264	/* Comprueba existencia del s0xistema de ficheros instalado */
265	idsfi = checkDato(dbi, sfi, "sistemasficheros", "descripcion","idsistemafichero");
266	}
267	else
268	idsfi=0;
269
270	k=splitCadena(ptrDual, ptrCfg[4], '=');
271	if(k==2){ // Sistema operativo detecdtado
272	soi = ptrDual[1]; // Nombre del S.O. instalado
273	/* Comprueba existencia del sistema operativo instalado */
274	idsoi = checkDato(dbi, soi, "nombresos", "nombreso", "idnombreso");
275	}
276	else
277	idsoi=0;
278
279	splitCadena(ptrDual, ptrCfg[5], '=');
280	tam = ptrDual[1]; // Tamaño de la partición
281
282	splitCadena(ptrDual, ptrCfg[6], '=');
283	uso = ptrDual[1]; // Porcentaje de uso del S.F.
284
285	lon += sprintf(tbPar + lon, "(%s, %s),", disk, par);
286
287	result = dbi_conn_queryf(dbi->conn,
288	"SELECT numdisk, numpar, tamano, uso, idsistemafichero, idnombreso"
289	" FROM ordenadores_particiones"
290	" WHERE idordenador=%d AND numdisk=%s AND numpar=%s",
291	ido, disk, par);
292	if (!result) {
293	dbi_conn_error(dbi->conn, &msglog);
294	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
295	__func__, __LINE__, msglog);
296	return false;
297	}
298	if (!dbi_result_next_row(result)) {
299	result_update = dbi_conn_queryf(dbi->conn,
300	"INSERT INTO ordenadores_particiones(idordenador,numdisk,numpar,codpar,tamano,uso,idsistemafichero,idnombreso,idimagen)"
301	" VALUES(%d,%s,%s,0x%s,%s,%s,%d,%d,0)",
302	ido, disk, par, cpt, tam, uso, idsfi, idsoi);
303	if (!result_update) {
304	dbi_conn_error(dbi->conn, &msglog);
305	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
306	__func__, __LINE__, msglog);
307	return false;
308	}
309	dbi_result_free(result_update);
310
311	} else { // Existe el registro
312	swu = true; // Se supone que algún dato ha cambiado
313
314	dato = dbi_result_get_uint(result, "tamano");
315	if (atoi(tam) == dato) {// Parámetro tamaño igual al almacenado
316	dato = dbi_result_get_uint(result, "idsistemafichero");
317	if (idsfi == dato) {// Parámetro sistema de fichero igual al almacenado
318	dato = dbi_result_get_uint(result, "idnombreso");
319	if (idsoi == dato) {// Parámetro sistema de fichero distinto al almacenado
320	swu = false; // Todos los parámetros de la partición son iguales, no se actualiza
321	}
322	}
323	}
324	if (swu) { // Hay que actualizar los parámetros de la partición
325	result_update = dbi_conn_queryf(dbi->conn,
326	"UPDATE ordenadores_particiones SET "
327	" codpar=0x%s,"
328	" tamano=%s,"
329	" uso=%s,"
330	" idsistemafichero=%d,"
331	" idnombreso=%d,"
332	" idimagen=0,"
333	" idperfilsoft=0,"
334	" fechadespliegue=NULL"
335	" WHERE idordenador=%d AND numdisk=%s AND numpar=%s",
336	cpt, tam, uso, idsfi, idsoi, ido, disk, par);
337	} else { // Actualizar porcentaje de uso.
338	result_update = dbi_conn_queryf(dbi->conn,
339	"UPDATE ordenadores_particiones SET "
340	" codpar=0x%s,"
341	" uso=%s"
342	" WHERE idordenador=%d AND numdisk=%s AND numpar=%s",
343	cpt, uso, ido, disk, par);
344	}
345	if (!result_update) {
346	dbi_conn_error(dbi->conn, &msglog);
347	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
348	__func__, __LINE__, msglog);
349	return false;
350	}
351
352	dbi_result_free(result_update);
353	}
354	dbi_result_free(result);
355	}
356	lon += sprintf(tbPar + lon, "(0,0)");
357	// Eliminar particiones almacenadas que ya no existen
358	result_update = dbi_conn_queryf(dbi->conn,
359	"DELETE FROM ordenadores_particiones WHERE idordenador=%d AND (numdisk, numpar) NOT IN (%s)",
360	ido, tbPar);
361	if (!result_update) {
362	dbi_conn_error(dbi->conn, &msglog);
363	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
364	__func__, __LINE__, msglog);
365	return false;
366	}
367	dbi_result_free(result_update);
368
369	return true;
370	}
371	// ________________________________________________________________________________________________________
372	// Función: checkDato
373	//
374	// Descripción:
375	// Esta función comprueba si existe un dato en una tabla y si no es así lo incluye. devuelve en
376	// cualquier caso el identificador del registro existenet o del insertado
377	// Parámetros:
378	// - db: Objeto base de datos (ya operativo)
379	// - tbl: Objeto tabla
380	// - dato: Dato
381	// - tabla: Nombre de la tabla
382	// - nomdato: Nombre del dato en la tabla
383	// - nomidentificador: Nombre del identificador en la tabla
384	// Devuelve:
385	// El identificador del registro existente o el del insertado
386	//
387	// Especificaciones:
388	// En caso de producirse algún error se devuelve el valor 0
389	// ________________________________________________________________________________________________________
390
391	int checkDato(struct og_dbi dbi, char dato, const char *tabla,
392	const char nomdato, const char nomidentificador)
393	{
394	const char *msglog;
395	int identificador;
396	dbi_result result;
397
398	if (strlen(dato) == 0)
399	return (0); // EL dato no tiene valor
400	result = dbi_conn_queryf(dbi->conn,
401	"SELECT %s FROM %s WHERE %s ='%s'", nomidentificador,
402	tabla, nomdato, dato);
403
404	// Ejecuta consulta
405	if (!result) {
406	dbi_conn_error(dbi->conn, &msglog);
407	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
408	__func__, __LINE__, msglog);
409	return (0);
410	}
411	if (!dbi_result_next_row(result)) { // Software NO existente
412	dbi_result_free(result);
413
414	result = dbi_conn_queryf(dbi->conn,
415	"INSERT INTO %s (%s) VALUES('%s')", tabla, nomdato, dato);
416	if (!result) {
417	dbi_conn_error(dbi->conn, &msglog);
418	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
419	__func__, __LINE__, msglog);
420	return (0);
421	}
422	// Recupera el identificador del software
423	identificador = dbi_conn_sequence_last(dbi->conn, NULL);
424	} else {
425	identificador = dbi_result_get_uint(result, nomidentificador);
426	}
427	dbi_result_free(result);
428
429	return (identificador);
430	}
431
432	// ________________________________________________________________________________________________________
433	// Función: Levanta
434	//
435	// Descripción:
436	// Enciende ordenadores a través de la red cuyas macs se pasan como parámetro
437	// Parámetros:
438	// - iph: Cadena de direcciones ip separadas por ";"
439	// - mac: Cadena de direcciones mac separadas por ";"
440	// - mar: Método de arranque (1=Broadcast, 2=Unicast)
441	// Devuelve:
442	// true: Si el proceso es correcto
443	// false: En caso de ocurrir algún error
444	// ________________________________________________________________________________________________________
445
446	bool Levanta(char ptrIP[], char ptrMacs[], int lon, char *mar)
447	{
448	unsigned int on = 1;
449	struct sockaddr_in local;
450	int i, res;
451	int s;
452
453	/* Creación de socket para envío de magig packet */
454	s = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
455	if (s < 0) {
456	syslog(LOG_ERR, "cannot create socket for magic packet\n");
457	return false;
458	}
459	res = setsockopt(s, SOL_SOCKET, SO_BROADCAST, (unsigned int *) &on,
460	sizeof(on));
461	if (res < 0) {
462	syslog(LOG_ERR, "cannot set broadcast socket\n");
463	return false;
464	}
465	memset(&local, 0, sizeof(local));
466	local.sin_family = AF_INET;
467	local.sin_port = htons(PUERTO_WAKEUP);
468	local.sin_addr.s_addr = htonl(INADDR_ANY);
469
470	for (i = 0; i < lon; i++) {
471	if (!WakeUp(s, ptrIP[i], ptrMacs[i], mar)) {
472	syslog(LOG_ERR, "problem sending magic packet\n");
473	close(s);
474	return false;
475	}
476	}
477	close(s);
478	return true;
479	}
480
481	#define OG_WOL_SEQUENCE 6
482	#define OG_WOL_MACADDR_LEN 6
483	#define OG_WOL_REPEAT 16
484
485	struct wol_msg {
486	char secuencia_FF[OG_WOL_SEQUENCE];
487	char macbin[OG_WOL_REPEAT][OG_WOL_MACADDR_LEN];
488	};
489
490	static bool wake_up_broadcast(int sd, struct sockaddr_in *client,
491	const struct wol_msg *msg)
492	{
493	struct sockaddr_in *broadcast_addr;
494	struct ifaddrs ifaddr, ifa;
495	int ret;
496
497	if (getifaddrs(&ifaddr) < 0) {
498	syslog(LOG_ERR, "cannot get list of addresses\n");
499	return false;
500	}
501
502	client->sin_addr.s_addr = htonl(INADDR_BROADCAST);
503
504	for (ifa = ifaddr; ifa != NULL; ifa = ifa->ifa_next) {
505	if (ifa->ifa_addr == NULL \|\|
506	ifa->ifa_addr->sa_family != AF_INET \|\|
507	strcmp(ifa->ifa_name, interface) != 0)
508	continue;
509
510	broadcast_addr =
511	(struct sockaddr_in *)ifa->ifa_ifu.ifu_broadaddr;
512	client->sin_addr.s_addr = broadcast_addr->sin_addr.s_addr;
513	break;
514	}
515	freeifaddrs(ifaddr);
516
517	ret = sendto(sd, msg, sizeof(*msg), 0,
518	(struct sockaddr )client, sizeof(client));
519	if (ret < 0) {
520	syslog(LOG_ERR, "failed to send broadcast wol\n");
521	return false;
522	}
523
524	return true;
525	}
526
527	static bool wake_up_unicast(int sd, struct sockaddr_in *client,
528	const struct wol_msg *msg,
529	const struct in_addr *addr)
530	{
531	int ret;
532
533	client->sin_addr.s_addr = addr->s_addr;
534
535	ret = sendto(sd, msg, sizeof(*msg), 0,
536	(struct sockaddr )client, sizeof(client));
537	if (ret < 0) {
538	syslog(LOG_ERR, "failed to send unicast wol\n");
539	return false;
540	}
541
542	return true;
543	}
544
545	enum wol_delivery_type {
546	OG_WOL_BROADCAST = 1,
547	OG_WOL_UNICAST = 2
548	};
549
550	//_____________________________________________________________________________________________________________
551	// Función: WakeUp
552	//
553	// Descripción:
554	// Enciende el ordenador cuya MAC se pasa como parámetro
555	// Parámetros:
556	// - s : Socket para enviar trama magic packet
557	// - iph : Cadena con la dirección ip
558	// - mac : Cadena con la dirección mac en formato XXXXXXXXXXXX
559	// - mar: Método de arranque (1=Broadcast, 2=Unicast)
560	// Devuelve:
561	// true: Si el proceso es correcto
562	// false: En caso de ocurrir algún error
563	//_____________________________________________________________________________________________________________
564	//
565	bool WakeUp(int s, char* iph, char mac, char mar)
566	{
567	unsigned int macaddr[OG_WOL_MACADDR_LEN];
568	char HDaddress_bin[OG_WOL_MACADDR_LEN];
569	struct sockaddr_in WakeUpCliente;
570	struct wol_msg Trama_WakeUp;
571	struct in_addr addr;
572	bool ret;
573	int i;
574
575	for (i = 0; i < 6; i++) // Primera secuencia de la trama Wake Up (0xFFFFFFFFFFFF)
576	Trama_WakeUp.secuencia_FF[i] = 0xFF;
577
578	sscanf(mac, "%02x%02x%02x%02x%02x%02x",
579	&macaddr[0], &macaddr[1], &macaddr[2],
580	&macaddr[3], &macaddr[4], &macaddr[5]);
581
582	for (i = 0; i < 6; i++)
583	HDaddress_bin[i] = (uint8_t)macaddr[i];
584
585	for (i = 0; i < 16; i++) // Segunda secuencia de la trama Wake Up , repetir 16 veces su la MAC
586	memcpy(&Trama_WakeUp.macbin[i][0], &HDaddress_bin, 6);
587
588	/* Creación de socket del cliente que recibe la trama magic packet */
589	WakeUpCliente.sin_family = AF_INET;
590	WakeUpCliente.sin_port = htons((short) PUERTO_WAKEUP);
591
592	switch (atoi(mar)) {
593	case OG_WOL_BROADCAST:
594	ret = wake_up_broadcast(s, &WakeUpCliente, &Trama_WakeUp);
595	break;
596	case OG_WOL_UNICAST:
597	if (inet_aton(iph, &addr) < 0) {
598	syslog(LOG_ERR, "bad IP address for unicast wol\n");
599	ret = false;
600	break;
601	}
602	ret = wake_up_unicast(s, &WakeUpCliente, &Trama_WakeUp, &addr);
603	break;
604	default:
605	syslog(LOG_ERR, "unknown wol type\n");
606	ret = false;
607	break;
608	}
609	return ret;
610	}
611
612	// ________________________________________________________________________________________________________
613	// Función: actualizaCreacionImagen
614	//
615	// Descripción:
616	// Esta función actualiza la base de datos con el resultado de la creación de una imagen
617	// Parámetros:
618	// - db: Objeto base de datos (ya operativo)
619	// - tbl: Objeto tabla
620	// - idi: Identificador de la imagen
621	// - dsk: Disco de donde se creó
622	// - par: Partición de donde se creó
623	// - cpt: Código de partición
624	// - ipr: Ip del repositorio
625	// - ido: Identificador del ordenador modelo
626	// Devuelve:
627	// true: Si el proceso es correcto
628	// false: En caso de ocurrir algún error
629	// ________________________________________________________________________________________________________
630	bool actualizaCreacionImagen(struct og_dbi dbi, char idi, char *dsk,
631	char par, char cpt, char ipr, char ido)
632	{
633	const char *msglog;
634	dbi_result result;
635	int idr,ifs;
636
637	/* Toma identificador del repositorio correspondiente al ordenador modelo */
638	result = dbi_conn_queryf(dbi->conn,
639	"SELECT repositorios.idrepositorio"
640	" FROM repositorios"
641	" LEFT JOIN ordenadores USING (idrepositorio)"
642	" WHERE repositorios.ip='%s' AND ordenadores.idordenador=%s", ipr, ido);
643
644	if (!result) {
645	dbi_conn_error(dbi->conn, &msglog);
646	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
647	__func__, __LINE__, msglog);
648	return false;
649	}
650	if (!dbi_result_next_row(result)) {
651	syslog(LOG_ERR,
652	"repository does not exist in database (%s:%d)\n",
653	__func__, __LINE__);
654	dbi_result_free(result);
655	return false;
656	}
657	idr = dbi_result_get_uint(result, "idrepositorio");
658	dbi_result_free(result);
659
660	/* Toma identificador del perfilsoftware */
661	result = dbi_conn_queryf(dbi->conn,
662	"SELECT idperfilsoft"
663	" FROM ordenadores_particiones"
664	" WHERE idordenador=%s AND numdisk=%s AND numpar=%s", ido, dsk, par);
665
666	if (!result) {
667	dbi_conn_error(dbi->conn, &msglog);
668	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
669	__func__, __LINE__, msglog);
670	return false;
671	}
672	if (!dbi_result_next_row(result)) {
673	syslog(LOG_ERR,
674	"software profile does not exist in database (%s:%d)\n",
675	__func__, __LINE__);
676	dbi_result_free(result);
677	return false;
678	}
679	ifs = dbi_result_get_uint(result, "idperfilsoft");
680	dbi_result_free(result);
681
682	/* Actualizar los datos de la imagen */
683	result = dbi_conn_queryf(dbi->conn,
684	"UPDATE imagenes"
685	" SET idordenador=%s, numdisk=%s, numpar=%s, codpar=%s,"
686	" idperfilsoft=%d, idrepositorio=%d,"
687	" fechacreacion=NOW(), revision=revision+1"
688	" WHERE idimagen=%s", ido, dsk, par, cpt, ifs, idr, idi);
689
690	if (!result) {
691	dbi_conn_error(dbi->conn, &msglog);
692	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
693	__func__, __LINE__, msglog);
694	return false;
695	}
696	dbi_result_free(result);
697
698	/* Actualizar los datos en el cliente */
699	result = dbi_conn_queryf(dbi->conn,
700	"UPDATE ordenadores_particiones"
701	" SET idimagen=%s, revision=(SELECT revision FROM imagenes WHERE idimagen=%s),"
702	" fechadespliegue=NOW()"
703	" WHERE idordenador=%s AND numdisk=%s AND numpar=%s",
704	idi, idi, ido, dsk, par);
705	if (!result) {
706	dbi_conn_error(dbi->conn, &msglog);
707	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
708	__func__, __LINE__, msglog);
709	return false;
710	}
711	dbi_result_free(result);
712
713	return true;
714	}
715
716	// ________________________________________________________________________________________________________
717	// Función: actualizaRestauracionImagen
718	//
719	// Descripción:
720	// Esta función actualiza la base de datos con el resultado de la restauración de una imagen
721	// Parámetros:
722	// - db: Objeto base de datos (ya operativo)
723	// - tbl: Objeto tabla
724	// - idi: Identificador de la imagen
725	// - dsk: Disco de donde se restauró
726	// - par: Partición de donde se restauró
727	// - ido: Identificador del cliente donde se restauró
728	// - ifs: Identificador del perfil software contenido en la imagen
729	// Devuelve:
730	// true: Si el proceso es correcto
731	// false: En caso de ocurrir algún error
732	// ________________________________________________________________________________________________________
733	bool actualizaRestauracionImagen(struct og_dbi dbi, char idi,
734	char dsk, char par, char ido, char ifs)
735	{
736	const char *msglog;
737	dbi_result result;
738
739	/* Actualizar los datos de la imagen */
740	result = dbi_conn_queryf(dbi->conn,
741	"UPDATE ordenadores_particiones"
742	" SET idimagen=%s, idperfilsoft=%s, fechadespliegue=NOW(),"
743	" revision=(SELECT revision FROM imagenes WHERE idimagen=%s),"
744	" idnombreso=IFNULL((SELECT idnombreso FROM perfilessoft WHERE idperfilsoft=%s),0)"
745	" WHERE idordenador=%s AND numdisk=%s AND numpar=%s", idi, ifs, idi, ifs, ido, dsk, par);
746
747	if (!result) {
748	dbi_conn_error(dbi->conn, &msglog);
749	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
750	__func__, __LINE__, msglog);
751	return false;
752	}
753	dbi_result_free(result);
754
755	return true;
756	}
757	// ________________________________________________________________________________________________________
758	// Función: actualizaHardware
759	//
760	// Descripción:
761	// Actualiza la base de datos con la configuracion hardware del cliente
762	// Parámetros:
763	// - db: Objeto base de datos (ya operativo)
764	// - tbl: Objeto tabla
765	// - hrd: cadena con el inventario hardware
766	// - ido: Identificador del ordenador
767	// - npc: Nombre del ordenador
768	// - idc: Identificador del centro o Unidad organizativa
769	// ________________________________________________________________________________________________________
770	//
771	bool actualizaHardware(struct og_dbi dbi, char hrd, char ido, char npc,
772	char *idc)
773	{
774	const char *msglog;
775	int idtipohardware, idperfilhard;
776	int lon, i, j, aux;
777	bool retval;
778	char *whard;
779	int tbidhardware[MAXHARDWARE];
780	char tbHardware[MAXHARDWARE],dualHardware[2], strInt[LONINT], *idhardwares;
781	dbi_result result;
782
783	/* Toma Centro (Unidad Organizativa) */
784	result = dbi_conn_queryf(dbi->conn,
785	"SELECT idperfilhard FROM ordenadores WHERE idordenador=%s",
786	ido);
787	if (!result) {
788	dbi_conn_error(dbi->conn, &msglog);
789	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
790	__func__, __LINE__, msglog);
791	return false;
792	}
793	if (!dbi_result_next_row(result)) {
794	syslog(LOG_ERR, "client does not exist in database (%s:%d)\n",
795	__func__, __LINE__);
796	dbi_result_free(result);
797	return false;
798	}
799	idperfilhard = dbi_result_get_uint(result, "idperfilhard");
800	dbi_result_free(result);
801
802	whard=escaparCadena(hrd); // Codificar comillas simples
803	if(!whard)
804	return false;
805	/* Recorre componentes hardware*/
806	lon = splitCadena(tbHardware, whard, '\n');
807	if (lon > MAXHARDWARE)
808	lon = MAXHARDWARE; // Limita el número de componentes hardware
809	/*
810	for (i=0;i<lon;i++){
811	sprintf(msglog,"Linea de inventario: %s",tbHardware[i]);
812	RegistraLog(msglog,false);
813	}
814	*/
815	for (i = 0; i < lon; i++) {
816	splitCadena(dualHardware, rTrim(tbHardware[i]), '=');
817	//sprintf(msglog,"nemonico: %s",dualHardware[0]);
818	//RegistraLog(msglog,false);
819	//sprintf(msglog,"valor: %s",dualHardware[1]);
820	//RegistraLog(msglog,false);
821	result = dbi_conn_queryf(dbi->conn,
822	"SELECT idtipohardware,descripcion FROM tipohardwares WHERE nemonico='%s'",
823	dualHardware[0]);
824	if (!result) {
825	dbi_conn_error(dbi->conn, &msglog);
826	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
827	__func__, __LINE__, msglog);
828	return false;
829	}
830	if (!dbi_result_next_row(result)) { // Tipo de Hardware NO existente
831	dbi_result_free(result);
832	return false;
833	} else { // Tipo de Hardware Existe
834	idtipohardware = dbi_result_get_uint(result, "idtipohardware");
835	dbi_result_free(result);
836
837	result = dbi_conn_queryf(dbi->conn,
838	"SELECT idhardware FROM hardwares WHERE idtipohardware=%d AND descripcion='%s'",
839	idtipohardware, dualHardware[1]);
840
841	if (!result) {
842	dbi_conn_error(dbi->conn, &msglog);
843	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
844	__func__, __LINE__, msglog);
845	return false;
846	}
847
848	if (!dbi_result_next_row(result)) { // Hardware NO existente
849	dbi_result_free(result);
850	result = dbi_conn_queryf(dbi->conn,
851	"INSERT hardwares (idtipohardware,descripcion,idcentro,grupoid) "
852	" VALUES(%d,'%s',%s,0)", idtipohardware,
853	dualHardware[1], idc);
854	if (!result) {
855	dbi_conn_error(dbi->conn, &msglog);
856	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
857	__func__, __LINE__, msglog);
858	return false;
859	}
860
861	// Recupera el identificador del hardware
862	tbidhardware[i] = dbi_conn_sequence_last(dbi->conn, NULL);
863	} else {
864	tbidhardware[i] = dbi_result_get_uint(result, "idhardware");
865	}
866	dbi_result_free(result);
867	}
868	}
869	// Ordena tabla de identificadores para cosultar si existe un pefil con esas especificaciones
870
871	for (i = 0; i < lon - 1; i++) {
872	for (j = i + 1; j < lon; j++) {
873	if (tbidhardware[i] > tbidhardware[j]) {
874	aux = tbidhardware[i];
875	tbidhardware[i] = tbidhardware[j];
876	tbidhardware[j] = aux;
877	}
878	}
879	}
880	/* Crea cadena de identificadores de componentes hardware separados por coma */
881	sprintf(strInt, "%d", tbidhardware[lon - 1]); // Pasa a cadena el último identificador que es de mayor longitud
882	aux = strlen(strInt); // Calcula longitud de cadena para reservar espacio a todos los perfiles
883	idhardwares = calloc(1, sizeof(aux) * lon + lon);
884	if (idhardwares == NULL) {
885	syslog(LOG_ERR, "%s:%d OOM\n", __FILE__, __LINE__);
886	return false;
887	}
888	aux = sprintf(idhardwares, "%d", tbidhardware[0]);
889	for (i = 1; i < lon; i++)
890	aux += sprintf(idhardwares + aux, ",%d", tbidhardware[i]);
891
892	if (!cuestionPerfilHardware(dbi, idc, ido, idperfilhard, idhardwares,
893	npc, tbidhardware, lon)) {
894	syslog(LOG_ERR, "Problem updating client hardware\n");
895	retval=false;
896	} else {
897	retval=true;
898	}
899	free(whard);
900	free(idhardwares);
901
902	return (retval);
903	}
904	// ________________________________________________________________________________________________________
905	// Función: cuestionPerfilHardware
906	//
907	// Descripción:
908	// Comprueba existencia de perfil hardware y actualización de éste para el ordenador
909	// Parámetros:
910	// - db: Objeto base de datos (ya operativo)
911	// - tbl: Objeto tabla
912	// - idc: Identificador de la Unidad organizativa donde se encuentra el cliente
913	// - ido: Identificador del ordenador
914	// - tbidhardware: Identificador del tipo de hardware
915	// - con: Número de componentes detectados para configurar un el perfil hardware
916	// - npc: Nombre del cliente
917	// ________________________________________________________________________________________________________
918	bool cuestionPerfilHardware(struct og_dbi dbi, char idc, char *ido,
919	int idperfilhardware, char idhardwares, char npc, int *tbidhardware,
920	int lon)
921	{
922	const char *msglog;
923	dbi_result result;
924	int i;
925	int nwidperfilhard;
926
927	// Busca perfil hard del ordenador que contenga todos los componentes hardware encontrados
928	result = dbi_conn_queryf(dbi->conn,
929	"SELECT idperfilhard FROM"
930	" (SELECT perfileshard_hardwares.idperfilhard as idperfilhard,"
931	" group_concat(cast(perfileshard_hardwares.idhardware AS char( 11) )"
932	" ORDER BY perfileshard_hardwares.idhardware SEPARATOR ',' ) AS idhardwares"
933	" FROM perfileshard_hardwares"
934	" GROUP BY perfileshard_hardwares.idperfilhard) AS temp"
935	" WHERE idhardwares LIKE '%s'", idhardwares);
936
937	if (!result) {
938	dbi_conn_error(dbi->conn, &msglog);
939	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
940	__func__, __LINE__, msglog);
941	return false;
942	}
943	if (!dbi_result_next_row(result)) {
944	// No existe un perfil hardware con esos componentes de componentes hardware, lo crea
945	dbi_result_free(result);
946	result = dbi_conn_queryf(dbi->conn,
947	"INSERT perfileshard (descripcion,idcentro,grupoid)"
948	" VALUES('Perfil hardware (%s) ',%s,0)", npc, idc);
949	if (!result) {
950	dbi_conn_error(dbi->conn, &msglog);
951	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
952	__func__, __LINE__, msglog);
953	return false;
954	}
955	dbi_result_free(result);
956
957	// Recupera el identificador del nuevo perfil hardware
958	nwidperfilhard = dbi_conn_sequence_last(dbi->conn, NULL);
959
960	// Crea la relación entre perfiles y componenetes hardware
961	for (i = 0; i < lon; i++) {
962	result = dbi_conn_queryf(dbi->conn,
963	"INSERT perfileshard_hardwares (idperfilhard,idhardware)"
964	" VALUES(%d,%d)", nwidperfilhard, tbidhardware[i]);
965	if (!result) {
966	dbi_conn_error(dbi->conn, &msglog);
967	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
968	__func__, __LINE__, msglog);
969	return false;
970	}
971	dbi_result_free(result);
972	}
973	} else { // Existe un perfil con todos esos componentes
974	nwidperfilhard = dbi_result_get_uint(result, "idperfilhard");
975	dbi_result_free(result);
976	}
977	if (idperfilhardware != nwidperfilhard) { // No coinciden los perfiles
978	// Actualiza el identificador del perfil hardware del ordenador
979	result = dbi_conn_queryf(dbi->conn,
980	"UPDATE ordenadores SET idperfilhard=%d"
981	" WHERE idordenador=%s", nwidperfilhard, ido);
982	if (!result) {
983	dbi_conn_error(dbi->conn, &msglog);
984	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
985	__func__, __LINE__, msglog);
986	return false;
987	}
988	dbi_result_free(result);
989	}
990	/* Eliminar Relación de hardwares con Perfiles hardware que quedan húerfanos */
991	result = dbi_conn_queryf(dbi->conn,
992	"DELETE FROM perfileshard_hardwares WHERE idperfilhard IN "
993	" (SELECT idperfilhard FROM perfileshard WHERE idperfilhard NOT IN"
994	" (SELECT DISTINCT idperfilhard from ordenadores))");
995	if (!result) {
996	dbi_conn_error(dbi->conn, &msglog);
997	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
998	__func__, __LINE__, msglog);
999	return false;
1000	}
1001	dbi_result_free(result);
1002
1003	/* Eliminar Perfiles hardware que quedan húerfanos */
1004	result = dbi_conn_queryf(dbi->conn,
1005	"DELETE FROM perfileshard WHERE idperfilhard NOT IN"
1006	" (SELECT DISTINCT idperfilhard FROM ordenadores)");
1007	if (!result) {
1008	dbi_conn_error(dbi->conn, &msglog);
1009	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1010	__func__, __LINE__, msglog);
1011	return false;
1012	}
1013	dbi_result_free(result);
1014
1015	/* Eliminar Relación de hardwares con Perfiles hardware que quedan húerfanos */
1016	result = dbi_conn_queryf(dbi->conn,
1017	"DELETE FROM perfileshard_hardwares WHERE idperfilhard NOT IN"
1018	" (SELECT idperfilhard FROM perfileshard)");
1019	if (!result) {
1020	dbi_conn_error(dbi->conn, &msglog);
1021	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1022	__func__, __LINE__, msglog);
1023	return false;
1024	}
1025	dbi_result_free(result);
1026
1027	return true;
1028	}
1029	// ________________________________________________________________________________________________________
1030	// Función: actualizaSoftware
1031	//
1032	// Descripción:
1033	// Actualiza la base de datos con la configuración software del cliente
1034	// Parámetros:
1035	// - db: Objeto base de datos (ya operativo)
1036	// - tbl: Objeto tabla
1037	// - sft: cadena con el inventario software
1038	// - par: Número de la partición
1039	// - ido: Identificador del ordenador del cliente en la tabla
1040	// - npc: Nombre del ordenador
1041	// - idc: Identificador del centro o Unidad organizativa
1042	// Devuelve:
1043	// true: Si el proceso es correcto
1044	// false: En caso de ocurrir algún error
1045	//
1046	// Versión 1.1.0: Se incluye el sistema operativo. Autora: Irina Gómez - ETSII Universidad Sevilla
1047	// ________________________________________________________________________________________________________
1048	bool actualizaSoftware(struct og_dbi dbi, char sft, char par,char ido,
1049	char npc, char idc)
1050	{
1051	int i, j, lon, aux, idperfilsoft, idnombreso;
1052	bool retval;
1053	char *wsft;
1054	int tbidsoftware[MAXSOFTWARE];
1055	char tbSoftware[MAXSOFTWARE], strInt[LONINT], idsoftwares;
1056	const char *msglog;
1057	dbi_result result;
1058
1059	/* Toma Centro (Unidad Organizativa) y perfil software */
1060	result = dbi_conn_queryf(dbi->conn,
1061	"SELECT idperfilsoft,numpar"
1062	" FROM ordenadores_particiones"
1063	" WHERE idordenador=%s", ido);
1064	if (!result) {
1065	dbi_conn_error(dbi->conn, &msglog);
1066	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1067	__func__, __LINE__, msglog);
1068	return false;
1069	}
1070	idperfilsoft = 0; // Por defecto se supone que el ordenador no tiene aún detectado el perfil software
1071	while (dbi_result_next_row(result)) {
1072	aux = dbi_result_get_uint(result, "numpar");
1073	if (aux == atoi(par)) { // Se encuentra la partición
1074	idperfilsoft = dbi_result_get_uint(result, "idperfilsoft");
1075	break;
1076	}
1077	}
1078	dbi_result_free(result);
1079	wsft=escaparCadena(sft); // Codificar comillas simples
1080	if(!wsft)
1081	return false;
1082
1083	/* Recorre componentes software*/
1084	lon = splitCadena(tbSoftware, wsft, '\n');
1085
1086	if (lon == 0)
1087	return true; // No hay lineas que procesar
1088	if (lon > MAXSOFTWARE)
1089	lon = MAXSOFTWARE; // Limita el número de componentes software
1090
1091	idnombreso = 0;
1092	for (i = 0; i < lon; i++) {
1093	// Primera línea es el sistema operativo: se obtiene identificador
1094	if (i == 0) {
1095	idnombreso = checkDato(dbi, rTrim(tbSoftware[i]), "nombresos", "nombreso", "idnombreso");
1096	continue;
1097	}
1098
1099	result = dbi_conn_queryf(dbi->conn,
1100	"SELECT idsoftware FROM softwares WHERE descripcion ='%s'",
1101	rTrim(tbSoftware[i]));
1102	if (!result) {
1103	dbi_conn_error(dbi->conn, &msglog);
1104	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1105	__func__, __LINE__, msglog);
1106	return false;
1107	}
1108
1109	if (!dbi_result_next_row(result)) {
1110	dbi_result_free(result);
1111	result = dbi_conn_queryf(dbi->conn,
1112	"INSERT INTO softwares (idtiposoftware,descripcion,idcentro,grupoid)"
1113	" VALUES(2,'%s',%s,0)", tbSoftware[i], idc);
1114	if (!result) { // Error al insertar
1115	dbi_conn_error(dbi->conn, &msglog);
1116	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1117	__func__, __LINE__, msglog);
1118	return false;
1119	}
1120
1121	// Recupera el identificador del software
1122	tbidsoftware[i] = dbi_conn_sequence_last(dbi->conn, NULL);
1123	} else {
1124	tbidsoftware[i] = dbi_result_get_uint(result, "idsoftware");
1125	}
1126	dbi_result_free(result);
1127	}
1128
1129	// Ordena tabla de identificadores para cosultar si existe un pefil con esas especificaciones
1130
1131	for (i = 0; i < lon - 1; i++) {
1132	for (j = i + 1; j < lon; j++) {
1133	if (tbidsoftware[i] > tbidsoftware[j]) {
1134	aux = tbidsoftware[i];
1135	tbidsoftware[i] = tbidsoftware[j];
1136	tbidsoftware[j] = aux;
1137	}
1138	}
1139	}
1140	/* Crea cadena de identificadores de componentes software separados por coma */
1141	sprintf(strInt, "%d", tbidsoftware[lon - 1]); // Pasa a cadena el último identificador que es de mayor longitud
1142	aux = strlen(strInt); // Calcula longitud de cadena para reservar espacio a todos los perfiles
1143	idsoftwares = calloc(1, (sizeof(aux)+1) * lon + lon);
1144	if (idsoftwares == NULL) {
1145	syslog(LOG_ERR, "%s:%d OOM\n", __FILE__, __LINE__);
1146	return false;
1147	}
1148	aux = sprintf(idsoftwares, "%d", tbidsoftware[0]);
1149	for (i = 1; i < lon; i++)
1150	aux += sprintf(idsoftwares + aux, ",%d", tbidsoftware[i]);
1151
1152	// Comprueba existencia de perfil software y actualización de éste para el ordenador
1153	if (!cuestionPerfilSoftware(dbi, idc, ido, idperfilsoft, idnombreso, idsoftwares,
1154	npc, par, tbidsoftware, lon)) {
1155	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1156	__func__, __LINE__, msglog);
1157	retval=false;
1158	} else {
1159	retval=true;
1160	}
1161	free(wsft);
1162	free(idsoftwares);
1163
1164	return retval;
1165	}
1166	// ________________________________________________________________________________________________________
1167	// Función: CuestionPerfilSoftware
1168	//
1169	// Parámetros:
1170	// - db: Objeto base de datos (ya operativo)
1171	// - tbl: Objeto tabla
1172	// - idcentro: Identificador del centro en la tabla
1173	// - ido: Identificador del ordenador del cliente en la tabla
1174	// - idnombreso: Identificador del sistema operativo
1175	// - idsoftwares: Cadena con los identificadores de componentes software separados por comas
1176	// - npc: Nombre del ordenador del cliente
1177	// - particion: Número de la partición
1178	// - tbidsoftware: Array con los identificadores de componentes software
1179	// - lon: Número de componentes
1180	// Devuelve:
1181	// true: Si el proceso es correcto
1182	// false: En caso de ocurrir algún error
1183	//
1184	// Versión 1.1.0: Se incluye el sistema operativo. Autora: Irina Gómez - ETSII Universidad Sevilla
1185	//_________________________________________________________________________________________________________
1186	bool cuestionPerfilSoftware(struct og_dbi dbi, char idc, char *ido,
1187	int idperfilsoftware, int idnombreso,
1188	char idsoftwares, char npc, char *par,
1189	int *tbidsoftware, int lon)
1190	{
1191	int i, nwidperfilsoft;
1192	const char *msglog;
1193	dbi_result result;
1194
1195	// Busca perfil soft del ordenador que contenga todos los componentes software encontrados
1196	result = dbi_conn_queryf(dbi->conn,
1197	"SELECT idperfilsoft FROM"
1198	" (SELECT perfilessoft_softwares.idperfilsoft as idperfilsoft,"
1199	" group_concat(cast(perfilessoft_softwares.idsoftware AS char( 11) )"
1200	" ORDER BY perfilessoft_softwares.idsoftware SEPARATOR ',' ) AS idsoftwares"
1201	" FROM perfilessoft_softwares"
1202	" GROUP BY perfilessoft_softwares.idperfilsoft) AS temp"
1203	" WHERE idsoftwares LIKE '%s'", idsoftwares);
1204
1205	if (!result) {
1206	dbi_conn_error(dbi->conn, &msglog);
1207	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1208	__func__, __LINE__, msglog);
1209	return false;
1210	}
1211	if (!dbi_result_next_row(result)) { // No existe un perfil software con esos componentes de componentes software, lo crea
1212	dbi_result_free(result);
1213	result = dbi_conn_queryf(dbi->conn,
1214	"INSERT perfilessoft (descripcion, idcentro, grupoid, idnombreso)"
1215	" VALUES('Perfil Software (%s, Part:%s) ',%s,0,%i)", npc, par, idc,idnombreso);
1216	if (!result) {
1217	dbi_conn_error(dbi->conn, &msglog);
1218	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1219	__func__, __LINE__, msglog);
1220	return false;
1221	}
1222
1223	dbi_result_free(result);
1224	// Recupera el identificador del nuevo perfil software
1225	nwidperfilsoft = dbi_conn_sequence_last(dbi->conn, NULL);
1226
1227	// Crea la relación entre perfiles y componenetes software
1228	for (i = 0; i < lon; i++) {
1229	result = dbi_conn_queryf(dbi->conn,
1230	"INSERT perfilessoft_softwares (idperfilsoft,idsoftware)"
1231	" VALUES(%d,%d)", nwidperfilsoft, tbidsoftware[i]);
1232	if (!result) {
1233	dbi_conn_error(dbi->conn, &msglog);
1234	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1235	__func__, __LINE__, msglog);
1236	return false;
1237	}
1238	dbi_result_free(result);
1239	}
1240	} else { // Existe un perfil con todos esos componentes
1241	nwidperfilsoft = dbi_result_get_uint(result, "idperfilsoft");
1242	dbi_result_free(result);
1243	}
1244
1245	if (idperfilsoftware != nwidperfilsoft) { // No coinciden los perfiles
1246	// Actualiza el identificador del perfil software del ordenador
1247	result = dbi_conn_queryf(dbi->conn,
1248	"UPDATE ordenadores_particiones SET idperfilsoft=%d,idimagen=0"
1249	" WHERE idordenador=%s AND numpar=%s", nwidperfilsoft, ido, par);
1250	if (!result) { // Error al insertar
1251	dbi_conn_error(dbi->conn, &msglog);
1252	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1253	__func__, __LINE__, msglog);
1254	return false;
1255	}
1256	dbi_result_free(result);
1257	}
1258
1259	/* DEPURACIÓN DE PERFILES SOFTWARE */
1260
1261	/* Eliminar Relación de softwares con Perfiles software que quedan húerfanos */
1262	result = dbi_conn_queryf(dbi->conn,
1263	"DELETE FROM perfilessoft_softwares WHERE idperfilsoft IN "\
1264	" (SELECT idperfilsoft FROM perfilessoft WHERE idperfilsoft NOT IN"\
1265	" (SELECT DISTINCT idperfilsoft from ordenadores_particiones) AND idperfilsoft NOT IN"\
1266	" (SELECT DISTINCT idperfilsoft from imagenes))");
1267	if (!result) {
1268	dbi_conn_error(dbi->conn, &msglog);
1269	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1270	__func__, __LINE__, msglog);
1271	return false;
1272	}
1273	dbi_result_free(result),
1274	/* Eliminar Perfiles software que quedan húerfanos */
1275	result = dbi_conn_queryf(dbi->conn,
1276	"DELETE FROM perfilessoft WHERE idperfilsoft NOT IN"
1277	" (SELECT DISTINCT idperfilsoft from ordenadores_particiones)"\
1278	" AND idperfilsoft NOT IN"\
1279	" (SELECT DISTINCT idperfilsoft from imagenes)");
1280	if (!result) {
1281	dbi_conn_error(dbi->conn, &msglog);
1282	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1283	__func__, __LINE__, msglog);
1284	return false;
1285	}
1286	dbi_result_free(result),
1287
1288	/* Eliminar Relación de softwares con Perfiles software que quedan húerfanos */
1289	result = dbi_conn_queryf(dbi->conn,
1290	"DELETE FROM perfilessoft_softwares WHERE idperfilsoft NOT IN"
1291	" (SELECT idperfilsoft from perfilessoft)");
1292	if (!result) {
1293	dbi_conn_error(dbi->conn, &msglog);
1294	syslog(LOG_ERR, "failed to query database (%s:%d) %s\n",
1295	__func__, __LINE__, msglog);
1296	return false;
1297	}
1298	dbi_result_free(result);
1299
1300	return true;
1301	}

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

Download in other formats: