fhlow 1.91.0

data/lib/module_cmdparse/cmdparse/wrappers/optparse.rb

@@ -0,0 +1,65 @@
+#
+#--
+#
+# $Id: optparse.rb 329 2005-08-14 15:39:05Z thomas $
+#
+# cmdparse: advanced command line parser supporting commands
+# Copyright (C) 2004 Thomas Leitner
+#
+# This program is free software; you can redistribute it and/or modify it under the terms of the GNU
+# General Public License as published by the Free Software Foundation; either version 2 of the
+# License, or (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without
+# even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+# General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License along with this program; if not,
+# write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+#
+#++
+#
+#
+
+require 'optparse'
+
+# Some extension to the standard option parser class
+class OptionParser
+
+  if const_defined?( 'Officious' )
+    Officious.delete( 'version' )
+    Officious.delete( 'help' )
+  else
+    DefaultList.long.delete( 'version' )
+    DefaultList.long.delete( 'help' )
+  end
+
+end
+
+module CmdParse
+
+  # Parser wrapper for OptionParser (included in Ruby Standard Library).
+  class OptionParserWrapper < ParserWrapper
+
+    # Initializes the wrapper with a default OptionParser instance or the +parser+ parameter and
+    # yields this instance.
+    def initialize( parser = OptionParser.new, &block )
+      @instance = parser
+      self.instance( &block )
+    end
+
+    def order( args )
+      @instance.order( args )
+    end
+
+    def permute( args )
+      @instance.permute( args )
+    end
+
+    def summarize
+      @instance.summarize
+    end
+
+  end
+
+end

data/lib/module_config/config.rb

@@ -0,0 +1,67 @@
+require 'section'
+require 'configexception'
+
+module Config 
+
+    class Config
+
+        @@factoriesloaded = false
+
+        def initialize(_filename)
+            unless @@factoriesloaded
+                ItemFactory.load(File.join(File.dirname(__FILE__), "configitems"))
+                @@factoriesloaded = true
+            end
+            
+            @filename = _filename
+            @sections = []
+            file = IO.read(_filename)
+
+            file.gsub!(/#.*$/, "")  # clear all the comments
+
+            while !file.strip.empty?
+                file = file.sub(Section.getRegex) do |match|
+                    begin
+                        @sections.push(Section.new(match))
+                        ""  # delete the proceded string (mached string will be sub'ed with the return value of this block)
+                    rescue ConfigException => e
+                        raise ConfigException.new(self.class), "  File:    #{_filename}\n#{e.message}"
+                    end
+                end
+            end
+        end
+
+        def each(&block)
+            @sections.each(&block)
+        end
+
+        def [](_section)
+            ifnotfound = lambda { raise Fhlow::FhlowException.new(@filename), "No such section. <#{_section}>" }
+
+            @sections.detect(ifnotfound) { |section| section.name == _section }
+                
+        end
+
+        # merges _conf with self
+        def merge(_conf)
+            begin
+                _conf.each do |arg_section| 
+                    if s = @sections.detect { |section| section.name == arg_section.name }
+                        s.merge(arg_section)
+                    else
+                        @sections.push(arg_section)
+                    end
+                end         
+            rescue ConfigException => e
+                raise ConfigException.new(self.class), "  File:    #{_filename}\n#{e.message}"
+            end
+        end
+
+        # prints the configuration
+        def print()
+            puts "File: #{@filename}"
+            @sections.each { |s| s.print() }
+        end
+    end
+
+end

data/lib/module_config/configexception.rb

@@ -0,0 +1,18 @@
+module Config
+
+    class ConfigException < StandardError
+        attr_reader :caller
+
+        def initialize(_caller, *_args)
+            super(_args)
+            @caller = _caller
+        end
+    end
+
+    class ConfigWrongFormatException < ConfigException
+    end
+
+    class ConfigMergeException < ConfigException
+    end
+
+end

data/lib/module_config/configitems/complex.rb

@@ -0,0 +1,71 @@
+require 'item'
+require 'itemfactory'
+require 'configexception'
+
+module Config 
+
+    class ComplexFactory < ItemFactory
+
+
+        def ComplexFactory.match(_str)
+            _str.sub!(Complex.getRegex, '')
+            return $&
+        end
+
+        def ComplexFactory.create(*_args)
+            Complex.new(*_args)
+        end
+
+        def ComplexFactory.priority
+            11
+        end
+
+    end
+
+    class Complex < Item
+        @@regex = /(\w+)\s*=(\s*|[\n]*)\{((\s*.+[;][\s\n]*)*(\s*.+[;]*[\s\n]*))\}/
+        @@subitemregex = /\A.+\Z/
+
+        attr_reader :name
+        attr_reader :value
+
+        def initialize(_str)
+            
+
+            if _str =~ @@regex
+                @name = $1
+                @value = $3.strip.split(';').each do |item|
+                    item.strip!    
+                    raise ConfigWrongFormatException.new(self.class), "Configuration subitem <#{item}> of item <#{name}> has wrong format." unless item =~ @@subitemregex
+                end
+            else
+                raise ConfigWrongFormatException.new(self.class), "Configuration item <#{_str}> has wrong format."
+            end
+        end
+
+        def merge(_complexitem)
+            raise ConfigMergeException.new(self.class), "Merge: Configuration items do not fit! <#{_complexitem}> is not of type #{self.class.to_s}." unless _complexitem.instance_of?(self.class)
+            raise ConfigMergeException.new(self.class), "Merge: Configuration items do not have the same name! <#{_complexitem.name}> vs. <#{@name}>" unless _complexitem.name == @name
+
+            @value = _complexitem.value | @value
+        end
+
+        def each(&block)
+            @value.each(&block)
+        end
+
+        def print
+            puts "<Complex>"
+            puts "    #{@name} = {"
+            @value.each { |v| puts "        #{v};" }
+            puts "    }"
+        end
+        
+        def Complex.getRegex()
+            @@regex
+        end
+
+
+    end        
+
+end

data/lib/module_config/configitems/complexpackage.rb

@@ -0,0 +1,67 @@
+require 'item'
+require 'itemfactory'
+require 'configexception'
+
+module Config 
+
+    class ComplexPackageFactory < ItemFactory
+
+        def ComplexPackageFactory.match(_str)
+            _str.sub!(ComplexPackage.getRegex, '')
+            return $&
+        end
+
+        def ComplexPackageFactory.create(*_args)
+            ComplexPackage.new(*_args)
+        end
+
+    end
+
+    class ComplexPackage < Item
+        @@regex = /(\w*Package\w*)\s*=\s*\{((\s*[^\(\)]*[;]\s*)*(\s*[^\(\)\{]*[;]?\s*)?)\s*\}/
+        @@subitemregex = /\A.+\Z/
+
+        attr_reader :name
+        attr_reader :value
+
+        def initialize(_str)
+            if _str =~ @@regex
+                @name = $1
+                @value = Array.new
+                $2.strip.split(';').each do |item|
+                    item.strip!
+                    raise ConfigWrongFormatException.new(self.class), "Configuration subitem \n -----\n #{item} \n -----\n of item <#{name}> has wrong format." unless item =~ @@subitemregex
+                    @value.push(item.split(/,\s/))
+                end
+            else
+                raise ConfigWrongFormatException.new(self.class), "Configuration item <#{_str}> has wrong format."
+            end
+        end
+
+        def merge(_complexitem)
+            raise ConfigMergeException.new(self.class), "Merge: Configuration items do not fit! <#{_complexitem}> is not of type #{self.class.to_s}." unless _complexitem.instance_of?(self.class)
+            raise ConfigMergeException.new(self.class), "Merge: Configuration items do not have the same name! <#{_complexitem.name}> vs. <#{@name}>" unless _complexitem.name == @name
+
+            @value = _complexitem.value | @value
+        end
+
+        def each(&block)
+            @value.each(&block)
+        end
+
+        def print
+            puts "<ComplexPackage>"
+            puts "    #{@name} = {"
+            @value.each { |v| puts "        #{v};" }
+            puts "    }"
+        end
+        
+        def ComplexPackage.getRegex()
+            @@regex
+        end
+
+
+    end        
+
+end
+

data/lib/module_config/configitems/complexunit.rb

@@ -0,0 +1,76 @@
+require 'item'
+require 'itemfactory'
+require 'configexception'
+
+module Config 
+
+    class ComplexUnitFactory < ItemFactory
+
+        def ComplexUnitFactory.match(_str)
+            _str.sub!(ComplexUnit.getRegex, '')
+            return $&
+        end
+
+        def ComplexUnitFactory.create(*_args)
+            ComplexUnit.new(*_args)
+        end
+
+    end
+
+    class ComplexUnit < Item
+        @@regex = /(\w*Unit\w*)\s*=\s*\{((\s*.*[;]\s*)*(\s*.*\(.*\)[;]*\s*)?)\s*\}/
+        @@subitemregex = /\A(([\w\/]+,\s*)*[\w\/]+)\s*\((.+)\)\Z/
+
+        attr_reader :name
+        attr_reader :value
+
+        def initialize(_str)
+            if _str =~ @@regex
+                @name = $1
+                @value = Array.new
+                
+                $2.strip.split(';').each do |item|
+                    
+                    item.strip!    
+                    if item =~ @@subitemregex
+                        item = Hash.new
+                        item["deppath"] = $1
+                        item["archs"] = $3.split(/,\s*/)
+                        item["deppath"] = item["deppath"].split(/,\s*/)
+                        @value.push(item)
+                    else
+                        raise ConfigWrongFormatException.new(self.class), "Configuration subitem <#{item}> of item <#{name}> has wrong format."
+                    end
+                    
+                end
+            else
+                raise ConfigWrongFormatException.new(self.class), "Configuration item <#{_str}> has wrong format."
+            end
+        end
+
+        def merge(_complexitem)
+            raise ConfigMergeException.new(self.class), "Merge: Configuration items do not fit! <#{_complexitem}> is not of type #{self.class.to_s}." unless _complexitem.instance_of?(self.class)
+            raise ConfigMergeException.new(self.class), "Merge: Configuration items do not have the same name! <#{_complexitem.name}> vs. <#{@name}>" unless _complexitem.name == @name
+
+            @value = _complexitem.value | @value
+        end
+
+        def each(&block)
+            @value.each(&block)
+        end
+
+        def print
+            puts "<ComplexUnit>"
+            puts "    #{@name} = {"
+            @value.each { |v| puts "        #{v["deppath"].join(", ")}(#{v["archs"].join(", ")});" }
+            puts "    }"
+        end
+        
+        def ComplexUnit.getRegex()
+            @@regex
+        end
+
+    end        
+
+end
+

data/lib/module_config/configitems/simple.rb

@@ -0,0 +1,56 @@
+require 'item'
+require 'itemfactory'
+require 'configexception'
+
+module Config 
+
+    class SimpleFactory < ItemFactory
+
+        def SimpleFactory.match(_str)
+            _str.sub!(Simple.getRegex(), '')
+           return $&
+        end
+
+        def SimpleFactory.create(*_args)
+            Simple.new(*_args)
+        end
+
+        def SimpleFactory.priority
+            10
+        end
+    end
+
+
+    class Simple < Item
+        @@regex = /^\s*(\w+)\s*=\s*([\w,\/.;\t ]+)[\t ]*$/
+
+        attr_reader :name 
+        attr_reader :value
+
+        def initialize(_str)
+            
+            if _str =~ @@regex
+                @name = $1
+                @value = $2
+            else
+                raise ConfigWrongFormatException.new(self.class), "Configuration item <#{_str}> has wrong format."
+            end
+        end
+
+        def merge(_item)
+            raise ConfigMergeException.new(self.class), "Merge: Configuration items do not fit! <#{_item}> is not of type #{self.class.to_s}." unless _item.instance_of?(self.class)
+            raise ConfigMergeException.new(self.class), "Merge: Configuration items do not have the same name! <#{_item.name}> vs. <#{@name}>" unless _item.name == @name
+        
+            @value = _item.value
+        end
+
+
+        def Simple.getRegex()
+            @@regex
+        end
+
+
+    end
+
+end
+

data/lib/module_config/configitems/simplearchitecture.rb

@@ -0,0 +1,52 @@
+require 'item'
+require 'itemfactory'
+require 'configexception'
+
+module Config 
+
+    class SimpleArchitectureFactory < ItemFactory
+        def SimpleArchitectureFactory.match(_str)
+            _str.sub!(SimpleArchitecture.getRegex, '')
+            return $&
+        end
+
+        def SimpleArchitectureFactory.create(*_args)
+            SimpleArchitecture.new(*_args)
+        end
+    end
+
+
+    class SimpleArchitecture < Item
+        @@regex = /^\s*(\w*Architecture\w*)\s*=\s*((\s*\w+\s*[,])*\s*\w+)*\s*$/
+
+        attr_reader :name 
+        attr_reader :value
+
+        def initialize(_str)
+            if _str =~ @@regex
+                @name = $1
+                @value = Array.new
+                @value = $2.split(/,\s*/) if $2
+            else
+                raise ConfigWrongFormatException.new(self.class), "Configuration item <#{_str}> has wrong format."
+            end
+        end
+    
+        def merge(_item)
+            raise ConfigMergeException.new(self.class), "Merge: Configuration items do not fit! <#{_item}> is not of type #{self.class.to_s}." unless _item.instance_of?(self.class)
+            raise ConfigMergeException.new(self.class), "Merge: Configuration items do not have the same name! <#{_item.name}> vs. <#{@name}>" unless _item.name == @name
+            
+            @value = _item.value
+        end
+
+        def print
+            puts "<#{self.class.to_s}> -> ".ljust(40)+"    #{@name} = #{@value.join(", ")}"
+        end
+
+        def SimpleArchitecture.getRegex()
+            @@regex
+        end
+
+    end
+
+end