From 5bb3be2ffeca3fde00365e418013cc28bc654031 Mon Sep 17 00:00:00 2001
From: Jack Jansen <jack.jansen@cwi.nl>
Date: Tue, 23 Jan 2001 15:59:39 +0000
Subject: A script to search for methods that are missing in Carbon in Python
 sources. So far only runs under unix, but what gives:-)

---
 Mac/scripts/missingcarbonmethods.py | 145 ++++++++++++++++++++++++++++++++++++
 1 file changed, 145 insertions(+)
 create mode 100644 Mac/scripts/missingcarbonmethods.py

diff --git a/Mac/scripts/missingcarbonmethods.py b/Mac/scripts/missingcarbonmethods.py
new file mode 100644
index 0000000..d332b04
--- /dev/null
+++ b/Mac/scripts/missingcarbonmethods.py
@@ -0,0 +1,145 @@
+# Methods that are missing in Carbon.
+# This module is mainly for documentation purposes, but you could use
+# it to automatically search for usage of methods that are missing.
+#
+# Modules Help and (for the time being) Scrap are completely missing.
+
+missing_Win = [
+	'GetAuxWin',
+	'GetWindowDataHandle',
+	'SaveOld',
+	'DrawNew',
+	'SetWinColor',
+	'SetDeskCPat',
+	'InitWindows',
+	'InitFloatingWindows',
+	'GetWMgrPort',
+	'GetCWMgrPort',
+	'ValidRgn',		# Use versions with Window in their name
+	'ValidRect',
+	'InvalRgn',
+	'InvalRect',
+	'IsValidWindowPtr', # I think this is useless for Python, but not sure...
+	'GetWindowZoomFlag',	# Not available in Carbon
+	'GetWindowTitleWidth',	# Ditto
+	]
+
+missing_Snd = [
+	'MACEVersion',
+	'SPBRecordToFile',
+	'Exp1to6',
+	'Comp6to1',
+	'Exp1to3',
+	'Comp3to1',
+	'SndControl',
+	'SndStopFilePlay',
+	'SndStartFilePlay',
+	'SndPauseFilePlay',
+	]
+
+missing_Res = [
+	'RGetResource',
+	'OpenResFile',
+	'CreateResFile',
+	'RsrcZoneInit',
+	'InitResources',
+	'RsrcMapEntry',
+	]
+
+missing_Qt = [
+	'SpriteMediaGetIndImageProperty',	# XXXX Why isn't this in carbon?
+	'CheckQuickTimeRegistration',
+	'SetMovieAnchorDataRef',
+	'GetMovieAnchorDataRef',
+	'GetMovieLoadState',
+	'OpenADataHandler',
+	'MovieMediaGetCurrentMovieProperty',
+	'MovieMediaGetCurrentTrackProperty',
+	'MovieMediaGetChildMovieDataReference',
+	'MovieMediaSetChildMovieDataReference',
+	'MovieMediaLoadChildMovieFromDataReference',
+	'Media3DGetViewObject',
+	]
+
+missing_Qd = [
+	]
+
+missing_Qdoffs = [
+	]
+
+
+missing_Menu = [
+	'GetMenuItemRefCon2',
+	'SetMenuItemRefCon2',
+	'EnableItem',
+	'DisableItem',
+	'CheckItem',
+	'CountMItems',
+	'OpenDeskAcc',
+	'SystemEdit',
+	'SystemMenu',
+	'SetMenuFlash',
+	'InitMenus',
+	'InitProcMenu',
+	]
+
+missing_List = [
+	]
+
+missing_Icn = [
+	'IconServicesTerminate',
+	]
+
+missing_Fm = [
+	'InitFonts',
+	'SetFontLock',
+	'FlushFonts',
+	]
+
+missing_Evt = [
+	'SystemEvent',
+	'SystemTask',
+	'SystemClick',
+	'GetOSEvent',
+	'OSEventAvail',
+	]
+
+missing_Dlg = [
+	'SetGrafPortOfDialog',
+	]
+
+missing_Ctl = [
+	'GetAuxiliaryControlRecord',
+	'SetControlColor',
+	]
+
+missing_Cm = [
+	'SetComponentInstanceA5',
+	'GetComponentInstanceA5',
+	]
+
+missing_App = [
+	'GetThemeMetric',
+	]
+
+missing_AE = [
+	'AEGetDescDataSize',
+	'AEReplaceDescData',
+	]
+	
+
+missing = []
+for name in dir():
+	if name[:8] == 'missing_':
+		missing = missing + eval(name)
+del name
+		
+def _search():
+	# Warning: this function only works on Unix
+	import string, os
+	re = string.join(missing, '|')
+	re = """[^a-zA-Z'"](%s)[^a-zA-Z'"]""" % re
+	os.system("find . -name '*.py' -print | xargs egrep '%s'"%re)
+
+if __name__ == '__main__':
+	_search()
-- 
cgit v0.12