+int leer_tipo_arbol(char *s) {
+ if (strcmp(s, "B") == 0) return 0;
+ if (strcmp(s, "BA") == 0) return 1;
+ if (strcmp(s, "BP") == 0) return 2;
+
+ /* Por defecto es un B */
+ return 0;
+}
+
+void leer_param_ind_art(t_Parametros *param, xmlNode *padre)
+{
+ xmlNode *node;
+ char *tmp, *nombre;
+ node = padre->children;
+ while (node) {
+ if (node->type == XML_ELEMENT_NODE) {
+ if (strcmp(node->name, "indice")==0) {
+ PERR(" LEO INDICE");
+ nombre = xml_get_prop(node, "nombre");
+
+ if (strcmp(nombre, "codigo")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_art[0].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_art[0].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "desc")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_art[1].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_art[1].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "presentacion")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_art[2].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_art[2].tam_bloque = atoi(tmp);
+ free(tmp);
+ }
+ PERR(" LISTO");
+ free(nombre);
+ }
+ }
+ node = node->next;
+ }
+}
+
+void leer_param_ind_fact(t_Parametros *param, xmlNode *padre)
+{
+ xmlNode *node;
+ char *tmp, *nombre;
+ node = padre->children;
+ while (node) {
+ if (node->type == XML_ELEMENT_NODE) {
+ if (strcmp(node->name, "indice")==0) {
+ PERR(" LEO INDICE");
+ nombre = xml_get_prop(node, "nombre");
+
+ if (strcmp(nombre, "numero")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[0].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[0].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "emision")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[1].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[1].tam_bloque = atoi(tmp);
+ free(tmp);
+ }
+ PERR(" LISTO");
+ free(nombre);
+ }
+ }
+ node = node->next;
+ }
+}
+