/**
 * lsflib/src/get_line.c
 * Copyright (C) 2008 Markus Broeker
 */

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

#include <lsf/lsf.h>

#ifndef LINE_LENGTH
#define LINE_LENGTH 100
#endif

char *get_line (const char *filename, const char *cmd, size_t size)
{
    int i, j;
    char *line, *ptr;

    FILE *f = fopen (filename, "r");

    if (!f) {
        perror ("FOPEN:");
        return NULL;
    }

    line = malloc (LINE_LENGTH + 1);
    ptr = malloc ((LINE_LENGTH + 1) * size);
    i = 0;

    while (fgets (line, LINE_LENGTH, f) != NULL) {
        if (strstr (line, cmd)) {
            do {
                if ((strlen (ptr) + strlen (line)) < LINE_LENGTH * size) {
                    strcat (ptr, line);
                    fgets (line, LINE_LENGTH, f);
                    i++;
                } else {
                    printf ("OVERFLOW: [%d]: %s\n", i * LINE_LENGTH, line);
                    exit (0);
                }
            } while (strchr (line, '"') == NULL);
            if (i > 1)
                strcat (ptr, line);
        }
        for (i = 0; i < strlen (ptr); i++)
            switch (ptr[i]) {
            case '\n':
            case '\\':
            case '"':
                for (j = i; j < strlen (ptr) - 1; j++)
                    ptr[j] = ptr[j + 1];
                ptr[j] = 0;
                break;
            }
    }

    fclose (f);
    free (line);

    return ptr;
}