require 'cosmo'
require 'os'
require 'string'
require 'lfs'
require 'templates'
require 'blutils'

local root_dir = '/usr/local/www/bluedino.net/www'
local breadcrumbs = blutils.breadcrumbs
local toc = blutils.toc


local presence_indicator = [[
<a href="aim:GoIM?screenname=muhaqwi">
<img src="http://api.oscar.aol.com/SOA/key=mu1d4DY8qK323DwI/presence/muhaqwi" border="0"/> </a> 
   ]]


local content = [=[
      <p><strong>mu' HaqwI'</strong> (<em>word surgeon</em>) is a program that helps you analyze Klingon words.  Klingon nouns and verbs are modified by adding affixes.  For example, consider modifications of the verb <strong>yaj</strong>, meaning <em>understand</em>: <strong>choyaj</strong> means <em>you understand me</em>, <strong>choyajbe'</strong> means <em>you do not understand me</em>, and <strong>choyajlaHbe'ba'mo'</strong> means <em>because you obviously cannot understand me</em>.  The noun <strong>SuS</strong> (<em>wind</em>) can be transformed into <strong>Sus'a'</strong> (<em>gale</em>) and <strong>Sus'a'qoq</strong>, <em>so-called gale</em>.</p>

<p>The original program was written by Christoph Pfisterer and is available at <a href="http://chrisp.de/muhaqwi/download.html">http://chrisp.de/muhaqwi/download.html</a>.  I ported the program to Palm OS.  It can be downloaded from <a href="http://bluedino.net/downloads/download.lua?file=muhaqwi.tar.gz">http://bluedino.net/downloads/</a>, or you can get the source from the SVN repository at <a href="http://bluedino.net/svn/muhaqwi/">http://bluedino.net/svn/muhaqwi</a>.</p>
]=]

local sidebar_content = toc {
   { url = '/downloads/', name = 'Downloads' },
   { url = '/talks/', name = 'Talks' },
   { url = '/related/', name = 'Related Sites' },
}


function handle(r)
   local date = os.date('%c', lfs.attributes(root_dir .. '/muhaqwi/index.lua', 'modification'))
   local html_str = cosmo.fill(templates.main, {date = date,
                               title = "mu' HaqwI'",
                               page_title = 'BlueDino.Net',
                               breadcrumbs = breadcrumbs {"mu' HaqwI'"},
                               content = content,
                               sidebar_content = sidebar_content,
                               })
   r.content_type = 'text/html'
   r:puts(html_str)
end