# Textile: a Vellum plugin
# Implements a subset of Dean Allen's Textile web text generator
import vellum.hooks
import sys,re
html = []
false = 0; true = not false
# block level
rHeader = re.compile(r'\s*h(?P<h>[1-6]).\s+')
rBlockquote = re.compile(r'\s*bq.\s+')
rUL = re.compile(r'\s*\*\s+')
rOL = re.compile(r'\s*#\s+')
# inline
rEM = re.compile(r'\b_([^ \t\n\r\f\v_]+)_\b')
rStrong = re.compile(r'\*([^ \t\n\r\f\v*]+)\*')
rCite = re.compile(r'\?\?([^ \t\n\r\f\v?]+)\?\?')
# pure HTML
rJustHTML = re.compile('^(<[^>]+>)+$')
def parseText(entry,form):
 if not form.has_key("textile"): return
 txt = entry.body
 ls = txt.splitlines()
 # inFoo flags
 inOL = false; inUL = false
 html = []
 for l in ls:
 # Inline
 ll = rEM.sub(r'<em>1円</em>',l)
 ll = rStrong.sub(r'<strong>1円</strong>',ll)
 ll = rCite.sub(r'<cite>1円</cite>',ll)
 
 # Block modifiers
 isHead = rHeader.match(ll)
 isBlockquote = rBlockquote.match(ll)
 isUL = rUL.match(ll)
 isOL = rOL.match(ll)
 isJustHTML = rJustHTML.match(ll)
 # Check for list terminations
 if inUL and not isUL:
 html.append('</ul>')
 inUL = false
 if inOL and not isOL:
 html.append('</ol>')
 inOL = false
 if isHead:
 h = isHead.group("h")
 html.append('<h%s>%s</h%s>' % (h,ll[len(isHead.group(0)):],h))
 elif isBlockquote:
 html.append('<blockquote>%s</blockquote>' % (ll[len(isBlockquote.group(0)):]))
 elif isUL:
 if not inUL:
 html.append('<ul>')
 inUL = true
 html.append('<li>%s</li>' % (ll[len(isUL.group(0)):]))
 elif isOL:
 if not inOL:
 html.append('<ol>')
 inOL = true
 html.append('<li>%s</li>' % (ll[len(isOL.group(0)):]))
 else:
 if l.strip() and not isJustHTML:
 html.append('<p>%s</p>' % ll)
 # Check again for list terminations
 if inUL:
 html.append('</ul>')
 inUL = false
 if inOL:
 html.append('</ol>')
 inOL = false
 entry.body = '\n'.join(html)
vellum.hooks.register_hook("entry-new-save",parseText)
def printDetails():
 print '''<div>
 <h2>Textile</h2>
 <h3>Block modifiers</h3>
 <p>Header: <strong>h<em>n</em>. </strong></p>
 <p>Blockquote: <strong>bq. </strong></p>
 <p>Numeric list: <strong># </strong></p>
 <p>Bulleted list: <strong>* </strong></p>
 <p><input type="checkbox" name="textile"> Enable Textile parsing?</p>
 </div>
 '''
vellum.hooks.register_hook("entry-new-print",printDetails)
</div><div class="naked_ctrl">
<form action="/index.cgi/contrast" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="https://www.kryogenix.org/code/vellum/plugins/textile.py">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="https://www.kryogenix.org/code/vellum/plugins/textile.py" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast" selected="selected">配色反転</option>
<option value="larger-text">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>