2014-07-10 02:16:42 -03:00
|
|
|
from Tkinter import TclError
|
2000-08-14 22:13:23 -03:00
|
|
|
|
|
|
|
class WidgetRedirector:
|
2007-10-25 21:10:09 -03:00
|
|
|
"""Support for redirecting arbitrary widget subcommands.
|
|
|
|
|
|
|
|
Some Tk operations don't normally pass through Tkinter. For example, if a
|
|
|
|
character is inserted into a Text widget by pressing a key, a default Tk
|
|
|
|
binding to the widget's 'insert' operation is activated, and the Tk library
|
|
|
|
processes the insert without calling back into Tkinter.
|
|
|
|
|
|
|
|
Although a binding to <Key> could be made via Tkinter, what we really want
|
|
|
|
to do is to hook the Tk 'insert' operation itself.
|
|
|
|
|
|
|
|
When a widget is instantiated, a Tcl command is created whose name is the
|
|
|
|
same as the pathname widget._w. This command is used to invoke the various
|
|
|
|
widget operations, e.g. insert (for a Text widget). We are going to hook
|
|
|
|
this command and provide a facility ('register') to intercept the widget
|
|
|
|
operation.
|
|
|
|
|
2014-07-10 02:16:42 -03:00
|
|
|
In IDLE, WidgetRedirector is used in Percolator to intercept Text
|
|
|
|
commands. The function being registered provides access to the top
|
|
|
|
of a Percolator chain. At the bottom of the chain is a call to the
|
|
|
|
original Tk widget operation.
|
2007-10-25 21:10:09 -03:00
|
|
|
"""
|
2000-08-14 22:13:23 -03:00
|
|
|
def __init__(self, widget):
|
2014-07-10 02:16:42 -03:00
|
|
|
'''Initialize attributes and setup redirection.
|
|
|
|
|
|
|
|
_operations: dict mapping operation name to new function.
|
|
|
|
widget: the widget whose tcl command is to be intercepted.
|
|
|
|
tk: widget.tk, a convenience attribute, probably not needed.
|
|
|
|
orig: new name of the original tcl command.
|
|
|
|
|
|
|
|
Since renaming to orig fails with TclError when orig already
|
|
|
|
exists, only one WidgetDirector can exist for a given widget.
|
|
|
|
'''
|
2007-10-25 21:10:09 -03:00
|
|
|
self._operations = {}
|
|
|
|
self.widget = widget # widget instance
|
|
|
|
self.tk = tk = widget.tk # widget's root
|
|
|
|
w = widget._w # widget's (full) Tk pathname
|
2000-08-14 22:13:23 -03:00
|
|
|
self.orig = w + "_orig"
|
2007-10-25 21:10:09 -03:00
|
|
|
# Rename the Tcl command within Tcl:
|
2000-08-14 22:13:23 -03:00
|
|
|
tk.call("rename", w, self.orig)
|
2007-10-25 21:10:09 -03:00
|
|
|
# Create a new Tcl command whose name is the widget's pathname, and
|
|
|
|
# whose action is to dispatch on the operation passed to the widget:
|
2000-08-14 22:13:23 -03:00
|
|
|
tk.createcommand(w, self.dispatch)
|
|
|
|
|
|
|
|
def __repr__(self):
|
|
|
|
return "WidgetRedirector(%s<%s>)" % (self.widget.__class__.__name__,
|
|
|
|
self.widget._w)
|
|
|
|
|
|
|
|
def close(self):
|
2014-07-10 02:16:42 -03:00
|
|
|
"Unregister operations and revert redirection created by .__init__."
|
2007-12-18 17:56:09 -04:00
|
|
|
for operation in list(self._operations):
|
2007-10-25 21:10:09 -03:00
|
|
|
self.unregister(operation)
|
2014-07-10 02:16:42 -03:00
|
|
|
widget = self.widget
|
2000-08-14 22:13:23 -03:00
|
|
|
tk = widget.tk
|
|
|
|
w = widget._w
|
2014-07-10 02:16:42 -03:00
|
|
|
# Restore the original widget Tcl command.
|
2000-08-14 22:13:23 -03:00
|
|
|
tk.deletecommand(w)
|
2014-07-10 02:16:42 -03:00
|
|
|
tk.call("rename", self.orig, w)
|
|
|
|
del self.widget, self.tk # Should not be needed
|
|
|
|
# if instance is deleted after close, as in Percolator.
|
2000-08-14 22:13:23 -03:00
|
|
|
|
2007-10-25 21:10:09 -03:00
|
|
|
def register(self, operation, function):
|
2014-07-10 02:16:42 -03:00
|
|
|
'''Return OriginalCommand(operation) after registering function.
|
|
|
|
|
|
|
|
Registration adds an instance function attribute that masks the
|
|
|
|
class instance method attribute. If a second function is
|
|
|
|
registered for the same operation, the first function is replaced.
|
|
|
|
'''
|
2007-10-25 21:10:09 -03:00
|
|
|
self._operations[operation] = function
|
|
|
|
setattr(self.widget, operation, function)
|
|
|
|
return OriginalCommand(self, operation)
|
|
|
|
|
|
|
|
def unregister(self, operation):
|
2014-07-10 02:16:42 -03:00
|
|
|
'''Return the function for the operation, or None.
|
|
|
|
|
|
|
|
Deleting the instance attribute unmasks the class attribute.
|
|
|
|
'''
|
2007-10-25 21:10:09 -03:00
|
|
|
if operation in self._operations:
|
|
|
|
function = self._operations[operation]
|
|
|
|
del self._operations[operation]
|
|
|
|
if hasattr(self.widget, operation):
|
|
|
|
delattr(self.widget, operation)
|
2000-08-14 22:13:23 -03:00
|
|
|
return function
|
|
|
|
else:
|
|
|
|
return None
|
|
|
|
|
2007-10-25 21:10:09 -03:00
|
|
|
def dispatch(self, operation, *args):
|
|
|
|
'''Callback from Tcl which runs when the widget is referenced.
|
|
|
|
|
|
|
|
If an operation has been registered in self._operations, apply the
|
|
|
|
associated function to the args passed into Tcl. Otherwise, pass the
|
|
|
|
operation through to Tk via the original Tcl function.
|
|
|
|
|
|
|
|
Note that if a registered function is called, the operation is not
|
|
|
|
passed through to Tk. Apply the function returned by self.register()
|
|
|
|
to *args to accomplish that. For an example, see ColorDelegator.py.
|
|
|
|
|
|
|
|
'''
|
|
|
|
m = self._operations.get(operation)
|
2000-08-14 22:13:23 -03:00
|
|
|
try:
|
|
|
|
if m:
|
2003-07-09 15:48:24 -03:00
|
|
|
return m(*args)
|
2000-08-14 22:13:23 -03:00
|
|
|
else:
|
2007-10-25 21:10:09 -03:00
|
|
|
return self.tk.call((self.orig, operation) + args)
|
2000-08-14 22:13:23 -03:00
|
|
|
except TclError:
|
|
|
|
return ""
|
|
|
|
|
|
|
|
|
|
|
|
class OriginalCommand:
|
2014-07-10 02:16:42 -03:00
|
|
|
'''Callable for original tk command that has been redirected.
|
|
|
|
|
|
|
|
Returned by .register; can be used in the function registered.
|
|
|
|
redir = WidgetRedirector(text)
|
|
|
|
def my_insert(*args):
|
|
|
|
print("insert", args)
|
|
|
|
original_insert(*args)
|
|
|
|
original_insert = redir.register("insert", my_insert)
|
|
|
|
'''
|
2000-08-14 22:13:23 -03:00
|
|
|
|
2007-10-25 21:10:09 -03:00
|
|
|
def __init__(self, redir, operation):
|
2014-07-10 02:16:42 -03:00
|
|
|
'''Create .tk_call and .orig_and_operation for .__call__ method.
|
|
|
|
|
|
|
|
.redir and .operation store the input args for __repr__.
|
|
|
|
.tk and .orig copy attributes of .redir (probably not needed).
|
|
|
|
'''
|
2000-08-14 22:13:23 -03:00
|
|
|
self.redir = redir
|
2007-10-25 21:10:09 -03:00
|
|
|
self.operation = operation
|
2014-07-10 02:16:42 -03:00
|
|
|
self.tk = redir.tk # redundant with self.redir
|
|
|
|
self.orig = redir.orig # redundant with self.redir
|
|
|
|
# These two could be deleted after checking recipient code.
|
|
|
|
self.tk_call = redir.tk.call
|
|
|
|
self.orig_and_operation = (redir.orig, operation)
|
2000-08-14 22:13:23 -03:00
|
|
|
|
|
|
|
def __repr__(self):
|
2007-10-25 21:10:09 -03:00
|
|
|
return "OriginalCommand(%r, %r)" % (self.redir, self.operation)
|
2000-08-14 22:13:23 -03:00
|
|
|
|
|
|
|
def __call__(self, *args):
|
2007-10-25 21:10:09 -03:00
|
|
|
return self.tk_call(self.orig_and_operation + args)
|
2000-08-14 22:13:23 -03:00
|
|
|
|
|
|
|
|
2014-07-10 02:16:42 -03:00
|
|
|
def _widget_redirector(parent): # htest #
|
|
|
|
from Tkinter import Tk, Text
|
|
|
|
import re
|
|
|
|
|
2000-08-14 22:13:23 -03:00
|
|
|
root = Tk()
|
2014-05-24 19:48:03 -03:00
|
|
|
root.title("Test WidgetRedirector")
|
|
|
|
width, height, x, y = list(map(int, re.split('[x+]', parent.geometry())))
|
|
|
|
root.geometry("+%d+%d"%(x, y + 150))
|
|
|
|
text = Text(root)
|
2000-08-14 22:13:23 -03:00
|
|
|
text.pack()
|
|
|
|
text.focus_set()
|
|
|
|
redir = WidgetRedirector(text)
|
|
|
|
def my_insert(*args):
|
|
|
|
print "insert", args
|
2014-07-10 02:16:42 -03:00
|
|
|
original_insert(*args)
|
|
|
|
original_insert = redir.register("insert", my_insert)
|
2007-10-25 21:10:09 -03:00
|
|
|
root.mainloop()
|
2000-08-14 22:13:23 -03:00
|
|
|
|
|
|
|
if __name__ == "__main__":
|
2014-07-10 02:16:42 -03:00
|
|
|
import unittest
|
|
|
|
## unittest.main('idlelib.idle_test.test_widgetredir',
|
|
|
|
## verbosity=2, exit=False)
|
2014-05-24 19:48:03 -03:00
|
|
|
from idlelib.idle_test.htest import run
|
|
|
|
run(_widget_redirector)
|