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 | } |
---|