QilNode IXPathEnvironment.ResolveVariable(string prefix, string name)
{
if (!_allowVariables)
{
throw new XslLoadException(SR.Xslt_VariablesNotAllowed);
}
string ns = ResolvePrefixThrow(/*ignoreDefaultNs:*/ true, prefix);
Debug.Assert(ns != null);
// Look up in params and variables of the current scope and all outer ones
QilNode?var = _scope.LookupVariable(name, ns);
if (var == null)
{
throw new XslLoadException(SR.Xslt_InvalidVariable, Compiler.ConstructQName(prefix, name));
}
// All Node* parameters are guaranteed to be in document order with no duplicates, so TypeAssert
// this so that optimizer can use this information to avoid redundant sorts and duplicate removal.
XmlQueryType varType = var.XmlType !;
if (var.NodeType == QilNodeType.Parameter && varType.IsNode && varType.IsNotRtf && varType.MaybeMany && !varType.IsDod)
{
var = _f.TypeAssert(var, XmlQueryTypeFactory.NodeSDod);
}
return(var);
}
QilNode IXPathEnvironment.ResolveFunction(string prefix, string name, IList <QilNode> args, IFocus env)
{
Debug.Assert(!args.IsReadOnly, "Writable collection expected");
if (prefix.Length == 0)
{
FunctionInfo?func;
if (FunctionTable.TryGetValue(name, out func))
{
func.CastArguments(args, name, _f);
switch (func.id)
{
case FuncId.Current:
if (!_allowCurrent)
{
throw new XslLoadException(SR.Xslt_CurrentNotAllowed);
}
// NOTE: This is the only place where the current node (and not the context node) must be used
return(((IXPathEnvironment)this).GetCurrent() !);
case FuncId.Key:
if (!_allowKey)
{
throw new XslLoadException(SR.Xslt_KeyNotAllowed);
}
return(CompileFnKey(args[0], args[1], env));
case FuncId.Document: return(CompileFnDocument(args[0], args.Count > 1 ? args[1] : null));
case FuncId.FormatNumber: return(CompileFormatNumber(args[0], args[1], args.Count > 2 ? args[2] : null));
case FuncId.UnparsedEntityUri: return(CompileUnparsedEntityUri(args[0]));
case FuncId.GenerateId: return(CompileGenerateId(args.Count > 0 ? args[0] : env.GetCurrent() !));
case FuncId.SystemProperty: return(CompileSystemProperty(args[0]));
case FuncId.ElementAvailable: return(CompileElementAvailable(args[0]));
case FuncId.FunctionAvailable: return(CompileFunctionAvailable(args[0]));
default:
Debug.Fail($"{func.id} is present in the function table, but absent from the switch");
return(null);
}
}
else
{
throw new XslLoadException(SR.Xslt_UnknownXsltFunction, Compiler.ConstructQName(prefix, name));
}
}
else
{
string ns = ResolvePrefixThrow(/*ignoreDefaultNs:*/ true, prefix);
Debug.Assert(ns != null);
if (ns == XmlReservedNs.NsMsxsl)
{
if (name == "node-set")
{
FunctionInfo.CheckArity(/*minArg:*/ 1, /*maxArg:*/ 1, name, args.Count);
return(CompileMsNodeSet(args[0]));
}
else if (name == "string-compare")
{
FunctionInfo.CheckArity(/*minArg:*/ 2, /*maxArg:*/ 4, name, args.Count);
return(_f.InvokeMsStringCompare(
/*x: */ _f.ConvertToString(args[0]),
/*y: */ _f.ConvertToString(args[1]),
/*lang: */ 2 < args.Count ? _f.ConvertToString(args[2]) : _f.String(string.Empty),
/*options:*/ 3 < args.Count ? _f.ConvertToString(args[3]) : _f.String(string.Empty)
));
}
else if (name == "utc")
{
FunctionInfo.CheckArity(/*minArg:*/ 1, /*maxArg:*/ 1, name, args.Count);
return(_f.InvokeMsUtc(/*datetime:*/ _f.ConvertToString(args[0])));
}
else if (name == "format-date" || name == "format-time")
{
FunctionInfo.CheckArity(/*minArg:*/ 1, /*maxArg:*/ 3, name, args.Count);
return(_f.InvokeMsFormatDateTime(
/*datetime:*/ _f.ConvertToString(args[0]),
/*format: */ 1 < args.Count ? _f.ConvertToString(args[1]) : _f.String(string.Empty),
/*lang: */ 2 < args.Count ? _f.ConvertToString(args[2]) : _f.String(string.Empty),
/*isDate: */ _f.Boolean(name == "format-date")
));
}
else if (name == "local-name")
{
FunctionInfo.CheckArity(/*minArg:*/ 1, /*maxArg:*/ 1, name, args.Count);
return(_f.InvokeMsLocalName(_f.ConvertToString(args[0])));
}
else if (name == "namespace-uri")
{
FunctionInfo.CheckArity(/*minArg:*/ 1, /*maxArg:*/ 1, name, args.Count);
return(_f.InvokeMsNamespaceUri(_f.ConvertToString(args[0]), env.GetCurrent() !));
}
else if (name == "number")
{
FunctionInfo.CheckArity(/*minArg:*/ 1, /*maxArg:*/ 1, name, args.Count);
return(_f.InvokeMsNumber(args[0]));
}
}
if (ns == XmlReservedNs.NsExsltCommon)
{
if (name == "node-set")
{
FunctionInfo.CheckArity(/*minArg:*/ 1, /*maxArg:*/ 1, name, args.Count);
return(CompileMsNodeSet(args[0]));
}
else if (name == "object-type")
{
FunctionInfo.CheckArity(/*minArg:*/ 1, /*maxArg:*/ 1, name, args.Count);
return(EXslObjectType(args[0]));
}
}
// NOTE: If you add any function here, add it to IsFunctionAvailable as well
// Ensure that all node-set parameters are DocOrderDistinct
for (int i = 0; i < args.Count; i++)
{
args[i] = _f.SafeDocOrderDistinct(args[i]);
}
if (_compiler.Settings.EnableScript)
{
XmlExtensionFunction?scrFunc = _compiler.Scripts.ResolveFunction(name, ns, args.Count, (IErrorHelper)this);
if (scrFunc != null)
{
return(GenerateScriptCall(_f.QName(name, ns, prefix), scrFunc, args));
}
}
else
{
if (_compiler.Scripts.ScriptClasses.ContainsKey(ns))
{
ReportWarning(SR.Xslt_ScriptsProhibited);
return(_f.Error(_lastScope !.SourceLine, SR.Xslt_ScriptsProhibited));
}
}
return(_f.XsltInvokeLateBound(_f.QName(name, ns, prefix), args));
}
}
