/*
 * Copyright  1999-2008 The Apache Software Foundation.
 *
 *  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.
 *
 *  This file has been modified by Ministerio de Industria, Energía y Turismo 
 */
package adsi.org.apache.xml.security.signature;

import java.io.ByteArrayInputStream;
import java.io.ByteArrayOutputStream;
import java.io.IOException;
import java.io.InputStream;
import java.io.OutputStream;
import java.io.UnsupportedEncodingException;
import java.util.ArrayList;
import java.util.HashSet;
import java.util.List;
import java.util.Set;

import javax.xml.parsers.DocumentBuilder;
import javax.xml.parsers.DocumentBuilderFactory;
import javax.xml.parsers.ParserConfigurationException;

import org.w3c.dom.Document;
import org.w3c.dom.Node;
import org.xml.sax.SAXException;

import adsi.org.apache.xml.security.c14n.CanonicalizationException;
import adsi.org.apache.xml.security.c14n.implementations.Canonicalizer11_OmitComments;
import adsi.org.apache.xml.security.c14n.implementations.Canonicalizer20010315OmitComments;
import adsi.org.apache.xml.security.c14n.implementations.CanonicalizerBase;
import adsi.org.apache.xml.security.exceptions.XMLSecurityRuntimeException;
import adsi.org.apache.xml.security.utils.JavaUtils;
import adsi.org.apache.xml.security.utils.XMLUtils;

/**
 * Class XMLSignatureInput
 *
 * @author Christian Geuer-Pollmann
 * $todo$ check whether an XMLSignatureInput can be _both_, octet stream _and_ node set?
 * 
 * Changes:
 *  * all resetable inputstream are used like inputstream instead byte readed (better memory management).
 * @author David Santos
 */
public class XMLSignatureInput implements Cloneable {
    static org.apache.commons.logging.Log log = 
        org.apache.commons.logging.LogFactory.getLog
	    (XMLSignatureInput.class.getName());

    /*
     * The XMLSignature Input can be either:
     *   A byteArray like with/or without InputStream.
     *   Or a nodeSet like defined either:
     *       * as a collection of nodes
     *       * or as subnode excluding or not commets and excluding or 
     *         not other nodes.
     */

    /**
     * Some InputStreams do not support the {@link java.io.InputStream#reset}
     * method, so we read it in completely and work on our Proxy.
     */
    InputStream _inputOctetStreamProxy = null;
    /**
     * The original NodeSet for this XMLSignatureInput
     */
    Set _inputNodeSet = null;
    /**
     * The original Element
     */
    Node _subNode=null;
    /**
     * Exclude Node *for enveloped transformations*
     */
    Node excludeNode=null;
    /**
     * 
     */
    boolean excludeComments=false;
   
    boolean isNodeSet=false;
    /**
     * A cached bytes
     */
    byte []bytes=null;

    /**
     * Some Transforms may require explicit MIME type, charset (IANA registered "character set"), or other such information concerning the data they are receiving from an earlier Transform or the source data, although no Transform algorithm specified in this document needs such explicit information. Such data characteristics are provided as parameters to the Transform algorithm and should be described in the specification for the algorithm.
     */   
    private String _MIMEType = null;

    /**
     * Field _SourceURI 
     */
    private String _SourceURI = null;

    /**
     * Node Filter list.
     */
    List nodeFilters=new ArrayList();
   
    boolean needsToBeExpanded=false;
    OutputStream outputStream=null;

    /**
     * Check if the structured is needed to be circumbented.
     * @return true if so.
     */
    public boolean isNeedsToBeExpanded() {
	return needsToBeExpanded;
    }
   
    /**
     * Set if the structured is needed to be circumbented.
     * @param needsToBeExpanded true if so.
     */
    public void setNeedsToBeExpanded(boolean needsToBeExpanded) {
	this.needsToBeExpanded = needsToBeExpanded;
    }

    /**
     * Construct a XMLSignatureInput from an octet array.
     * <p>
     * This is a comfort method, which internally converts the byte[] array into 
     * an InputStream
     * <p>NOTE: no defensive copy</p>
     * @param inputOctets an octet array which including XML document or node
     */
    public XMLSignatureInput(byte[] inputOctets) {

        // NO  defensive copy
   	  
        //this._inputOctetStreamProxy = new ByteArrayInputStream(inputOctets);
        this.bytes=inputOctets;
    }

    /**
     * Constructs a <code>XMLSignatureInput</code> from an octet stream. The
     * stream is directly read.
     *
     * @param inputOctetStream
     */
    public XMLSignatureInput(InputStream inputOctetStream)  {
	this._inputOctetStreamProxy=inputOctetStream;
   	  
        //this(JavaUtils.getBytesFromStream(inputOctetStream));
    }

    /**
     * Construct a XMLSignatureInput from a String.
     * <p>
     * This is a comfort method, which internally converts the String into a byte
     * [] array using the {@link java.lang.String#getBytes()} method.
     * @deprecated
     * @param inputStr the input String which including XML document or node
     */
    public XMLSignatureInput(String inputStr) {
        this(inputStr.getBytes());
    }

    /**
     * Construct a XMLSignatureInput from a String with a given encoding.
     * <p>
     * This is a comfort method, which internally converts the String into a byte
     * [] array using the {@link java.lang.String#getBytes()} method.
     *
     * @deprecated
     * @param inputStr the input String with encoding <code>encoding</code>
     * @param encoding the encoding of <code>inputStr</code>
     * @throws UnsupportedEncodingException
     */
    public XMLSignatureInput(String inputStr, String encoding)
           throws UnsupportedEncodingException {
        this(inputStr.getBytes(encoding));
    }

    /**
     * Construct a XMLSignatureInput from a subtree rooted by rootNode. This
     * method included the node and <I>all</I> his descendants in the output.
     *
     * @param rootNode
     */
    public XMLSignatureInput(Node rootNode)
    {
        this._subNode = rootNode;
    }

    /**
     * Constructor XMLSignatureInput
     *
     * @param inputNodeSet
     * @param usedXPathAPI
     */
    public XMLSignatureInput(Set inputNodeSet) {
        this._inputNodeSet = inputNodeSet;
    }
   
    /**
     * Returns the node set from input which was specified as the parameter of 
     * {@link XMLSignatureInput} constructor
     *
     * @return the node set
     * @throws SAXException
     * @throws IOException
     * @throws ParserConfigurationException
     * @throws CanonicalizationException
     */
    public Set getNodeSet() throws CanonicalizationException, 
	ParserConfigurationException, IOException, SAXException {
	return getNodeSet(false);
    }

    /**
     * Returns the node set from input which was specified as the parameter of 
     * {@link XMLSignatureInput} constructor
     * @param circumvent
     *
     * @return the node set
     * @throws SAXException
     * @throws IOException
     * @throws ParserConfigurationException
     * @throws CanonicalizationException
     */
    public Set getNodeSet(boolean circumvent)
           throws ParserConfigurationException, IOException, SAXException,
                  CanonicalizationException {
        if (this._inputNodeSet!=null) {
      	    return this._inputNodeSet;
        }
	if ((this._inputOctetStreamProxy==null)&& (this._subNode!=null) ) {
            
     	    if (circumvent) {           
     	    	XMLUtils.circumventBug2650(XMLUtils.getOwnerDocument(_subNode));
            }
            this._inputNodeSet = new HashSet();
            XMLUtils.getSet(_subNode,this._inputNodeSet, excludeNode, this.excludeComments);
            
   	    return this._inputNodeSet;
	} else if (this.isOctetStream()) {
            convertToNodes();
            HashSet result=new HashSet();
            XMLUtils.getSet(_subNode, result,null,false); 
            //this._inputNodeSet=result;
            return result;         
        }

        throw new RuntimeException(
            "getNodeSet() called but no input data present");
    }

    /**
     * Returns the Octect stream(byte Stream) from input which was specified as 
     * the parameter of {@link XMLSignatureInput} constructor
     *
     * @return the Octect stream(byte Stream) from input which was specified as 
     * the parameter of {@link XMLSignatureInput} constructor
     * @throws IOException
     */
    public InputStream getOctetStream() throws IOException  {
         	  
        return getResetableInputStream();                 
    }

    /**
     * @return real octect stream
     */
    public InputStream getOctetStreamReal () {
        return this._inputOctetStreamProxy;
    }

    /**
     * Returns the byte array from input which was specified as the parameter of 
     * {@link XMLSignatureInput} constructor
     *
     * @return the byte[] from input which was specified as the parameter of 
     * {@link XMLSignatureInput} constructor
     *
     * @throws CanonicalizationException
     * @throws IOException
     */
    public byte[] getBytes() throws IOException, CanonicalizationException {
        if (bytes!=null) {
            return bytes;      
        }
        InputStream is = getResetableInputStream();
        if (is!=null) {
            //resetable can read again bytes. 
	    if (bytes==null) {
                is.reset();       
                bytes=JavaUtils.getBytesFromStream(is);
     	    } 	  	
     	    return bytes;   	  	      
        }                    
        Canonicalizer20010315OmitComments c14nizer =
   		new Canonicalizer20010315OmitComments();                  
        bytes=c14nizer.engineCanonicalize(this);         
        return bytes;
    }

    /**
     * Determines if the object has been set up with a Node set
     *
     * @return true if the object has been set up with a Node set
     */
    public boolean isNodeSet() {
        return (( (this._inputOctetStreamProxy == null)
              && (this._inputNodeSet != null) ) || isNodeSet);
    }

    /**
     * Determines if the object has been set up with an Element
     *
     * @return true if the object has been set up with a Node set
     */
    public boolean isElement() {
	return ((this._inputOctetStreamProxy==null)&& (this._subNode!=null)
   		&& (this._inputNodeSet==null) && !isNodeSet);
    }
   
    /**
     * Determines if the object has been set up with an octet stream
     *
     * @return true if the object has been set up with an octet stream
     */
    public boolean isOctetStream() {
        return ( ((this._inputOctetStreamProxy != null) || bytes!=null)
              && ((this._inputNodeSet == null) && _subNode ==null));
    }

    /**
     * Determines if {@link #setOutputStream} has been called with a 
     * non-null OutputStream.
     *
     * @return true if {@link #setOutputStream} has been called with a 
     * non-null OutputStream
     */
    public boolean isOutputStreamSet() {
	return outputStream != null;
    }
   
    /**
     * Determines if the object has been set up with a ByteArray
     *
     * @return true is the object has been set up with an octet stream
     */
    public boolean isByteArray() {
        return ( (bytes!=null)
              && ((this._inputNodeSet == null) && _subNode ==null));
    }

    /**
     * Is the object correctly set up?
     *
     * @return true if the object has been set up correctly
     */
    public boolean isInitialized() {
        return (this.isOctetStream() || this.isNodeSet());
    }

    /**
     * Returns MIMEType
     *
     * @return MIMEType
     */
    public String getMIMEType() {
        return this._MIMEType;
    }

    /**
     * Sets MIMEType
     *
     * @param MIMEType
     */
    public void setMIMEType(String MIMEType) {
        this._MIMEType = MIMEType;
    }

    /**
     * Return SourceURI
     *
     * @return SourceURI
     */
    public String getSourceURI() {
        return this._SourceURI;
    }

    /**
     * Sets SourceURI
     *
     * @param SourceURI
     */
    public void setSourceURI(String SourceURI) {
        this._SourceURI = SourceURI;
    }
   
    /**
     * Method toString
     * @inheritDoc
     */
    public String toString() {
        if (this.isNodeSet()) {
            return "XMLSignatureInput/NodeSet/" + this._inputNodeSet.size()
                   + " nodes/" + this.getSourceURI();         
        } 
        if (this.isElement()) {
            return "XMLSignatureInput/Element/" + this._subNode
                + " exclude "+ this.excludeNode + " comments:" + 
                this.excludeComments +"/" + this.getSourceURI();
        }
        try {
            return "XMLSignatureInput/OctetStream/" + this.getBytes().length
                   + " octets/" + this.getSourceURI();
        } catch (IOException iex) {
            return "XMLSignatureInput/OctetStream//" + this.getSourceURI();
        } catch (CanonicalizationException cex) {
            return "XMLSignatureInput/OctetStream//" + this.getSourceURI();
        }
    }

    /**
     * Method getHTMLRepresentation
     *
     * @throws XMLSignatureException
     * @return The HTML representation for this XMLSignature
     */
    public String getHTMLRepresentation() throws XMLSignatureException {

        XMLSignatureInputDebugger db = new XMLSignatureInputDebugger(this);

        return db.getHTMLRepresentation();
    }

    /**
     * Method getHTMLRepresentation
     *
     * @param inclusiveNamespaces
     * @throws XMLSignatureException
     * @return The HTML representation for this XMLSignature
     */
    public String getHTMLRepresentation(Set inclusiveNamespaces)
           throws XMLSignatureException {

        XMLSignatureInputDebugger db = new XMLSignatureInputDebugger( this,
                                        inclusiveNamespaces);

        return db.getHTMLRepresentation();
    }

    /**
     * Gets the exclude node of this XMLSignatureInput
     * @return Returns the excludeNode.
     */
    public Node getExcludeNode() {
	return excludeNode;
    }
    
    /**
     * Sets the exclude node of this XMLSignatureInput
     * @param excludeNode The excludeNode to set.
     */
    public void setExcludeNode(Node excludeNode) {
	this.excludeNode = excludeNode;
    }

    /**
     * Gets the node of this XMLSignatureInput
     * @return The excludeNode set.
     */
    public Node getSubNode() {
	return _subNode;
    }

    /**
     * @return Returns the excludeComments.
     */
    public boolean isExcludeComments() {
	return excludeComments;
    }

    /**
     * @param excludeComments The excludeComments to set.
     */
    public void setExcludeComments(boolean excludeComments) {
	this.excludeComments = excludeComments;
    }

    /**
     * @param diOs
     * @throws IOException
     * @throws CanonicalizationException
     */
    public void updateOutputStream(OutputStream diOs) 
    throws CanonicalizationException, IOException {        
	updateOutputStream(diOs, false);
    }
    
    public void updateOutputStream(OutputStream diOs, boolean c14n11) 
    throws CanonicalizationException, IOException {        
	if (diOs==outputStream) {
       	    return;
        }
        if (bytes!=null) {
            diOs.write(bytes);
            return;      
        } else if (_inputOctetStreamProxy==null) {                    
	    CanonicalizerBase c14nizer = null;
	    if (c14n11) {
                c14nizer = new Canonicalizer11_OmitComments();       
	    } else {
                c14nizer = new Canonicalizer20010315OmitComments();       
	    }
            c14nizer.setWriter(diOs);
            c14nizer.engineCanonicalize(this); 
            return;                  
        } else {
            InputStream is = getResetableInputStream();
            if (bytes!=null) {
                //already read write it, can be rea.
            	diOs.write(bytes,0,bytes.length);
                return;
            }            
            is.reset();            
            int num;
            byte[] bytesT = new byte[4096];
            while ((num=is.read(bytesT))>= 0) {
            	diOs.write(bytesT,0,num);
            }
        }
    }

    /**
     * @param os
     */
    public void setOutputStream(OutputStream os) {
	outputStream=os;
    }

    protected InputStream getResetableInputStream() throws IOException{    	
    	if ((_inputOctetStreamProxy instanceof ByteArrayInputStream) ) {            
            if (!_inputOctetStreamProxy.markSupported()) {
                throw new RuntimeException("Accepted as Markable but not truly been"+_inputOctetStreamProxy);
            }
            return _inputOctetStreamProxy;
        }
    	// All resetable stream are admitted
    	if ((_inputOctetStreamProxy != null) && (_inputOctetStreamProxy.markSupported())) {
            return _inputOctetStreamProxy;
    	}
        if (bytes!=null) {
            _inputOctetStreamProxy=new ByteArrayInputStream(bytes);
            return _inputOctetStreamProxy;
        }
        if (_inputOctetStreamProxy ==null)
            return null;
        if (_inputOctetStreamProxy.markSupported()) {
            log.info("Mark Suported but not used as reset");
        }
    	bytes=JavaUtils.getBytesFromStream(_inputOctetStreamProxy);
    	_inputOctetStreamProxy.close();
    	_inputOctetStreamProxy=new ByteArrayInputStream(bytes);
        return _inputOctetStreamProxy;
    }
        
    /**
     * @param filter
     */
    public void addNodeFilter(NodeFilter filter) {	
	if (isOctetStream()) {
	    try {
	        convertToNodes();
	    } catch (Exception e) {
	        throw new XMLSecurityRuntimeException("signature.XMLSignatureInput.nodesetReference",e);
	    }
        }
	nodeFilters.add(filter);
    }

    /**
     * @return the node filters
     */
    public List getNodeFilters() {
	// TODO Auto-generated method stub
	return nodeFilters;
    }

    /**
     * @param b
     */
    public void setNodeSet(boolean b) {
	isNodeSet=b;
    }
	
    void convertToNodes() throws CanonicalizationException, 
	ParserConfigurationException, IOException, SAXException {
	DocumentBuilderFactory dfactory = DocumentBuilderFactory.newInstance();
        dfactory.setValidating(false);        
        dfactory.setNamespaceAware(true);
        DocumentBuilder db = dfactory.newDocumentBuilder();
        // select all nodes, also the comments.        
        try {
            db.setErrorHandler(new adsi.org.apache.xml.security.utils
               .IgnoreAllErrorHandler());

            Document doc = db.parse(this.getOctetStream());
           
            this._subNode=doc.getDocumentElement();                    
        } catch (SAXException ex) {

            // if a not-wellformed nodeset exists, put a container around it...
            ByteArrayOutputStream baos = new ByteArrayOutputStream();

            baos.write("<container>".getBytes());
            baos.write(this.getBytes());
            baos.write("</container>".getBytes());

            byte result[] = baos.toByteArray();
            Document document = db.parse(new ByteArrayInputStream(result));
            this._subNode=document.getDocumentElement().getFirstChild().getFirstChild();				
        }
        this._inputOctetStreamProxy=null;
        this.bytes=null;
    }
}
