/*
 * Copyright 2006, Haiku, Inc. All Rights Reserved.
 * Distributed under the terms of the MIT License.
 *
 * Authors:
 *              Axel Dörfler, axeld@pinc-software.de
 */


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


#define LINE_LENGTH 4096


char *
fgetln(FILE *stream, size_t *_length)
{
        // TODO: this function is not thread-safe
        static size_t sBufferSize;
        static char *sBuffer;

        size_t length, left;
        char *line;

        if (sBuffer == NULL) {
                sBuffer = (char *)malloc(LINE_LENGTH);
                if (sBuffer == NULL)
                        return NULL;

                sBufferSize = LINE_LENGTH;
        }

        line = sBuffer;
        left = sBufferSize;
        if (_length != NULL)
                *_length = 0;

        for (;;) {
                line = fgets(line, left, stream);
                if (line == NULL) {
                        free(sBuffer);
                        sBuffer = NULL;
                        return NULL;
                }

                length = strlen(line);
                if (_length != NULL)
                        *_length += length;
                if (line[length - 1] != '\n' && length == sBufferSize - 1) {
                        // more data is following, enlarge buffer
                        char *newBuffer = realloc(sBuffer, sBufferSize + LINE_LENGTH);
                        if (newBuffer == NULL) {
                                free(sBuffer);
                                sBuffer = NULL;
                                return NULL;
                        }

                        sBuffer = newBuffer;
                        sBufferSize += LINE_LENGTH;
                        line = sBuffer + length;
                        left += 1;
                } else
                        break;
        }

        return sBuffer;
}