/*
* Copyright 2014 Attila Szegedi, Daniel Dekany, Jonathan Revusky
*
* 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 freemarker.core;
import java.io.IOException;
import java.lang.ref.Reference;
import java.lang.ref.SoftReference;
import java.util.HashMap;
import java.util.Iterator;
import java.util.List;
import java.util.Map;
import edu.umd.cs.findbugs.annotations.SuppressFBWarnings;
import freemarker.template.EmptyMap;
import freemarker.template.TemplateDirectiveModel;
import freemarker.template.TemplateException;
import freemarker.template.TemplateModel;
import freemarker.template.TemplateTransformModel;
import freemarker.template.utility.ObjectFactory;
import freemarker.template.utility.StringUtil;
/**
* An element for the unified macro/transform syntax.
*/
final class UnifiedCall extends TemplateElement implements DirectiveCallPlace {
private Expression nameExp;
private Map namedArgs;
private List positionalArgs, bodyParameterNames;
boolean legacySyntax;
private transient volatile SoftReference/*List<Map.Entry<String,Expression>>*/ sortedNamedArgsCache;
private CustomDataHolder customDataHolder;
UnifiedCall(Expression nameExp,
Map namedArgs,
TemplateElement nestedBlock,
List bodyParameterNames) {
this.nameExp = nameExp;
this.namedArgs = namedArgs;
setNestedBlock(nestedBlock);
this.bodyParameterNames = bodyParameterNames;
}
UnifiedCall(Expression nameExp,
List positionalArgs,
TemplateElement nestedBlock,
List bodyParameterNames) {
this.nameExp = nameExp;
this.positionalArgs = positionalArgs;
if (nestedBlock == TextBlock.EMPTY_BLOCK) {
nestedBlock = null;
}
setNestedBlock(nestedBlock);
this.bodyParameterNames = bodyParameterNames;
}
@Override
void accept(Environment env) throws TemplateException, IOException {
final TemplateModel tm = nameExp.eval(env);
if (tm == UnboundCallable.NO_OP_MACRO) return; // shortcut here.
if (tm instanceof BoundCallable) {
final BoundCallable boundMacro = (BoundCallable) tm;
final Macro unboundMacro = boundMacro.getUnboundCallable();
if (unboundMacro.isFunction() && !legacySyntax) {
throw new _MiscTemplateException(env,
"Routine ", new _DelayedJQuote(unboundMacro.getName()), " is a function, not a directive. "
+ "Functions can only be called from expressions, like in ${f()}, ${x + f()} or ",
"<@someDirective someParam=f() />", ".");
}
env.invoke(boundMacro, namedArgs, positionalArgs, bodyParameterNames,
getNestedBlock());
} else {
boolean isDirectiveModel = tm instanceof TemplateDirectiveModel;
if (isDirectiveModel || tm instanceof TemplateTransformModel) {
Map args;
if (namedArgs != null && !namedArgs.isEmpty()) {
args = new HashMap();
for (Iterator it = namedArgs.entrySet().iterator(); it.hasNext(); ) {
Map.Entry entry = (Map.Entry) it.next();
String key = (String) entry.getKey();
Expression valueExp = (Expression) entry.getValue();
TemplateModel value = valueExp.eval(env);
args.put(key, value);
}
} else {
args = EmptyMap.instance;
}
if (isDirectiveModel) {
env.visit(getNestedBlock(), (TemplateDirectiveModel) tm, args, bodyParameterNames);
} else {
env.visitAndTransform(getNestedBlock(), (TemplateTransformModel) tm, args);
}
} else if (tm == null) {
throw InvalidReferenceException.getInstance(nameExp, env);
} else {
throw new NonUserDefinedDirectiveLikeException(nameExp, tm, env);
}
}
}
@Override
protected String dump(boolean canonical) {
StringBuilder sb = new StringBuilder();
if (canonical) sb.append('<');
sb.append('@');
MessageUtil.appendExpressionAsUntearable(sb, nameExp);
boolean nameIsInParen = sb.charAt(sb.length() - 1) == ')';
if (positionalArgs != null) {
for (int i = 0; i < positionalArgs.size(); i++) {
Expression argExp = (Expression) positionalArgs.get(i);
if (i != 0) {
sb.append(',');
}
sb.append(' ');
sb.append(argExp.getCanonicalForm());
}
} else {
List entries = getSortedNamedArgs();
for (int i = 0; i < entries.size(); i++) {
Map.Entry entry = (Map.Entry) entries.get(i);
Expression argExp = (Expression) entry.getValue();
sb.append(' ');
sb.append(_CoreStringUtils.toFTLTopLevelIdentifierReference((String) entry.getKey()));
sb.append('=');
MessageUtil.appendExpressionAsUntearable(sb, argExp);
}
}
if (bodyParameterNames != null && !bodyParameterNames.isEmpty()) {
sb.append("; ");
for (int i = 0; i < bodyParameterNames.size(); i++) {
if (i != 0) {
sb.append(", ");
}
sb.append(_CoreStringUtils.toFTLTopLevelIdentifierReference((String) bodyParameterNames.get(i)));
}
}
if (canonical) {
if (getNestedBlock() == null) {
sb.append("/>");
} else {
sb.append('>');
sb.append(getNestedBlock().getCanonicalForm());
sb.append("</@");
if (!nameIsInParen
&& (nameExp instanceof Identifier
|| (nameExp instanceof Dot && ((Dot) nameExp).onlyHasIdentifiers()))) {
sb.append(nameExp.getCanonicalForm());
}
sb.append('>');
}
}
return sb.toString();
}
@Override
String getNodeTypeSymbol() {
return "@";
}
@Override
int getParameterCount() {
return 1/*nameExp*/
+ (positionalArgs != null ? positionalArgs.size() : 0)
+ (namedArgs != null ? namedArgs.size() * 2 : 0)
+ (bodyParameterNames != null ? bodyParameterNames.size() : 0);
}
@Override
Object getParameterValue(int idx) {
if (idx == 0) {
return nameExp;
} else {
int base = 1;
final int positionalArgsSize = positionalArgs != null ? positionalArgs.size() : 0;
if (idx - base < positionalArgsSize) {
return positionalArgs.get(idx - base);
} else {
base += positionalArgsSize;
final int namedArgsSize = namedArgs != null ? namedArgs.size() : 0;
if (idx - base < namedArgsSize * 2) {
Map.Entry namedArg = (Map.Entry) getSortedNamedArgs().get((idx - base) / 2);
return (idx - base) % 2 == 0 ? namedArg.getKey() : namedArg.getValue();
} else {
base += namedArgsSize * 2;
final int bodyParameterNamesSize = bodyParameterNames != null ? bodyParameterNames.size() : 0;
if (idx - base < bodyParameterNamesSize) {
return bodyParameterNames.get(idx - base);
} else {
throw new IndexOutOfBoundsException();
}
}
}
}
}
@Override
ParameterRole getParameterRole(int idx) {
if (idx == 0) {
return ParameterRole.CALLEE;
} else {
int base = 1;
final int positionalArgsSize = positionalArgs != null ? positionalArgs.size() : 0;
if (idx - base < positionalArgsSize) {
return ParameterRole.ARGUMENT_VALUE;
} else {
base += positionalArgsSize;
final int namedArgsSize = namedArgs != null ? namedArgs.size() : 0;
if (idx - base < namedArgsSize * 2) {
return (idx - base) % 2 == 0 ? ParameterRole.ARGUMENT_NAME : ParameterRole.ARGUMENT_VALUE;
} else {
base += namedArgsSize * 2;
final int bodyParameterNamesSize = bodyParameterNames != null ? bodyParameterNames.size() : 0;
if (idx - base < bodyParameterNamesSize) {
return ParameterRole.TARGET_LOOP_VARIABLE;
} else {
throw new IndexOutOfBoundsException();
}
}
}
}
}
/**
* Returns the named args by source-code order; it's not meant to be used during template execution, too slow for
* that!
*/
private List/*<Map.Entry<String, Expression>>*/ getSortedNamedArgs() {
Reference ref = sortedNamedArgsCache;
if (ref != null) {
List res = (List) ref.get();
if (res != null) return res;
}
List res = MiscUtil.sortMapOfExpressions(namedArgs);
sortedNamedArgsCache = new SoftReference(res);
return res;
}
@SuppressFBWarnings(value={ "IS2_INCONSISTENT_SYNC", "DC_DOUBLECHECK" }, justification="Performance tricks")
public Object getOrCreateCustomData(Object providerIdentity, ObjectFactory objectFactory)
throws CallPlaceCustomDataInitializationException {
// We are using double-checked locking, utilizing Java memory model "final" trick.
// Note that this.customDataHolder is NOT volatile.
CustomDataHolder customDataHolder = this.customDataHolder; // Findbugs false alarm
if (customDataHolder == null) { // Findbugs false alarm
synchronized (this) {
customDataHolder = this.customDataHolder;
if (customDataHolder == null || customDataHolder.providerIdentity != providerIdentity) {
customDataHolder = createNewCustomData(providerIdentity, objectFactory);
this.customDataHolder = customDataHolder;
}
}
}
if (customDataHolder.providerIdentity != providerIdentity) {
synchronized (this) {
customDataHolder = this.customDataHolder;
if (customDataHolder == null || customDataHolder.providerIdentity != providerIdentity) {
customDataHolder = createNewCustomData(providerIdentity, objectFactory);
this.customDataHolder = customDataHolder;
}
}
}
return customDataHolder.customData;
}
private CustomDataHolder createNewCustomData(Object provierIdentity, ObjectFactory objectFactory)
throws CallPlaceCustomDataInitializationException {
CustomDataHolder customDataHolder;
Object customData;
try {
customData = objectFactory.createObject();
} catch (Exception e) {
throw new CallPlaceCustomDataInitializationException(
"Failed to initialize custom data for provider identity "
+ StringUtil.tryToString(provierIdentity) + " via factory "
+ StringUtil.tryToString(objectFactory), e);
}
if (customData == null) {
throw new NullPointerException("ObjectFactory.createObject() has returned null");
}
customDataHolder = new CustomDataHolder(provierIdentity, customData);
return customDataHolder;
}
public boolean isNestedOutputCacheable() {
if (getNestedBlock() == null) return true;
return getNestedBlock().isOutputCacheable();
}
/*
//REVISIT
boolean heedsOpeningWhitespace() {
return nestedBlock == null;
}
//REVISIT
boolean heedsTrailingWhitespace() {
return nestedBlock == null;
}*/
/**
* Used for implementing double check locking in implementing the
* {@link DirectiveCallPlace#getOrCreateCustomData(Object, ObjectFactory)}.
*/
private static class CustomDataHolder {
private final Object providerIdentity;
private final Object customData;
public CustomDataHolder(Object providerIdentity, Object customData) {
this.providerIdentity = providerIdentity;
this.customData = customData;
}
}
public String getTemplateSourceName() {
return getUnboundTemplate().getSourceName();
}
@Override
boolean isNestedBlockRepeater() {
return true;
}
}