/*
* Copyright 2007 JBoss Inc
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
package org.drools.rule.builder.dialect.mvel;
import java.util.HashSet;
import java.util.Set;
import org.drools.base.accumulators.AccumulateFunction;
import org.drools.base.accumulators.MVELAccumulatorFunctionExecutor;
import org.drools.base.mvel.MVELAccumulator;
import org.drools.base.mvel.MVELCompilationUnit;
import org.drools.base.mvel.MVELCompileable;
import org.drools.compiler.DescrBuildError;
import org.drools.compiler.Dialect;
import org.drools.lang.descr.AccumulateDescr;
import org.drools.lang.descr.BaseDescr;
import org.drools.rule.Accumulate;
import org.drools.rule.Declaration;
import org.drools.rule.MVELDialectRuntimeData;
import org.drools.rule.Pattern;
import org.drools.rule.RuleConditionElement;
import org.drools.rule.builder.AccumulateBuilder;
import org.drools.rule.builder.RuleBuildContext;
import org.drools.rule.builder.RuleConditionBuilder;
import org.drools.spi.Accumulator;
/**
* A builder for the java dialect accumulate version
*
* @author etirelli
*/
public class MVELAccumulateBuilder
implements
AccumulateBuilder {
public RuleConditionElement build(final RuleBuildContext context,
final BaseDescr descr) {
return build( context,
descr,
null );
}
public RuleConditionElement build(final RuleBuildContext context,
final BaseDescr descr,
final Pattern prefixPattern) {
try {
final AccumulateDescr accumDescr = (AccumulateDescr) descr;
if ( !accumDescr.hasValidInput() ) {
return null;
}
final RuleConditionBuilder builder = context.getDialect().getBuilder( accumDescr.getInput().getClass() );
Declaration[] previousDeclarations = ( Declaration[] ) context.getDeclarationResolver().getDeclarations(context.getRule()).values().toArray( new Declaration[ context.getDeclarationResolver().getDeclarations(context.getRule()).size() ] );
// create source CE
final RuleConditionElement source = builder.build( context,
accumDescr.getInput() );
if ( source == null ) {
return null;
}
MVELDialect dialect = (MVELDialect) context.getDialect();
final Declaration[] sourceDeclArr = (Declaration[]) source.getOuterDeclarations().values().toArray( new Declaration[ source.getOuterDeclarations().size() ] );
Accumulator accumulator = null;
Declaration[] declarations = null;
if ( accumDescr.isExternalFunction() ) {
// build an external function executor
final Dialect.AnalysisResult analysis = dialect.analyzeExpression( context,
accumDescr,
accumDescr.getExpression(),
new Set[]{context.getDeclarationResolver().getDeclarations(context.getRule()).keySet(), context.getPkg().getGlobals().keySet()} );
// int size = analysis.getBoundIdentifiers()[0].size();
// declarations = new Declaration[size];
// for ( int i = 0; i < size; i++ ) {
// declarations[i] = context.getDeclarationResolver().getDeclaration( (String) analysis.getBoundIdentifiers()[0].get( i ) );
// }
//
// final Serializable expression = dialect.compile( (String) accumDescr.getExpression(),
// analysis,
// null,
// source.getOuterDeclarations(),
// null,
// context );
MVELCompilationUnit unit = dialect.getMVELCompilationUnit( (String) accumDescr.getExpression(),
analysis,
previousDeclarations,
(Declaration[]) source.getOuterDeclarations().values().toArray( new Declaration[source.getOuterDeclarations().size()] ),
null,
context );
AccumulateFunction function = context.getConfiguration().getAccumulateFunction( accumDescr.getFunctionIdentifier() );
accumulator = new MVELAccumulatorFunctionExecutor( unit,
function );
} else {
// it is a custom accumulate
final MVELAnalysisResult initCodeAnalysis = (MVELAnalysisResult) dialect.analyzeBlock( context,
accumDescr,
accumDescr.getInitCode(),
new Set[]{context.getDeclarationResolver().getDeclarations(context.getRule()).keySet(), context.getPkg().getGlobals().keySet()} );
final MVELAnalysisResult actionCodeAnalysis = (MVELAnalysisResult) dialect.analyzeBlock( context,
accumDescr,
null,
accumDescr.getActionCode(),
new Set[]{context.getDeclarationResolver().getDeclarations(context.getRule()).keySet(), context.getPkg().getGlobals().keySet()},
initCodeAnalysis.getMvelVariables() );
final MVELAnalysisResult resultCodeAnalysis = (MVELAnalysisResult) dialect.analyzeExpression( context,
accumDescr,
accumDescr.getResultCode(),
new Set[]{context.getDeclarationResolver().getDeclarations(context.getRule()).keySet(), context.getPkg().getGlobals().keySet()},
initCodeAnalysis.getMvelVariables() );
Dialect.AnalysisResult reverseCodeAnalysis = null;
if ( accumDescr.getReverseCode() != null ) {
reverseCodeAnalysis = context.getDialect().analyzeBlock( context,
accumDescr,
accumDescr.getActionCode(),
new Set[]{context.getDeclarationResolver().getDeclarations(context.getRule()).keySet(), context.getPkg().getGlobals().keySet()} );
}
MVELCompilationUnit initUnit = dialect.getMVELCompilationUnit( (String) accumDescr.getInitCode(),
initCodeAnalysis,
previousDeclarations,
(Declaration[]) source.getOuterDeclarations().values().toArray( new Declaration[source.getOuterDeclarations().size()] ),
null,
context );
// final Serializable init = dialect.compile( (String) accumDescr.getInitCode(),
// initCodeAnalysis,
// null,
// source.getOuterDeclarations(),
// null,
// context );
MVELCompilationUnit actionUnit = dialect.getMVELCompilationUnit( (String) accumDescr.getActionCode(),
actionCodeAnalysis,
previousDeclarations,
(Declaration[]) source.getOuterDeclarations().values().toArray( new Declaration[source.getOuterDeclarations().size()] ),
initCodeAnalysis.getMvelVariables(),
context );
// final Serializable action = dialect.compile( (String) accumDescr.getActionCode(),
// actionCodeAnalysis,
// null,
// source.getOuterDeclarations(),
// initCodeAnalysis.getMvelVariables(),
// context );
// Serializable reverse = null;
MVELCompilationUnit reverseUnit = null;
if ( accumDescr.getReverseCode() != null ) {
reverseUnit = dialect.getMVELCompilationUnit( (String) accumDescr.getReverseCode(),
resultCodeAnalysis,
previousDeclarations,
(Declaration[]) source.getOuterDeclarations().values().toArray( new Declaration[source.getOuterDeclarations().size()] ),
initCodeAnalysis.getMvelVariables(),
context );
// reverse = dialect.compile( (String) accumDescr.getReverseCode(),
// resultCodeAnalysis,
// null,
// source.getOuterDeclarations(),
// initCodeAnalysis.getMvelVariables(),
// context );
}
MVELCompilationUnit resultUnit = dialect.getMVELCompilationUnit( (String) accumDescr.getResultCode(),
resultCodeAnalysis,
previousDeclarations,
(Declaration[]) source.getOuterDeclarations().values().toArray( new Declaration[source.getOuterDeclarations().size()] ),
initCodeAnalysis.getMvelVariables(),
context );
// final Serializable result = dialect.compile( (String) accumDescr.getResultCode(),
// resultCodeAnalysis,
// null,
// source.getOuterDeclarations(),
// initCodeAnalysis.getMvelVariables(),
// context );
//DroolsMVELFactory factory = null;
if ( reverseUnit == null ) {
// // does not support reverse, so create a regular factory
// factory = new DroolsMVELFactory( context.getDeclarationResolver().getDeclarations(),
// source.getOuterDeclarations(),
// context.getPkg().getGlobals() );
} else {
Set<String> shadow = new HashSet<String>( source.getOuterDeclarations().keySet() );
shadow.retainAll( reverseCodeAnalysis.getNotBoundedIdentifiers() );
shadow.addAll( reverseCodeAnalysis.getBoundIdentifiers()[0] );
reverseUnit.setShadowIdentifiers( (String[]) shadow.toArray( new String[shadow.size()] ) );
// supports reverse, so create a shadowing factory
// factory = new DroolsMVELShadowFactory( context.getDeclarationResolver().getDeclarations(),
// source.getOuterDeclarations(),
// context.getPkg().getGlobals(),
// ( String[] ) shadow.toArray( new String[ shadow.size() ] ) );
}
// MVELDialectRuntimeData data = (MVELDialectRuntimeData) context.getPkg().getDialectRuntimeRegistry().getDialectData( "mvel" );
// factory.setNextFactory( data.getFunctionFactory() );
accumulator = new MVELAccumulator( initUnit,
actionUnit,
reverseUnit,
resultUnit );
}
final Accumulate accumulate = new Accumulate( source,
declarations,
sourceDeclArr,
accumulator );
MVELDialectRuntimeData data = (MVELDialectRuntimeData) context.getPkg().getDialectRuntimeRegistry().getDialectData( "mvel" );
data.addCompileable( accumulate,
(MVELCompileable) accumulator );
((MVELCompileable) accumulator).compile( context.getPackageBuilder().getRootClassLoader() );
return accumulate;
} catch ( Exception e ) {
e.printStackTrace();
context.getErrors().add( new DescrBuildError( context.getParentDescr(),
descr,
e,
"Unable to build expression for 'accumulate' : " + e.getMessage() ) );
return null;
}
}
}