#include <stdio.h>
#include <stdlib.h>
#include <string.h>

int main(int argc, char**argv){
    int sizeCheck = NULL;
    int num = NULL;
    int n;
    int nCheck; //used to make sure both files are of same length
    int err;
    FILE *words = fopen("words.dat", "r");
    FILE *matrix = fopen("matrix.dat","r");
    FILE *graph = fopen("graph.dot","w+");
    fprintf(graph,"graph {\n\toverlap=scale\n");
    FILE *test = fopen("result.dat","w+");

    err = fscanf(words, "%d\n",&n);
    if (err!=1){
        printf("Error reading file.\n");
        return EXIT_FAILURE;
    }

    char vocab[n*50];
    char *vocabPointer[n];

    for (int i = 0; i<n; i++){
        vocabPointer[i] = vocab + (i*n);
    }

    for(int i = 0; i < n; i++){
        fscanf(words, "%s", vocabPointer[i]);
    }

    for(int i = 0; i < n; i++){
        fprintf(test, "%s\n", vocabPointer[i]);
    }
    fclose(test);

    err = fscanf(matrix,"%d\n",&sizeCheck);
    if (err!=1 || sizeCheck!=n){
        return EXIT_FAILURE;
    }

    for(int i = 0; i < n; i++){
        int firstWord = 0;
        int secondWord = 0;
        for(int j = 0; j < i; j++){
            fscanf(matrix, "%d", &num);
            if(num == 1){
                fprintf(graph,"\t\"");
                while(vocabPointer[i][firstWord]!=(char) NULL){
                    fprintf(graph,"%c",vocabPointer[i][firstWord]);
                    firstWord++;
                }
                fprintf(graph,"\"--\"");
                while(vocabPointer[j][secondWord]!=(char) NULL){
                    fprintf(graph,"%c",vocabPointer[j][secondWord]);
                    secondWord++;
                }
                fprintf(graph,"\"\n");
            }
        }
    }

    fprintf(graph,"}");

    fclose(matrix);
    fclose(graph);
    fclose(words);

    return EXIT_SUCCESS;

}