#!/usr/bin/env python
"""
com.inamidst.node - Arcs Node Widget
Author: Sean B. Palmer, inamidst.com
"""

import urllib, heapq
import trio

def parse_value(s):
   s = s.replace('\\"', '"')
   s = s.replace('\\t', '\t')
   s = s.replace('\\r', '\r')
   s = s.replace('\\n', '\n')
   return s.decode('unicode-escape')

def parse_term(string):
   if string.startswith('<'):
      return trio.rdf.URI(parse_value(string[1:-1]))
   elif string.startswith('_:'):
      return trio.rdf.BlankNode(string[2:])
   elif string.startswith('"'):
      return trio.rdf.PlainLiteral(parse_value(string[1:-1]))
   return trio.rdf.URI(parse_value(string))

def serialise_term(term):
   if isinstance(term, trio.rdf.URI):
      return '<' + escaped33(term.value.encode('utf-8')) + '>'
   elif isinstance(term, trio.rdf.BlankNode):
      return '_:' + term.label.encode('utf-8')
   elif isinstance(term, trio.rdf.PlainLiteral):
      return '"' + escaped32(term.lexical) + '"'
   elif isinstance(term, trio.rdf.TypedLiteral):
      return '"' + escaped32(term.lexical) + '"'
   raise ValueError('%r' % term)

def racine(arcs, uri): 
   return uri.split('#', 1)[0]

def main(arcs, write, params): 
   lib = arcs.library
   serialised_node = params['about']
   rdf_node = parse_term(serialised_node)
   node = arcs.Node(rdf_node, lib)

   label = node.label()
   write(title=label + ' &#xB7; Arcs &#x2192; View Facts')

   write('<table>')
   write('<tr>')
   write('<td class="node" style="width:70%;vertical-align:top">')

   prev = '''
   write("""<p class="commands"><a href="javascript:void('toggleBrowse')" 
         onclick="toggleBrowse($(this))" title="Show Web links, not Arcs links"
         >Browse Web</a> &#xB7; <a href="javascript:void('toggleGraphs')" 
         onclick="toggleGraphs($(this))" title"Show links to load fact files"
         >Show Graph Links</a></p>""")
   '''

   write("""<p class="commands"><a href="@@">Normal</a> &#xB7; Facts &#xB7; <a 
href="javascript:void(0)" onclick="toggleBrowse($(this))">Web</a></p>""")

   write('<h1>' + label + '</h1>')

   write('<table class="nodetable">')

   pairs = {}
   for way, pred, sib in node.arcs(): 
      pairs.setdefault((way, pred), set()).add(sib)

   facts = 0
   def attr(uri): 
      uri = urllib.unquote(uri)
      uri = uri.replace('&', '&amp;')
      uri = uri.replace('<', '&lt;')
      uri = uri.replace('>', '&gt;')
      return uri.replace('"', '&quot;')

   for i, ((way, pred), sibs) in enumerate(pairs.iteritems()): 
      pred_label = lib.label(pred)
      if way == '<-': 
         pred_label = '&#x2190;&#xA0;' + pred_label

      if i % 2: 
         write('<tr class="pair">')
      else: write('<tr class="pair stripe">')

      write('<td class="arc">')
      write(pred_label)
      write('</td>')

      write('<td class="siblings">')
      siblings = []
      length = len(sibs)
      for sib in sibs: 
         if isinstance(sib, trio.rdf.PlainLiteral): 
            if sib.language and not sib.language.startswith('en'): # @@
               if length > 1: continue
         facts += 1

         if length < 10: 
            sib_label = lib.label(sib, extended=True)
         else: sib_label = lib.label(sib)

         chunks = []
         for chunk in sib_label.split(' '): 
            if len(chunk) > 50: 
               while chunk: 
                  chunks.append(chunk[:50])
                  chunk = chunk[50:]
            else: chunks.append(chunk)
         sib_label = ' '.join(chunks)

         sib_uri = urllib.quote(str(sib).strip('<>'), safe='/:')
         siblings.append((sib_label.lower(), sib_label, sib_uri))
      siblings = sorted(siblings)

      for j, (sib_label_lower, sib_label, sib_uri) in enumerate(siblings): 
         write('<a href="/?about=' + sib_uri + '" title="' + attr(sib_uri) + 
               '" class="sibling">' + sib_label + '</a>')
         if j != (len(siblings) - 1): 
            write('<span style="padding-right:0.2em">,</span> ')
      write('</td>')
      write('</tr>')
   write('</table>')

   write('</td>')
   write('<td class="sources" style="width:30%;vertical-align:top">')


   write('<h2>Sources</h2>')
   write("""
<form action="javascript:void(0)" method="POST" style="display:inline">
<p style="display:inline"><input type="submit" value="Load All" 
   style="font-size:0.8em" /></p>
</form>
<form action="javascript:void(0)" method="POST" style="display:inline"
onsubmit="$('p.links a.unchecked').each(function(i, e) { isRDF($(e)) })">
<p style="display:inline"><input type="submit" value="Available?" 
   style="font-size:0.8em" /></p>
</form>
""")

   sources = set()
   for graph_label in lib.manifest[node.node]: 
      s_graph = lib.graphs[graph_label]
      s_uri = s_graph.docURI
      s_rdfnode = trio.rdf.URI(unicode(s_uri))
      sources.add((s_rdfnode, s_uri))

   equivalents = lib.equivalents(node.node)
   for equivalent in equivalents: 
      s_uri = racine(arcs, str(equivalent).strip('<>'))
      s_rdfnode = trio.rdf.URI(unicode(s_uri))
      sources.add((s_rdfnode, s_uri))

   canon = lib.canonicalise(node.node)

   if len(sources) > 1: 
      write('<p class="links" style="margin-left:0.5em">')
      for s_rdfnode, s_uri in sources: 
         equiv_source = s_rdfnode in equivalents

         loaded_source = False
         for G in lib.graphs.itervalues(): 
            if G.docURI == s_uri: 
               loaded_source = True
               break

         if loaded_source: 
            color, codepoint, extra = '#2a5', '&#x25CF;', ' checked'
         else: color, codepoint, extra = '#775', '&#x25CB;', ' unchecked'

         write("""
<a href="javascript:void(0)" onclick="loadURI($(this))" class="glink%s" 
   title="&lt;%s&gt;" style="color:%s;text-decoration:none">%s</a>
""" % (extra, attr(s_uri), color, codepoint))

         # if lib.canonicalise(e_node) != canon: 
         if not equiv_source: 
            linktext = lib.label(s_rdfnode, extended=True)
         else: linktext = s_uri

         if linktext.startswith('http://'): 
            linktext = linktext.split('/')[2]
            linktext = '.'.join(linktext.split('.')[-3:])

         if loaded_source: 
            write('<a href="/?graph=@@" title="@@">' + linktext + '</a>')
         else: write('<span title="' + s_uri + '">' + linktext + '</span>')

         if lib.manifest.has_key(s_rdfnode) and not equiv_source: 
            write(' (<a href="/?about=' + s_uri + '" title="' + 
                  attr(s_uri) + '">about</a>)')

         # if equivalent == rdf_node: 
         #    write(' (selected)')
         # if equivalent == canon: 
         #    write(' (canonical)')
         write('<br />')
      write('</p>')

   write("<p>Arcs has %s facts about %s.</p>" % (facts, label))

   write('<h2>Key</h2>')
   write('<p><span style="color:#775">&#x25CB;</span> ' + 
         ' = unknown availability<br />')
   write('<span style="color:#8ae">&#x25CF;</span> ' + 
         ' = probably available source<br />')
   write('<span style="color:#ccc">&#x25CF;</span> ' + 
         ' = probably unavailable source</p>')

   write('<p><span style="color:#2a5">&#x25CF;</span> ' + 
         ' = loaded source<br />')
   write('<span style="color:#e03">&#x25CF;</span> ' + 
         ' = failed source</p>')
   write('</td>')
   write('</tr>')

   write('<tr>')
   write('<td>')
   write('<h2>Alternative Links</h2>')
   write('<p>@@</p>')
   write('</td>')
   write('<td>')
   write('</td>')
   write('</tr>')


   write('</table>')

if __name__ == '__main__': 
   print __doc__