/*
  Copyright (c) 2001-2005 The Regents of the University of California.
  All rights reserved.
  Permission is hereby granted, without written agreement and without
  license or royalty fees, to use, copy, modify, and distribute this
  software and its documentation for any purpose, provided that the above
  copyright notice and the following two paragraphs appear in all copies
  of this software.

  IN NO EVENT SHALL THE UNIVERSITY OF CALIFORNIA BE LIABLE TO ANY PARTY
  FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES
  ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN IF
  THE UNIVERSITY OF CALIFORNIA HAS BEEN ADVISED OF THE POSSIBILITY OF
  SUCH DAMAGE.

  THE UNIVERSITY OF CALIFORNIA SPECIFICALLY DISCLAIMS ANY WARRANTIES,
  INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE SOFTWARE
  PROVIDED HEREUNDER IS ON AN "AS IS" BASIS, AND THE UNIVERSITY OF
  CALIFORNIA HAS NO OBLIGATION TO PROVIDE MAINTENANCE, SUPPORT, UPDATES,
  ENHANCEMENTS, OR MODIFICATIONS.

  PT_COPYRIGHT_VERSION_2
  COPYRIGHTENDKEY

*/
import java.io.File;
import java.io.FileNotFoundException;
import java.io.IOException;
import java.net.URI;


/** Given the pathname to the matlab executable, return
    the pathname to the Matlab installation.

    Under Matlab 5.3.0, if the matlab executable is found
    at matlabr11/bin/matlab.exe, then the top level
    directory is matlabr11, and the matlab includes
    can be found at
    matlabr11/extern/include/...

    <p>Under Matlab 6.0, if the matlab executable is found
    at matlabr12/bin/win32/matlab.exe, then the top
    level directory would be matlabr12, and the
    matlab includes would be found at
    matlabr12/extern/include/...

    @author Christopher Hylands
    @version $Id: MatlabRootDirectory.java 39592 2005-10-24 19:09:12Z cxh $
    @since Ptolemy II 2.0
    @Pt.ProposedRating Green (cxh)
    @Pt.AcceptedRating Red
*/
public class MatlabRootDirectory {
    public static void main(String[] args) throws IOException {
        try {
            System.out.print(_getMatlabRootDirectory(args[0]));
        } catch (Exception exception) {
            System.err.print("MatlabRootDirectory.main(): " + exception);
        }
    }

    ///////////////////////////////////////////////////////////////////
    ////                         private methods                   ////
    // Given the pathname to the matlab executable, return the path name
    // of the Matlab directory.
    private static String _getMatlabRootDirectory(String matlabExecutable)
        throws Exception {
        // Return the directory above the bin/ directory in
        // the path to the matlab executable
        // Under Solaris, we might pass this:
        //   /usr/sww/bin/matlab
        // Under Windows:
        //   /cygdrive/c/matlab6p1/bin/win32/matlab
        if (File.separatorChar == '\\') {
            // We are under Windows.  Messing with cygdrive paths
            // is just too complex.  Autoconf will pass in something
            // that starts with /cygdrive/c, which Java will not
            // know how to interpret
            // We could use java.io.File here, but the problem is that
            // if we pass in /cygwin/c/ptII/bin/matlab, then
            // the name we will return will be \cygwin\c\ptII, which
            // will cause problems with the backslash when we do
            // 'if test -d \cygwin\c\ptII'
            // We could call cygpath -m and pass in the results, but
            // cygpath -m does not work in the version of Cygwin that
            // we shipped with Ptolemy II 2.0.1
            _checkForBin(matlabExecutable);
            return matlabExecutable.substring(0,
                matlabExecutable.lastIndexOf("/bin/"));
        }

        // matlabExecutable might be a symbolic link, so dereference it.
        File matlabFile = new File(matlabExecutable);
        String matlabCanonicalPath = matlabFile.getCanonicalPath();

        _checkForBin(matlabCanonicalPath);
        return matlabCanonicalPath.substring(0,
            matlabCanonicalPath.lastIndexOf("/bin/"));
    }

    // Throw an exception if the path does not contain /bin/
    private static void _checkForBin(String path) throws Exception {
        if (path.indexOf("/bin/") == -1) {
            throw new Exception("Cannot determine Matlab directory: '" + path
                + "' does not contain " + "/bin/");
        }
    }
}