Initial revision

diff --git a/Demo/tkinter/guido/kill.py b/Demo/tkinter/guido/kill.py
new file mode 100755 (executable)
index 0000000..f7a70fa
--- /dev/null
+++ b/Demo/tkinter/guido/kill.py
@@ -0,0 +1,119 @@
+#!/usr/local/bin/tkpython
+# Tkinter interface to Linux `ps' command.
+
+from Tkinter import *
+from string import splitfields
+from string import split
+
+class BarButton(Menubutton):
+       def __init__(self, master=None, cnf={}):
+               Menubutton.__init__(self, master)
+               self.pack({'side': 'left'})
+               self.config(cnf)
+               self.menu = Menu(self, {'name': 'menu'})
+               self['menu'] = self.menu                
+
+class Kill(Frame):
+       # List of (name, option, pid_column)
+       format_list = [('Default', '', 0),
+                      ('Long', '-l', 2),
+                      ('User', '-u', 1),
+                      ('Jobs', '-j', 1),
+                      ('Signal', '-s', 1),
+                      ('Memory', '-m', 0),
+                      ('VM', '-v', 0),
+                      ('Hex', '-X', 0)]
+       def kill(self, selected):
+               c = self.format_list[self.format.get()][2]
+               pid = split(selected)[c]
+               self.tk.call('exec', 'kill', '-9', pid)
+               self.do_update()
+       def do_update(self):
+               name, option, column = self.format_list[self.format.get()]
+               s = self.tk.call('exec', 'ps', '-w', option)
+               list = splitfields(s, '\n')
+               self.header.set(list[0])
+               del list[0]
+               y = self.frame.vscroll.get()[2]
+               self.frame.list.delete(0, AtEnd())
+               for line in list:
+                       self.frame.list.insert(0, line)
+               self.frame.list.yview(y)
+       def do_motion(self, e):
+               e.widget.select_from(e.widget.nearest(e.y))
+       def do_leave(self, e):
+               e.widget.select_clear()
+       def do_1(self, e):
+               self.kill(e.widget.get(e.widget.nearest(e.y)))
+       def __init__(self, master=None, cnf={}):
+               Frame.__init__(self, master, cnf)
+               self.pack({'expand': 'yes', 'fill': 'both'})
+               self.bar = Frame(
+                       self,
+                       {'name': 'bar',
+                        'relief': 'raised',
+                        'bd': 2,
+                        Pack: {'side': 'top',
+                               'fill': 'x'}})
+               self.bar.file = BarButton(self.bar, {'text': 'File'})
+               self.bar.file.menu.add_command(
+                       {'label': 'Quit', 'command': self.quit})
+               self.bar.view = BarButton(self.bar, {'text': 'View'})
+               self.format = IntVar(self)
+               self.format.set(2)
+               for num in range(len(self.format_list)):
+                       self.bar.view.menu.add_radiobutton(
+                               {'label': self.format_list[num][0], 
+                                'command': self.do_update,
+                                'variable': self.format,
+                                'value': num})
+               #self.bar.view.menu.add_separator()
+               #XXX ...
+               self.bar.tk_menuBar(self.bar.file, self.bar.view)
+               self.frame = Frame(
+                       self, 
+                       {'relief': 'raised', 'bd': 2,
+                        Pack: {'side': 'top',
+                               'expand': 'yes',
+                               'fill': 'both'}})
+               self.header = StringVar(self)
+               self.frame.label = Label(
+                       self.frame, 
+                       {'relief': 'flat',
+                        'anchor': 'nw',
+                        'borderwidth': 0,
+                        'textvariable': self.header,
+                        Pack: {'side': 'top', 
+                               'fill': 'x'}})
+               self.frame.vscroll = Scrollbar(
+                       self.frame,
+                       {'orient': 'vertical'})
+               self.frame.list = Listbox(
+                       self.frame, 
+                       {'relief': 'sunken',
+                        'selectbackground': '#eed5b7',
+                        'selectborderwidth': 0,
+                        'yscroll': self.frame.vscroll.set})
+               self.frame.vscroll['command'] = self.frame.list.yview
+               self.frame.vscroll.pack({'side': 'right', 'fill': 'y'})
+               self.frame.list.pack(
+                       {'side': 'top',
+                        'expand': 'yes',
+                        'fill': 'both'})
+               self.update = Button(
+                       self,
+                       {'text': 'Update',
+                        'command': self.do_update,
+                        Pack: {'expand': 'yes',
+                               'fill': 'x'}})
+               self.frame.list.bind('<Motion>', self.do_motion)
+               self.frame.list.bind('<Leave>', self.do_leave)
+               self.frame.list.bind('<1>', self.do_1)
+               self.do_update()
+
+if __name__ == '__main__':
+       kill = Kill(None, {'bd': 5})
+       kill.winfo_toplevel().title('Tkinter Process Killer')
+       kill.winfo_toplevel().minsize(1, 1)
+       kill.mainloop()
+

diff --git a/Lib/lib-tk/Dialog.py b/Lib/lib-tk/Dialog.py
new file mode 100644 (file)
index 0000000..28222ec
--- /dev/null
+++ b/Lib/lib-tk/Dialog.py
@@ -0,0 +1,38 @@
+# Dialog.py -- Tkinter interface to the tk_dialog script.
+from Tkinter import *
+
+class Dialog(Widget):
+       def __init__(self, master=None, cnf={}):
+               Widget._setup(self, master, cnf)
+               self.num = apply(self.tk.call,
+                                ('tk_dialog', self._w,
+                                 cnf['title'], cnf['text'], 
+                                 cnf['bitmap'], cnf['default'])
+                                + cnf['strings'])
+               try: Widget.destroy(self)
+               except TclError: pass
+       def destroy(self): pass
+
+def _test():
+       d = Dialog(None, {'title': 'File Modified',
+                         'text':
+                         'File "Python.h" has been modified'
+                         ' since the last time it was saved.'
+                         ' Do you want to save it before'
+                         ' exiting the application.',
+                         'bitmap': 'warning',
+                         'default': 0,
+                         'strings': ('Save File', 
+                                     'Discard Changes', 
+                                     'Return to Editor')})
+       print d.num
+
+
+if __name__ == '__main__':
+       t = Button(None, {'text': 'Test',
+                         'command': _test,
+                         Pack: {}})
+       q = Button(None, {'text': 'Quit',
+                         'command': t.quit,
+                         Pack: {}})
+       t.mainloop()

diff --git a/Lib/tkinter/Dialog.py b/Lib/tkinter/Dialog.py
new file mode 100755 (executable)
index 0000000..28222ec
--- /dev/null
+++ b/Lib/tkinter/Dialog.py
@@ -0,0 +1,38 @@
+# Dialog.py -- Tkinter interface to the tk_dialog script.
+from Tkinter import *
+
+class Dialog(Widget):
+       def __init__(self, master=None, cnf={}):
+               Widget._setup(self, master, cnf)
+               self.num = apply(self.tk.call,
+                                ('tk_dialog', self._w,
+                                 cnf['title'], cnf['text'], 
+                                 cnf['bitmap'], cnf['default'])
+                                + cnf['strings'])
+               try: Widget.destroy(self)
+               except TclError: pass
+       def destroy(self): pass
+
+def _test():
+       d = Dialog(None, {'title': 'File Modified',
+                         'text':
+                         'File "Python.h" has been modified'
+                         ' since the last time it was saved.'
+                         ' Do you want to save it before'
+                         ' exiting the application.',
+                         'bitmap': 'warning',
+                         'default': 0,
+                         'strings': ('Save File', 
+                                     'Discard Changes', 
+                                     'Return to Editor')})
+       print d.num
+
+
+if __name__ == '__main__':
+       t = Button(None, {'text': 'Test',
+                         'command': _test,
+                         Pack: {}})
+       q = Button(None, {'text': 'Quit',
+                         'command': t.quit,
+                         Pack: {}})
+       t.mainloop()

diff --git a/Modules/tkappinit.c b/Modules/tkappinit.c
new file mode 100644 (file)
index 0000000..daff9e5
--- /dev/null
+++ b/Modules/tkappinit.c
@@ -0,0 +1,36 @@
+/* appinit.c -- Tcl and Tk application initialization. */
+
+#include <tcl.h>
+#include <tk.h>
+
+int
+Tcl_AppInit (interp)
+     Tcl_Interp *interp;
+{
+  Tk_Window main;
+
+  main = Tk_MainWindow(interp);
+
+  if (Tcl_Init (interp) == TCL_ERROR)
+    return TCL_ERROR;
+  if (Tk_Init (interp) == TCL_ERROR)
+    return TCL_ERROR;
+
+#ifdef WITH_MOREBUTTONS
+  {
+    extern Tcl_CmdProc studButtonCmd;
+    extern Tcl_CmdProc triButtonCmd;
+
+    Tcl_CreateCommand(interp, "studbutton", studButtonCmd,
+                   (ClientData) main, NULL);
+    Tcl_CreateCommand(interp, "tributton", triButtonCmd,
+                     (ClientData) main, NULL);
+  }
+#endif
+#ifdef WITH_XXX
+
+#endif
+
+  return TCL_OK;
+}
+