lts_t lts_copy(lts_t orig){
lts_t copy=lts_create();
lts_set_sig(copy,orig->ltstype);
lts_file_t src=lts_reader(orig,1,NULL);
lts_file_t dst=lts_writer(copy,1,src);
int T=lts_type_get_type_count(orig->ltstype);
for(int i=0;i<T;i++){
if (orig->values[i]) {
table_iterator_t it = VTiterator (orig->values[i]);
for (int j = 0; IThasNext(it); j++) {
chunk c = ITnext (it);
VTputAtChunk (copy->values[i], c, j);
}
}
}
lts_file_copy(src,dst);
lts_file_close(src);
lts_file_close(dst);
return copy;
}
static void lts_read_dir(archive_t archive,lts_t lts){
Print(infoShort,"opening info");
stream_t input=arch_read(archive,"info");
dir_info_t info=DIRinfoRead(input,1);
DSclose(&input);
int segments=info->segment_count;
Print(infoShort,"got info for %d segments",segments);
int offset[segments];
offset[0]=0;
for(int i=1;i<segments;i++){
offset[i]=info->state_count[i-1]+offset[i-1];
}
int s_count=0;
int t_count=0;
for(int i=0;i<segments;i++){
s_count+=info->state_count[i];
for(int j=0;j<segments;j++){
t_count+=info->transition_count[i][j];
}
}
Print(infoShort,"counted %u states and %u transitions",s_count,t_count);
lts_set_sig(lts,single_action_type());
lts_set_type(lts,LTS_LIST);
lts_set_size(lts,1,s_count,t_count);
lts->root_list[0]=offset[info->initial_seg]+info->initial_ofs;
lts->tau=info->label_tau;
Print(infoShort,"getting %d labels from TermDB",info->label_count);
input=arch_read(archive,"TermDB");
int type_no=lts_type_get_edge_label_typeno(lts->ltstype,0);
for(int i=0;i<info->label_count;i++){
char *line=DSreadLN(input);
int len=strlen(line);
char data[len];
chunk tmp_chunk=chunk_ld(len,data);
string2chunk(line,&tmp_chunk);
VTputAtChunk(lts->values[type_no], tmp_chunk, i);
}
DSclose(&input);
Print(infoShort,"got labels");
int t_offset=0;
char filename[1024];
for(int i=0;i<segments;i++){
for(int j=0;j<segments;j++){
sprintf(filename,"src-%d-%d",i,j);
stream_t src=arch_read(archive,filename);
sprintf(filename,"label-%d-%d",i,j);
stream_t lbl=arch_read(archive,filename);
sprintf(filename,"dest-%d-%d",i,j);
stream_t dst=arch_read(archive,filename);
for(int k=0;k<info->transition_count[i][j];k++){
lts->src[t_offset]=offset[i]+DSreadU32(src);
lts->label[t_offset]=DSreadU32(lbl);
lts->dest[t_offset]=offset[j]+DSreadU32(dst);
t_offset++;
}
DSclose(&src);
DSclose(&lbl);
DSclose(&dst);
}
}
DIRinfoDestroy(info);
}
void HREgreyboxCAtI(void*map,void*data,int len,int pos){
return VTputAtChunk((value_table_t)map,chunk_ld(len,data),pos);
}
