clish_xmlnode_t *clish_xmlnode_next_child(clish_xmlnode_t *parent,
clish_xmlnode_t *curchild)
{
node_t *roxc;
if (!parent)
return NULL;
roxc = xmlnode_to_node(curchild);
if (roxc) {
return node_to_xmlnode(roxml_get_next_sibling(roxc));
} else {
node_t *roxp = xmlnode_to_node(parent);
node_t *child = NULL;
int count;
count = roxml_get_chld_nb(roxp);
if (count)
child = roxml_get_chld(roxp, NULL, 0);
return node_to_xmlnode(child);
}
return NULL;
}
int xcf_creator(int argc, char *project_path) {
FILE* actor_src;
int j, k, n,size_of_config, size_of_partitioning, size_of_partition, size_of_papi, len, actor_num, number_of_actions, number_of_events;
int num = 0;
node_t *configuration, *partitioning, *partition, *instance, *papi, *actor_instance, *action, *event;
char *actor_path;
char *mapping_file_path;
if ((mapping_file_path = findMappingFile(project_path)) == NULL) {
printf("Unable to locate a mapping file, make sure you are using the root path to the RVC CAL generated code with the C backend\n");
exit(1);
}
int actors_num = get_actors_num(mapping_file_path);
configuration = roxml_load_doc(mapping_file_path); //a: LIBROXML node http://www.libroxml.net/public-api.html
if (configuration == NULL) {
printf("I/O error when reading mapping file.\n");
exit(1);
}
node_t *papi_root_node = roxml_add_node(configuration, 0, ROXML_ELM_NODE, "Papi", NULL);
node_t *papi_instance_node, *papi_action_node, *papi_event_node;
size_of_config = roxml_get_chld_nb(configuration); //a: This function return the number of children for a given node
if(DEBUG)printf("Found %d configuration\n", size_of_config);
partitioning = roxml_get_chld(configuration, NULL, 0); //a: This function returns a given child of a node either by name, or the nth child. (node, child name, number of the child to get)
size_of_partitioning = roxml_get_chld_nb(partitioning); //a: This function return the number of children for a given node
if(DEBUG)printf(" Found %d partitionings\n", size_of_partitioning);
for (j = 0; j < size_of_partitioning; j++) {
partition = roxml_get_chld(partitioning, NULL, j);
if(DEBUG)printf(" Found partition, id = '%s'\n", roxml_get_content(roxml_get_attr(partition, "id", 0), NULL, 0, &len));
size_of_partition = roxml_get_chld_nb(partition);
for (k = 0; k < size_of_partition; k++) {
instance = roxml_get_chld(partition, NULL, k);
if(DEBUG)printf(" Found instance, id = '%s'\n", roxml_get_content(roxml_get_attr(instance, "id", 0), NULL, 0, &len));
papi_instance_node = roxml_add_node(papi_root_node, 0, ROXML_ELM_NODE, "Instance", NULL);
roxml_add_node(papi_instance_node, 0, ROXML_ATTR_NODE, "id", roxml_get_content(roxml_get_attr(instance, "id", 0), NULL, 0, &len));
//this goes for every action in the actor:
actor_path = malloc(strlen(project_path)+strlen(roxml_get_content(roxml_get_attr(instance, "id", 0), NULL, 0, &len))+10);
strcpy(actor_path,project_path);
actor_path = strcat(actor_path,"/src/");
actor_path = strcat(actor_path,roxml_get_content(roxml_get_attr(instance, "id", 0), NULL, 0, &len));
actor_path = strcat(actor_path,".c");
printf("opening %s\n", actor_path);
actor_src = fopen(actor_path,"r");
put_actions(actor_src, papi_instance_node, papi_action_node, papi_event_node);
fclose(actor_src);
}
}
char *mapping_file_cpy = malloc(strlen(mapping_file_path)+strlen(".papi.xcf")+1);
strcpy(mapping_file_cpy, mapping_file_path);
strcat(mapping_file_cpy, ".papi.xcf");
//tmp = roxml_add_node(tmp, 0, ROXML_ELM_NODE, "price", "24");
roxml_commit_changes(configuration, mapping_file_cpy, NULL, 1);
//roxml_close(configuration);
// release the last allocated buffer even if no pointer is maintained by the user
roxml_release(RELEASE_LAST);
// here no memory leak can occur.
roxml_close(configuration);
return 0;
}
gboolean ots_load_xml_dictionary_buf(OtsArticle* Doc, const char* buffer) {
char* head_name = NULL;
node_t* stem = NULL;
node_t* pre = NULL;
node_t* post = NULL;
node_t* syno = NULL; /* synonyms */
node_t* manual = NULL; /* manual */
node_t* step1_pre = NULL; /* step1 */
node_t* step1_post = NULL; /* step1 */
node_t* parse = NULL; /* parser rules */
node_t* pbreak = NULL;
node_t* pdbreak = NULL;
node_t* tc_words = NULL; /* term count dictionary */
node_t* tf_words = NULL; /* term frequency dictionary */
OtsStemRule* rule = Doc->stem;
node_t* head = roxml_load_buf((char*)buffer);
if (head == NULL) {
fprintf(stderr, "empty document\n");
roxml_release(RELEASE_ALL);
return (FALSE);
}
#if DEBUG > 1
fprintf(stdout, "%d: %s\n", __LINE__, roxml_get_name(head, NULL, 0));
#endif /* DEBUG > 1 */
if (g_strcmp0(roxml_get_name(head, head_name, 0), (const char*)"dictionary")) {
fprintf(stderr, "%s\n", head_name);
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
stem = roxml_get_chld(head, NULL, 0);
if(stem == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&stem, (const char*)"stemmer");
parse = roxml_get_chld(head, NULL, 0);
if(parse == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&parse, (const char*)"parser");
tc_words = roxml_get_chld(head, NULL, 0);
if(tc_words == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&tc_words, (const char*)"grader-tc");
tf_words = roxml_get_chld(head, NULL, 0);
if(tf_words == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&tf_words, (const char*)"grader-tf");
pre = roxml_get_chld(stem, NULL, 0);
if(pre == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&pre, (const char*)"pre");
post = roxml_get_chld(stem, NULL, 0);
if(post == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&post, (const char*)"post");
syno = roxml_get_chld(stem, NULL, 0);
if(syno == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&syno, (const char*)"synonyms");
manual = roxml_get_chld(stem, NULL, 0);
if(manual == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&manual, (const char*)"manual");
step1_pre = roxml_get_chld(stem, NULL, 0);
if(step1_pre == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&step1_pre, (const char*)"step1_pre");
step1_post = roxml_get_chld(stem, NULL, 0);
if(step1_post == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&step1_post, (const char*)"step1_post");
pre = roxml_get_chld(pre, NULL, 0); /* point to first word */
if(pre == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_append_xml_node_contents(&rule->RemovePre, &pre);
post = roxml_get_chld(post, NULL, 0);
if(post == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_append_xml_node_contents(&rule->RemovePost, &post);
syno = roxml_get_chld(syno, NULL, 0);
if(syno == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_append_xml_node_contents(&rule->synonyms, &syno);
manual = roxml_get_chld(manual, NULL, 0);
if(manual == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_append_xml_node_contents(&rule->manual, &manual);
step1_pre = roxml_get_chld(step1_pre, NULL, 0);
if(step1_pre == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_append_xml_node_contents(&rule->step1_pre, &step1_pre);
step1_post = roxml_get_chld(step1_post, NULL, 0);
if(step1_post == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_append_xml_node_contents(&rule->step1_post, &step1_post);
pbreak = roxml_get_chld(parse, NULL, 0);
if(pbreak == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&pbreak, (const char*)"linebreak");
pdbreak = roxml_get_chld(parse, NULL, 0);
if(pdbreak == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_get_xml_node(&pdbreak, (const char*)"linedontbreak");
/*Parser break*/
pbreak = roxml_get_chld(pbreak, NULL, 0);
if(pbreak == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_append_xml_node_contents(&rule->ParserBreak, &pbreak);
/*Parser Don't break*/
pdbreak = roxml_get_chld(pdbreak, NULL, 0);
if(pdbreak == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
ots_append_xml_node_contents(&rule->ParserDontBreak, &pdbreak);
/* Term Count load dict */
tc_words = roxml_get_chld(tc_words, NULL, 0);
if(tc_words == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
#if DEBUG > 1
fprintf(stdout, "%d: %s\n", __LINE__, roxml_get_name(tc_words, NULL, 0));
fprintf(stdout, "%d: %s\n", __LINE__, roxml_get_content(tc_words, NULL, 0, NULL));
#endif /* DEBUG > 1 */
while (tc_words != NULL) {
if (!g_strcmp0(roxml_get_name(tc_words, NULL, 0), (const char*)"word")) {
Doc->dict = g_list_prepend(Doc->dict,
(gpointer)ots_new_wordEntery(
(unsigned const char*)roxml_get_content(tc_words, NULL, 0, NULL)));
}
tc_words = roxml_get_next_sibling(tc_words);
#if DEBUG > 2
fprintf(stdout, "%s\n", roxml_get_content(tc_words, NULL, 0, NULL));
#endif /* DEBUG > 2 */
}
/*Term Frequency load dict*/
tf_words = roxml_get_chld(tf_words, NULL, 0);
if(tf_words == NULL) {
roxml_release(RELEASE_ALL);
roxml_close(head);
return (FALSE);
}
#if DEBUG > 1
fprintf(stdout, "%d: %s\n", __LINE__, roxml_get_name(tf_words, NULL, 0));
fprintf(stdout, "%d: %s\n", __LINE__, roxml_get_content(tf_words, NULL, 0, NULL));
#endif /* DEBUG > 1 */
while (tf_words != NULL) {
if (!g_strcmp0(roxml_get_name(tf_words, NULL, 0), (const char*)"word")) {
const gchar* key = g_strdup(roxml_get_content(tf_words, NULL, 0, NULL));
node_t* idf_attr = roxml_get_attr(tf_words, "idf", 0);
if (idf_attr != NULL) {
const char* idf_val = roxml_get_content(idf_attr, NULL, 0, NULL);
if (idf_val != NULL) {
#if DEBUG > 3
fprintf(stdout, "%s\n", idf_val);
#endif /* DEBUG > 3 */
Doc->tf_terms = g_list_append(Doc->tf_terms,
ots_new_OtsWordTF((const unsigned char*)key, atof(idf_val)));
}
}
g_free((gpointer)key);
}
tf_words = roxml_get_next_sibling(tf_words);
#if DEBUG > 2
fprintf(stdout, "%s\n", roxml_get_content(tf_words, NULL, 0, NULL));
#endif /* DEBUG > 2 */
}
roxml_release(RELEASE_ALL);
roxml_close(head);
return (TRUE);
}
