/*

 * Copyright (C) 2004, 2006 Apple Computer, Inc.  All rights reserved.

 *

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions

 * are met:

 * 1. Redistributions of source code must retain the above copyright

 *    notice, this list of conditions and the following disclaimer.

 * 2. Redistributions in binary form must reproduce the above copyright

 *    notice, this list of conditions and the following disclaimer in the

 *    documentation and/or other materials provided with the distribution.

 *

 * THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY

 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE

 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR

 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL APPLE COMPUTER, INC. OR

 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,

 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,

 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR

 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY

 * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT

 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE

 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 

 */

#include "config.h"

#if !PLATFORM(DARWIN) || !defined(__LP64__)

#include "npruntime.h"

#include "npruntime_impl.h"

#include "npruntime_priv.h"

#include "JSLock.h"

#include "c_utility.h"

#include "identifier.h"

#include <wtf/Assertions.h>

#include <wtf/HashMap.h>

using namespace KJS::Bindings;

typedef HashMap<RefPtr<KJS::UString::Rep>, PrivateIdentifier*> StringIdentifierMap;

static StringIdentifierMap* getStringIdentifierMap()

{

    if (!stringIdentifierMap)

        stringIdentifierMap = new StringIdentifierMap;

    return stringIdentifierMap;

}

typedef HashMap<int, PrivateIdentifier*> IntIdentifierMap;

static IntIdentifierMap* getIntIdentifierMap()

{

    static IntIdentifierMap* intIdentifierMap = 0;

    if (!intIdentifierMap)

        intIdentifierMap = new IntIdentifierMap;

    return intIdentifierMap;

}

EXPORT

NPIdentifier _NPN_GetStringIdentifier(const NPUTF8* name)

{

    ASSERT(name);

    if (name) {

        PrivateIdentifier* identifier = 0;

        KJS::JSLock lock;

        identifier = getStringIdentifierMap()->get(identifierFromNPIdentifier(name).ustring().rep());

        if (identifier == 0) {

            identifier = (PrivateIdentifier*)malloc(sizeof(PrivateIdentifier));

            // We never release identifier names, so this dictionary will grow, as will

            // the memory for the identifier name strings.

            identifier->isString = true;

            identifier->value.string = strdup(name);

            getStringIdentifierMap()->set(identifierFromNPIdentifier(name).ustring().rep(), identifier);

        }

        return (NPIdentifier)identifier;

    }

    return 0;

}

EXPORT

void _NPN_GetStringIdentifiers(const NPUTF8** names, int32_t nameCount, NPIdentifier* identifiers)

{

    ASSERT(names);

    ASSERT(identifiers);

    if (names && identifiers)

        for (int i = 0; i < nameCount; i++)

            identifiers[i] = _NPN_GetStringIdentifier(names[i]);

}

EXPORT

NPIdentifier _NPN_GetIntIdentifier(int32_t intid)

{

    PrivateIdentifier* identifier = 0;

    identifier = getIntIdentifierMap()->get(intid);

    if (identifier == 0) {

        identifier = (PrivateIdentifier*)malloc(sizeof(PrivateIdentifier));

        // We never release identifier names, so this dictionary will grow.

        identifier->isString = false;

        identifier->value.number = intid;

        getIntIdentifierMap()->set(intid, identifier);

    }

    return (NPIdentifier)identifier;

}

EXPORT

bool _NPN_IdentifierIsString(NPIdentifier identifier)

{

    PrivateIdentifier* i = (PrivateIdentifier*)identifier;

    return i->isString;

}

EXPORT

NPUTF8 *_NPN_UTF8FromIdentifier(NPIdentifier identifier)

{

    PrivateIdentifier* i = (PrivateIdentifier*)identifier;

    if (!i->isString || !i->value.string)

        return NULL;

    return (NPUTF8 *)strdup(i->value.string);

}

EXPORT

int32_t _NPN_IntFromIdentifier(NPIdentifier identifier)

{

    PrivateIdentifier* i = (PrivateIdentifier*)identifier;

    if (!i->isString)

        return 0;

    return i->value.number;

}

void NPN_InitializeVariantWithStringCopy(NPVariant* variant, const NPString* value)

{

    variant->type = NPVariantType_String;

    variant->value.stringValue.UTF8Length = value->UTF8Length;

    variant->value.stringValue.UTF8Characters = (NPUTF8 *)malloc(sizeof(NPUTF8) * value->UTF8Length);

    memcpy((void*)variant->value.stringValue.UTF8Characters, value->UTF8Characters, sizeof(NPUTF8) * value->UTF8Length);

}

EXPORT

void _NPN_ReleaseVariantValue(NPVariant* variant)

{

    ASSERT(variant);

    if (variant->type == NPVariantType_Object) {

        _NPN_ReleaseObject(variant->value.objectValue);

        variant->value.objectValue = 0;

    } else if (variant->type == NPVariantType_String) {

        free((void*)variant->value.stringValue.UTF8Characters);

        variant->value.stringValue.UTF8Characters = 0;

        variant->value.stringValue.UTF8Length = 0;

    }

    variant->type = NPVariantType_Void;

}

EXPORT

NPObject *_NPN_CreateObject(NPP npp, NPClass* aClass)

{

    ASSERT(aClass);

    if (aClass) {

        NPObject* obj;

        if (aClass->allocate != NULL)

            obj = aClass->allocate(npp, aClass);

        else

            obj = (NPObject*)malloc(sizeof(NPObject));

        obj->_class = aClass;

        obj->referenceCount = 1;

        return obj;

    }

    return 0;

}

EXPORT

NPObject* _NPN_RetainObject(NPObject* obj)

{

    ASSERT(obj);

    if (obj)

        obj->referenceCount++;

    return obj;

}

EXPORT

void _NPN_ReleaseObject(NPObject* obj)

{

    ASSERT(obj);

    ASSERT(obj->referenceCount >= 1);

    if (obj && obj->referenceCount >= 1) {

        if (--obj->referenceCount == 0)

            _NPN_DeallocateObject(obj);

    }

}

EXPORT

void _NPN_DeallocateObject(NPObject *obj)

{

    ASSERT(obj);

    if (obj) {

        if (obj->_class->deallocate)

            obj->_class->deallocate(obj);

        else

            free(obj);

    }

}

#endif