#include <stdio.h>

#include "dictre.h"

extern struct Word words[];

extern int nwords;

extern struct Def defs[];

extern int ndefs;

static int write_dictionary_data(FILE *fdefs)

{

    int i;

    int offset = 0;

    for (i=0; i < ndefs; ++i)

    {

        fwrite(defs[i].d, defs[i].length, 1, fdefs);

        defs[i].offset = offset;

        offset += defs[i].length;

    }

}

static void write_dictionary_index(FILE *index)

{

    int i;

    for (i=0; i < nwords; ++i)

    {

        char offset_str[50];

        char length_str[50];

        num_to_ia5(offset_str, defs[words[i].def].offset);

        num_to_ia5(length_str, defs[words[i].def].length);

        fprintf(index, "%s\t%s\t%s\n",

                words[i].w, offset_str, length_str);

    }

}

void write_dictionary(const char *name)

{

    FILE *i, *d;

    char tmpname[500];

    strcpy(tmpname, name);

    strcat(tmpname, ".dict");

    d = fopen(tmpname, "wb");

    write_dictionary_data(d);

    fclose(d);

    strcpy(tmpname, name);

    strcat(tmpname, ".index");

    i = fopen(tmpname, "wb");

    write_dictionary_index(i);

    fclose(i);

}