<%@Language = "Python"%> <% # Hacks to support ASP-IIS Environment import sys, cStringIO sys.stdout = Response def getEnviron(): d = {} for k in Request.ServerVariables: d[str(k)] = str(Request.ServerVariables(k)) return d def getRequestForm(): if Request.TotalBytes > 0: data = str(Request.BinaryRead(Request.TotalBytes)[0]) fp = cStringIO.StringIO(str(data)) return cgi.FieldStorage(fp = fp, environ = environ) else: return cgi.FieldStorage(fp = cStringIO.StringIO(""), environ = environ) environ = getEnviron() """Quick-quick implementation of WikiWikiWeb in Python """ # Copyright (C) 1999, 2000 Martin Pool # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # This program is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # General Public License for more details. # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 # USA __version__ = '$Revision: 1.62 $'[11:-2]; ERRLOG = 'c:\\tmp\\mbp_piki_err' import cgi, sys, string, os, re, errno, time, stat from cgi import log from os import path from socket import gethostbyaddr from time import localtime, strftime from cStringIO import StringIO sys.stderr = open(ERRLOG, 'at') def emit_header(): pass #print "Content-type: text/html" #print # Regular expression defining a WikiWord (but this definition # is also assumed in other places. word_re_str = r"\b([A-Z][a-z]+){2,}\b" word_anchored_re = re.compile('^' + word_re_str + '$') command_re_str = "(search|edit|fullsearch|titlesearch)\=(.*)" # Editlog ----------------------------------------------------------- # Functions to keep track of when people have changed pages, so we can # do the recent changes page and so on. # The editlog is stored with one record per line, as tab-separated # words: page_name, host, time # TODO: Check values written in are reasonable def editlog_add(page_name, host): editlog = open(editlog_name, 'a+') try: # fcntl.flock(editlog.fileno(), fcntl.LOCK_EX) editlog.seek(0, 2) # to end editlog.write(string.join((page_name, host, `time.time()`), "\t") + "\n") finally: # fcntl.flock(editlog.fileno(), fcntl.LOCK_UN) editlog.close() def editlog_raw_lines(): editlog = open(editlog_name, 'rt') try: # fcntl.flock(editlog.fileno(), fcntl.LOCK_SH) return editlog.readlines() finally: # fcntl.flock(editlog.fileno(), fcntl.LOCK_UN) editlog.close() # Formatting stuff -------------------------------------------------- def get_scriptname(): return environ.get('SCRIPT_NAME', '') def send_title(text, link=None, msg=None): print "%s" % text if css_url: print '' % css_url print "" print '

' if logo_string: print link_tag('RecentChanges', logo_string) if link: print '%s' % (link, text) else: print text print '

' if msg: print msg print '
' def link_tag(params, text=None, ss_class=None): if text is None: text = params # default if ss_class: classattr = 'class="%s" ' % ss_class else: classattr = '' return '%s' % (classattr, get_scriptname(), params, text) # Search --------------------------------------------------- def do_fullsearch(needle): send_title('Full text search for "%s"' % (needle)) needle_re = re.compile(needle, re.IGNORECASE) hits = [] all_pages = page_list() for page_name in all_pages: body = Page(page_name).get_raw_body() count = len(needle_re.findall(body)) if count: hits.append((count, page_name)) # The default comparison for tuples compares elements in order, # so this sorts by number of hits hits.sort() hits.reverse() print "" print_search_stats(len(hits), len(all_pages)) def do_titlesearch(needle): # TODO: check needle is legal -- but probably we can just accept any # RE send_title("Title search for \"" + needle + '"') needle_re = re.compile(needle, re.IGNORECASE) all_pages = page_list() hits = filter(needle_re.search, all_pages) print "" print_search_stats(len(hits), len(all_pages)) def print_search_stats(hits, searched): print "

%d hits " % hits print " out of %d pages searched." % searched def do_edit(pagename): Page(pagename).send_editor() def do_savepage(pagename): global form pg = Page(pagename) pg.save_text(form['savetext'].value) msg = """Thankyou for your changes. Your attention to detail is appreciated.""" pg.send_page(msg=msg) def make_index_key(): s = '

' links = map(lambda ch: '%s' % (ch, ch), string.lowercase) s = s + string.join(links, ' | ') s = s + '

' return s def page_list(): return filter(word_anchored_re.match, os.listdir(text_dir)) def print_footer(name, editable=1, mod_string=None): base = get_scriptname() print '

' if editable: print link_tag('edit='+name, 'EditText') print "of this page" if mod_string: print "(last modified %s)" % mod_string print '
' print link_tag('FindPage='+name, 'FindPage') print " by browsing, searching, or an index" # ---------------------------------------------------------- # Macros def _macro_TitleSearch(): return _macro_search("titlesearch") def _macro_FullSearch(): return _macro_search("fullsearch") def _macro_search(type): if form.has_key('value'): default = form["value"].value else: default = '' return """
""" % (type, default) def _macro_GoTo(): return """
""" # isindex is deprecated, but it gives the right result here def _macro_WordIndex(): s = make_index_key() pages = list(page_list()) map = {} word_re = re.compile('[A-Z][a-z]+') for name in pages: for word in word_re.findall(name): try: map[word].append(name) except KeyError: map[word] = [name] all_words = map.keys() all_words.sort() last_letter = None for word in all_words: letter = string.lower(word[0]) if letter <> last_letter: s = s + '

%s

' % (letter, letter) last_letter = letter s = s + '%s' return s def _macro_TitleIndex(): s = make_index_key() pages = list(page_list()) pages.sort() current_letter = None for name in pages: letter = string.lower(name[0]) if letter <> current_letter: s = s + '

%s

' % (letter, letter) current_letter = letter else: s = s + '
' s = s + Page(name).link_to() return s def _macro_RecentChanges(): lines = editlog_raw_lines() lines.reverse() ratchet_day = None done_words = {} buf = StringIO() for line in lines: page_name, addr, ed_time = string.split(line, '\t') # year, month, day, DoW time_tuple = localtime(float(ed_time)) day = tuple(time_tuple[0:3]) if day <> ratchet_day: buf.write('

%s

' % strftime(date_fmt, time_tuple)) ratchet_day = day if done_words.has_key(page_name): continue done_words[page_name] = 1 buf.write(Page(page_name).link_to()) if show_hosts: buf.write(' . . . . ') try: buf.write(gethostbyaddr(addr)[0]) except: buf.write("(unknown)") if changed_time_fmt: buf.write(time.strftime(changed_time_fmt, time_tuple)) buf.write('
') return buf.getvalue() # ---------------------------------------------------------- class PageFormatter: """Object that turns Wiki markup into HTML. All formatting commands can be parsed one line at a time, though some state is carried over between lines. """ def __init__(self, raw): self.raw = raw self.is_em = self.is_b = 0 self.list_indents = [] self.in_pre = 0 def _emph_repl(self, word): if len(word) == 3: self.is_b = not self.is_b return ['', ''][self.is_b] else: self.is_em = not self.is_em return ['', ''][self.is_em] def _rule_repl(self, word): s = self._undent() if len(word) <= 4: s = s + "\n
\n" else: s = s + "\n
\n" % (len(word) - 2 ) return s def _word_repl(self, word): return Page(word).link_to() def _url_repl(self, word): return '%s' % (word, word) def _email_repl(self, word): return '%s' % (word, word) def _ent_repl(self, s): return {'&': '&', '<': '<', '>': '>'}[s] def _li_repl(self, match): return '
  • ' def _pre_repl(self, word): if word == '{{{' and not self.in_pre: self.in_pre = 1 return '
    '
        elif self.in_pre:
            self.in_pre = 0
            return '
    ' else: return '' def _macro_repl(self, word): macro_name = word[2:-2] # TODO: Somehow get the default value into the search field return apply(globals()['_macro_' + macro_name], ()) def _indent_level(self): return len(self.list_indents) and self.list_indents[-1] def _indent_to(self, new_level): s = '' while self._indent_level() > new_level: del(self.list_indents[-1]) s = s + '\n' while self._indent_level() < new_level: self.list_indents.append(new_level) s = s + '
      \n' return s def _undent(self): res = '
    ' * len(self.list_indents) self.list_indents = [] return res def replace(self, match): for type, hit in match.groupdict().items(): if hit: return apply(getattr(self, '_' + type + '_repl'), (hit,)) else: raise "Can't handle match " + `match` def print_html(self): # For each line, we scan through looking for magic # strings, outputting verbatim any intervening text scan_re = re.compile( r"(?:(?P'{2,3})" + r"|(?P[<>&])" + r"|(?P\b(?:[A-Z][a-z]+){2,}\b)" + r"|(?P-{4,})" + r"|(?P(http|ftp|nntp|news|mailto)\:[^\s'\"]+\S)" + r"|(?P[-\w._+]+\@[\w.-]+)" + r"|(?P
  • ^\s+\*)" + r"|(?P
    (\{\{\{|\}\}\}))"
            + r"|(?P\[\[(TitleSearch|FullSearch|WordIndex"
                            + r"|TitleIndex|RecentChanges|GoTo)\]\])"
            + r")")
        blank_re = re.compile("^\s*$")
        bullet_re = re.compile("^\s+\*")
        indent_re = re.compile("^\s*")
        eol_re = re.compile(r'\r?\n')
        raw = string.expandtabs(self.raw)
        for line in eol_re.split(raw):
            if not self.in_pre:
                # XXX: Should we check these conditions in this order?
                if blank_re.match(line):
                    print '
    '
                    continue
                indent = indent_re.match(line)
                print self._indent_to(len(indent.group(0)))
            print re.sub(scan_re, self.replace, line)
        if self.in_pre: print '
    ' print self._undent() # ---------------------------------------------------------- class Page: def __init__(self, page_name): self.page_name = page_name def split_title(self): # look for the end of words and the start of a new word, # and insert a space there return re.sub('([a-z])([A-Z])', r'\1 \2', self.page_name) def _text_filename(self): return path.join(text_dir, self.page_name) def _tmp_filename(self): return path.join(text_dir, ('#' + self.page_name + '.' + `os.getpid()` + '#')) def exists(self): try: os.stat(self._text_filename()) return 1 except OSError, er: if er.errno == errno.ENOENT: return 0 else: raise er def link_to(self): word = self.page_name if self.exists(): return link_tag(word) else: if nonexist_qm: return link_tag(word, '?', 'nonexistent') + word else: return link_tag(word, word, 'nonexistent') def get_raw_body(self): try: return open(self._text_filename(), 'rt').read() except IOError, er: if er.errno == errno.ENOENT: # just doesn't exist, use default return 'Describe %s here.' % self.page_name else: raise er def send_page(self, msg=None): link = get_scriptname() + '?fullsearch=' + self.page_name send_title(self.split_title(), link, msg) PageFormatter(self.get_raw_body()).print_html() print_footer(self.page_name, 1, self._last_modified()) def _last_modified(self): if not self.exists(): return None modtime = localtime(os.stat(self._text_filename())[stat.ST_MTIME]) return strftime(datetime_fmt, modtime) def send_editor(self): send_title('Edit ' + self.split_title()) print '
    ' % (get_scriptname()) print '' % (self.page_name) raw_body = string.replace(self.get_raw_body(), '\r\n', '\n') print """""" % raw_body print """
    """ print "
    " print Page("UploadFile").link_to() print "" print "(not enabled yet)" print "
    " print "

    " + Page('EditingTips').link_to() def _write_file(self, text): tmp_filename = self._tmp_filename() open(tmp_filename, 'wt').write(text) text = self._text_filename() if os.name == 'nt': # Bad Bill! POSIX rename ought to replace. :-( try: os.remove(text) except OSError, er: if er.errno <> errno.ENOENT: raise er os.rename(tmp_filename, text) def save_text(self, newtext): self._write_file(newtext) remote_name = environ.get('REMOTE_ADDR', '') editlog_add(self.page_name, remote_name) emit_header() # Configurable parts ------------------------------------------ script_path = "/piki/piki.asp" data_dir = 'd:\\apps\\piki\\' text_dir = path.join(data_dir, 'text') editlog_name = path.join(data_dir, 'editlog') cgi.logfile = path.join(data_dir, 'cgi_log') logo_string = 'pikipiki' changed_time_fmt = ' . . . . [%I:%M %p]' date_fmt = '%a %d %b %Y' datetime_fmt = '%a %d %b %Y %I:%M %p' show_hosts = 0 # show hostnames? css_url = '/piki/piki.css' # stylesheet link, or '' nonexist_qm = 0 # show '?' for nonexistent? try: # form = cgi.FieldStorage() form = getRequestForm() handlers = { 'fullsearch': do_fullsearch, 'titlesearch': do_titlesearch, 'edit': do_edit, 'savepage': do_savepage } for cmd in handlers.keys(): if form.has_key(cmd): apply(handlers[cmd], (form[cmd].value,)) break else: #path_info = environ.get('PATH_INFO', '') if form.has_key('goto'): query = form['goto'].value else: query = str(Request.QueryString) or 'FrontPage' word_match = re.match(word_re_str, query) if word_match: word = word_match.group(0) Page(word).send_page() else: print "

    Can't work out query \"

    " + query + "
    \"" except: cgi.print_exception() # sys.stdout.flush() %>