/*
 * Copyright (C) 2005, 2006, 2007 Apple 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 <kjs/wk_config.h>

#if ENABLE(XSLT)

#include "JSXSLTProcessor.h"

#include "XSLTProcessor.h"
#include "JSXSLTProcessor.lut.h"
#include "kjs_dom.h"
#include "JSDocument.h"
#include "Document.h"
#include "DocumentFragment.h"

using namespace WebCore;

namespace KJS {

const ClassInfo JSXSLTProcessor::info = { "XSLTProcessor", 0, 0, 0 };

/*
@begin XSLTProcessorPrototypeTable 7
  importStylesheet      JSXSLTProcessor::ImportStylesheet     DontDelete|Function 1
  transformToFragment   JSXSLTProcessor::TransformToFragment  DontDelete|Function 2
  transformToDocument   JSXSLTProcessor::TransformToDocument  DontDelete|Function 2
  setParameter          JSXSLTProcessor::SetParameter         DontDelete|Function 3
  getParameter          JSXSLTProcessor::GetParameter         DontDelete|Function 2
  removeParameter       JSXSLTProcessor::RemoveParameter      DontDelete|Function 2
  clearParameters       JSXSLTProcessor::ClearParameters      DontDelete|Function 0
  reset                 JSXSLTProcessor::Reset                DontDelete|Function 0
@end
*/

KJS_DEFINE_PROTOTYPE(XSLTProcessorPrototype)
KJS_IMPLEMENT_PROTOTYPE_FUNCTION(XSLTProcessorPrototypeFunction)
KJS_IMPLEMENT_PROTOTYPE("XSLTProcessor", XSLTProcessorPrototype, XSLTProcessorPrototypeFunction)

JSXSLTProcessor::JSXSLTProcessor(ExecState *exec) : m_impl(new XSLTProcessor())
{
    setPrototype(XSLTProcessorPrototype::self(exec));
}

JSXSLTProcessor::~JSXSLTProcessor()
{
    ScriptInterpreter::forgetDOMObject(m_impl.get());
}

JSValue *XSLTProcessorPrototypeFunction::callAsFunction(ExecState *exec, JSObject *thisObj, const List &args)
{
    if (!thisObj->inherits(&KJS::JSXSLTProcessor::info))
        return throwError(exec, TypeError);
    XSLTProcessor &processor = *static_cast<JSXSLTProcessor *>(thisObj)->impl();
    switch (id) {
        case JSXSLTProcessor::ImportStylesheet:
        {
            JSValue *nodeVal = args[0];
            if (nodeVal->isObject(&JSNode::info)) {
                JSNode* node = static_cast<JSNode*>(nodeVal);
                processor.importStylesheet(node->impl());
                return jsUndefined();
            }
            // Throw exception?
            break;
        }
        case JSXSLTProcessor::TransformToFragment:
        {
            JSValue *nodeVal = args[0];
            JSValue *docVal = args[1];
            if (nodeVal->isObject(&JSNode::info) && docVal->isObject(&JSDocument::info)) {
                Node* node = static_cast<JSNode*>(nodeVal)->impl();
                Document* doc = static_cast<Document*>(static_cast<JSDocument *>(docVal)->impl());
                return toJS(exec, processor.transformToFragment(node, doc).get());
            }
            // Throw exception?
            break;
        }
        case JSXSLTProcessor::TransformToDocument:
        {
            JSValue *nodeVal = args[0];
            if (nodeVal->isObject(&JSNode::info)) {
                JSNode* node = static_cast<JSNode*>(nodeVal);
                RefPtr<Document> resultDocument = processor.transformToDocument(node->impl());
                if (resultDocument)
                    return toJS(exec, resultDocument.get());
                return jsUndefined();
            }
            // Throw exception?
            break;
        }
        case JSXSLTProcessor::SetParameter:
        {
            if (args[1]->isUndefinedOrNull() || args[2]->isUndefinedOrNull())
                return jsUndefined(); // Throw exception?
            String namespaceURI = args[0]->toString(exec);
            String localName = args[1]->toString(exec);
            String value = args[2]->toString(exec);
            processor.setParameter(namespaceURI, localName, value);
            return jsUndefined();
        }
        case JSXSLTProcessor::GetParameter:
        {
            if (args[1]->isUndefinedOrNull())
                return jsUndefined();
            String namespaceURI = args[0]->toString(exec);
            String localName = args[1]->toString(exec);
            String value = processor.getParameter(namespaceURI, localName);
            if (!value.isNull())
                return jsString(value);
            return jsUndefined();
        }
        case JSXSLTProcessor::RemoveParameter:
        {
            if (args[1]->isUndefinedOrNull())
                return jsUndefined();
            String namespaceURI = args[0]->toString(exec);
            String localName = args[1]->toString(exec);
            processor.removeParameter(namespaceURI, localName);
            return jsUndefined();
        }
        case JSXSLTProcessor::ClearParameters:
            processor.clearParameters();
            return jsUndefined();
        case JSXSLTProcessor::Reset:
            processor.reset();
            return jsUndefined();
    }
    return jsUndefined();
}

XSLTProcessorConstructorImp::XSLTProcessorConstructorImp(ExecState *exec)
{
    setPrototype(exec->lexicalInterpreter()->builtinObjectPrototype());
    putDirect(exec->propertyNames().prototype, XSLTProcessorPrototype::self(exec), None);
}

}

#endif // ENABLE(XSLT)
