1994-07-06 21:17:21 +00:00
|
|
|
#! /ufs/guido/bin/sgi/tkpython
|
|
|
|
|
|
|
|
# Tk man page browser -- currently only shows the Tcl/Tk man pages
|
|
|
|
|
|
|
|
import sys
|
|
|
|
import os
|
|
|
|
import string
|
|
|
|
import regex
|
|
|
|
from Tkinter import *
|
|
|
|
from ManPage import ManPage
|
|
|
|
|
1994-07-11 13:15:05 +00:00
|
|
|
MANNDIR = '/usr/local/man/mann'
|
|
|
|
MAN3DIR = '/usr/local/man/man3'
|
1994-07-06 21:17:21 +00:00
|
|
|
|
1994-07-11 13:15:05 +00:00
|
|
|
def listmanpages(mandir):
|
1994-07-06 21:17:21 +00:00
|
|
|
files = os.listdir(mandir)
|
|
|
|
names = []
|
|
|
|
for file in files:
|
1994-07-11 13:15:05 +00:00
|
|
|
if file[-2:-1] == '.' and (file[-1] in 'ln123456789'):
|
1994-07-06 21:17:21 +00:00
|
|
|
names.append(file[:-2])
|
|
|
|
names.sort()
|
|
|
|
return names
|
|
|
|
|
|
|
|
class SelectionBox:
|
|
|
|
|
|
|
|
def __init__(self, master=None):
|
|
|
|
self.choices = []
|
|
|
|
|
|
|
|
self.frame = Frame(master, {
|
1994-07-12 16:35:35 +00:00
|
|
|
'name': 'frame',
|
1994-07-06 21:17:21 +00:00
|
|
|
Pack: {'expand': 1, 'fill': 'both'}})
|
|
|
|
self.master = self.frame.master
|
|
|
|
self.subframe = Frame(self.frame, {
|
1994-07-12 16:35:35 +00:00
|
|
|
'name': 'subframe',
|
1994-07-06 21:17:21 +00:00
|
|
|
Pack: {'expand': 0, 'fill': 'both'}})
|
1994-07-11 13:15:05 +00:00
|
|
|
self.leftsubframe = Frame(self.subframe, {
|
1994-07-12 16:35:35 +00:00
|
|
|
'name': 'leftsubframe',
|
1994-07-06 21:17:21 +00:00
|
|
|
Pack: {'side': 'left', 'expand': 1, 'fill': 'both'}})
|
1994-07-11 13:15:05 +00:00
|
|
|
self.rightsubframe = Frame(self.subframe, {
|
1994-07-12 16:35:35 +00:00
|
|
|
'name': 'rightsubframe',
|
1994-07-11 13:15:05 +00:00
|
|
|
Pack: {'side': 'right', 'expand': 1, 'fill': 'both'}})
|
|
|
|
self.chaptervar = StringVar(master)
|
|
|
|
self.chapter = Menubutton(self.rightsubframe,
|
1994-07-12 16:35:35 +00:00
|
|
|
{'name': 'chapter',
|
|
|
|
'text': 'Directory',
|
1994-07-11 13:15:05 +00:00
|
|
|
'relief': 'raised', 'bd': 2,
|
|
|
|
Pack: {'side': 'top'}})
|
1994-07-12 16:35:35 +00:00
|
|
|
self.chaptermenu = Menu(self.chapter, {'name': 'chaptermenu'})
|
1994-07-11 13:15:05 +00:00
|
|
|
self.chaptermenu.add_radiobutton({'label': 'C functions',
|
|
|
|
'value': MAN3DIR,
|
|
|
|
'variable': self.chaptervar,
|
|
|
|
'command': self.newchapter})
|
|
|
|
self.chaptermenu.add_radiobutton({'label': 'Tcl/Tk functions',
|
|
|
|
'value': MANNDIR,
|
|
|
|
'variable': self.chaptervar,
|
|
|
|
'command': self.newchapter})
|
|
|
|
self.chapter['menu'] = self.chaptermenu
|
|
|
|
self.listbox = Listbox(self.rightsubframe,
|
1994-07-12 16:35:35 +00:00
|
|
|
{'name': 'listbox',
|
|
|
|
'relief': 'sunken', 'bd': 2,
|
1994-07-11 13:15:05 +00:00
|
|
|
'geometry': '20x5',
|
|
|
|
Pack: {'expand': 1, 'fill': 'both'}})
|
|
|
|
self.l1 = Button(self.leftsubframe,
|
1994-07-12 16:35:35 +00:00
|
|
|
{'name': 'l1',
|
|
|
|
'text': 'Display manual page named:',
|
1994-07-08 14:28:38 +00:00
|
|
|
'command': self.entry_cb,
|
1994-07-06 21:17:21 +00:00
|
|
|
Pack: {'side': 'top'}})
|
1994-07-11 13:15:05 +00:00
|
|
|
self.entry = Entry(self.leftsubframe,
|
1994-07-12 16:35:35 +00:00
|
|
|
{'name': 'entry',
|
|
|
|
'relief': 'sunken', 'bd': 2,
|
1994-07-06 21:17:21 +00:00
|
|
|
'width': 20,
|
|
|
|
Pack: {'side': 'top',
|
|
|
|
'expand': 0, 'fill': 'x'}})
|
1994-07-12 16:35:35 +00:00
|
|
|
self.l2frame = Frame(self.leftsubframe,
|
|
|
|
{'name': 'l2frame',
|
|
|
|
Pack: {'expand': 0, 'fill': 'none'}})
|
1994-07-08 14:28:38 +00:00
|
|
|
self.l2 = Button(self.l2frame,
|
1994-07-12 16:35:35 +00:00
|
|
|
{'name': 'l2',
|
|
|
|
'text': 'Search regexp:',
|
1994-07-08 14:28:38 +00:00
|
|
|
'command': self.search_cb,
|
|
|
|
Pack: {'side': 'left'}})
|
|
|
|
self.casesense = Checkbutton(self.l2frame,
|
1994-07-12 16:35:35 +00:00
|
|
|
{'name': 'casesense',
|
|
|
|
'text': 'Case sensitive',
|
1994-07-08 14:28:38 +00:00
|
|
|
'variable': 'casesense',
|
|
|
|
'relief': 'flat',
|
|
|
|
Pack: {'side': 'left'}})
|
1994-07-11 13:15:05 +00:00
|
|
|
self.search = Entry(self.leftsubframe,
|
1994-07-12 16:35:35 +00:00
|
|
|
{'name': 'search',
|
|
|
|
'relief': 'sunken', 'bd': 2,
|
1994-07-06 21:17:21 +00:00
|
|
|
'width': 20,
|
|
|
|
Pack: {'side': 'top',
|
|
|
|
'expand': 0, 'fill': 'x'}})
|
1994-07-11 13:15:05 +00:00
|
|
|
self.title = Label(self.leftsubframe,
|
1994-07-12 16:35:35 +00:00
|
|
|
{'name': 'title',
|
|
|
|
'text': '(none)',
|
1994-07-06 21:17:21 +00:00
|
|
|
Pack: {'side': 'bottom'}})
|
|
|
|
self.text = ManPage(self.frame,
|
1994-07-12 16:35:35 +00:00
|
|
|
{'name': 'text',
|
|
|
|
'relief': 'sunken', 'bd': 2,
|
1994-07-06 21:17:21 +00:00
|
|
|
'wrap': 'none', 'width': 72,
|
|
|
|
Pack: {'expand': 1, 'fill': 'both'}})
|
|
|
|
|
|
|
|
self.entry.bind('<Return>', self.entry_cb)
|
|
|
|
self.search.bind('<Return>', self.search_cb)
|
|
|
|
self.listbox.bind('<Double-1>', self.listbox_cb)
|
|
|
|
|
1994-07-08 14:28:38 +00:00
|
|
|
self.entry.bind('<Tab>', self.entry_tab)
|
|
|
|
self.search.bind('<Tab>', self.search_tab)
|
|
|
|
self.text.bind('<Tab>', self.text_tab)
|
1994-07-06 21:17:21 +00:00
|
|
|
|
1994-07-08 14:28:38 +00:00
|
|
|
self.entry.focus_set()
|
1994-07-06 21:17:21 +00:00
|
|
|
|
1994-07-11 13:15:05 +00:00
|
|
|
self.chaptervar.set(MANNDIR)
|
|
|
|
self.newchapter()
|
|
|
|
|
|
|
|
def newchapter(self):
|
|
|
|
mandir = self.chaptervar.get()
|
|
|
|
self.choices = []
|
|
|
|
self.addlist(listmanpages(mandir))
|
|
|
|
|
1994-07-06 21:17:21 +00:00
|
|
|
def addchoice(self, choice):
|
|
|
|
if choice not in self.choices:
|
|
|
|
self.choices.append(choice)
|
|
|
|
self.choices.sort()
|
|
|
|
self.update()
|
|
|
|
|
|
|
|
def addlist(self, list):
|
|
|
|
self.choices[len(self.choices):] = list
|
|
|
|
self.choices.sort()
|
|
|
|
self.update()
|
|
|
|
|
1994-07-08 14:28:38 +00:00
|
|
|
def entry_cb(self, *e):
|
|
|
|
self.update()
|
|
|
|
|
|
|
|
def listbox_cb(self, e):
|
|
|
|
selection = self.listbox.curselection()
|
|
|
|
if selection and len(selection) == 1:
|
|
|
|
name = self.listbox.get(selection[0])
|
|
|
|
self.show_page(name)
|
|
|
|
|
|
|
|
def search_cb(self, *e):
|
|
|
|
self.search_string(self.search.get())
|
|
|
|
|
|
|
|
def entry_tab(self, e):
|
|
|
|
self.search.focus_set()
|
|
|
|
|
|
|
|
def search_tab(self, e):
|
|
|
|
self.entry.focus_set()
|
|
|
|
|
|
|
|
def text_tab(self, e):
|
|
|
|
self.entry.focus_set()
|
|
|
|
|
1994-07-06 21:17:21 +00:00
|
|
|
def updatelist(self):
|
|
|
|
key = self.entry.get()
|
|
|
|
ok = filter(lambda name, key=key, n=len(key): name[:n]==key,
|
|
|
|
self.choices)
|
|
|
|
self.listbox.delete(0, AtEnd())
|
|
|
|
exactmatch = 0
|
|
|
|
for item in ok:
|
|
|
|
if item == key: exactmatch = 1
|
|
|
|
self.listbox.insert(AtEnd(), item)
|
|
|
|
if exactmatch:
|
|
|
|
return key
|
|
|
|
elif self.listbox.size() == 1:
|
|
|
|
return self.listbox.get(0)
|
1994-07-08 14:28:38 +00:00
|
|
|
# Else return None, meaning not a unique selection
|
1994-07-06 21:17:21 +00:00
|
|
|
|
|
|
|
def update(self):
|
1994-07-08 14:28:38 +00:00
|
|
|
name = self.updatelist()
|
|
|
|
if name:
|
|
|
|
self.show_page(name)
|
|
|
|
self.entry.delete(0, AtEnd())
|
|
|
|
self.updatelist()
|
1994-07-06 21:17:21 +00:00
|
|
|
|
|
|
|
def show_page(self, name):
|
1994-07-11 13:15:05 +00:00
|
|
|
file = '%s/%s.?' % (self.chaptervar.get(), name)
|
1994-07-08 14:28:38 +00:00
|
|
|
fp = os.popen('nroff -man %s | ul -i' % file, 'r')
|
|
|
|
self.text.kill()
|
|
|
|
self.title['text'] = name
|
1994-07-06 21:17:21 +00:00
|
|
|
self.text.parsefile(fp)
|
|
|
|
|
|
|
|
def search_string(self, search):
|
|
|
|
if not search:
|
|
|
|
print 'Empty search string'
|
|
|
|
return
|
1994-07-08 14:28:38 +00:00
|
|
|
if self.frame.tk.getvar('casesense') != '1':
|
|
|
|
map = regex.casefold
|
|
|
|
else:
|
|
|
|
map = None
|
1994-07-06 21:17:21 +00:00
|
|
|
try:
|
1994-07-08 14:28:38 +00:00
|
|
|
if map:
|
|
|
|
prog = regex.compile(search, map)
|
|
|
|
else:
|
|
|
|
prog = regex.compile(search)
|
1994-07-06 21:17:21 +00:00
|
|
|
except regex.error, msg:
|
|
|
|
print 'Regex error:', msg
|
|
|
|
return
|
|
|
|
here = self.text.index(AtInsert())
|
|
|
|
lineno = string.atoi(here[:string.find(here, '.')])
|
|
|
|
end = self.text.index(AtEnd())
|
|
|
|
endlineno = string.atoi(end[:string.find(end, '.')])
|
|
|
|
wraplineno = lineno
|
|
|
|
while 1:
|
|
|
|
lineno = lineno + 1
|
|
|
|
if lineno > endlineno:
|
|
|
|
if wraplineno <= 0:
|
|
|
|
break
|
|
|
|
endlineno = wraplineno
|
|
|
|
lineno = 0
|
|
|
|
wraplineno = 0
|
|
|
|
line = self.text.get('%d.0 linestart' % lineno,
|
|
|
|
'%d.0 lineend' % lineno)
|
|
|
|
i = prog.search(line)
|
|
|
|
if i >= 0:
|
|
|
|
n = max(1, len(prog.group(0)))
|
|
|
|
try:
|
|
|
|
self.text.tag_remove('sel',
|
|
|
|
AtSelFirst(),
|
|
|
|
AtSelLast())
|
|
|
|
except TclError:
|
|
|
|
pass
|
|
|
|
self.text.tag_add('sel',
|
|
|
|
'%d.%d' % (lineno, i),
|
|
|
|
'%d.%d' % (lineno, i+n))
|
|
|
|
self.text.mark_set(AtInsert(),
|
|
|
|
'%d.%d' % (lineno, i))
|
|
|
|
self.text.yview_pickplace(AtInsert())
|
|
|
|
break
|
|
|
|
|
|
|
|
def main():
|
|
|
|
root = Tk()
|
|
|
|
sb = SelectionBox(root)
|
|
|
|
if sys.argv[1:]:
|
|
|
|
sb.show_page(sys.argv[1])
|
|
|
|
root.minsize(1, 1)
|
|
|
|
root.mainloop()
|
|
|
|
|
|
|
|
main()
|