source: trunk/makeMacApp.py @ 2803

#!/usr/bin/env python
'''
*makeMacApp: Create Mac Applet*
===============================

This script creates an AppleScript app to launch GSAS-II. The app is
created in the directory where the GSAS-II script is located.
A softlink to Python is created, but is named GSAS-II, so that 
GSAS-II shows up as the name of the app rather than Python in the
menu bar, etc. Note that this requires finding an app version of Python
(expected name .../Resources/Python.app/Contents/MacOS/Python in
directory tree of the calling python interpreter).

Run this script with one optional argument, the path to the GSASII.py
The script path may be specified relative to the current path or given
an absolute path, but will be accessed via an absolute path. 
If no arguments are supplied, the GSASII.py script is assumed to be in the
same directory as this file.

'''
import sys, os, os.path, stat, shutil, subprocess, plistlib
def Usage():
    print("\n\tUsage: python "+sys.argv[0]+" [<GSAS-II script>]\n")
    sys.exit()

def RunPython(image,cmd):
    'Run a command in a python image'
    try:
        err=None
        p = subprocess.Popen([image,'-c',cmd],stdout=subprocess.PIPE,stderr=subprocess.PIPE)
        out = p.stdout.read()
        err = p.stderr.read()
        p.communicate()
        return out,err
    except Exception(err):
        return '','Exception = '+err

project="GSAS-II"
AppleScript = ''
'''Contains an AppleScript to start GSAS-II launching python and the
GSAS-II python script
'''

if __name__ == '__main__': AppleScript += '''(*   GSAS-II AppleScript by B. Toby (brian.toby@anl.gov)
     It can launch GSAS-II by double clicking or by dropping a data file
     or folder over the app.
     It runs GSAS-II in a terminal window.
*)

(* test if a file is present and exit with an error message if it is not  *)
on TestFilePresent(appwithpath)
        tell application "System Events"
                if (file appwithpath exists) then
                else
                        display dialog "Error: file " & appwithpath & " not found. If you have moved this file recreate the AppleScript with bootstrap.py." with icon caution buttons {{"Quit"}}
                        return
                end if
        end tell
end TestFilePresent

(* 
------------------------------------------------------------------------
this section responds to a double-click. No file is supplied to GSAS-II
------------------------------------------------------------------------ 
*)
on run
        set python to "{:s}"
        set appwithpath to "{:s}"
        set env to "{:s}"
        TestFilePresent(appwithpath)
        TestFilePresent(python)
        tell application "Terminal"
                activate
                do script env & python & " " & appwithpath & "; exit"
        end tell
end run

(*
-----------------------------------------------------------------------------------------------
this section handles starting with files dragged into the AppleScript
 o it goes through the list of file(s) dragged in
 o then it converts the colon-delimited macintosh file location to a POSIX filename
 o for every non-directory file dragged into the icon, it starts GSAS-II, passing the file name
------------------------------------------------------------------------------------------------
*)

on open names
        set python to "{:s}"
        set appwithpath to "{:s}"
        set env to "{:s}"
 
        TestFilePresent(appwithpath)
        repeat with filename in names
                set filestr to (filename as string)
                if filestr ends with ":" then
                        (* should not happen, skip directories *)
                else
                        (* if this is an input file, open it *)
                        set filename to the quoted form of the POSIX path of filename
                        tell application "Terminal"
                                activate
                                do script env & python & " " & appwithpath & " " & filename & "; exit"
                        end tell
                end if
        end repeat
end open
'''

if __name__ == '__main__':
    # find the main GSAS-II script if not on command line
    if len(sys.argv) == 1:
        script = os.path.abspath(os.path.join(
            os.path.split(__file__)[0],
            "GSASII.py"
            ))
    elif len(sys.argv) == 2:
        script = os.path.abspath(sys.argv[1])
    else:
        Usage()

    # make sure we found it
    if not os.path.exists(script):
        print("\nFile "+script+" not found")
        Usage()
    if os.path.splitext(script)[1].lower() != '.py':
        print("\nScript "+script+" does not have extension .py")
        Usage()
    # where the app will be created
    scriptdir = os.path.split(script)[0]
    # name of app
    apppath = os.path.abspath(os.path.join(scriptdir,project+".app"))
    iconfile = os.path.join(scriptdir,'gsas2.icns') # optional icon file

    # find the python application; must be an OS X app
    pythonpath = os.path.realpath(sys.executable)
    top = True
    while top:
        pythonapp = os.path.join(pythonpath,'Resources','Python.app','Contents','MacOS','Python')
        if os.path.exists(pythonapp): break
        pythonpath,top = os.path.split(pythonpath)
    else:
        #print("\nSorry, failed to find a Resources directory associated with "+str(sys.executable))
        pythonapp = sys.executable
    
    # create a link to the python app, but named to match the project
    if os.path.exists('/tmp/testpython'): os.remove('/tmp/testpython')
    os.symlink(pythonapp,'/tmp/testpython')
    # test if it runs
    testout,errout = RunPython('/tmp/testpython','import numpy; import wx; print("OK")')
    os.remove('/tmp/testpython')
    #print testout,errout
    if testout.strip() != "OK":
        print 'Run of python app failed, resorting to non-app version of Python, Alas!'
        pythonapp = sys.executable
        # is this brain-dead Canopy 1.4.0, if so, switch to pythonw
        try:
            import canopy.version
            if canopy.version.version == '1.4.0':
                print 'using pythonw for Canopy 1.4.0'
                pythonapp = os.path.join(os.path.split(pythonapp)[0],'pythonw')
                if not os.path.exists(pythonapp):
                    raise Exception('no pythonw here: '+pythonapp)
        except ImportError:
            pass
        newpython = pythonapp
    else:
        # new name to call python
        newpython =  os.path.join(apppath,"Contents","MacOS",project)

    if os.path.exists(apppath): # cleanup
        print("\nRemoving old "+project+" app ("+str(apppath)+")")
        shutil.rmtree(apppath)

    shell = os.path.join("/tmp/","appscrpt.script")
    f = open(shell, "w")
    f.write(AppleScript.format(newpython,script,'',newpython,script,''))
    f.close()

    try: 
        subprocess.check_output(["osacompile","-o",apppath,shell],stderr=subprocess.STDOUT)
    except subprocess.CalledProcessError, msg:
        print '''Error compiling AppleScript.
        Report the next message along with details about your Mac to toby@anl.gov'''
        print msg.output
        sys.exit()

    # create a link to the python app, but named to match the project
    if pythonapp != newpython: os.symlink(pythonapp,newpython)

    # change the icon
    oldicon = os.path.join(apppath,"Contents","Resources","droplet.icns")
    if os.path.exists(iconfile) and os.path.exists(oldicon):
        shutil.copyfile(iconfile,oldicon)

    # Edit the app plist file to restrict the type of files that can be dropped
    d = plistlib.readPlist(os.path.join(apppath,"Contents",'Info.plist'))
    d['CFBundleDocumentTypes'] = [{
        'CFBundleTypeExtensions': ['gpx'],
        'CFBundleTypeName': 'GSAS-II project',
        'CFBundleTypeRole': 'Editor'}]
    
    plistlib.writePlist(d,os.path.join(apppath,"Contents",'Info.plist'))

    print("\nCreated "+project+" app ("+str(apppath)+
          ").\nViewing app in Finder so you can drag it to the dock if, you wish.")
    subprocess.call(["open","-R",apppath])