12 #include "xml-tree.hpp"
16 const xml_tree::node_t xml_tree::NIL;
17 const xml_tree::node_t xml_tree::ROOT;
20 const xml_tree::tag_t xml_tree::NIL_TAG_ID;
21 const char* xml_tree::NIL_TAG = "<!NIL!>";
22 const xml_tree::tag_t xml_tree::DOCUMENT_OPEN_TAG_ID;
23 const char* xml_tree::DOCUMENT_OPEN_TAG = "";
24 const xml_tree::tag_t xml_tree::ATTRIBUTE_OPEN_TAG_ID;
25 const char* xml_tree::ATTRIBUTE_OPEN_TAG = "<@>";
26 const xml_tree::tag_t xml_tree::PCDATA_OPEN_TAG_ID;
27 const char* xml_tree::PCDATA_OPEN_TAG = "<$>";
28 const xml_tree::tag_t xml_tree::ATTRIBUTE_DATA_OPEN_TAG_ID;
29 const char* xml_tree::ATTRIBUTE_DATA_OPEN_TAG = "<@$>";
30 const xml_tree::tag_t xml_tree::CLOSE_TAG_ID;
31 const char* xml_tree::CLOSE_TAG = "</>";
34 static int bits8 (int t ) {
45 static bool array_mem(xml_tree::tag_t *a, xml_tree::tag_t t)
47 for(; *a != xml_tree::NIL_TAG_ID; a++){
48 if (*a >= t) return (*a == t);
53 static void ufread(void *ptr, size_t size, size_t nmemb, FILE *stream)
56 res = fread(ptr,size,nmemb,stream);
58 throw std::runtime_error("ufread I/O error" );
62 static void ufwrite(const void *ptr, size_t size, size_t nmemb, FILE *stream)
65 res = fwrite(ptr,size,nmemb,stream);
67 throw std::runtime_error("ufwrite I/O error");
79 xml_tree::xml_tree(std::vector<int32_t> *tags,
80 std::unordered_map<std::string, int32_t> *tag_ids,
81 bit_vector *parbitmap,
83 SXSI::TextCollectionBuilder *tc_builder,
84 SXSI::TextCollectionBuilder::index_type_t idx_type,
85 bit_vector *textbitmap)
90 size_t npar = parbitmap->size();
93 par = bp_construct(npar,
94 parbitmap->get_vector_ptr(),
98 this->tag_ids = tag_ids;
99 tag_names = new std::vector<std::string>();
100 tag_names->resize(tag_ids->size());
101 for(auto val : *(this->tag_ids))
102 (*this->tag_names)[val.second] = val.first;
104 uint32_t max_tag = tag_names->size() - 1;
105 static_bitsequence_builder *bmb = new static_bitsequence_builder_sdarray();
106 alphabet_mapper *am = new alphabet_mapper_none();
108 this->tags = new static_sequence_bs((uint32_t*)&((*tags)[0]), npar, am, bmb);
109 bits_per_tag = bits8(max_tag);
111 tag_seq = new uint32_t[uint_len(bits_per_tag, tag_seq_len)];
112 for(size_t i = 0; i < (size_t) tag_seq_len; i++)
113 set_field(tag_seq, bits_per_tag, i, (uint32_t) (*tags)[i]);
122 uint32_t * textbm = textbitmap->get_vector_ptr();
123 text_positions = new static_bitsequence_rrr02(textbm,
129 this->text_index_type = idx_type;
130 text_collection = tc_builder->InitTextCollection();
137 xml_tree::~xml_tree()
145 if (text_collection) delete text_collection;
146 if (text_positions) delete text_positions;
149 bool xml_tree::is_child(xml_tree::node_t x, xml_tree::node_t y) const
151 return !is_leaf(x) && is_ancestor(y, x) && depth(x)+1 == depth(y);
154 uint32_t xml_tree::depth(xml_tree::node_t x) const
156 return bp_depth(this->par, x);
160 uint32_t xml_tree::preorder(xml_tree::node_t x) const
162 return bp_preorder_rank(this->par, x);
165 uint32_t xml_tree::postorder(xml_tree::node_t x) const
167 return bp_postorder_rank(this->par, x);
171 xml_tree::select_child(xml_tree::node_t x, xml_tree::tag_t *tags) const
173 if (is_nil(x) || is_leaf(x)) return xml_tree::NIL;
174 xml_tree::node_t child = first_child(x);
175 if (array_mem(tags, tag(child))) return child;
176 return select_sibling(child, tags);
180 xml_tree::select_descendant(xml_tree::node_t x, xml_tree::tag_t *tags) const
182 if (is_leaf(x)) return xml_tree::NIL;
183 auto min = xml_tree::NIL;
184 auto aux = xml_tree::NIL;
185 for(; *tags != xml_tree::NIL_TAG_ID; ++tags){
186 aux = tagged_descendant(x, *tags);
187 if ((unsigned int) aux < (unsigned int) min) min = aux;
193 xml_tree::select_sibling(xml_tree::node_t x, xml_tree::tag_t *tags) const
195 xml_tree::node_t sibling = next_sibling(x);
197 while(!is_nil(sibling)) {
199 if (array_mem(tags, t)) return sibling;
200 sibling = next_sibling(sibling);
206 xml_tree::select_following_before(xml_tree::node_t x, xml_tree::tag_t *tags,
207 xml_tree::node_t limit) const
209 auto min = xml_tree::NIL;
210 auto aux = xml_tree::NIL;
211 for(; *tags != xml_tree::NIL_TAG_ID; ++tags){
212 aux = tagged_following_before(x, *tags, limit);
213 if ((unsigned int) aux < (unsigned int) min) min = aux;
218 void xml_tree::save(int fd, char* s)
223 fp = fdopen(fd2, "w");
225 if (fd == 0) throw(std::runtime_error(strerror(errno)));
226 saveTree(par, fp); //TODO use new api
228 int ntags = tag_names->size();
230 ufwrite(&ntags, sizeof(int), 1, fp);
231 for (int i = 0; i < ntags;i++)
232 fprintf(fp, "%s\n", tag_names->at(i).c_str());
236 ufwrite(&bits_per_tag, sizeof(uint),1,fp);
237 ufwrite(&tag_seq_len, sizeof(uint),1,fp);
238 ufwrite(tag_seq, sizeof(uint), uint_len(bits_per_tag, tag_seq_len), fp);
240 bool disable_tc = text_collection == 0 || text_positions == 0;
242 ufwrite(&disable_tc, sizeof(bool),1,fp);
245 text_positions->save(fp);
246 ufwrite(&text_index_type,
247 sizeof(TextCollectionBuilder::index_type_t),
251 switch (text_index_type){
252 case TextCollectionBuilder::index_type_default:
253 file.append("_default");
255 case TextCollectionBuilder::index_type_swcsa:
256 file.append("_swcsa");
258 case TextCollectionBuilder::index_type_rlcsa:
259 file.append("_rlcsa");
263 text_collection->Save(fp, file.c_str());
271 xml_tree* xml_tree::load(int fd, char* name, bool load_tc, int sf)
278 fp = fdopen(fd, "r");
279 xml_tree *tree = new xml_tree();
281 tree->par = loadTree(fp); //TODO use new api
282 tree->tag_names = new std::vector<std::string>();
283 tree->tag_ids = new std::unordered_map<std::string, xml_tree::tag_t>();
287 ufread(&ntags, sizeof(int), 1, fp);
289 for (i = 0; i < ntags; i++) {
290 if (fgets(buffer, 1022, fp) != buffer)
291 throw std::runtime_error("xml_tree::load: cannot read tag list");
293 // remove the trailing \n
295 tree->tag_names->push_back(s);
296 tree->tag_ids->insert(std::make_pair(s,
297 static_cast<xml_tree::tag_t>(i)));
301 tree->tags = static_sequence::load(fp);
302 ufread(&tree->bits_per_tag, sizeof(uint), 1, fp);
303 ufread(&tree->tag_seq_len, sizeof(uint), 1, fp);
304 size_t size = uint_len(tree->bits_per_tag, tree->tag_seq_len);
305 tree->tag_seq = new uint[size];
306 ufread(tree->tag_seq, sizeof(uint), size, fp);
309 ufread(&disable_tc, sizeof(bool), 1, fp);
311 if (disable_tc || !load_tc) {
312 tree->text_positions = 0;
313 tree->text_collection = 0;
316 tree->text_positions = static_bitsequence_rrr02::load(fp);
318 ufread(&tree->text_index_type,
319 sizeof(TextCollectionBuilder::index_type_t), 1, fp);
321 std::string file(name);
322 switch (tree->text_index_type){
323 case TextCollectionBuilder::index_type_default:
324 file.append("_default");
326 case TextCollectionBuilder::index_type_swcsa:
327 file.append("_swcsa");
329 case TextCollectionBuilder::index_type_rlcsa:
330 file.append("_rlcsa");
335 tree->text_collection =
336 TextCollection::Load(fp,
338 TextCollection::index_mode_default,
345 uint32_t xml_tree::subtree_elements(xml_tree::node_t x) const
347 xml_tree::node_t fin = bp_find_close(par, x);
348 uint32_t size = (fin - x)/2;
350 x = bp_first_child(par,x);
355 tags->rank(xml_tree::PCDATA_OPEN_TAG_ID, fin) -
356 tags->rank(xml_tree::PCDATA_OPEN_TAG_ID, x-1);
359 xml_tree::node_t y = tags->select_next(xml_tree::ATTRIBUTE_OPEN_TAG_ID, x);
360 while (y != xml_tree::NIL && y < fin){
361 size -= subtree_size(y);
362 y = tags->select_next(xml_tree::ATTRIBUTE_OPEN_TAG_ID, y);
367 uint32_t xml_tree::num_children(xml_tree::node_t x) const
369 return bp_degree(par, x);
372 uint32_t xml_tree::child_pos(xml_tree::node_t x) const
374 return bp_child_rank(par, x);
377 xml_tree::node_t xml_tree::child(xml_tree::node_t x, uint32_t i) const
379 if (i < 10) return bp_naive_child(par, x, i);
380 else bp_child(par, x, i);
383 std::pair<int32_t, int32_t> xml_tree::text_id_range(xml_tree::node_t x) const
386 i = text_positions->rank1(x - 1);
387 j = text_positions->rank1(x + 2 * bp_subtree_size(par, x) - 2);
389 return std::make_pair(xml_tree::NIL, xml_tree::NIL);
391 return std::make_pair(i + 1, j);
394 int32_t xml_tree::text_id(xml_tree::node_t x) const
396 return (int32_t) text_positions->rank1(x) - 1;
399 unsigned char* xml_tree::get_text(int32_t id) const
401 unsigned char * s = text_collection->GetText(id);
402 return s + (s[0] == 1);
405 void xml_tree::uflush(int fd)
407 size_t size = print_buffer->size();
408 if (size < BUFFER_SIZE) return;
412 void xml_tree::flush(int fd)
414 uflush_r(fd, print_buffer->size());
418 void xml_tree::uflush_r(int fd, size_t s)
423 written = write(fd, print_buffer->data(), s);
424 if ((written < 0) && (errno == EAGAIN || errno == EINTR)){
429 print_buffer->clear();
432 void xml_tree::uput_str(std::string s, int fd)
434 print_buffer->append(s);
437 void xml_tree::uputs(const char* s, int fd)
439 print_buffer->append(s);
442 void xml_tree::uputc(const char c, int fd)
444 print_buffer->push_back(c);
448 const char * xml_tree::get_tag_name_by_ref(xml_tree::tag_t tagid) const
452 if (tagid < 0 || tagid >= tag_names->size())
453 return "<INVALID TAG>";
455 return (const char *) (*tag_names)[tagid].c_str();
458 xml_tree::tag_t xml_tree::register_tag(char *s)
460 auto found = tag_ids->find(std::string(s));
461 if (found == tag_ids->end())
462 return xml_tree::NIL_TAG_ID;
464 return (*found).second;
467 size_t xml_tree::uprintf(const char*s, int fd)
469 if (s == 0) return 0;
472 for (i = 0; (c = s[i]); i++) {
497 void xml_tree::print(xml_tree::node_t x, int fd, bool no_text)
500 if (print_buffer == 0) {
501 print_buffer = new std::string(BUFFER_SIZE, 0);
502 print_buffer->clear();
503 print_stack = new std::vector<std::string>();
504 print_stack->reserve(256);
507 xml_tree::node_t fin = bp_find_close(par, x);
508 xml_tree::node_t n = x;
509 xml_tree::tag_t label = tag(n);
510 unsigned char * orig_text;
511 unsigned char * current_text;
513 auto r = text_id_range(x);
514 if (r.first == xml_tree::NIL)
517 current_text = get_text(r.first);
519 orig_text = current_text;
524 if (bp_inspect(par, n)) {
525 if (label == xml_tree::PCDATA_OPEN_TAG_ID){
529 read = uprintf( (const char*) current_text, fd);
530 current_text += read + 1;
532 n += 2; // skip closin $
537 uput_str((*tag_names)[label], fd);
539 if (bp_inspect(par, n)) {
540 print_stack->push_back((*tag_names)[label]);
542 if (label == xml_tree::ATTRIBUTE_OPEN_TAG_ID) {
544 if (no_text) uputs("><@@>", fd);
546 while (bp_inspect(par, n))
549 uputs((const char*) &(get_tag_name_by_ref(tag(n))[3]), fd);
551 uputs("<$@/></", fd);
552 uputs((const char*) &(get_tag_name_by_ref(tag(n))[3]), fd);
557 uputs((const char*) &(get_tag_name_by_ref(tag(n))[3]), fd);
560 read = uprintf((const char*) current_text, fd);
561 current_text += read + 1;
581 uput_str(print_stack->back(), fd);
583 print_stack->pop_back();
585 } while (!bp_inspect(par, n) && !print_stack->empty());
589 if (orig_text && text_index_type != TextCollectionBuilder::index_type_default)
590 if (*orig_text == '\0')
591 text_collection->DeleteText(orig_text - 1);
593 text_collection->DeleteText(orig_text);