/*
 *  eXist Open Source Native XML Database
 *  Copyright (C) 2001-09 Wolfgang M. Meier
 *  wolfgang@exist-db.org
 *  http://exist.sourceforge.net
 *
 *  This program is free software; you can redistribute it and/or
 *  modify it under the terms of the GNU Lesser 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 Lesser General Public License for more details.
 *
 *  You should have received a copy of the GNU Lesser General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 *  $Id$
 */
package org.exist.xquery.functions.system;


import org.apache.log4j.Logger;
import org.exist.dom.QName;
import org.exist.xquery.BasicFunction;
import org.exist.xquery.Cardinality;
import org.exist.xquery.FunctionSignature;
import org.exist.xquery.XPathException;
import org.exist.xquery.XQueryContext;
import org.exist.xquery.value.FunctionReturnSequenceType;
import org.exist.xquery.value.Sequence;
import org.exist.xquery.value.StringValue;
import org.exist.xquery.value.Type;

/**
 * Return the eXist home.
 *
 * @author Dannes Wessels
 */
public class GetExistHome extends BasicFunction {
    
    protected final static Logger logger = Logger.getLogger(GetExistHome.class);

    public final static FunctionSignature signature =
            new FunctionSignature(
            new QName("get-exist-home", SystemModule.NAMESPACE_URI, SystemModule.PREFIX),
            "Returns the eXist home location.",
            FunctionSignature.NO_ARGS,
            new FunctionReturnSequenceType(Type.STRING, Cardinality.EXACTLY_ONE, "the path to the eXist home"));
    
    public GetExistHome(XQueryContext context) {
        super(context, signature);
    }
    
        /* (non-Javadoc)
         * @see org.exist.xquery.BasicFunction#eval(org.exist.xquery.value.Sequence[], org.exist.xquery.value.Sequence)
         */
    public Sequence eval(Sequence[] args, Sequence contextSequence) throws XPathException {
    	final StringValue stringValue = new StringValue( context.getBroker().getConfiguration().getExistHome().getAbsolutePath() );
		return stringValue;
    }
}

@@ -959,16 +959,100 @@
 m;%0D%0A%0D%0A%0D%0A
+import java.io.File;%0D%0Aimport java.io.IOException;%0D%0Aimport java.util.logging.Level;%0D%0A
 import o
@@ -2451,57 +2451,34 @@
     
-%09
+    
 final 
-StringValue stringValue = new StringValue(
+File existHome =
  con
@@ -2527,16 +2527,271 @@
 stHome()
+;%0D%0A        %0D%0A        String path = null;%0D%0A        try %7B%0D%0A            // Try to get canonical path%0D%0A            path = existHome.getCanonicalPath();%0D%0A        %7D catch (IOException ex) %7B%0D%0A            // Fallback to old mechanism%0D%0A            path = existHome
 .getAbso
@@ -2804,13 +2804,22 @@
 th()
- )
 ;%0D%0A
+        %7D%0D%0A
 %09%09re
@@ -2823,17 +2823,21 @@
 %09return 
-s
+new S
 tringVal
@@ -2838,16 +2838,24 @@
 ingValue
+( path )
 ;%0D%0A    %7D

use Canonical path for reporting exist_home