#
# fullbuild creates everything that needs to be created before a
# distribution can be made, and puts it all in the right place.
#
# It expects the projects to be in the places where Jack likes them:
# in directories named like 'build.mac'. That is fixable,
# however.
#
# NOTE: You should proably make a copy of python with which to execute this
# script, rebuilding running programs does not work...

MACBUILDNO=":Mac:Include:macbuildno.h"

import os
import sys
import macfs
import MacOS
import EasyDialogs
import regex
import string

import aetools
import AppleEvents
from Metrowerks_Shell_Suite import Metrowerks_Shell_Suite
from CodeWarrior_Standard_Suite import CodeWarrior_Standard_Suite
from Required_Suite import Required_Suite

import Res
import Dlg

import buildtools
import cfmfile

# Dialog resource. Note that the item numbers should correspond
# to those in the DITL resource. Also note that the order is important:
# things are built in this order, so there should be no forward dependencies.
DIALOG_ID = 512

I_OK=1
I_CANCEL=2
I_INC_BUILDNO=19

I_CORE=3
I_PPC_PLUGINS=4
I_PPC_EXTENSIONS=5
I_68K_PLUGINS=6
I_68K_EXTENSIONS=7
I_PPC_FULL=8
I_PPC_SMALL=9
I_68K_FULL=10
I_68K_SMALL=11
I_APPLETS=12

N_BUTTONS=13

class MwShell(Metrowerks_Shell_Suite, CodeWarrior_Standard_Suite,
				Required_Suite, aetools.TalkTo):
	pass

RUNNING=[]

def buildmwproject(top, creator, projects):
	"""Build projects with an MW compiler"""
	mgr = MwShell(creator, start=1)
	mgr.send_timeout = AppleEvents.kNoTimeOut
	
	failed = []
	for file in projects:
		if type(file) == type(()):
			file, target = file
		else:
			target = ''
		file = os.path.join(top, file)
		try:
			fss = macfs.FSSpec(file)
		except ValueError:
			print '** file not found:', file
			continue
		print 'Building', file, target
		try:
			mgr.open(fss)
		except aetools.Error, detail:
			print '**', detail, file
			continue
		if target:
			try:
				mgr.Set_Current_Target(target)
			except aetools.Error, arg:
				print '**', file, target, 'Cannot select:', arg
		try:
			mgr.Make_Project()
		except aetools.Error, arg:
			print '**', file, target, 'Failed:', arg
			failed.append(fss)
		mgr.Close_Project()
	if failed:
		print 'Open failed projects and exit?',
		rv = sys.stdin.readline()
		if rv[0] in ('y', 'Y'):
			for fss in failed:
				mgr.open(fss)
			sys.exit(0)
##	mgr.quit()
	
def buildapplet(top, dummy, list):
	"""Create python applets"""
	template = buildtools.findtemplate()
	for src, dst in list:
		if src[-3:] != '.py':
			raise 'Should end in .py', src
		base = os.path.basename(src)
		src = os.path.join(top, src)
		dst = os.path.join(top, dst)
		try:
			os.unlink(dst)
		except os.error:
			pass
		print 'Building applet', dst
		buildtools.process(template, src, dst, 1)
		
def buildfat(top, dummy, list):
	"""Build fat binaries"""
	for dst, src1, src2 in list:
		dst = os.path.join(top, dst)
		src1 = os.path.join(top, src1)
		src2 = os.path.join(top, src2)
		print 'Building fat binary', dst
		cfmfile.mergecfmfiles((src1, src2), dst)
		
def handle_dialog(filename):
	"""Handle selection dialog, return list of selected items"""
	d = Dlg.GetNewDialog(DIALOG_ID, -1)
	d.SetDialogDefaultItem(I_OK)
	d.SetDialogCancelItem(I_CANCEL)
	results = [0]*N_BUTTONS
	while 1:
		n = Dlg.ModalDialog(None)
		if n == I_OK:
			break
		if n == I_CANCEL:
			return []
		if n == I_INC_BUILDNO:
			incbuildno(filename)
			continue
		if n < len(results):
			results[n] = (not results[n])
			ctl = d.GetDialogItemAsControl(n)
			ctl.SetControlValue(results[n])
	rv = []
	for i in range(len(results)):
		if results[i]:
			rv.append(i)
	return rv

#
# The build instructions. Entries are (routine, arg, list-of-files)
# XXXX We could also include the builds for stdwin and such here...
BUILD_DICT = {
I_CORE : (buildmwproject, "CWIE", [
		(":Mac:Build:PythonCore.prj", "PythonCore"),
		(":Mac:Build:PythonInterpreter.prj", "PythonInterpreter"),
	]),

I_PPC_PLUGINS : (buildmwproject, "CWIE", [
	(":Mac:Build:ucnhash.prj", "ucnhash.ppc"),
	(":Mac:Build:calldll.ppc.prj", "calldll.ppc"),
	(":Mac:Build:ctb.prj", "ctb.ppc"),
	(":Mac:Build:gdbm.prj", "gdbm.ppc"),
	(":Mac:Build:icglue.prj", "icglue.ppc"),
	(":Mac:Build:macspeech.prj", "macspeech.ppc"),
	(":Mac:Build:waste.prj", "waste.ppc"),
	(":Mac:Build:zlib.prj", "zlib.ppc"),
##	(":Mac:Build:_tkinter.prj", "_tkinter.ppc"),
	(":Extensions:Imaging:_tkinter.prj", "_tkinter.ppc"),
	(":Mac:Build:ColorPicker.prj", "ColorPicker.ppc"),
	(":Mac:Build:Printing.prj", "Printing.ppc"),
	(":Mac:Build:App.prj", "App.ppc"),
	(":Mac:Build:Cm.prj", "Cm.ppc"),
	(":Mac:Build:Drag.prj", "Drag.ppc"),
	(":Mac:Build:Fm.prj", "Fm.ppc"),
	(":Mac:Build:Help.prj", "Help.ppc"),
	(":Mac:Build:Icn.prj", "Icn.ppc"),
	(":Mac:Build:List.prj", "List.ppc"),
	(":Mac:Build:Qdoffs.prj", "Qdoffs.ppc"),
	(":Mac:Build:Qt.prj", "Qt.ppc"),
	(":Mac:Build:Scrap.prj", "Scrap.ppc"),
	(":Mac:Build:Snd.prj", "Snd.ppc"),
	(":Mac:Build:Sndihooks.prj", "Sndihooks.ppc"),
	(":Mac:Build:TE.prj", "TE.ppc"),
	]),

I_68K_PLUGINS : (buildmwproject, "CWIE", [
	(":Mac:Build:ucnhash.prj", "ucnhash.CFM68K"),
	(":Mac:Build:ctb.prj", "ctb.CFM68K"),
	(":Mac:Build:gdbm.prj", "gdbm.CFM68K"),
	(":Mac:Build:icglue.prj", "icglue.CFM68K"),
	(":Mac:Build:waste.prj", "waste.CFM68K"),
	(":Mac:Build:zlib.prj", "zlib.CFM68K"),
##	(":Mac:Build:_tkinter.prj", "_tkinter.CFM68K"),
	(":Extensions:Imaging:_tkinter.prj", "_tkinter.CFM68K"),
	(":Mac:Build:ColorPicker.prj", "ColorPicker.CFM68K"),
	(":Mac:Build:Printing.prj", "Printing.CFM68K"),
	(":Mac:Build:App.prj", "App.CFM68K"),
	(":Mac:Build:Cm.prj", "Cm.CFM68K"),
	(":Mac:Build:Drag.prj", "Drag.CFM68K"),
	(":Mac:Build:Fm.prj", "Fm.CFM68K"),
	(":Mac:Build:Help.prj", "Help.CFM68K"),
	(":Mac:Build:Icn.prj", "Icn.CFM68K"),
	(":Mac:Build:List.prj", "List.CFM68K"),
	(":Mac:Build:Qdoffs.prj", "Qdoffs.CFM68K"),
	(":Mac:Build:Qt.prj", "Qt.CFM68K"),
	(":Mac:Build:Scrap.prj", "Scrap.CFM68K"),
	(":Mac:Build:Snd.prj", "Snd.CFM68K"),
	(":Mac:Build:Sndihooks.prj", "Sndihooks.CFM68K"),
	(":Mac:Build:TE.prj", "TE.CFM68K"),
	]),

I_68K_FULL : (buildmwproject, "CWIE", [
		(":Mac:Build:PythonStandalone.prj", "Python68K"),
	]),
	
I_68K_SMALL : (buildmwproject, "CWIE", [
		(":Mac:Build:PythonStandSmall.prj", "PythonSmall68K"),
	]),

I_PPC_FULL : (buildmwproject, "CWIE", [
		(":Mac:Build:PythonStandalone.prj", "PythonStandalone"),
	]),

I_PPC_SMALL : (buildmwproject, "CWIE", [
		(":Mac:Build:PythonStandSmall.prj", "PythonStandSmall"),
	]),

I_PPC_EXTENSIONS : (buildmwproject, "CWIE", [
		(":Extensions:Imaging:_imaging.prj", "_imaging.ppc"),
##		(":Extensions:Imaging:_tkinter.prj", "_tkinter.ppc"),
		(":Extensions:img:Mac:imgmodules.prj", "imgmodules PPC"),
		(":Extensions:Numerical:Mac:numpymodules.prj", "multiarraymodule"),
		(":Extensions:Numerical:Mac:numpymodules.prj", "_numpy"),
		(":Extensions:Numerical:Mac:numpymodules.prj", "umathmodule"),
		(":Extensions:Numerical:Mac:numpymodules.prj", "fast_umathmodule"),
		(":Extensions:Numerical:Mac:numpymodules.prj", "fftpackmodule"),
		(":Extensions:Numerical:Mac:numpymodules.prj", "lapack_litemodule"),
		(":Extensions:Numerical:Mac:numpymodules.prj", "ranlibmodule"),
	]),

I_68K_EXTENSIONS : (buildmwproject, "CWIE", [
		(":Extensions:Imaging:_imaging.prj", "_imaging.CFM68K"),
##		(":Extensions:Imaging:_tkinter.prj", "_tkinter.CFM68K"),
		(":Extensions:img:Mac:imgmodules.prj", "imgmodules CFM68K"),
##		(":Extensions:NumPy:numpymodules.prj", "numpymodules.CFM68K"),
	]),

I_APPLETS : (buildapplet, None, [
		(":Mac:scripts:EditPythonPrefs.py", "EditPythonPrefs"),
		(":Mac:scripts:BuildApplet.py", "BuildApplet"),
		(":Mac:scripts:BuildApplication.py", "BuildApplication"),
		(":Mac:scripts:ConfigurePython.py", "ConfigurePython"),
		(":Mac:Tools:IDE:PythonIDE.py", "Python IDE"),
		(":Mac:Tools:CGI:PythonCGISlave.py", ":Mac:Tools:CGI:PythonCGISlave"),
		(":Mac:Tools:CGI:BuildCGIApplet.py", ":Mac:Tools:CGI:BuildCGIApplet"),
	]),
}

def incbuildno(filename):
	fp = open(filename)
	line = fp.readline()
	fp.close()
	
	pat = regex.compile('#define BUILD \([0-9][0-9]*\)')
	pat.match(line)
	buildno = pat.group(1)
	if not buildno:
		raise 'Incorrect macbuildno.h line', line
	new = string.atoi(buildno) + 1
	fp = open(filename, 'w')
	fp.write('#define BUILD %d\n'%new)
	fp.close()
				
def main():
	try:
		h = Res.FSpOpenResFile('fullbuild.rsrc', 1)
	except Res.Error:
		pass	# Assume we already have acces to our own resource

	dir, ok = macfs.GetDirectory('Python source folder:')
	if not ok:
		sys.exit(0)
	dir = dir.as_pathname()
	
	todo = handle_dialog(os.path.join(dir, MACBUILDNO))
		
	instructions = []
	for i in todo:
		instructions.append(BUILD_DICT[i])
		
	for routine, arg, list in instructions:
		routine(dir, arg, list)
		
	print "All done!"
	sys.exit(1)	
	
if __name__ == '__main__':
	main()