int main()
{
SL_DataType i;
SeqList sl;
SL_init(&sl,5);
printf("长度：%d\n",SL_getLen(sl));
for(i=0;i<8;++i)
SL_insert(&sl,i,0);
print(sl);
printf("长度：%d\n",SL_getLen(sl));
SL_insert(&sl,5,6);
print(sl);
printf("长度：%d\n",SL_getLen(sl));
SL_insert(&sl,5,1);
print(sl);
printf("长度：%d\n",SL_getLen(sl));
printf("%d\n",SL_delete(&sl,100));
print(sl);
printf("长度：%d\n",SL_getLen(sl));
printf("%d\n",SL_delete(&sl,5));
print(sl);
printf("长度：%d\n",SL_getLen(sl));
printf("%d\n",SL_remove(&sl,100));
print(sl);
printf("长度：%d\n",SL_getLen(sl));
printf("%d\n",SL_remove(&sl,5));
print(sl);
printf("长度：%d\n",SL_getLen(sl));
SL_clear(&sl);
return 0;
}
/**
* Main function for cwb-s-encode.
*
* @param argc Number of command-line arguments.
* @param argv Command-line arguments.
*/
int
main(int argc, char **argv)
{
int input_line;
int start, end;
char *annot;
char buf[CL_MAX_LINE_LENGTH];
Attribute *att;
int V_switch, values, S_annotations_dropped;
int i, N;
progname = argv[0];
sencode_parse_options(argc, argv);
/* -a mode: read existing regions into memory */
if (add_to_existing) {
if (corpus == NULL) {
Rprintf( "Error: You have to specify source corpus (-C <corpus>) for -a switch.\n");
rcqp_receive_error(1);
}
att = cl_new_attribute(corpus, new_satt.name, ATT_STRUC);
if ((att != NULL) && (cl_max_struc(att) > 0)) {
V_switch = new_satt.store_values;
values = cl_struc_values(att);
if (V_switch && (!values)) {
Rprintf( "Error: Existing regions of -V attribute have no annotations.\n");
rcqp_receive_error(1);
}
else if ((!V_switch) && values) {
Rprintf( "Error: Existing regions of -S attributes have annotations.\n");
rcqp_receive_error(1);
}
if (!silent)
Rprintf("[Loading previous <%s> regions]\n", new_satt.name);
N = cl_max_struc(att);
for (i = 0; i < N; i++) {
cl_struc2cpos(att, i, &start, &end);
annot = cl_struc2str(att, i);
SL_insert(start, end, annot);
}
}
else {
if (!silent)
Rprintf("[No <%s> regions defined (skipped)]\n", new_satt.name);
}
}
/* loop reading input (stdin or -f <file>) */
if (in_memory && (!silent))
Rprintf("[Reading input data]\n");
input_line = 0;
S_annotations_dropped = 0;
while (fgets(buf, CL_MAX_LINE_LENGTH, text_fd)) {
input_line++;
/* check for buffer overflow */
if (strlen(buf) >= (CL_MAX_LINE_LENGTH - 1)) {
Rprintf( "BUFFER OVERFLOW, input line #%d is too long:\n>> %s", input_line, buf);
rcqp_receive_error(1);
}
if (! sencode_parse_line(buf, &start, &end, &annot)) {
Rprintf( "FORMAT ERROR on line #%d:\n>> %s", input_line, buf);
rcqp_receive_error(1);
}
if (new_satt.store_values && (annot == NULL)) {
Rprintf( "MISSING ANNOTATION on line #%d:\n>> %s", input_line, buf);
rcqp_receive_error(1);
}
if ((!new_satt.store_values) && (annot != NULL)) {
if (! S_annotations_dropped)
Rprintf( "WARNING: Annotation for -S attribute ignored on line #%d (warning issued only once):\n>> %s", input_line, buf);
S_annotations_dropped++;
}
if ((start <= new_satt.last_cpos) || (end < start)) {
Rprintf( "RANGE INCONSISTENCY on line #%d:\n>> %s(end of previous region was %d)\n", input_line, buf, new_satt.last_cpos);
rcqp_receive_error(1);
}
if (annot != NULL && set_att != set_none) {
/* convert set annotation into standard syntax */
annot = sencode_check_set(annot);
if (annot == NULL) {
Rprintf( "SET ANNOTATION SYNTAX ERROR on line #%d:\n>> %s", input_line, buf);
rcqp_receive_error(1);
}
}
/* debugging output */
if (debug) {
Rprintf( "[%d, %d]", start, end);
if (annot != NULL)
Rprintf( " <%s>", annot);
Rprintf( "\n");
}
/* in -M mode, store this region in memory; otherwise write it to the disk files */
if (in_memory)
SL_insert(start, end, annot);
else
sencode_write_region(start, end, annot);
cl_free(annot);
}
/* in -M mode, write data to disk now that we have finished looping across input data */
if (in_memory) {
SL item;
if (!silent)
Rprintf("[Creating encoded disk file(s)]\n");
SL_rewind();
while ((item = SL_next()) != NULL)
sencode_write_region(item->start, item->end, item->annot);
}
/* close files */
sencode_close_files();
if (S_annotations_dropped > 0)
Rprintf( "Warning: %d annotation values dropped for -S attribute '%s'.\n", S_annotations_dropped, new_satt.name);
rcqp_receive_error(0);
}
