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