/*
* Copyright (c) 1998-2011 Caucho Technology -- all rights reserved
*
* This file is part of Resin(R) Open Source
*
* Each copy or derived work must preserve the copyright notice and this
* notice unmodified.
*
* Resin Open Source is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* Resin Open Source is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE, or any warranty
* of NON-INFRINGEMENT. See the GNU General Public License for more
* details.
*
* You should have received a copy of the GNU General Public License
* along with Resin Open Source; if not, write to the
*
* Free Software Foundation, Inc.
* 59 Temple Place, Suite 330
* Boston, MA 02111-1307 USA
*
* @author Emil Ong
*/
package com.caucho.quercus.lib.bam;
import java.io.IOException;
import java.io.Serializable;
import java.util.ArrayList;
import java.util.HashMap;
import java.util.logging.Level;
import java.util.logging.Logger;
import com.caucho.bam.BamError;
import com.caucho.bam.actor.SimpleActor;
import com.caucho.bam.broker.Broker;
import com.caucho.config.ConfigException;
import com.caucho.quercus.QuercusContext;
import com.caucho.quercus.ResinQuercus;
import com.caucho.quercus.env.Env;
import com.caucho.quercus.env.JavaValue;
import com.caucho.quercus.env.LongValue;
import com.caucho.quercus.env.NullValue;
import com.caucho.quercus.env.StringValue;
import com.caucho.quercus.env.Value;
import com.caucho.quercus.page.QuercusPage;
import com.caucho.quercus.page.InterpretedPage;
import com.caucho.quercus.parser.QuercusParser;
import com.caucho.quercus.program.JavaClassDef;
import com.caucho.quercus.program.QuercusProgram;
import com.caucho.remote.BamService;
import com.caucho.util.L10N;
import com.caucho.vfs.NullWriteStream;
import com.caucho.vfs.Path;
import com.caucho.vfs.WriteStream;
import com.caucho.xmpp.disco.DiscoInfoQuery;
import javax.annotation.PostConstruct;
import javax.inject.Inject;
import javax.sql.DataSource;
/**
* BAM actor that calls into a PHP script to handle messages/queries.
**/
public class BamPhpActor extends SimpleActor {
private static final L10N L = new L10N(BamPhpActor.class);
private static final Logger log
= Logger.getLogger(BamPhpActor.class.getName());
private final QuercusContext _quercus = new ResinQuercus();
private final HashMap<String,BamPhpActor> _children
= new HashMap<String,BamPhpActor>();
private ArrayList<String> _featureNames = new ArrayList<String>();
private Path _script;
private QuercusPage _page;
private String _encoding = "ISO-8859-1";
@Inject
private Broker _broker;
public BamPhpActor()
{
}
public BamPhpActor(Path script, String encoding)
{
_script = script;
_encoding = encoding;
}
public Path getScript()
{
return _script;
}
public void setScript(Path script)
{
_script = script;
}
public String getEncoding()
{
return _encoding;
}
public void setEncoding(String encoding)
{
_encoding = encoding;
}
@PostConstruct
public void init()
throws ConfigException
{
if (_script == null)
throw new ConfigException(L.l("script path not specified"));
_quercus.init();
_quercus.start();
try {
_page = _quercus.parse(_script);
} catch (Exception e) {
throw ConfigException.create(e);
}
}
/*
@Override
public boolean startChild(String address)
{
if (log.isLoggable(Level.FINE))
log.fine(L.l("{0}.startActor({1})", toString(), address));
return hasChild(address);
}
*/
boolean hasChild(String address)
{
synchronized(_children) {
return _children.containsKey(address);
}
}
void addChild(String address, BamPhpActor child)
{
synchronized(_children) {
_children.put(address, child);
}
// _broker.addMailbox(child.getActorStream());
}
private void setId(Env env, long id)
{
env.setGlobalValue("_quercus_bam_id", LongValue.create(id));
}
private void setError(Env env, BamError error)
{
Value errorValue = NullValue.NULL;
if (error != null) {
JavaClassDef errorClassDef = env.getJavaClassDefinition(BamError.class);
errorValue = errorClassDef.wrap(env, error);
}
env.setGlobalValue("_quercus_bam_error", errorValue);
}
@Override
public void message(String to, String from, Serializable value)
{
Env env = createEnv(_page, BamEventType.MESSAGE, to, from, value);
try {
_page.executeTop(env);
}
finally {
env.close();
}
}
@Override
public void messageError(String to, String from, Serializable value,
BamError error)
{
Env env = createEnv(_page, BamEventType.MESSAGE_ERROR, to, from, value);
try {
setError(env, error);
_page.executeTop(env);
}
finally {
env.close();
}
}
@Override
public void query(long id, String to, String from, Serializable value)
{
BamEventType eventType = BamEventType.QUERY_GET;
// XXX move to override of introspected method
if (value instanceof DiscoInfoQuery)
eventType = BamEventType.GET_DISCO_FEATURES;
Env env = createEnv(_page, eventType, to, from, value);
boolean understood = false;
try {
setId(env, id);
_page.executeTop(env);
if (eventType == BamEventType.GET_DISCO_FEATURES) {
_featureNames.clear();
Value returnValue = env.getGlobalValue("_quercus_bam_function_return");
if (returnValue.isArray()) {
_featureNames =
(ArrayList) returnValue.toJavaList(env, ArrayList.class);
}
/*
understood = handleDiscoInfoQuery(id, to, from, (DiscoInfoQuery) value);
*/
}
else {
understood =
env.getGlobalValue("_quercus_bam_function_return").toBoolean();
}
}
finally {
env.close();
}
}
/*
@Override
protected void getDiscoFeatureNames(ArrayList<String> featureNames)
{
featureNames.addAll(_featureNames);
}
*/
@Override
public void queryResult(long id, String to, String from, Serializable value)
{
Env env = createEnv(_page, BamEventType.QUERY_RESULT, to, from, value);
try {
setId(env, id);
_page.executeTop(env);
}
finally {
env.close();
}
}
@Override
public void queryError(long id, String to, String from,
Serializable value, BamError error)
{
Env env = createEnv(_page, BamEventType.QUERY_ERROR, to, from, value);
try {
setId(env, id);
setError(env, error);
_page.executeTop(env);
}
finally {
env.close();
}
}
private Env createEnv(QuercusPage page, BamEventType type,
String to, String from, Serializable value)
{
WriteStream out = new NullWriteStream();
Env env = new Env(_quercus, page, out, null, null);
JavaClassDef actorClassDef = env.getJavaClassDefinition(BamPhpActor.class);
env.setGlobalValue("_quercus_bam_actor", actorClassDef.wrap(env, this));
env.start();
JavaClassDef eventClassDef = env.getJavaClassDefinition(BamEventType.class);
Value typeValue = eventClassDef.wrap(env, type);
env.setGlobalValue("_quercus_bam_event_type", typeValue);
env.setGlobalValue("_quercus_bam_to", StringValue.create(to));
env.setGlobalValue("_quercus_bam_from", StringValue.create(from));
Value javaValue = NullValue.NULL;
if (value != null) {
JavaClassDef classDef = env.getJavaClassDefinition(value.getClass());
javaValue = classDef.wrap(env, value);
}
env.setGlobalValue("_quercus_bam_value", javaValue);
return env;
}
public String toString()
{
return (getClass().getSimpleName()
+ "[address=" + getAddress()
+ ",script=" + _script + "]");
}
}