package com.xmlcalabash.functions;
import com.xmlcalabash.runtime.XCompoundStep;
import com.xmlcalabash.runtime.XStep;
import net.sf.saxon.expr.XPathContext;
import net.sf.saxon.lib.ExtensionFunctionCall;
import net.sf.saxon.lib.ExtensionFunctionDefinition;
import net.sf.saxon.om.Item;
import net.sf.saxon.om.Sequence;
import net.sf.saxon.om.SequenceIterator;
import net.sf.saxon.om.StructuredQName;
import net.sf.saxon.trans.XPathException;
import net.sf.saxon.tree.iter.SingletonIterator;
import net.sf.saxon.tree.tiny.TinyDocumentImpl;
import net.sf.saxon.value.AnyURIValue;
import net.sf.saxon.value.SequenceType;
import com.xmlcalabash.core.XProcConstants;
import com.xmlcalabash.core.XProcRuntime;
import com.xmlcalabash.core.XProcException;
import java.net.URI;
import java.net.URISyntaxException;
//
// The contents of this file are subject to the Mozilla Public License Version 1.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.mozilla.org/MPL/
//
// Software distributed under the License is distributed on an "AS IS" basis,
// WITHOUT WARRANTY OF ANY KIND, either express or implied.
// See the License for the specific language governing rights and limitations under the License.
//
// The Original Code is: all this file.
//
// The Initial Developer of the Original Code is Michael H. Kay.
//
// Portions created by Norman Walsh are Copyright (C) Mark Logic Corporation. All Rights Reserved.
//
// Contributor(s): Norman Walsh.
//
/**
* Implementation of the XSLT system-property() function
*/
public class ResolveURI extends XProcExtensionFunctionDefinition {
private static StructuredQName funcname = new StructuredQName("p", XProcConstants.NS_XPROC, "resolve-uri");
protected ResolveURI() {
// you can't call this one
}
public ResolveURI(XProcRuntime runtime) {
registry.registerRuntime(this, runtime);
}
public StructuredQName getFunctionQName() {
return funcname;
}
public int getMinimumNumberOfArguments() {
return 1;
}
public int getMaximumNumberOfArguments() {
return 2;
}
public SequenceType[] getArgumentTypes() {
return new SequenceType[]{SequenceType.SINGLE_STRING, SequenceType.OPTIONAL_STRING};
}
public SequenceType getResultType(SequenceType[] suppliedArgumentTypes) {
return SequenceType.SINGLE_ATOMIC;
}
public boolean dependsOnFocus() {
return true;
}
public ExtensionFunctionCall makeCallExpression() {
return new ResolveURICall(this);
}
private class ResolveURICall extends ExtensionFunctionCall {
private XProcExtensionFunctionDefinition xdef = null;
public ResolveURICall(XProcExtensionFunctionDefinition def) {
xdef = def;
}
public Sequence call(XPathContext xPathContext, Sequence[] sequences) throws XPathException {
String relativeURI = sequences[0].head().getStringValue();
XProcRuntime runtime = registry.getRuntime(xdef);
XStep step = runtime.getXProcData().getStep();
// FIXME: this can't be the best way to do this...
// step == null in use-when
if (step != null && !(step instanceof XCompoundStep)) {
throw XProcException.dynamicError(23);
}
String baseURI = null;
if (sequences.length > 1) {
baseURI = sequences[1].head().getStringValue();
} else {
baseURI = runtime.getStaticBaseURI().toASCIIString();
try {
// FIXME: TinyDocumentImpl? Surely we can do better than that!
Item item = xPathContext.getContextItem();
baseURI = ((TinyDocumentImpl) item).getBaseURI();
} catch (Exception e) {
// nop
}
}
// Michael Kay's done the heavy lifting and made the method public, so let's just
// do that!
try {
URI abs = net.sf.saxon.functions.ResolveURI.makeAbsolute(relativeURI, baseURI);
String resolvedURI = abs.toASCIIString();
return new AnyURIValue(resolvedURI);
} catch (URISyntaxException use) {
throw new XProcException(use);
}
}
}
}