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