static dictionary *new_dictionary(unsigned int length){
dictionary *d = (dictionary *) malloc(sizeof(dictionary));
if ( d == NULL ){
return NULL;
}
d->key = (unsigned int *) malloc(length*sizeof(int));
d->value = (unsigned int *) malloc(length*sizeof(int));
if ( d->key == NULL || d->value == NULL){
free(d->key);
free(d->value);
free(d);
return NULL;
}
d->length = length;
reset_dictionary(d);
return d;
}
// note: src (tgt) will be indexed to their x + 1 (y+1).
static double distance(
unsigned int *src,
unsigned int *tgt,
unsigned int x,
unsigned int y,
double *weight,
dictionary *dict,
double *scores
){
if (!x){
return (double) y;
}
if (!y){
return (double) x;
}
unsigned int swapCount, targetCharCount,i,j;
double delScore, insScore, subScore, swapScore;
unsigned int score_ceil = x + y;
/* intialize matrix start values */
scores[0] = score_ceil;
scores[1 * (y + 2) + 0] = score_ceil;
scores[0 * (y + 2) + 1] = score_ceil;
scores[1 * (y + 2) + 1] = 0;
uniquePush(dict,src[0]);
uniquePush(dict,tgt[0]);
/* work loops */
/* i = src index */
/* j = tgt index */
for(i=1;i<=x;i++){
uniquePush(dict,src[i]);
scores[(i+1) * (y + 2) + 1] = i;
scores[(i+1) * (y + 2) + 0] = score_ceil;
swapCount = 0;
for(j=1;j<=y;j++){
if(i == 1) {
uniquePush(dict,tgt[j]);
scores[1 * (y + 2) + (j + 1)] = j;
scores[0 * (y + 2) + (j + 1)] = score_ceil;
}
targetCharCount = dict->value[which(dict, tgt[j-1])];
swapScore = scores[targetCharCount * (y + 2) + swapCount] + (i - targetCharCount - 1 + j - swapCount) * weight[3];
if(src[i-1] != tgt[j-1]){
subScore = scores[i * (y + 2) + j] + weight[2];
insScore = scores[(i+1) * (y + 2) + j] + weight[1];
delScore = scores[i * (y + 2) + (j + 1)] + weight[0];
scores[(i+1) * (y + 2) + (j + 1)] = MIN(swapScore, MIN(delScore, MIN(insScore, subScore) ));
} else {
swapCount = j;
scores[(i+1) * (y + 2) + (j + 1)] = MIN(scores[i * (y + 2) + j], swapScore);
}
}
dict->value[which(dict,src[i-1])] = i;
}
double score = scores[(x+1) * (y + 2) + (y + 1)];
reset_dictionary(dict);
return score;
}
int main(int argc, char **argv)
{
int c;
const char *optstring = "vhanof:?";
int linenumbers = 0;
bool add_vfcodes = FALSE;
char *vfc_filnam = NULL;
while (1) {
#ifdef __GLIBC__
int option_index = 0;
static struct option long_options[] = {
{"verbose", 0, 0, 'v'},
{"help", 0, 0, 'h'},
{"all", 0, 0, 'a'},
{"linenumbers", 0, 0, 'n'},
{"offsets", 0, 0, 'o'},
{"fcodes", 1, 0, 'f'},
{0, 0, 0, 0}
};
c = getopt_long(argc, argv, optstring,
long_options, &option_index);
#else
c = getopt(argc, argv, optstring);
#endif
if (c == -1)
break;
switch (c) {
case 'v':
verbose = TRUE;
break;
case 'a':
decode_all = TRUE;
break;
case 'n':
linenumbers |= 1;
show_linenumbers = TRUE;
break;
case 'o':
linenumbers |= 2;
show_linenumbers = TRUE;
show_offsets = TRUE;
break;
case 'f':
add_vfcodes = TRUE;
vfc_filnam = optarg;
break;
case 'h':
case '?':
print_copyright(TRUE);
usage(argv[0]);
return 0;
default:
print_copyright(TRUE);
printf("%s: unknown option.\n", argv[0]);
usage(argv[0]);
return 1;
}
}
if (verbose)
print_copyright(FALSE);
if (linenumbers > 2)
printremark
("Line numbers will be disabled in favour of offsets.\n");
if (optind >= argc) {
print_copyright(TRUE);
printf("%s: filename missing.\n", argv[0]);
usage(argv[0]);
return 1;
}
init_dictionary();
if (add_vfcodes) {
if (add_fcodes_from_list(vfc_filnam)) {
freeze_dictionary();
}
}
while (optind < argc) {
if (init_stream(argv[optind])) {
printf("Could not open file \"%s\".\n", argv[optind]);
optind++;
continue;
}
detokenize();
close_stream();
optind++;
reset_dictionary();
}
printf("\n");
return 0;
}
