text: import bdb
  import os
  
  from tkinter import *
  from tkinter.ttk import Scrollbar
  
  from idlelib import macosx
  from idlelib.scrolledlist import ScrolledList
  from idlelib.window import ListedToplevel
  
  
  class Idb(bdb.Bdb):
  
      def __init__(self, gui):
          self.gui = gui  # An instance of Debugger or proxy of remote.
          bdb.Bdb.__init__(self)
  
      def user_line(self, frame):
          if self.in_rpc_code(frame):
              self.set_step()
              return
          message = self.__frame2message(frame)
          try:
              self.gui.interaction(message, frame)
          except TclError:  # When closing debugger window with [x] in 3.x
              pass
  
      def user_exception(self, frame, info):
          if self.in_rpc_code(frame):
              self.set_step()
              return
          message = self.__frame2message(frame)
          self.gui.interaction(message, frame, info)
  
      def in_rpc_code(self, frame):
          if frame.f_code.co_filename.count('rpc.py'):
              return True
          else:
              prev_frame = frame.f_back
              prev_name = prev_frame.f_code.co_filename
              if 'idlelib' in prev_name and 'debugger' in prev_name:
                  # catch both idlelib/debugger.py and idlelib/debugger_r.py
                  # on both Posix and Windows
                  return False
              return self.in_rpc_code(prev_frame)
  
      def __frame2message(self, frame):
          code = frame.f_code
          filename = code.co_filename
          lineno = frame.f_lineno
          basename = os.path.basename(filename)
          message = "%s:%s" % (basename, lineno)
          if code.co_name != "?":
              message = "%s: %s()" % (message, code.co_name)
          return message
  
  
  class Debugger:
  
      vstack = vsource = vlocals = vglobals = None
  
      def __init__(self, pyshell, idb=None):
          if idb is None:
              idb = Idb(self)
          self.pyshell = pyshell
          self.idb = idb  # If passed, a proxy of remote instance.
          self.frame = None
          self.make_gui()
          self.interacting = 0
          self.nesting_level = 0
  
      def run(self, *args):
          # Deal with the scenario where we've already got a program running
          # in the debugger and we want to start another. If that is the case,
          # our second 'run' was invoked from an event dispatched not from
          # the main event loop, but from the nested event loop in 'interaction'
          # below. So our stack looks something like this:
          #       outer main event loop
          #         run()
          #           <running program with traces>
          #             callback to debugger's interaction()
          #               nested event loop
          #                 run() for second command
          #
          # This kind of nesting of event loops causes all kinds of problems
          # (see e.g. issue #24455) especially when dealing with running as a
          # subprocess, where there's all kinds of extra stuff happening in
          # there - insert a traceback.print_stack() to check it out.
          #
          # By this point, we've already called restart_subprocess() in
          # ScriptBinding. However, we also need to unwind the stack back to
          # that outer event loop.  To accomplish this, we:
          #   - return immediately from the nested run()
          #   - abort_loop ensures the nested event loop will terminate
          #   - the debugger's interaction routine completes normally
          #   - the restart_subprocess() will have taken care of stopping
          #     the running program, which will also let the outer run complete
          #
          # That leaves us back at the outer main event loop, at which point our
          # after event can fire, and we'll come back to this routine with a
          # clean stack.
          if self.nesting_level > 0:
              self.abort_loop()
              self.root.after(100, lambda: self.run(*args))
              return
          try:
              self.interacting = 1
              return self.idb.run(*args)
          finally:
              self.interacting = 0
  
      def close(self, event=None):
          try:
              self.quit()
          except Exception:
              pass
          if self.interacting:
              self.top.bell()
              return
          if self.stackviewer:
              self.stackviewer.close(); self.stackviewer = None
          # Clean up pyshell if user clicked debugger control close widget.
          # (Causes a harmless extra cycle through close_debugger() if user
          # toggled debugger from pyshell Debug menu)
          self.pyshell.close_debugger()
          # Now close the debugger control window....
          self.top.destroy()
  
      def make_gui(self):
          pyshell = self.pyshell
          self.flist = pyshell.flist
          self.root = root = pyshell.root
          self.top = top = ListedToplevel(root)
          self.top.wm_title("Debug Control")
          self.top.wm_iconname("Debug")
          top.wm_protocol("WM_DELETE_WINDOW", self.close)
          self.top.bind("<Escape>", self.close)
          #
          self.bframe = bframe = Frame(top)
          self.bframe.pack(anchor="w")
          self.buttons = bl = []
          #
          self.bcont = b = Button(bframe, text="Go", command=self.cont)
          bl.append(b)
          self.bstep = b = Button(bframe, text="Step", command=self.step)
          bl.append(b)
          self.bnext = b = Button(bframe, text="Over", command=self.next)
          bl.append(b)
          self.bret = b = Button(bframe, text="Out", command=self.ret)
          bl.append(b)
          self.bret = b = Button(bframe, text="Quit", command=self.quit)
          bl.append(b)
          #
          for b in bl:
              b.configure(state="disabled")
              b.pack(side="left")
          #
          self.cframe = cframe = Frame(bframe)
          self.cframe.pack(side="left")
          #
          if not self.vstack:
              self.__class__.vstack = BooleanVar(top)
              self.vstack.set(1)
          self.bstack = Checkbutton(cframe,
              text="Stack", command=self.show_stack, variable=self.vstack)
          self.bstack.grid(row=0, column=0)
          if not self.vsource:
              self.__class__.vsource = BooleanVar(top)
          self.bsource = Checkbutton(cframe,
              text="Source", command=self.show_source, variable=self.vsource)
          self.bsource.grid(row=0, column=1)
          if not self.vlocals:
              self.__class__.vlocals = BooleanVar(top)
              self.vlocals.set(1)
          self.blocals = Checkbutton(cframe,
              text="Locals", command=self.show_locals, variable=self.vlocals)
          self.blocals.grid(row=1, column=0)
          if not self.vglobals:
              self.__class__.vglobals = BooleanVar(top)
          self.bglobals = Checkbutton(cframe,
              text="Globals", command=self.show_globals, variable=self.vglobals)
          self.bglobals.grid(row=1, column=1)
          #
          self.status = Label(top, anchor="w")
          self.status.pack(anchor="w")
          self.error = Label(top, anchor="w")
          self.error.pack(anchor="w", fill="x")
          self.errorbg = self.error.cget("background")
          #
          self.fstack = Frame(top, height=1)
          self.fstack.pack(expand=1, fill="both")
          self.flocals = Frame(top)
          self.flocals.pack(expand=1, fill="both")
          self.fglobals = Frame(top, height=1)
          self.fglobals.pack(expand=1, fill="both")
          #
          if self.vstack.get():
              self.show_stack()
          if self.vlocals.get():
              self.show_locals()
          if self.vglobals.get():
              self.show_globals()
  
      def interaction(self, message, frame, info=None):
          self.frame = frame
          self.status.configure(text=message)
          #
          if info:
              type, value, tb = info
              try:
                  m1 = type.__name__
              except AttributeError:
                  m1 = "%s" % str(type)
              if value is not None:
                  try:
                      m1 = "%s: %s" % (m1, str(value))
                  except:
                      pass
              bg = "yellow"
          else:
              m1 = ""
              tb = None
              bg = self.errorbg
          self.error.configure(text=m1, background=bg)
          #
          sv = self.stackviewer
          if sv:
              stack, i = self.idb.get_stack(self.frame, tb)
              sv.load_stack(stack, i)
          #
          self.show_variables(1)
          #
          if self.vsource.get():
              self.sync_source_line()
          #
          for b in self.buttons:
              b.configure(state="normal")
          #
          self.top.wakeup()
          # Nested main loop: Tkinter's main loop is not reentrant, so use
          # Tcl's vwait facility, which reenters the event loop until an
          # event handler sets the variable we're waiting on
          self.nesting_level += 1
          self.root.tk.call('vwait', '::idledebugwait')
          self.nesting_level -= 1
          #
          for b in self.buttons:
              b.configure(state="disabled")
          self.status.configure(text="")
          self.error.configure(text="", background=self.errorbg)
          self.frame = None
  
      def sync_source_line(self):
          frame = self.frame
          if not frame:
              return
          filename, lineno = self.__frame2fileline(frame)
          if filename[:1] + filename[-1:] != "<>" and os.path.exists(filename):
              self.flist.gotofileline(filename, lineno)
  
      def __frame2fileline(self, frame):
          code = frame.f_code
          filename = code.co_filename
          lineno = frame.f_lineno
          return filename, lineno
  
      def cont(self):
          self.idb.set_continue()
          self.abort_loop()
  
      def step(self):
          self.idb.set_step()
          self.abort_loop()
  
      def next(self):
          self.idb.set_next(self.frame)
          self.abort_loop()
  
      def ret(self):
          self.idb.set_return(self.frame)
          self.abort_loop()
  
      def quit(self):
          self.idb.set_quit()
          self.abort_loop()
  
      def abort_loop(self):
          self.root.tk.call('set', '::idledebugwait', '1')
  
      stackviewer = None
  
      def show_stack(self):
          if not self.stackviewer and self.vstack.get():
              self.stackviewer = sv = StackViewer(self.fstack, self.flist, self)
              if self.frame:
                  stack, i = self.idb.get_stack(self.frame, None)
                  sv.load_stack(stack, i)
          else:
              sv = self.stackviewer
              if sv and not self.vstack.get():
                  self.stackviewer = None
                  sv.close()
              self.fstack['height'] = 1
  
      def show_source(self):
          if self.vsource.get():
              self.sync_source_line()
  
      def show_frame(self, stackitem):
          self.frame = stackitem[0]  # lineno is stackitem[1]
          self.show_variables()
  
      localsviewer = None
      globalsviewer = None
  
      def show_locals(self):
          lv = self.localsviewer
          if self.vlocals.get():
              if not lv:
                  self.localsviewer = NamespaceViewer(self.flocals, "Locals")
          else:
              if lv:
                  self.localsviewer = None
                  lv.close()
                  self.flocals['height'] = 1
          self.show_variables()
  
      def show_globals(self):
          gv = self.globalsviewer
          if self.vglobals.get():
              if not gv:
                  self.globalsviewer = NamespaceViewer(self.fglobals, "Globals")
          else:
              if gv:
                  self.globalsviewer = None
                  gv.close()
                  self.fglobals['height'] = 1
          self.show_variables()
  
      def show_variables(self, force=0):
          lv = self.localsviewer
          gv = self.globalsviewer
          frame = self.frame
          if not frame:
              ldict = gdict = None
          else:
              ldict = frame.f_locals
              gdict = frame.f_globals
              if lv and gv and ldict is gdict:
                  ldict = None
          if lv:
              lv.load_dict(ldict, force, self.pyshell.interp.rpcclt)
          if gv:
              gv.load_dict(gdict, force, self.pyshell.interp.rpcclt)
  
      def set_breakpoint_here(self, filename, lineno):
          self.idb.set_break(filename, lineno)
  
      def clear_breakpoint_here(self, filename, lineno):
          self.idb.clear_break(filename, lineno)
  
      def clear_file_breaks(self, filename):
          self.idb.clear_all_file_breaks(filename)
  
      def load_breakpoints(self):
          "Load PyShellEditorWindow breakpoints into subprocess debugger"
          for editwin in self.pyshell.flist.inversedict:
              filename = editwin.io.filename
              try:
                  for lineno in editwin.breakpoints:
                      self.set_breakpoint_here(filename, lineno)
              except AttributeError:
                  continue
  
  class StackViewer(ScrolledList):
  
      def __init__(self, master, flist, gui):
          if macosx.isAquaTk():
              # At least on with the stock AquaTk version on OSX 10.4 you'll
              # get a shaking GUI that eventually kills IDLE if the width
              # argument is specified.
              ScrolledList.__init__(self, master)
          else:
              ScrolledList.__init__(self, master, width=80)
          self.flist = flist
          self.gui = gui
          self.stack = []
  
      def load_stack(self, stack, index=None):
          self.stack = stack
          self.clear()
          for i in range(len(stack)):
              frame, lineno = stack[i]
              try:
                  modname = frame.f_globals["__name__"]
              except:
                  modname = "?"
              code = frame.f_code
              filename = code.co_filename
              funcname = code.co_name
              import linecache
              sourceline = linecache.getline(filename, lineno)
              sourceline = sourceline.strip()
              if funcname in ("?", "", None):
                  item = "%s, line %d: %s" % (modname, lineno, sourceline)
              else:
                  item = "%s.%s(), line %d: %s" % (modname, funcname,
                                                   lineno, sourceline)
              if i == index:
                  item = "> " + item
              self.append(item)
          if index is not None:
              self.select(index)
  
      def popup_event(self, event):
          "override base method"
          if self.stack:
              return ScrolledList.popup_event(self, event)
  
      def fill_menu(self):
          "override base method"
          menu = self.menu
          menu.add_command(label="Go to source line",
                           command=self.goto_source_line)
          menu.add_command(label="Show stack frame",
                           command=self.show_stack_frame)
  
      def on_select(self, index):
          "override base method"
          if 0 <= index < len(self.stack):
              self.gui.show_frame(self.stack[index])
  
      def on_double(self, index):
          "override base method"
          self.show_source(index)
  
      def goto_source_line(self):
          index = self.listbox.index("active")
          self.show_source(index)
  
      def show_stack_frame(self):
          index = self.listbox.index("active")
          if 0 <= index < len(self.stack):
              self.gui.show_frame(self.stack[index])
  
      def show_source(self, index):
          if not (0 <= index < len(self.stack)):
              return
          frame, lineno = self.stack[index]
          code = frame.f_code
          filename = code.co_filename
          if os.path.isfile(filename):
              edit = self.flist.open(filename)
              if edit:
                  edit.gotoline(lineno)
  
  
  class NamespaceViewer:
  
      def __init__(self, master, title, dict=None):
          width = 0
          height = 40
          if dict:
              height = 20*len(dict) # XXX 20 == observed height of Entry widget
          self.master = master
          self.title = title
          import reprlib
          self.repr = reprlib.Repr()
          self.repr.maxstring = 60
          self.repr.maxother = 60
          self.frame = frame = Frame(master)
          self.frame.pack(expand=1, fill="both")
          self.label = Label(frame, text=title, borderwidth=2, relief="groove")
          self.label.pack(fill="x")
          self.vbar = vbar = Scrollbar(frame, name="vbar")
          vbar.pack(side="right", fill="y")
          self.canvas = canvas = Canvas(frame,
                                        height=min(300, max(40, height)),
                                        scrollregion=(0, 0, width, height))
          canvas.pack(side="left", fill="both", expand=1)
          vbar["command"] = canvas.yview
          canvas["yscrollcommand"] = vbar.set
          self.subframe = subframe = Frame(canvas)
          self.sfid = canvas.create_window(0, 0, window=subframe, anchor="nw")
          self.load_dict(dict)
  
      dict = -1
  
      def load_dict(self, dict, force=0, rpc_client=None):
          if dict is self.dict and not force:
              return
          subframe = self.subframe
          frame = self.frame
          for c in list(subframe.children.values()):
              c.destroy()
          self.dict = None
          if not dict:
              l = Label(subframe, text="None")
              l.grid(row=0, column=0)
          else:
              #names = sorted(dict)
              ###
              # Because of (temporary) limitations on the dict_keys type (not yet
              # public or pickleable), have the subprocess to send a list of
              # keys, not a dict_keys object.  sorted() will take a dict_keys
              # (no subprocess) or a list.
              #
              # There is also an obscure bug in sorted(dict) where the
              # interpreter gets into a loop requesting non-existing dict[0],
              # dict[1], dict[2], etc from the debugger_r.DictProxy.
              ###
              keys_list = dict.keys()
              names = sorted(keys_list)
              ###
              row = 0
              for name in names:
                  value = dict[name]
                  svalue = self.repr.repr(value) # repr(value)
                  # Strip extra quotes caused by calling repr on the (already)
                  # repr'd value sent across the RPC interface:
                  if rpc_client:
                      svalue = svalue[1:-1]
                  l = Label(subframe, text=name)
                  l.grid(row=row, column=0, sticky="nw")
                  l = Entry(subframe, width=0, borderwidth=0)
                  l.insert(0, svalue)
                  l.grid(row=row, column=1, sticky="nw")
                  row = row+1
          self.dict = dict
          # XXX Could we use a <Configure> callback for the following?
          subframe.update_idletasks() # Alas!
          width = subframe.winfo_reqwidth()
          height = subframe.winfo_reqheight()
          canvas = self.canvas
          self.canvas["scrollregion"] = (0, 0, width, height)
          if height > 300:
              canvas["height"] = 300
              frame.pack(expand=1)
          else:
              canvas["height"] = height
              frame.pack(expand=0)
  
      def close(self):
          self.frame.destroy()
  
  if __name__ == "__main__":
      from unittest import main
      main('idlelib.idle_test.test_debugger', verbosity=2, exit=False)
  
  # TODO: htest?
  