xbrlware-ce 1.0.2

data/lib/xbrlware/linkbase/calculation_linkbase.rb

@@ -0,0 +1,137 @@
+#!/usr/bin/ruby
+#
+# Author:: xbrlware@bitstat.com
+#
+# Copyright:: 2009, 2010 bitstat (http://www.bitstat.com). All Rights Reserved.
+#
+# License:: Licensed under the Apache License, Version 2.0 (the "License");
+#           you may not use this file except in compliance with the License.
+#           You may obtain a copy of the License at
+#
+#           http://www.apache.org/licenses/LICENSE-2.0
+#
+#           Unless required by applicable law or agreed to in writing, software
+#           distributed under the License is distributed on an "AS IS" BASIS,
+#           WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+#           implied.
+#           See the License for the specific language governing permissions and
+#           limitations under the License.
+#
+module Xbrlware
+  module Linkbase
+    class CalculationLinkbase < Linkbase
+      # Creates a CalculationLinkbase.
+      #
+      # linkbase_path::
+      #   XBRL Calculation Linkbase source. Tries to load and parse calculationlinkbase from path.
+      #
+      # instance::
+      #   Instance object
+      #
+      # label_linkbase::
+      #   optional parameter, LabelLinkbase object
+      def initialize(linkbase_path, instance, label_linkbase=nil)
+        super linkbase_path
+        @instance=instance
+        @label_linkbase=label_linkbase
+      end
+
+      def calculation(role=nil)
+        calculations=[]
+        calc_content=@linkbase_content["calculationLink"]
+        calc_content.each do |cal|
+
+          next unless cal["xlink:role"]==role unless role.nil?
+
+          if cal["calculationArc"].nil?
+            calculations << Calculation.new(@instance.entity_details, cal["xlink:title"], cal["xlink:role"], @role_map[cal["xlink:role"]])
+          else
+            contexts_and_arcs=arcs(cal)
+            calculations << Calculation.new(@instance.entity_details, cal["xlink:title"], cal["xlink:role"], @role_map[cal["xlink:role"]], contexts_and_arcs["arcs"], contexts_and_arcs["contexts"])
+          end
+        end
+        return calculations[0] unless role.nil?
+        calculations
+      end
+
+      private
+      def arcs(calc)
+        locators={}
+        calc["loc"].each do |loc|
+          href = loc["xlink:href"]
+          unless href.index("#").nil?
+            locators[loc["xlink:label"]]= href[href.index("#")+1, href.length]
+          else
+            locators[loc["xlink:label"]]=href
+          end
+        end
+
+        arc_map={}
+        contexts = Set.new()
+
+        calc["calculationArc"].each do |arc|
+          to_label = nil
+          unless @label_linkbase.nil?
+            to_label_obj=@label_linkbase.label(locators[arc["xlink:to"]], arc["preferredLabel"]) unless arc["preferredLabel"].nil?
+            to_label_obj=@label_linkbase.label(locators[arc["xlink:to"]], "http://www.xbrl.org/2003/role/label") if arc["preferredLabel"].nil?
+            to_label = to_label_obj.value unless to_label_obj.nil?
+          end
+
+          to = Calculation::CalculationArc.new(arc["xlink:to"], locators[arc["xlink:to"]], arc["xlink:arcrole"], arc["order"], arc["weight"], arc["priority"], arc["use"], to_label)
+          from = Calculation::CalculationArc.new(arc["xlink:from"], locators[arc["xlink:from"]])
+
+          to_item_name = locators[arc["xlink:to"]].gsub(/.*_/, "")
+          from_item_name = locators[arc["xlink:from"]].gsub(/.*_/, "")
+
+          to_item_map=item_map(@instance.item(to_item_name))
+          to.items=to_item_map.values
+          contexts.merge(to_item_map.keys)
+
+          from_item_map=item_map(@instance.item(from_item_name))
+          from.items=from_item_map.values
+          contexts.merge(from_item_map.keys)
+
+          if arc_map.has_key?(from)
+            arc_map[from] << to
+          else
+            arc_map[from]=[to]
+          end
+        end
+
+        return {"contexts" => contexts, "arcs" => Linkbase.build_relationship(arc_map)}
+      end
+
+      private
+      def item_map(items)
+        item_map={}
+        items.each do |item|
+          item_map[item.context]=item
+        end unless items.nil?
+        item_map
+      end
+
+      public
+      class Calculation < Linkbase::Link
+
+        attr_reader :contexts, :entity_details
+
+        def initialize(entity_details, title, role, href=nil, arcs=nil, contexts=nil)
+          super(title, role, href, arcs)
+          @contexts=contexts
+          @entity_details=entity_details
+        end
+
+        class CalculationArc < Linkbase::Link::Arc
+          attr_reader :weight, :use
+
+          def initialize(item_id, href, role=nil, order=nil, weight=nil, priority=nil, use=nil, label=nil)
+            super item_id, href, role, order, priority, label
+            @weight=weight.to_i
+            @use=use
+          end
+        end
+      end
+
+    end
+  end
+end

data/lib/xbrlware/linkbase/definition_linkbase.rb

@@ -0,0 +1,186 @@
+#!/usr/bin/ruby
+#
+# Author:: xbrlware@bitstat.com
+#
+# Copyright:: 2009, 2010 bitstat (http://www.bitstat.com). All Rights Reserved.
+#
+# License:: Licensed under the Apache License, Version 2.0 (the "License");
+#           you may not use this file except in compliance with the License.
+#           You may obtain a copy of the License at
+#
+#           http://www.apache.org/licenses/LICENSE-2.0
+#
+#           Unless required by applicable law or agreed to in writing, software
+#           distributed under the License is distributed on an "AS IS" BASIS,
+#           WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+#           implied.
+#           See the License for the specific language governing permissions and
+#           limitations under the License.
+#
+module Xbrlware
+  module Linkbase
+    class DefinitionLinkbase < Linkbase
+
+      @@constants = {"primaryItem-hypercube" => "http://xbrl.org/int/dim/arcrole/all",
+                     "hypercube-dimension" => "http://xbrl.org/int/dim/arcrole/hypercube-dimension",
+                     "dimension-domain" => "http://xbrl.org/int/dim/arcrole/dimension-domain",
+                     "domain-member" => "http://xbrl.org/int/dim/arcrole/domain-member"}
+
+      # Creates a DefinitionLinkbase.
+      #
+      # linkbase_path::
+      #   XBRL Definition Linkbase source. Tries to load and parse definition linkbase from path.
+      #
+      # label_linkbase::
+      #   optional parameter, takes LabelLinkbase object      
+      def initialize(linkbase_path, label_linkbase=nil)
+        super linkbase_path
+        @label_linkbase=label_linkbase
+      end
+
+      def definition(role=nil)
+
+        definitions=[]
+        def_content=@linkbase_content["definitionLink"]
+        def_content.each do |def_|
+
+          next unless def_["xlink:role"]==role unless role.nil?
+
+          if def_["definitionArc"].nil?
+            definitions << Definition.new(def_["xlink:title"], def_["xlink:role"], @role_map[def_["xlink:role"]])
+          else
+            arcs=arcs(def_)
+            definitions << Definition.new(def_["xlink:title"], def_["xlink:role"], @role_map[def_["xlink:role"]], primary_items(arcs))
+          end
+        end
+        return definitions[0] unless role.nil?
+        definitions
+      end
+
+      private
+      def primary_items(arcs)
+        items=Set.new
+        arcs.each do |arc|
+          arc.children.each do |child|
+            if child.role==@@constants["primaryItem-hypercube"]
+              items << arc
+              break
+            end
+          end if arc.has_children?
+        end
+
+        items.each do |primary_item|
+
+          hypercubes=[]
+          primary_item.children.each do |p_child|
+            hypercubes << p_child if p_child.role==@@constants["primaryItem-hypercube"]
+          end if primary_item.has_children?
+          primary_item.children = hypercubes
+          MetaUtil::introduce_instance_alias(primary_item, "hypercubes", "children")
+
+          primary_item.hypercubes.each do |hypercube|
+            dimensions=[]
+            hypercube.children.each do |h_child|
+              dimensions << h_child if h_child.role==@@constants["hypercube-dimension"]
+            end if hypercube.has_children?
+            hypercube.children=dimensions
+            MetaUtil::introduce_instance_alias(hypercube, "dimensions", "children")
+
+            hypercube.dimensions.each do |dimension|
+              domains=[]
+              dimension.children.each do |di_child|
+                domains << di_child if di_child.role==@@constants["dimension-domain"]
+              end if dimension.has_children?
+              dimension.children=domains
+              MetaUtil::introduce_instance_alias(dimension, "domains", "children")
+
+              dimension.domains.each do |domain|
+                members=[]
+                domain.children.each do |do_child|
+                  members << do_child if do_child.role==@@constants["domain-member"]
+                end if domain.has_children?
+                MetaUtil::introduce_instance_alias(domain, "members", "children")
+                MetaUtil::introduce_instance_writer(domain, "members", "children")
+              end
+            end
+          end
+        end
+        items
+      end
+
+      private
+      def arcs(def_)
+
+        locators={}
+        def_["loc"].each do |loc|
+          href = loc["xlink:href"]
+          unless href.index("#").nil?
+            locators[loc["xlink:label"]]= href[href.index("#")+1, href.length]
+          else
+            locators[loc["xlink:label"]]=href
+          end
+        end
+
+        arc_map={}
+
+        def_["definitionArc"].each do |arc|
+
+          to_label = nil
+          unless @label_linkbase.nil?
+            to_label_obj=@label_linkbase.label(locators[arc["xlink:to"]], arc["preferredLabel"]) unless arc["preferredLabel"].nil?
+            to_label_obj=@label_linkbase.label(locators[arc["xlink:to"]], "http://www.xbrl.org/2003/role/label") if arc["preferredLabel"].nil?
+            to_label = to_label_obj.value unless to_label_obj.nil?
+          end
+
+          to = Definition::DefinitionArc.new(arc["xlink:to"], locators[arc["xlink:to"]], arc["xlink:arcrole"], arc["order"], arc["priority"], to_label, arc["xbrldt:contextElement"])
+          from = Definition::DefinitionArc.new(arc["xlink:from"], locators[arc["xlink:from"]])
+
+          if arc_map.has_key?(from)
+            arc_map[from] << to
+          else
+            arc_map[from]=[to]
+          end
+        end
+
+        return Linkbase.build_relationship(arc_map)
+      end
+
+      public
+      class Definition < Linkbase::Link
+
+        attr_reader :primary_items
+
+        def initialize(title, role, href=nil, primary_items=nil)
+          super(title, role, href, primary_items)
+          @primary_items=primary_items
+        end
+
+        def dimension_domain_map
+          dim_dom_map={}
+          @primary_items.each do |primary_item|
+            primary_item.hypercubes.each do |hypercube|
+              hypercube.dimensions.each do |dimension|
+                domains=[]
+                dimension.domains.each do |domain|
+                  domains << domain.href.sub("_", ":")
+                end
+                dim_dom_map[dimension.href.sub("_", ":")]=domains
+              end
+            end
+          end unless @primary_items.nil?
+          dim_dom_map
+        end
+
+        class DefinitionArc < Linkbase::Link::Arc
+          attr_reader :ctx_element
+
+          def initialize(item_id, href, role=nil, order=nil, priority=nil, label=nil, ctx_element=nil)
+            super item_id, href, role, order, priority, label
+            @ctx_element=ctx_element
+          end
+        end
+      end
+
+    end
+  end
+end

data/lib/xbrlware/linkbase/label_linkbase.rb

@@ -0,0 +1,128 @@
+#!/usr/bin/ruby
+#
+# Author:: xbrlware@bitstat.com
+#
+# Copyright:: 2009, 2010 bitstat (http://www.bitstat.com). All Rights Reserved.
+#
+# License:: Licensed under the Apache License, Version 2.0 (the "License");
+#           you may not use this file except in compliance with the License.
+#           You may obtain a copy of the License at
+#
+#           http://www.apache.org/licenses/LICENSE-2.0
+#
+#           Unless required by applicable law or agreed to in writing, software
+#           distributed under the License is distributed on an "AS IS" BASIS,
+#           WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+#           implied.
+#           See the License for the specific language governing permissions and
+#           limitations under the License.
+#
+module Xbrlware
+  module Linkbase
+    class LabelLinkbase < Linkbase
+      # Creates a LabelLinkbase.
+      #
+      # linkbase_path::
+      #   XBRL Label Linkbase source. Tries to load and parse label linkbase from path.
+      def initialize(linkbase_path)
+        super linkbase_path
+        @label_map={}
+        parse_content
+      end
+
+      def label(item_name, label_role=nil, language=["en-US", "en"])
+        return @label_map[item_name] if label_role.nil?
+        return @label_map[item_name][label_role] unless @label_map[item_name].nil? if language.nil?
+        return @label_map[item_name][label_role][language] unless @label_map[item_name].nil? || @label_map[item_name][label_role].nil? if language.is_a?(String)
+        language.each do |lang|
+          lab = @label_map[item_name][label_role][lang] unless @label_map[item_name].nil? || @label_map[item_name][label_role].nil?
+          return lab unless lab.nil? 
+        end if language.is_a?(Array)
+        return nil
+      end
+
+
+      def inspect(verbose_flag="q")
+        str = StringIO.new
+        @label_map.each do |key, value|
+          str << key
+          if verbose_flag=="v"
+            value.each do |k, v|
+              str << "\n" << "\t"
+              str << " role [" << k << "]"
+              str << "\n" << "\t\t"
+              v.each do |lang, label|
+                str << " lang [" << lang << "] label [" << label.value << "]"
+              end
+            end
+          end
+          str << "\n"
+        end
+        puts str.string
+        return self.to_s
+      end
+
+      private
+      def parse_content()
+
+        label_links=@linkbase_content["labelLink"]
+        label_links.each do |label_content|
+          loc_map=locator_map(label_content["loc"])
+          arc_map=linkarc_map(label_content["labelArc"])
+
+          labels=label_content["label"]
+          labels.each do |label|
+            l=Label.new(label["xlink:type"], label["xlink:role"], label["xlink:label"], label["xml:lang"], label["content"], @role_map[label["xlink:role"]])
+            item_name=loc_map[arc_map[label["xlink:label"]]]
+            if @label_map[item_name].nil?
+              @label_map[item_name]={l.role => {l.lang => l}}
+            else
+              if @label_map[item_name][l.role].nil?
+                @label_map[item_name][l.role] = {l.lang => l}
+              else
+                @label_map[item_name][l.role][l.lang] = l
+              end
+            end
+          end
+        end
+      end
+
+      def linkarc_map(arcs)
+        arc_map={}
+        arcs.each do |arc|
+          arc_map[arc["xlink:to"]]=arc["xlink:from"]
+        end
+        arc_map
+      end
+
+      def locator_map(locators)
+        locator_map={}
+        locators.each do |loc|
+          href = loc["xlink:href"]
+          unless href.index("#").nil?
+            locator_map[loc["xlink:label"]]=href[href.index("#")+1, href.length]
+          else
+            locator_map[loc["xlink:label"]]=href
+          end
+        end
+        locator_map
+      end
+
+      public
+      class Label
+
+        attr_reader :type, :role, :href, :label, :lang, :value
+
+        def initialize(type, role, label, lang, value, href=nil)
+          @type=type
+          @role=role
+          @label=label
+          @lang=lang
+          @value=value
+          @href=href
+        end
+      end
+
+    end
+  end
+end