script.C

Go to the documentation of this file.

/*
 * This file is part of the "Archon" framework.
 * (http://files3d.sourceforge.net)
 *
 * Copyright © 2002 by Kristian Spangsege and Brian Kristiansen.
 *
 * Permission to use, copy, modify, and distribute this software and
 * its documentation under the terms of the GNU General Public License is
 * hereby granted. No representations are made about the suitability of
 * this software for any purpose. It is provided "as is" without express
 * or implied warranty. See the GNU General Public License
 * (http://www.gnu.org/copyleft/gpl.html) for more details.
 *
 * The characters in this file are ISO8859-1 encoded.
 *
 * The documentation in this file is in "Doxygen" style
 * (http://www.doxygen.org).
 */

#include <archon/x3d/server/field_type.H>
#include <archon/x3d/server/field.H>
#include <archon/x3d/server/server.H>
#include <archon/x3d/server/script.H>
#include <archon/x3d/server/script_ecma.H>

namespace Archon
{
  namespace X3D
  {
    const NodeType *ScriptNode::type = 0;
    const NodeType *Script::type = 0;

    void initializeScriptComponent()
    {
      vector<const FieldBase *> fields;


      // ScriptNode

      ScriptNode::type =
        NodeType::newAbstract("ScriptNode", false, 0,
                              ChildNode::type);


      // Script

      fields.push_back(newPrivateField("directOutput", SFBool::type,
                                       &Script::directOutput));
      fields.push_back(newPrivateField("mustEvaluate", SFBool::type,
                                       &Script::mustEvaluate));
      Script::type =
        NodeType::newConcrete("Script", "children",
                              Script::instantiate, &fields,
                              ScriptNode::type, UrlObject::type);
      fields.clear();
    }


    Script::Script(BackRef<ExecutionContext> c):
      NodeBase(c), directOutput(false), mustEvaluate(false)
    {
    }


    void Script::update()
    {
      Ref<const Loader::Contents> c = getContents();
      if(!c) return;
      Mutex::Lock l(context->server->scenegraphMutex);
      if(engine) return;
      const Loader::ScriptContents *d =
        dynamic_cast<const Loader::ScriptContents *>(c.get());
      if(!d) ARCHON_THROW1(InternalException,
                           "Script::update: Got non-script "
                           "contents object");
      if(d->language == "ecmascript")
        engine = new ECMA::Engine(this, d->sourceCode, d->sourceName, d->sourceLine);
      else ARCHON_THROW1(InternalException,
                         "Script::update: Got unexpected language");
    }

    void Script::clear()
    {
      engine = 0;
    }

    void Script::onLoaded()
    {
      if(!isRealized()) return;
      update();
    }

    void Script::onRealized()
    {
      update();
    }

    void Script::handleEvent(int fieldIndex, Time timestamp)
    {
      if(engine) engine->handleEvent(fieldIndex, timestamp);
    }

    void Script::handleCDATA(string s, Time stamp)
    {
      // Default to ECMA Script
      if(!Text::isPrefixOf("ecmascript:", s, true) &&
         !Text::isPrefixOf("javascript:", s, true))
        s = "ecmascript:" + s;
      addUri(s, stamp);
    }
  }
}

---