skos2html 0.0.3 → 0.0.4

data/lib/skos2html.rb

@@ -86,6 +86,7 @@ class Skos2Html
       head.meta(:charset => "UTF-8")
       head.title(title)
       head.meta(:name => "generator", :content => "skos2html")
+      head.comment! "Edit styles and other html in this file as you like but do not change text or id-attributes."
       head.style("""
 html {
     margin: auto;
@@ -209,30 +210,22 @@ div.concept {
     if conceptschemes.size == 1
 
       scheme = conceptschemes[0]
-      @log.info("Looping concept scheme " + scheme.scheme)
+      @log.info("Concept scheme " + scheme.scheme)
 
       scheme_info = RDF::Query.execute(@graph) do
         pattern [scheme.scheme, :predicate, :object]
       end
 
-      # Title
       title = ""
-
-      # Description
       description = ""
-
-      # Creators
       creators = []
-
-      # Contributors
       contributors = []
 
       # get values
       scheme_info.each do |solution|
 
         case solution.predicate
-        when "http://purl.org/dc/terms/title"
-        when "http://www.w3.org/2000/01/rdf-schema#label"
+        when "http://purl.org/dc/terms/title", "http://www.w3.org/2000/01/rdf-schema#label"
           title = string_for(solution.object, @default_lang)
         when "http://purl.org/dc/terms/description"
           description = string_for(solution.object, @default_lang)
@@ -300,6 +293,7 @@ div.concept {
   # title element
   def concept_scheme_title
 
+    # Possible properties
     title_properties = ["http://purl.org/dc/terms/title",
         "http://www.w3.org/2000/01/rdf-schema#label",
         "http://www.w3.org/2004/02/skos/core#prefLabel"]
@@ -335,9 +329,31 @@ div.concept {
 
 
 
+  def concept_preflabel(concept_uri)
+
+    uri = RDF::URI.new(concept_uri)
+
+    labels = RDF::Query.execute(@graph) do
+      pattern [uri, RDF::SKOS.prefLabel, :object]
+    end
+
+    labels.filter { |label| label.object.language == @default_lang }
+
+    if labels.size > 0
+      return labels[0].object.value
+    else
+      @log.error("Preflabel missing for #{concept_uri}")
+      return ""
+    end
+  end
+
+
+
   # Generate the HTML for an individual concept.
   def generate_concept(concept_uri)
 
+    @log.info("Generate concept #{concept_uri}")
+
     concept_info = RDF::Query.execute(@graph) do
       pattern [concept_uri, :predicate, :object]
     end
@@ -345,6 +361,8 @@ div.concept {
     preflabels = []
     altlabels = []
     definition = ""
+    has_broader = nil
+    has_narrower = nil
 
     concept_info.each do |solution|
 
@@ -363,6 +381,10 @@ div.concept {
         end
       when "http://www.w3.org/2004/02/skos/core#definition"
         definition = string_for(solution.object, @default_lang)
+      when "http://www.w3.org/2004/02/skos/core#broader"
+        has_broader = solution.object.value
+      when "http://www.w3.org/2004/02/skos/core#narrower"
+        has_narrower = solution.object.value
       end
 
     end
@@ -394,6 +416,32 @@ div.concept {
           end
         end
 
+
+        if has_broader
+
+          has_broader_uri = has_broader
+
+          unless has_broader.start_with?("http://")
+            r = RDF::URI.new(concept_uri)
+            r.fragment = has_broader[1..-1]
+            has_broader_uri = r.to_s
+          end
+
+          html.dt("Has broader", :class => "broader")
+          html.dd(:class => "broader") {
+            html.a(concept_preflabel(has_broader_uri), :href => has_broader)
+          }
+        end
+
+
+        if has_narrower
+          html.dt("Has narrower", :class => "narrower")
+          html.dd(:class => "narrower") {
+            html.a(has_narrower, :href => has_narrower)
+          }
+        end
+
+
         html.dt("Identifier", :class => "identifier")
         html.dd(concept_uri, :class => "identifier")
       }

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: skos2html
 version: !ruby/object:Gem::Version
-  version: 0.0.3
+  version: 0.0.4
   prerelease: 
 platform: ruby
 authors: