infod 0.0.3.2 → 0.0.3.3

data/infod/rdf.rb

@@ -1,35 +1,29 @@
 #watch __FILE__
-class E
+class R
 
-  def E.linkeddata
-    @linkeddata ||=
-      (begin require 'linkeddata'
-       rescue LoadError => e
-         puts "linkeddata library not found"
-       end)
-  end
+  def nt;  @nt ||= docBase.a('.nt') end
+  def n3;  @n3 ||= docBase.a('.n3') end
+  def ttl; @ttl||= docBase.a('.ttl') end
 
   def self.renderRDF d,f,e
-    E.linkeddata.do{|ld|
     (RDF::Writer.for f).buffer{|w|
       d.triples{|s,p,o|
       if s && p && o
-        s = RDF::URI s=='#' ? '' : (s.E.hostURL e)
+        s = RDF::URI s=='#' ? e['REQUEST_URI'] : (s.R.hostURL e)
         p = RDF::URI p
-        o = ([E,Hash].member?(o.class) ? (RDF::URI o.E.hostURL(e)) :
+        o = ([R,Hash].member?(o.class) ? (RDF::URI o.R.hostURL(e)) :
              (l = RDF::Literal o
               l.datatype=RDF.XMLLiteral if p == Content
               l)) rescue nil
         (w << (RDF::Statement.new s,p,o) if o ) rescue nil
-      end}}}
+      end}}
   end
   
   def triplrRDF format=nil, local=true
-    E.linkeddata.do{|ld|
     uri = (local && f) ? d : uri
     RDF::Reader.open(uri, :format => format){|r|
       r.each_triple{|s,p,o|
-        yield s.to_s, p.to_s, [RDF::Node, RDF::URI].member?(o.class) ? E(o) : o.value.do{|v|v.class == String ? v.to_utf8 : v}}}}
+        yield s.to_s, p.to_s, [RDF::Node, RDF::URI].member?(o.class) ? R(o) : o.value.do{|v|v.class == String ? v.to_utf8 : v}}}
   end
 
   [['application/ld+json',:jsonld],
@@ -37,7 +31,7 @@ class E
    ['text/turtle',:turtle],
    ['text/n3',:n3]
   ].map{|mime|
-    F[Render+mime[0]] = ->d,e{E.renderRDF d, mime[1], e}}
+    F[Render+mime[0]] = ->d,e{R.renderRDF d, mime[1], e}}
 
   F['view/data'] = ->d,e {
     local = true

data/infod/schema.rb

@@ -1,5 +1,5 @@
 #watch __FILE__
-class E
+class R
 =begin
  www)  http://data.whats-your.name
 
@@ -14,8 +14,8 @@ class E
  ) RDF usage data
    curl http://data.whats-your.name/schema/gromgull.gz | zcat > properties.txt  
  2) massage
- irb> E.cacheSchemas
-  ..  E.indexSchemas
+ irb> R.cacheSchemas
+  ..  R.indexSchemas
 
  schema missing? publish and add to prefix.cc,
  see also ideas at http://www.w3.org/2013/04/vocabs/
@@ -23,20 +23,20 @@ class E
 =end
 
   UsageWeight = 'http://schema.whats-your.name/usageFrequency'
-  SchemasRDFa = %w{http://schema.org/docs/schema_org_rdfa.html}.map &:E
+  SchemasRDFa = %w{http://schema.org/docs/schema_org_rdfa.html}.map &:R
 
-  def E.cacheSchemas
-    E.schemaDocs.map &:cacheSchema
+  def R.cacheSchemas
+    R.schemaDocs.map &:cacheSchema
     # rapper2 is failing at RDFa autodiscovery, import them again
     SchemasRDFa.map{|s|
       s.ttl.w `rapper -i rdfa -o turtle #{s.uri}`
       s.ef.w s.ttl.graphFromFile,true}
   end
 
-  def E.indexSchemas
+  def R.indexSchemas
     g = {}
-    E.schemaDocs.map(&:ef).flatten.map{|d|d.graphFromFile g}
-    '/schema/schema.txt'.E.w g.sort_by{|u,r|r[UsageWeight]}.map{|u,r|
+    R.schemaDocs.map(&:ef).flatten.map{|d|d.graphFromFile g}
+    '/schema/schema.txt'.R.w g.sort_by{|u,r|r[UsageWeight]}.map{|u,r|
       [(r[UsageWeight]||0),
        u,
        r[Label],
@@ -55,15 +55,15 @@ class E
     unless ef.e || ttl.do{|t| t.e && t.size > 256e3}
       g = ttl.graphFromFile # parse
       g.map{|u,r|           # each resource
-        E.schemaWeights[u].do{|w| # grab stats
+        R.schemaWeights[u].do{|w| # grab stats
           r[UsageWeight] = w }}
       ef.w g,true # write annotated graph
     end
   end
 
-  def E.schemaWeights
+  def R.schemaWeights
     @schemaWeights ||=
-      (data = '/properties.txt'.E
+      (data = '/properties.txt'.R
        (puts "download\ncurl http://data.whats-your.name/schema/gromgull.gz | zcat > predicates.txt"; exit) unless data.e
        w = {}
        data.read.each_line{|e|
@@ -72,13 +72,13 @@ class E
        w)
   end
   
-  def E.schemaDocs
+  def R.schemaDocs
     @schemaDocs ||=
-      (source = E['http://prefix.cc/popular/all.file.txt']
-       mirror = E['/prefix.txt']
+      (source = R['http://prefix.cc/popular/all.file.txt']
+       mirror = R['/prefix.txt']
        (mirror.e ? mirror : source).   # select schema-pointers doc
        read.split(/\n/).grep(/^[^#]/). # each uncommented line
-       map{|t| t.split(/\t/)[1].E }.   # parse to resource pointer
+       map{|t| t.split(/\t/)[1].R }.   # into a Resource
        concat SchemasRDFa)             # schema list
   end
 
@@ -86,7 +86,7 @@ class E
     r.q['view']='table'
     g = {}
     if (q = r.q['q']) && !q.empty?
-      search = "grep -i #{q.sh} #{'/schema/schema.txt'.E.d} | head -n 255"
+      search = "grep -i #{q.sh} #{'/schema/schema.txt'.R.d} | head -n 255"
       found = `#{search}`.to_utf8.lines.to_a.map{|i|
         c,u,t = i.split ' ',3
         c = c.to_i

data/infod/text.rb

@@ -3,7 +3,8 @@
 
 class String
 
-  # text to HTML
+  def h; Digest::SHA1.hexdigest self end
+
   def hrefs i=false
     #  ) only matches with an opener
     # ,. only match mid-URI
@@ -19,18 +20,24 @@ class String
   rescue
     self
   end
-  def camelToke
-    scan /[A-Z]+(?=\b|[A-Z][a-z])|[A-Z]?[a-z]+/
+
+  def tail; self[1..-1] end
+  def to_utf8
+    encode('UTF-8', undef: :replace)
+  rescue Encoding::InvalidByteSequenceError
+    ""
   end
+  def t; match(/\/$/) ? self : self+'/' end
+
 end
 
-class E
+class R
 
   fn 'view/monospace',->d,e{
     [(H.once e,'text',(H.css '/css/text')),
      d.values.map{|v|
       v[Content].do{|c|
-         b = E.cs
+         b = R.cs
         {class: :text,
            c: [{_: :a, href: v.url+'?view', c: v.label, style: "background-color:" + b},
                {_: :pre,  c: c, style: "border-color:" + b}]}}}]}
@@ -53,44 +60,80 @@ class E
      (H.once e,'title',(H.css '/css/title'))]}
 
   fn 'itemview/title',->r,e{
-    {_: :a, class: :title, href: r.E.url,
-      c: r[Title] || r.uri.abbrURI} if (r.class == E || r.class == Hash) && r.uri}
+    {_: :a, class: :title, href: r.R.url,
+      c: r[Title] || r.uri.abbrURI} if (r.class == R || r.class == Hash) && r.uri}
 
   # a list of URIs
   def triplrUriList
-    yield uri, COGS+'View', E[uri+'?view=csv']
+    yield uri, COGS+'View', R[uri+'?view=csv']
     open(d).readlines.grep(/^[^#]/).map{|l|
       l = l.chomp
-      yield uri, '/rel', l.E
+      yield uri, '/rel', l.R
       yield l, '/rev', self
-      yield l, Type, E[CSV+'Row']
+      yield l, Type, R[CSV+'Row']
     }
   end
 
   def uris
-    graph.keys.select{|u|u.match /^http/}.map &:E
+    graph.keys.select{|u|u.match /^http/}.map &:R
   end
 
   def triplrANSI
     yield uri, Content, `cat #{sh} | aha`
   end
 
+  def triplrMarkdown
+    require 'markdown'
+    yield uri,Content,Markdown.new(r).to_html
+  end
+
+  def triplrOrg
+    require 'org-ruby'
+    r.do{|r|
+      yield uri,Content,Orgmode::Parser.new(r).to_html}
+  end
+
   def triplrPDF &f
     triplrStdOut 'pdfinfo', &f
   end
 
-  def triplrRTF
-    yield uri, Content, `which catdoc && catdoc #{sh}`.hrefs
+  def triplrPS
+    p = R[dirname + '/.' + File.basename(path) + '/']
+    unless p.e
+      p.mk
+      `gs -dSAFER -dBATCH -dNOPAUSE -sDEVICE=png16m -r300 -sOutputFile='#{p.sh}%03d.png' -dTextAlphaBits=4 #{sh}`
+    end
+    yield uri, Content, `ps2txt #{sh}`.hrefs
+    p.a('*.png').glob.map{|i|yield uri, DC+'Image', i}
   end
 
-  def triplrWord
-    yield uri, Content, `which antiword && antiword #{sh}`.hrefs
+  F['view/'+MIMEtype+'application/postscript']=->r,e{
+    [(H.once e, :mu,   (H.js '/js/mu')),(H.once e, :book, (H.js '/js/book')),
+     {_: :style, c: 'div[type="book"] a {background-color:#ccc;color:#fff;float:left;margin:.16em}'},
+     r.values.map{|d|
+      d[DC+'Image'].do{|is|
+        is = is.sort_by(&:uri)
+        {type: :book,
+          c: [{_: :img, style:'float:left;max-width:100%', src: is[0].url},
+              {name: :pages,
+                c: is.map{|i|{_: :a,href: i.url, c: i.R.bare}}}]}}}]}
+
+  def triplrRTF
+    yield uri, Content, `which catdoc && catdoc #{sh}`.hrefs
   end
 
   def triplrTeX
     yield uri, Content, `cat #{sh} | tth -r`
   end
 
+  def triplrTextile; require 'redcloth'
+    yield uri,Content,RedCloth.new(r).to_html
+  end
+
+  def triplrWord
+    yield uri, Content, `which antiword && antiword #{sh}`.hrefs
+  end
+
   fn Render+'text/plain',->d,_=nil{
     d.values.map{|r|
       [(r.map{|k,v|

data/infod/threads.rb

@@ -1,20 +1,23 @@
 # -*- coding: utf-8 -*-
 #watch __FILE__
-class E
+class R
   
   fn 'protograph/thread',->d,e,g{
-    # find reachable discussion by recursively walking reply_of arcs
+    # walk reply_of arcs
     d.pathSegment.do{|p|p.walk SIOC+'reply_of',g }
-    g['#']={'uri' => '#',
-      RDFs+'member' => g.keys.map(&:E),
-      Type => [E[HTTP+'Response'],
-               E[SIOC+'Thread']
-              ]} unless g.empty?
+    unless g.empty?
+      thread = '#discussion'
+      g[thread] = {
+        'uri' => thread,
+        Type => R[SIOC+'Thread'],
+        RDFs + 'member' => g.keys.map(&:R)}
+      g['#'] = {'uri' => '#', Type => [R[HTTP+'Response']]}
+    end
     F['docsID'][g,e]}
   
   fn 'view/threads',->d,env{
     posts = d.values.select{|r| # we want SIOC posts
-      r[Type].do{|t| [*t].map{|t| t.respond_to?(:uri) && t.uri}.member? SIOC+'Post'}}
+      r[Type].do{|t| [*t].map(&:maybeURI).member? SIOC+'Post'}}
     threads = posts.group_by{|r| # group by Title
        [*r[Title]][0].do{|t|t.sub(/^[rR][eE][^A-Za-z]./,'')}}
 
@@ -23,7 +26,7 @@ class E
      '<table>',
      threads.group_by{|r,k| # group by recipient
        k[0].do{|k| k[To].do{|o|o.head.uri}}}.
-     map{|group,threads| c = E.cs
+     map{|group,threads| c = R.cs
        ['<tr><td class=subject>',
         threads.map{|title,msgs| # thread
           [{_: :a, property: Title, :class => 'thread', style: "border-color:#{c}", href: msgs[0].url+'?graph=thread&view=timegraph',

data/infod/time.rb

@@ -15,19 +15,18 @@ class Object
   end
 end
 
-class E
+class R
 
   fn 'view/timegraph',->g,e{
     i = F['itemview/timegraph']
-    Fn 'baseview/timegraph',g,e,->{
-      g.map{|u,r|i.(r,e)}}}
+    F['baseview/timegraph'][g,e,->{g.map{|u,r|i.(r,e)}}]}
 
   fn 'baseview/timegraph',->d,e,c{
     e[:graph] = d
     e[:group] = {}
     [F['view'][d,e],H.css('/css/timegraph'),
      {class: :timegraph,
-       c: (Fn 'filter/timegraph', e.q,d,nil
+       c: (F['filter/timegraph'][ e.q, d, nil]
            c.())}]}
 
   # timegraph entry
@@ -38,8 +37,8 @@ class E
 
       labelP = x.q['label'].do{|l|l.expand} || Creator
       label = ([*r[labelP]][0]).do{|l|
-               l.respond_to?(:uri) ? l.E.label : l.to_s}
-      lc = x[:group][label] ||= E.c
+               l.respond_to?(:uri) ? l.R.label : l.to_s}
+      lc = x[:group][label] ||= R.c
       arc = x.q['arc'].do{|a| a.expand } || (SIOC+'has_parent')
 
       [{style: "top: #{r['x']}%; left: #{r['y']}%",

metadata

@@ -1,62 +1,55 @@
 --- !ruby/object:Gem::Specification
 name: infod
 version: !ruby/object:Gem::Version
-  version: 0.0.3.2
-  prerelease: 
+  version: 0.0.3.3
 platform: ruby
 authors:
-- <carmen@whats-your.name>
+- "<carmen@whats-your.name>"
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2014-01-31 00:00:00.000000000 Z
+date: 2014-02-14 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rack
   requirement: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: '0'
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: '0'
 - !ruby/object:Gem::Dependency
   name: thin
   requirement: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: '0'
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: '0'
 - !ruby/object:Gem::Dependency
   name: nokogiri
   requirement: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: '0'
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: '0'
 description: www-server
@@ -68,75 +61,64 @@ extra_rdoc_files: []
 files:
 - bin/infod
 - infod.rb
-- infod/audio.rb
-- infod/fs.rb
-- infod/csv.rb
-- infod/grep.rb
-- infod/microblog.rb
-- infod/forum.rb
-- infod/graph.rb
-- infod/sh.rb
-- infod/POST.rb
-- infod/webid.rb
 - infod/404.rb
-- infod/man.rb
+- infod/500.rb
 - infod/GET.rb
-- infod/constants.rb
-- infod/infod.rb
 - infod/HTTP.rb
-- infod/glob.rb
-- infod/edit.rb
-- infod/ls.rb
-- infod/page.rb
-- infod/html.rb
-- infod/threads.rb
-- infod/500.rb
+- infod/POST.rb
+- infod/audio.rb
+- infod/blog.rb
+- infod/cal.rb
 - infod/code.rb
-- infod/text.rb
-- infod/HEAD.rb
+- infod/constants.rb
+- infod/csv.rb
+- infod/edit.rb
+- infod/facets.rb
 - infod/feed.rb
-- infod/ruby.rb
+- infod/forum.rb
+- infod/fs.rb
+- infod/graph.rb
+- infod/grep.rb
 - infod/groonga.rb
-- infod/mail.rb
-- infod/blog.rb
+- infod/histogram.rb
+- infod/html.rb
 - infod/image.rb
-- infod/facets.rb
-- infod/cal.rb
-- infod/postscript.rb
-- infod/kv.rb
-- infod/rdf.rb
-- infod/schema.rb
-- infod/wiki.rb
+- infod/index.rb
+- infod/infod.rb
+- infod/lambda.rb
+- infod/ls.rb
+- infod/mail.rb
+- infod/man.rb
+- infod/microblog.rb
 - infod/mime.rb
 - infod/names.rb
-- infod/histogram.rb
-- infod/index.rb
-- infod/find.rb
+- infod/rdf.rb
+- infod/schema.rb
+- infod/text.rb
+- infod/threads.rb
 - infod/time.rb
-- infod/lambda.rb
 homepage: http://whats-your.name/www/
 licenses:
 - Unlicense
+metadata: {}
 post_install_message: 
 rdoc_options: []
 require_paths:
-- .
+- "."
 required_ruby_version: !ruby/object:Gem::Requirement
-  none: false
   requirements:
-  - - ! '>='
+  - - ">="
     - !ruby/object:Gem::Version
       version: '0'
 required_rubygems_version: !ruby/object:Gem::Requirement
-  none: false
   requirements:
-  - - ! '>='
+  - - ">="
     - !ruby/object:Gem::Version
       version: '0'
 requirements: []
 rubyforge_project: 
-rubygems_version: 1.8.23
+rubygems_version: 2.2.0
 signing_key: 
-specification_version: 3
+specification_version: 4
 summary: www-server
 test_files: []