/*
 * Copyright 2004, François Revol.
 * Copyright 2007-2010, Axel Dörfler, axeld@pinc-software.de.
 * Copyright 2011, Oliver Tappe <zooey@hirschkaefer.de>
 * Copyright 2011, Ingo Weinhold, ingo_weinhold@gmx.de.
 * Distributed under the terms of the MIT License.
 */


#include <FindDirectory.h>

#include <errno.h>
#include <string.h>
#include <sys/stat.h>
#include <stdlib.h>
#include <unistd.h>

#include <StorageDefs.h>

#include <find_directory_private.h>


#ifndef HAIKU_BUILD_GENERATED_DIRECTORY
#       error HAIKU_BUILD_GENERATED_DIRECTORY not defined!
#endif


/*! make dir and its parents if needed */
static int
create_path(const char *path, mode_t mode)
{
        char buffer[B_PATH_NAME_LENGTH + 1];
        int pathLength;
        int i = 0;

        if (path == NULL || ((pathLength = strlen(path)) > B_PATH_NAME_LENGTH))
                return EINVAL;

        while (++i < pathLength) {
                const char *slash = strchr(&path[i], '/');
                struct stat st;

                if (slash == NULL)
                        i = pathLength;
                else if (i != slash - path)
                        i = slash - path;
                else
                        continue;

                strlcpy(buffer, path, i + 1);
                if (stat(buffer, &st) < 0) {
                        errno = 0;
                        if (mkdir(buffer, mode) < 0)
                                return errno;
                }
        }

        return 0;
}


status_t
find_directory(directory_which which, dev_t device, bool createIt,
        char *returnedPath, int32 pathLength)
{
        // we support only the handful of paths we need
        const char* path;
        switch (which) {
                case B_SYSTEM_TEMP_DIRECTORY:
                        path = HAIKU_BUILD_GENERATED_DIRECTORY "/tmp";
                        break;
                case B_SYSTEM_SETTINGS_DIRECTORY:
                        path = HAIKU_BUILD_GENERATED_DIRECTORY "/system/settings";
                        break;
                case B_SYSTEM_CACHE_DIRECTORY:
                        path = HAIKU_BUILD_GENERATED_DIRECTORY "/system/cache";
                        break;
                case B_USER_SETTINGS_DIRECTORY:
                        path = HAIKU_BUILD_GENERATED_DIRECTORY "/user/settings";
                        break;
                case B_USER_CACHE_DIRECTORY:
                        path = HAIKU_BUILD_GENERATED_DIRECTORY "/user/cache";
                        break;
                default:
                        return B_BAD_VALUE;
        }

        // create, if necessary
        status_t error = B_OK;
        struct stat st;
        if (createIt && stat(path, &st) < 0)
                error = create_path(path, 0755);

        if (error == B_OK)
                strlcpy(returnedPath, path, pathLength);

        return error;
}


status_t
__find_directory(directory_which which, dev_t device, bool createIt,
        char *returnedPath, int32 pathLength)
{
        return find_directory(which, device, createIt, returnedPath, pathLength);
}