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


#include <libroot_private.h>

#include <OS.h>
#include <image.h>

#include <string.h>


#ifdef __HAIKU_BEOS_COMPATIBLE


bool __gR5Compatibility = false;
addr_t __gNetworkStart;
addr_t __gNetworkEnd;


static void
set_own_image_location(image_id id)
{
        image_info info;
        if (get_image_info(id, &info) == B_OK) {
                __gNetworkStart = (addr_t)min_c(info.text, info.data);
                __gNetworkEnd = min_c((addr_t)info.text + info.text_size,
                        (addr_t)info.data + info.data_size);
        }
}


extern "C" void
initialize_before(image_id our_image)
{
        // determine if we have to run in BeOS compatibility mode

        // get image of executable
        image_info info;
        uint32 cookie = 0;
        if (get_next_image_info(B_CURRENT_TEAM, (int32*)&cookie, &info) != B_OK)
                return;

        if (get_image_symbol(info.id, "__gHaikuStartupCode", B_SYMBOL_TYPE_DATA,
                        NULL) == B_OK) {
                // we were linked on/for Haiku
                return;
        }

        // We're using the BeOS startup code, check if BONE libraries are in
        // use, and if not, enable the BeOS R5 compatibility layer.
        // As dependencies to network libraries may be "hidden" in libraries, we
        // may have to scan not only the executable, but every loaded image.
        int enable = 0;
        uint32 crumble;
        const char *name;
        do {
                crumble = 0;
                while (__get_next_image_dependency(info.id, &crumble, &name) == B_OK) {
                        if (!strcmp(name, "libbind.so")
                                || !strcmp(name, "libsocket.so")
                                || !strcmp(name, "libbnetapi.so")
                                || !strcmp(name, "libnetwork.so"))
                                enable -= 2;
                        else if (!strcmp(name, "libnet.so")
                                || !strcmp(name, "libnetapi.so"))
                                enable++;
                }

                if (enable > 0) {
                        __gR5Compatibility = true;
                        set_own_image_location(our_image);
                        return;
                }
        } while (enable == 0
                && get_next_image_info(B_CURRENT_TEAM, (int32*)&cookie, &info) == B_OK);
}


#endif