Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance. Project price only 1 $
You can buy this project and download/modify it how often you want.
/*
* ProcessMatch.java
*
* Copyright 2008 Mark Logic Corporation.
* All rights reserved.
*
* This program 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.
*
* This program 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. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see .
*/
package com.xmlcalabash.util;
import com.xmlcalabash.core.XProcException;
import com.xmlcalabash.core.XProcRuntime;
import com.xmlcalabash.model.RuntimeValue;
import net.sf.saxon.Configuration;
import net.sf.saxon.event.PipelineConfiguration;
import net.sf.saxon.om.NamespaceResolver;
import net.sf.saxon.om.Sequence;
import net.sf.saxon.s9api.Axis;
import net.sf.saxon.s9api.QName;
import net.sf.saxon.s9api.SaxonApiException;
import net.sf.saxon.s9api.XdmDestination;
import net.sf.saxon.s9api.XdmNode;
import net.sf.saxon.s9api.XdmNodeKind;
import net.sf.saxon.s9api.XdmSequenceIterator;
import net.sf.saxon.s9api.XdmValue;
import net.sf.saxon.sxpath.IndependentContext;
import net.sf.saxon.sxpath.XPathDynamicContext;
import net.sf.saxon.sxpath.XPathEvaluator;
import net.sf.saxon.sxpath.XPathExpression;
import net.sf.saxon.sxpath.XPathVariable;
import net.sf.saxon.trans.XPathException;
import java.net.URI;
import java.util.Hashtable;
import java.util.Iterator;
import java.util.Map;
import java.util.Vector;
/**
*
* @author ndw
*/
public class ProcessMatch extends TreeWriter {
public static final int SAW_ELEMENT = 1;
public static final int SAW_WHITESPACE = 2;
public static final int SAW_TEXT = 4;
public static final int SAW_PI = 8;
public static final int SAW_COMMENT = 16;
private ProcessMatchingNodes processor = null;
private int saw = 0;
private XPathExpression matcher = null;
private Hashtable inScopeVariables = null;
private Configuration saxonConfig = null;
private int count;
/*
* Creates a new instance of ProcessMatch
*/
public ProcessMatch(XProcRuntime runtime, ProcessMatchingNodes processor) {
super(runtime);
this.runtime = runtime;
this.processor = processor;
saxonConfig = runtime.getProcessor().getUnderlyingConfiguration();
}
public void match(XdmNode doc, RuntimeValue match) {
match(doc, match, null);
}
public void match(XdmNode doc, RuntimeValue match, Hashtable inScopeVariables) {
XdmNode node = match.getNode();
String expr = match.getString();
try {
XPathEvaluator xeval = new XPathEvaluator(saxonConfig);
NamespaceResolver resolver = new MatchingNamespaceResolver(match.getNamespaceBindings());
xeval.getStaticContext().setNamespaceResolver(resolver);
if (inScopeVariables != null)
((IndependentContext)xeval.getStaticContext()).setAllowUndeclaredVariables(true);
matcher = xeval.createPattern(match.getString());
if (inScopeVariables == null)
this.inScopeVariables = null;
else {
this.inScopeVariables = new Hashtable();
Iterator externalVariables = ((IndependentContext)xeval.getStaticContext()).iterateExternalVariables();
while (externalVariables.hasNext()) {
XPathVariable var = externalVariables.next();
QName name = new QName(var.getVariableQName().toJaxpQName());
RuntimeValue rv = inScopeVariables.get(name);
if (rv == null)
throw new XPathException("Undeclared variable in XPath expression: $" + name);
XdmValue value = runtime.getAllowGeneralExpressions() && rv.hasGeneralValue()
? rv.getValue()
: rv.getUntypedAtomic(runtime);
this.inScopeVariables.put(var, value.getUnderlyingValue());
}
}
destination = new XdmDestination();
receiver = destination.getReceiver(saxonConfig);
PipelineConfiguration pipe = controller.makePipelineConfiguration();
receiver.setPipelineConfiguration(pipe);
receiver.setSystemId(doc.getBaseURI().toASCIIString());
receiver.open();
// If we start a match at an element, fake a document wrapper so that
// a sequence of nodes is returned correctly...
if (doc.getNodeKind() != XdmNodeKind.DOCUMENT) {
startDocument(doc.getBaseURI());
}
traverse(doc);
if (doc.getNodeKind() != XdmNodeKind.DOCUMENT) {
endDocument();
}
receiver.close();
} catch (XProcException e) {
throw e;
} catch (Exception e) {
if (e.getMessage() != null && e.getMessage().contains("syntax error")) {
throw XProcException.dynamicError(
23, node,
new RuntimeException("Syntax error in match pattern: \"" + match.getString() + "\"", e));
} else {
throw new XProcException(node, e);
}
}
}
// We've already done a bunch of setup, don't do it again!
public void startDocument(URI baseURI) {
inDocument = true;
seenRoot = false;
try {
receiver.startDocument(0);
} catch (Exception e) {
throw new XProcException(e);
}
}
public int count(XdmNode doc, RuntimeValue match, boolean deep) {
count = 0;
try {
XPathEvaluator xeval = new XPathEvaluator(saxonConfig);
NamespaceResolver resolver = new MatchingNamespaceResolver(match.getNamespaceBindings());
xeval.getStaticContext().setNamespaceResolver(resolver);
matcher = xeval.createPattern(match.getString());
traverse(doc, deep);
} catch (XProcException e) {
throw e;
} catch (Exception e) {
throw new XProcException(e);
}
return count;
}
public XdmNode getResult() {
return destination.getXdmNode();
}
public boolean matches(XdmNode node) {
try {
XPathDynamicContext context = matcher.createDynamicContext(node.getUnderlyingNode());
if (inScopeVariables != null)
for (Map.Entry var : inScopeVariables.entrySet())
context.setVariable(var.getKey(), var.getValue());
return matcher.effectiveBooleanValue(context);
} catch (XPathException sae) {
return false;
}
}
private void traverse(XdmNode node) throws SaxonApiException, XPathException {
boolean match = matches(node);
boolean processChildren = false;
if (!match) {
if (node.getNodeKind() == XdmNodeKind.ELEMENT) {
saw |= SAW_ELEMENT;
} else if (node.getNodeKind() == XdmNodeKind.TEXT) {
if ("".equals(node.getStringValue().trim())) {
saw |= SAW_WHITESPACE;
} else {
saw |= SAW_TEXT;
}
} else if (node.getNodeKind() == XdmNodeKind.COMMENT) {
saw |= SAW_COMMENT;
} else if (node.getNodeKind() == XdmNodeKind.PROCESSING_INSTRUCTION) {
saw |= SAW_PI;
}
}
if (node.getNodeKind() == XdmNodeKind.DOCUMENT) {
if (match) {
processChildren = processor.processStartDocument(node);
saw = 0;
} else {
startDocument(node.getBaseURI());
}
if (!match || processChildren) {
XdmSequenceIterator iter = node.axisIterator(Axis.CHILD);
while (iter.hasNext()) {
XdmNode child = (XdmNode) iter.next();
traverse(child);
}
}
if (match) {
processor.processEndDocument(node);
} else {
endDocument();
}
} else if (node.getNodeKind() == XdmNodeKind.ELEMENT) {
if (match) {
processChildren = processor.processStartElement(node);
saw = 0;
} else {
addStartElement(node);
}
if (!match) {
XdmSequenceIterator iter = node.axisIterator(Axis.ATTRIBUTE);
// Walk through the attributes twice, processing all the *NON* matches first.
// That way if a matching node renames an attribute, it can replace any non-matching
// attribute with the same name.
while (iter.hasNext()) {
XdmNode child = (XdmNode) iter.next();
if (!matches(child)) {
traverse(child);
}
}
iter = node.axisIterator(Axis.ATTRIBUTE);
while (iter.hasNext()) {
XdmNode child = (XdmNode) iter.next();
if (matches(child)) {
traverse(child);
}
}
receiver.startContent();
}
if (!match || processChildren) {
XdmSequenceIterator iter = node.axisIterator(Axis.CHILD);
while (iter.hasNext()) {
XdmNode child = (XdmNode) iter.next();
traverse(child);
}
}
if (match) {
processor.processEndElement(node);
} else {
addEndElement();
}
} else if (node.getNodeKind() == XdmNodeKind.ATTRIBUTE) {
// FIXME: What about changing the name of the attribute?
if (match) {
processor.processAttribute(node);
saw = 0;
} else {
addAttribute(node.getNodeName(), node.getStringValue());
}
} else if (node.getNodeKind() == XdmNodeKind.COMMENT) {
if (match) {
processor.processComment(node);
saw = 0;
} else {
addComment(node.getStringValue());
}
} else if (node.getNodeKind() == XdmNodeKind.TEXT) {
if (match) {
processor.processText(node);
saw = 0;
} else {
addText(node.getStringValue());
}
} else if (node.getNodeKind() == XdmNodeKind.PROCESSING_INSTRUCTION) {
if (match) {
processor.processPI(node);
saw = 0;
} else {
addPI(node.getNodeName().getLocalName(), node.getStringValue());
}
} else {
throw new UnsupportedOperationException("Unexpected node type");
}
}
private void traverse(XdmNode node, boolean deep) throws SaxonApiException, XPathException {
boolean match = matches(node);
if (match) {
count++;
}
if (node.getNodeKind() == XdmNodeKind.DOCUMENT) {
if (!match || deep) {
XdmSequenceIterator iter = node.axisIterator(Axis.CHILD);
while (iter.hasNext()) {
XdmNode child = (XdmNode) iter.next();
traverse(child, deep);
}
}
} else if (node.getNodeKind() == XdmNodeKind.ELEMENT) {
if (!match || deep) {
XdmSequenceIterator iter = node.axisIterator(Axis.ATTRIBUTE);
while (iter.hasNext()) {
XdmNode child = (XdmNode) iter.next();
traverse(child, deep);
}
iter = node.axisIterator(Axis.CHILD);
while (iter.hasNext()) {
XdmNode child = (XdmNode) iter.next();
traverse(child, deep);
}
}
} else {
//nop
}
}
private class MatchingNamespaceResolver implements NamespaceResolver {
private Hashtable ns = new Hashtable ();
public MatchingNamespaceResolver(Hashtable bindings) {
ns = bindings;
}
public String getURIForPrefix(String prefix, boolean useDefault) {
if ("".equals(prefix) && !useDefault) {
return "";
}
return ns.get(prefix);
}
public Iterator iteratePrefixes() {
Vector p = new Vector ();
for (String pfx : ns.keySet()) {
p.add(pfx);
}
return p.iterator();
}
}
}
