fhlow 1.91.0 → 1.91.1

data/lib/module_config/unittests/config_test.rb

@@ -25,7 +25,7 @@ Dir.glob(detectFhlowRootDir+"flw/core/lib/module_*") { |entry| $:.unshift(entry)
 #######################################################################################
 
 require 'test/unit'
-require 'myconfig'
+require 'config'
 require 'configitems/simple'
 require 'configitems/simpleunit'
 require 'configitems/simplepackage'
@@ -81,9 +81,6 @@ class TC_config_test < Test::Unit::TestCase
 
         assert_equal(s1.value, s.value)
 
-        assert_equal(/^\s*(\w+)\s*=\s*([\w,.;\s]+)\s*$/, Config::Simple.getRegex())
-
-        
         str = "ComplexUnits = {
             1,2,3(bla);
             4,5,6(bhv)
@@ -370,11 +367,13 @@ class TC_config_test < Test::Unit::TestCase
         s2 = nil
         
         assert_nothing_raised() do
-            s = Config::ComplexPackage.new("ComplexPackageThing = { No; thing }")
+            s = Config::ComplexPackage.new("ComplexPackageThing = { No; th, ing }")
             s1 = Config::ComplexPackage.new("ComplexPackageThing = { Other; Value }") 
             s2 = Config::ComplexPackage.new("12Package34 = { 1; 2; 3; 4 }")
         end
 
+        assert_equal([["No"], ["th","ing"]], s.value)
+
         assert_raise(Config::ConfigMergeException) do
             s.merge(s2)
         end
@@ -383,11 +382,9 @@ class TC_config_test < Test::Unit::TestCase
             s.merge(s1)
         end
 
-        assert_equal(["Other", "Value", "No", "thing"], s.value)
+        assert_equal([["Other"], ["Value"], ["No"], ["th", "ing"]], s.value)
 
-        assert_equal(/(\w*Package\w*)\s*=(\s*|[\n]*)\{((\s*[^\(\)]*[;][\s\n]*)*(\s*[^\(\)]*[;]*[\s\n]*))\}/, Config::ComplexPackage.getRegex())
 
-        
         str = "ComplexUnits = {
             1,2,3(bla);
             4,5,6(bhv)
@@ -463,14 +460,20 @@ class TC_config_test < Test::Unit::TestCase
             s.merge(s1)
         end
 
-        assert_equal([  {"archs"=>["bhv", "bla", "123"], "deppath"=>"Other, Value"},
-                        {"archs"=>["arch"],              "deppath"=>"No"},
-                        {"archs"=>["itecture"],          "deppath"=>"thing"}], 
+        assert_equal([  {"archs"=>["bhv", "bla", "123"], "deppath"=>["Other", "Value"]},
+                        {"archs"=>["arch"],              "deppath"=>["No"]},
+                        {"archs"=>["itecture"],          "deppath"=>["thing"]}], 
                         s.value)
 
-        assert_equal(/(\w*Unit\w*)\s*=(\s*|[\n]*)\{((\s*.*[;][\s\n]*)*(\s*.*\(.*\)[;]*[\s\n]*))\}/, Config::ComplexUnit.getRegex())
+        puts 
+        p s.value
+        puts 
 
+        s.merge(Config::ComplexUnit.new("ComplexUnitThing = { No(aasrch); thing(itecture) }"))
         
+        p s.value
+        puts 
+
         str = "ComplexUnits = {
             1,2,3(bla);
             4,5,6(bhv)

data/lib/module_fhlow/leaf.rb

@@ -82,12 +82,19 @@ module Fhlow
                 if @conf["Dependencies"].nil?
                     raise FhlowException.new(getPath, "Couldn't find section [Dependencies] in any config.flw file responsible for this leaf.")
                 end
-
+                
                 # iterate through all items of the [Dependencies] section
                 @conf["Dependencies"].each do |item|    # item -> one item of the [Dependencies] section
                     fetchOneDependency(item)
                 end
-                
+ 
+ 
+                # there needs to be a target section the config file 
+                if @conf["Target"+@conf["Target"]["Target"]].nil?
+                    raise FhlowException.new(getPath, "Couldn't find section [Target#{@conf["Target"]["Target"]}] in any config.flw file responsible for this leaf.")
+                end
+                fetchOneDependency(@conf["Target"+@conf["Target"]["Target"]].getItem("SimulationLibraries"))
+               
                 dummy = ""
                 @dependencies.each{ |deptype, leafs| dummy += "#{deptype} -> "; leafs.each { |leaf| dummy += "#{leaf.prefix}#{leaf.name} "}; dummy += "; " }
                 @log.debug(@prefix+@name, "direct dependencies: #{dummy}")
@@ -121,7 +128,7 @@ module Fhlow
                         @dependencies[_item.name].push(leaf) unless @dependencies[_item.name].include?(leaf)
                     end
                 
-                elsif _item.instance_of?(Config::ComplexPackage)
+                elsif _item.instance_of?(Config::ComplexPackage) or _item.instance_of?(Config::ComplexLibrary)
                     _item.value.each do |value|    
                         begin
                             leaf = @parent.getLeaf(value, value.length-1)
@@ -130,7 +137,9 @@ module Fhlow
                             # fetch the exception and add the name of this leaf so the errormessage is more accurate
                             raise FhlowObjectNotFoundException.new(@prefix+@name), "#{e.caller}: #{e.message}"
                         end
-        
+                
+
+       
                         # init the container if it is nil
                         @dependencies[_item.name] = Array.new if @dependencies[_item.name].nil?
 
@@ -142,13 +151,6 @@ module Fhlow
 
 
 
-=begin            def fetchOneDependency(_name, _value)
-                # this funktion needs to be implemented in an derived class!
-                raise FhlowException.new(self.class), "fetchOneDependency() is not implemented for "+self.class.to_s
-            end
-=end
-
-
             # This function returns an Array of filenames in respect of the dependency tree and needs to be implemented 
             # by subclasses.
             # +_deptype+:: Type of the requested dependencies (could be Units, BhvUnits, Packages and so on)
@@ -170,19 +172,9 @@ module Fhlow
             # +_prefix+:: This prefix will be added to the output of ths function.
             # +_depth+:: The depth of the recursion.
             # +_caller+:: The reference to the caller.
-            # == TODO
-            # in die konkreten leafs auslagern
             def printMe(_prefix="    ", _depth=0, _caller=nil)
-
-                if self.instance_of?(Unit)
-                    str = ""
-                    @pen.puts _prefix, @pen.magenta, @prefix, @name, @pen.clear, 
-                              @architectures[_depth==0 ? self : _caller].nil? ? 
-                                "\n" :  
-                                "(  "+(@architectures[_depth==0 ? self : _caller].each { |key, value| str += "#{@pen.blue}#{key}#{@pen.clear} -> #{value.join(", ")};  " }; str+=")")
-                else
-                    @pen.print _prefix, @pen.yellow, @prefix, @name, @pen.clear, "\n"
-                end
+                
+                self.print(_prefix, _depth, _caller)
                 
                 @dependencies.each do |deptype, leafs| 
                     leafs.each { |leaf| leaf.printMe(_prefix+"    ", _depth+1, self) } 
@@ -191,7 +183,19 @@ module Fhlow
                 @pen.print "\n" if _depth == 0
 
             end
-
+        
+            def getTarget(_itemname)
+                if _itemname == "Name"
+                    "Target#{@conf["Target"]["Target"]}"
+                else
+                    @conf["Target#{@conf["Target"]["Target"]}"][_itemname]
+                end
+            end
+            
+        private
+            def print(_prefix="    ", _depth=0, _caller=nil)
+                raise FhlowException.new(self.class), "print() is not implemented for "+self.class.to_s
+            end
     end
 
 end

data/lib/module_fhlow/leafs/Library.rb

@@ -0,0 +1,60 @@
+require 'leaf'
+require 'leaffactory'
+
+module Fhlow
+
+    # This is a concrete implementation of the abstract class Leaf. A Library represents one Leaf 
+    # with the prefix "lib". 
+    class Library < Leaf
+
+        # Calls the constructor of Leaf.
+        # +_name+::     The Name of the Leaf.
+        # +_parent+::   The reference to the parent.
+        # +_conf+::     The configuration information from higher levels.
+        # +_log+::      The reference to the Log object.
+        # +_pen+::      The reference to a Pen object.
+        def initialize(_name, _parent, _log, _pen)
+            super("lib", _name, _parent, _log, _pen)
+        end
+
+        # This function returns an Array of filenames in respect of the dependency tree.
+        # +_deptype+::      Type of the requested dependencies (could be Units, BhvUnits, Librarys and so on)
+        # +_istoplevel+::   Is used to indicate the first entrance to this function.
+        # +_caller+::       Reference to the caller of the function. This is needed to request architectures.
+        # +_files+::        The Array of the files which will be filled with the requested filenames and returned in the end.
+        def getFiles(_deptype, _istoplevel=true, _caller=nil, _files=Array.new)
+            @dependencies[_deptype].each { |dep| dep.getFiles(_deptype, false, self, _files)} unless @dependencies[_deptype].nil?
+           
+            # only act if Libraries are needed
+            case _deptype
+                when "SimulationLibraries", "Libraries"
+                    _files.push( { @name => @conf["Self"]["Files"].collect { |file| getPath+"src/"+file } } )
+            end
+        end
+        
+        def print(_prefix="    ", _depth=0, _caller=nil)
+            # TODO: find a way to print only [Dependencies] -> Libraries without [Target*] -> SimulationLibraries
+            #@pen.print _prefix, @pen.yellow, @prefix, @name, @pen.clear, "\n"
+        end
+
+    end
+
+    # This is a concrete implementation of the _abstract_ class LeafFactory . 
+    # A LibraryFactory creates objects of Unit. 
+    class LibraryFactory < LeafFactory
+
+        # Return the prefix used by Units.
+        def LibraryFactory.getPrefix()
+            return "lib"
+        end
+
+        # Creates objects of Unit.
+        # +*_args+:: Array of argumens passed to the constructor of Unit. See Unit.initialize for more details.
+        def create(*_args)
+            return Library.new(*_args)
+        end
+
+    end
+
+end
+

data/lib/module_fhlow/leafs/Package.rb

@@ -23,7 +23,7 @@ module Fhlow
         # +_caller+::       Reference to the caller of the function. This is needed to request architectures.
         # +_files+::        The Array of the files which will be filled with the requested filenames and returned in the end.
         def getFiles(_deptype, _istoplevel=true, _caller=nil, _files=Array.new)
-            @dependencies.values.each { |v| v.each { |dep| dep.getFiles(_deptype, false, self, _files)} } unless @dependencies.nil?
+            @dependencies[_deptype].each { |dep| dep.getFiles(_deptype, false, self, _files)} unless @dependencies[_deptype].nil?
             
             # only act if Packages are needed
             if _deptype == "Packages"
@@ -31,6 +31,9 @@ module Fhlow
             end
         end
 
+        def print(_prefix="    ", _depth=0, _caller=nil)
+            @pen.print _prefix, @pen.lightyellow, @prefix, @name, @pen.clear, "\n"
+        end
 
     end
 

data/lib/module_fhlow/leafs/Unit.rb

@@ -66,7 +66,7 @@ module Fhlow
         # * file not found exception::
         # * -e -ea -eac -ac handling::
         def getFiles(_deptype, _istoplevel=true, _caller=nil, _files=Array.new)
-            @dependencies.values.each { |v| v.each { |dep| dep.getFiles(_deptype, false, self, _files)} } unless @dependencies.nil?
+            @dependencies[_deptype].each { |dep| dep.getFiles(_deptype, false, self, _files)} unless @dependencies[_deptype].nil?
             
             # only act if the Unit is able to handle the _deptype
             case _deptype
@@ -125,6 +125,14 @@ module Fhlow
             @architectures[_owner][_deptype] = @architectures[_owner][_deptype].uniq
         end
 
+        
+        def print(_prefix="    ", _depth=0, _caller=nil)
+            str = ""
+            @pen.puts _prefix, @pen.magenta, @prefix, @name, @pen.clear, 
+                      @architectures[_depth==0 ? self : _caller].nil? ? 
+                        "\n" :  
+                        "(  "+(@architectures[_depth==0 ? self : _caller].each { |key, value| str += "#{@pen.blue}#{key}#{@pen.clear} -> #{value.join(", ")};  " }; str+=")")
+        end
 
 
 

data/lib/module_fhlow/node.rb

@@ -50,7 +50,7 @@ module Fhlow
             # +_nodelevel+::    The level of the Node inside the fhlow structure.
             # +_log+::          Reference to a Log object.
             # +_pen+::          Reference to a Pen obejct (output to console).
-            def initialize(_prefix, _name, _parent, _nodelevel, _log, _pen)
+            def initialize(_prefix, _name, _parent, _nodelevel, _log, _pen, _defaultconf=_parent.conf)
                 @prefix     = _prefix
                 @name       = _name
                 
@@ -65,12 +65,12 @@ module Fhlow
                 @parent     = _parent
                 @log        = _log
                 @pen        = _pen
-                
+               
                 if File.exist?(@parent.getPath+@prefix+@name+"/config.flw")
                     # read the config file
                     @conf = Config::Config.new(@parent.getPath+@prefix+@name+"/config.flw") 
                     # inherit the configurations from previous levels
-                    @conf.merge(@parent.conf)
+                    @conf.merge(_defaultconf)
                     @log.debug(@prefix+@name, "Sucessfully merged inherited configs from #{@parent.prefix+@parent.name}.")
                 else
                     @log.warning(self, "config.flw does not exists in #{@prefix}#{@name}.")
@@ -83,7 +83,6 @@ module Fhlow
 
                 @log.info(@prefix+@name, "initializing node...")
                 
-                
                 if @nodelevel < @conf["fhlow"]["NodePrefixes"].length
                    
                     # add the nodes
@@ -181,7 +180,7 @@ module Fhlow
                         else
                             possibilities = Array.new
                             @leafs.each_key { |leafname| possibilities.push(leafname) if leafname =~ /.*#{_objectfootprint[0]}/ }
-                            raise FhlowObjectNotFoundException.new(@prefix+@name), "There are multible possibilities for leaf #{_objectfootprint[0]}: "+posssibilities.join(", ") if possibilities.length > 1 
+                            raise FhlowObjectNotFoundException.new(@prefix+@name), "There are multible possibilities for leaf #{_objectfootprint[0]}: "+possibilities.join(", ") if possibilities.length > 1 
                             raise FhlowObjectNotFoundException.new(@prefix+@name), "No such node <"+(possibilities.empty? ? _objectfootprint[0].to_s : possibilities[0].to_s)+">!" unless @leafs[possibilities[0]]
                             return @leafs[possibilities[0]] # finally the object can be returned
                         end

data/lib/module_fhlow/plugin.rb

@@ -18,6 +18,9 @@ module Fhlow
                 @actualLeaf = _actualLeaf
                 @cmd = CmdParse::Command.new(self.class.to_s, true, true)
                 @cmd.pen = @pen
+                @target = "Target"+@actualLeaf.conf["Target"]["Target"]
+                @varDir = @actualLeaf.getPath+"var/#{self.class.to_s}/"
+                @shareDir = @actualLeaf.getPath+"var/share/"
             end
 
             # Describes the Plugins main command. The name of the main command
@@ -48,6 +51,14 @@ module Fhlow
                 @cmd.add_command(subcmd)
             end
 
+            def runInVarDir(&_block)
+                Dir.chdir(@varDir, &_block)
+            end
+ 
+            def runInShareDir(&_block)
+                Dir.chdir(@shareDir, &_block)
+            end
+       
     end
 
 end

data/lib/module_fhlow/pluginpool.rb

@@ -27,7 +27,7 @@ module Fhlow
     
     # A Pluginpool is a container that loads, initializes and stores references to
     # the loaded plugins.
-    class Pluginpool
+    class PluginPool
 
         # Loads and initializes the loaded plugins.
         # +_plugindir+::    The direcotry where the plugins can be found.
@@ -41,15 +41,14 @@ module Fhlow
             @plugindir = _plugindir
             @actualLeaf = _actualLeaf
 
-
-            Dir.glob(@plugindir+"*.rb").each do |plugin|
+            Dir.glob(@plugindir + "*.rb").each do |plugin|
                 
                 pluginname = File.basename(plugin, ".rb").capitalize
-
+                
                 require plugin
 
                 @pool.push(Kernel.const_get(pluginname).new(@actualLeaf, @pen, @log))
-                @log.info(self, "loaded plugin "+plugin)
+                @log.info(self.class, "loaded plugin "+plugin)
             end
 
         end
@@ -75,6 +74,19 @@ module Fhlow
             @pool.each(&_block)
         end
 
+        def PluginPool.each_configfile(_plugindir, &_block)
+            Dir.glob(_plugindir+"*.rb").each do |plugin|
+
+                pluginname = File.basename(plugin, ".rb").capitalize
+ 
+                if File.exist?(_plugindir+pluginname+".flw")
+                    _block.call(_plugindir+pluginname+".flw")
+                else
+                    raise Fhlow::FhlowException.new(pluginname), "Does not provide its default configuration file: "+ @plugindir + pluginname +".flw"
+                end
+            end
+        end
+
     end
 
 end

data/lib/module_fhlow/rootnode.rb

@@ -37,17 +37,17 @@ module Fhlow
             #
             def initialize(_defaultconf, _log, _pen, _path=RootNode.detectFhlowRootDir)
                 
+                @path = _path    
+                
                 # don't do anything if _path is nil
                 raise FhlowException.new(self.class), "Couldn't detect the fhlow root directory!" if _path.nil?
                 raise FhlowException.new(self.class), "You have to provide a default configuration object!" if !_defaultconf.instance_of?(Config::Config)
                 
-                @path = _path
-                @conf = _defaultconf
 
                 # load all the leaf classes
                 LeafFactory.load(@path+"/flw/core/lib/module_fhlow/leafs/")
 
-                super("", "RootNode", self, 0, _log, _pen)
+                super("", "", self, 0, _log, _pen, _defaultconf)
 
                 @nodes.each_value { |node| node.fetchDependencies() }
             
@@ -87,6 +87,7 @@ module Fhlow
             # the string provided by 'Dir.pwd'. 
             # +_dir+:: The directory that will be used to find the fhlow root directory.
             def RootNode.detectFhlowRootDir(_dir=Dir.pwd)
+                raise FhlowException.new(self.class), "Couldn't detect the fhlow root directory!" if _dir==""
                 if Dir.entries(_dir).include?("flw")
                     return _dir+"/"
                 else

data/lib/plugins/Modelsim.flw

@@ -0,0 +1,18 @@
+[Modelsim]
+#    BinDir      = /opt/eda/questasim/bin/
+#    LicenseFile = 7418@thor:8224@thor:27000@thor:1816@thor:7450@thor
+    BinDir = 
+    LicenseFile = 
+
+    CompileQuiet        = false
+    CompileOptions      = -93
+    CompileBuildAll     = false
+
+    SimulateRun         = 100 ns
+    SimulateConsole     = false
+    SimulateOptions     = 
+
+    PostLayoutSimSDF      = min
+    PostLayoutSimTbLabel  = DUT
+
+

data/lib/plugins/Modelsim.rb

@@ -0,0 +1,331 @@
+#----------------------------------------------------------------------------
+# 
+# Copyright (C) 2007 Simon Lasselsberger
+# simon.lasselsberger@fh-hagenberg.at
+#
+# This file is part of the _fhlow_ scripting environment.
+#
+# The _fhlow_ scripting environment 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.
+#
+# _fhlow_ 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 _fhlow_; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+#----------------------------------------------------------------------------
+
+require 'plugin'
+require 'fileutils'
+require 'fhlowexception'
+
+class Modelsim < Fhlow::Plugin
+  
+    def initialize(_actualLeaf, _pen, _log)
+        super(_actualLeaf, _pen, _log)
+
+        @vcom_options = []
+        @vsim_options = []
+
+        # default settings
+        @vcom_options = @actualLeaf.conf["Modelsim"]["CompileOptions"].split(/\s/)
+        if @actualLeaf.conf["Modelsim"]["CompileQuiet"] == true
+            @vcom_options.push("-quiet") unless @vcom_options.include?("-quiet")
+        end
+        
+        @vsim_simtime = @actualLeaf.conf["Modelsim"]["SimulateRun"]
+        @vsim_options.push(@actualLeaf.conf["Modelsim"]["SimulateOptions"])
+        @vsim_options.push("-c") if @actualLeaf.conf["Modelsim"]["SimulateConsole"]=="true"
+        @buildall     = @actualLeaf.conf["Modelsim"]["CompileBuildAll"] == "true"
+
+        @vsim_sdf     = @actualLeaf.conf["Modelsim"]["PostLayoutSimSDF"]
+        @vsim_tblabel = @actualLeaf.conf["Modelsim"]["PostLayoutSimTbLabel"]
+
+        # this functioncall is optional
+        describeCmd("Plugin vor Modelsim.",
+                    "Supported versions: Modelsim 6.1 b")
+
+
+        # --- compile ---
+        # create an options object
+        compileoptions = CmdParse::OptionParserWrapper.new do |opt|
+            opt.separator "<compile-options>:"
+            opt.on("-q", "--quiet",         "Make vcom quiet.")                     { @vcom_options.push("-quiet") unless @vcom_options.include?("-quiet") }
+            opt.on("-o", "--options VAL",   "Options that will be passed to vcom")  { |val| @vcom_options.push(val) }
+            opt.on("-b", "--buildall",      "Rebuilds all sources and libraries.")  { @buildall = true } 
+        end
+
+        # register the subcommand
+        registerSubCmd(
+                "compile",                              # name of the subcmd
+                "Compiles the configured sources.",     # short description (optional)
+                "Compiles the configured sources.",     # description (optional)
+                compileoptions                          # the option object (optional)
+                ) { compile() }                         # the action which should be run when this subcmd is invoked
+
+        # --- simulate ---
+        # create an options object
+        simulationoptions = CmdParse::OptionParserWrapper.new do |opt|
+            opt.separator "<simlation-options>:"
+            opt.on("-r", "--run TIME",    "Simulation time. Format: \"<value> [ms|us|ns|ps]\"") do |time| 
+                if time =~ /\d+[ ](ms|us|ns|ps)/ 
+                    @vsim_simtime = time
+                else
+                    raise Fhlow::FhlowPluginException.new("Modelsim"), "Simulation time has wrong format: #{time}"
+                end
+            end
+            opt.on("-c", "--console",       "Run simulation in console. Do not start GUI.") { @vsim_options.push("-c") } 
+            opt.on("-o", "--options VAL",   "Options that will be passed to vsim.")         { |val| @vsim_options.push(val) } 
+            opt.on("-q", "--quiet",         "Make vcom quiet.")                             { @vcom_options.push("-quiet") unless @vcom_options.include?("-quiet") }
+            opt.on("-b", "--buildall",      "Rebuilds all sources and libraries.")          { @buildall = true } 
+        end
+
+        # register the subcommand
+        registerSubCmd(
+                "simulate",                             # name of the subcmd
+                "Simulates the design.",                # short description (optional)
+                "Simulates the design.",                # description (optional)
+                simulationoptions                          # the option object (optional)
+                ) { simulate() }                         # the action which should be run when this subcmd is invoked
+
+        # --- post layout simulation ---
+        # create an options object
+        plsimoptions = CmdParse::OptionParserWrapper.new do |opt|
+            opt.separator "<plsim-options>:"
+            opt.on("-r", "--run TIME",    "Simulation time. Format: \"<value> [ms|us|ns|ps]\"") do |time| 
+                if time =~ /\d+[ ](ms|us|ns|ps)/ 
+                    @vsim_simtime = time
+                else
+                    raise Fhlow::FhlowPluginException.new("Modelsim"), "Simulation time has wrong format: #{time}"
+                end
+            end
+            opt.on("-c", "--console",       "Run simulation in console. Do not start GUI.") { @vsim_options.push("-c") } 
+            opt.on("-o", "--options VAL",   "Options that will be passed to vsim.")         { |val| @vsim_options.push(val) } 
+            opt.on("-b", "--buildall",      "Rebuilds all sources and libraries.")          { @buildall = true } 
+        end
+
+        # register the subcommand
+        registerSubCmd(
+                "plsim",                                # name of the subcmd
+                "Runs post layout simulation of the synthesized design.",                # short description (optional)
+                "Runs post layout simulation of the synthesized design.",                # description (optional)
+                plsimoptions                          # the option object (optional)
+                ) { plsim() }                         # the action which should be run when this subcmd is invoked
+
+
+
+
+    end
+
+    
+    def compile()
+        initWork()
+
+        @pen.puts
+        @actualLeaf.printMe
+        width = 87
+
+        @pen.seperator
+
+        begin
+            @pen.print ",", "-"*width,"+\n"
+            @pen.print "|", " Compilation".ljust(width), "|\n"
+            @pen.print "+", "-"*width,"+\n"
+
+            unless @actualLeaf.getFiles("Libraries").empty?
+                @pen.puts "| Libraries:"
+                @actualLeaf.getFiles("Libraries").each do |libhash|  
+                    libhash.each do |libname, files|
+                        if @buildall or !File.directory?(@varDir+libname)
+                            @pen.puts "| Library: #{libname}"
+                            runInVarDir { `#{@actualLeaf.conf["Modelsim"]["BinDir"]}vlib #{@varDir}#{libname}` }
+                            runInVarDir { `#{@actualLeaf.conf["Modelsim"]["BinDir"]}vmap #{libname} #{@varDir}#{libname}` }
+                        
+                            files.each do |f|
+                                msg = callVcom(f)
+                                printFile(f, $? == 0, @pen.yellow)
+                                raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors while compiling #{f}!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+                            end
+                        else
+                            @pen.puts "| Library: #{libname} exists, skipping (use --buildall to rebuild)"
+                        end
+                    end
+                end 
+                @pen.print "+", "-"*width,"+\n"
+            end
+
+            @pen.puts "| Packages:"
+            @actualLeaf.getFiles("Packages").each do |f|  
+               msg = callVcom(f)
+               printFile(f, $? == 0, @pen.lightyellow)
+               raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors while compiling #{f}!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+            end
+
+
+            @pen.print "+", "-"*width,"+\n"
+            @pen.puts "| Units:"
+            @actualLeaf.getFiles("Units").each do |f|
+               msg = callVcom(f)
+               printFile(f, $? == 0, @pen.magenta)
+               raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors while compiling #{f}!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+            end
+
+            @pen.print "+", "-"*width,"+\n"
+            @pen.puts "| BhvUnits:"
+            @actualLeaf.getFiles("BhvUnits").each do |f|
+               msg = callVcom(f)
+               printFile(f, $? == 0, @pen.magenta)
+               raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors while compiling #{f}!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+            end
+
+            @pen.print "+", "-"*width,"+\n"
+            @pen.puts "| tbUnits:"
+            @actualLeaf.getFiles("tbUnits").each do |f|
+               msg = callVcom(f)
+               printFile(f, $? == 0, @pen.magenta)
+               raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors while compiling #{f}!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+            end
+
+        ensure
+            @pen.print "`", "-"*width,"+\n"
+        end
+    end
+
+
+
+
+    def simulate()
+        compile
+        @pen.seperator
+        ENV["LM_LICENSE_FILE"] = @actualLeaf.conf["Modelsim"]["LicenseFile"]
+        @log.debug("Modelsim", "Setting environment variable LM_LICENSE_FILE to #{@actualLeaf.conf["Modelsim"]["LicenseFile"]}")
+        @pen.puts "Running Modelsim:"
+        instruction = "#{@actualLeaf.conf["Modelsim"]["BinDir"]}vsim work.tb#{@actualLeaf.name} "
+        instruction += "#{@vsim_options.join(" ")} "
+        instruction += "-do \"source #{@actualLeaf.getPath}src/wave.do; run #{@vsim_simtime}; #{ @vsim_options.include?("-c") ? 'exit' : ''}\" "
+        instruction += "2>&1"
+        msg = ""; runInVarDir { msg = `#{instruction}` } 
+        raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors during simulation!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+        @pen.puts msg
+    end
+
+
+    def plsim()
+        width = 87
+        @pen.print ",", "-"*width,"+\n"
+        @pen.print "|", " Compilation".ljust(width), "|\n"
+        @pen.print "+", "-"*width,"+\n"
+        
+        begin
+            @pen.puts "| SimulationLibraries of #{@actualLeaf.getTarget("Name")}:"
+            @actualLeaf.getFiles("SimulationLibraries").each do |libhash|
+                libhash.each do |libname, files|
+                    if @buildall or !File.directory?(@varDir+libname)
+                        @pen.puts "| Library: #{libname}"
+                        runInVarDir { `#{@actualLeaf.conf["Modelsim"]["BinDir"]}vlib #{@varDir}#{libname}` }
+                        runInVarDir { `#{@actualLeaf.conf["Modelsim"]["BinDir"]}vmap #{libname} #{@varDir}#{libname}` }
+                        
+                        files.each do |f|
+                            msg = callVcom(f, libname)
+                            printFile(f, $? == 0, @pen.yellow)
+                            raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors while compiling #{f}!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+                        end
+                    else
+                        @pen.puts "| Library: #{libname} exists, skipping (use --buildall to rebuild)"
+                    end 
+                end
+            end
+
+            @pen.print "+", "-"*width,"+\n"
+
+            @pen.puts "| Netlist:"
+            f = @shareDir+"net#{@actualLeaf.name}-#{@actualLeaf.getArchitectures(@actualLeaf)["Units"][0]}-ea.vhd"
+            msg = callVcom(f)
+            printFile(f, $? == 0, @pen.magenta)
+            raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors while compiling #{f}!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+
+            @pen.print "+", "-"*width,"+\n"
+            @pen.puts "| Packages:"
+            @actualLeaf.getFiles("Packages").each do |f|
+               msg = callVcom(f)
+               printFile(f, $? == 0, @pen.yellow)
+               raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors while compiling #{f}!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+            end
+
+ 
+            @pen.print "+", "-"*width,"+\n"
+            @pen.puts "| BhvUnits:"
+            @actualLeaf.getFiles("BhvUnits").each do |f|
+               msg = callVcom(f)
+               printFile(f, $? == 0, @pen.magenta)
+               raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors while compiling #{f}!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+            end
+
+            @pen.print "+", "-"*width,"+\n"
+            @pen.puts "| tbUnits:"
+            @actualLeaf.getFiles("tbUnits").each do |f|
+               msg = callVcom(f)
+               printFile(f, $? == 0, @pen.magenta)
+               raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors while compiling #{f}!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+            end
+       
+           
+        ensure
+            @pen.print "`", "-"*width,"+\n"
+        end
+        
+        @pen.seperator
+        @pen.puts "Running post layout simulation with Modelsim:"
+        
+        ENV["LM_LICENSE_FILE"] = @actualLeaf.conf["Modelsim"]["LicenseFile"]
+        @log.debug("Modelsim", "Setting environment variable LM_LICENSE_FILE to #{@actualLeaf.conf["Modelsim"]["LicenseFile"]}")
+        
+        instruction = "#{@actualLeaf.conf["Modelsim"]["BinDir"]}vsim work.tb#{@actualLeaf.name} "
+        instruction += "#{@vsim_options.join(" ")} "
+        instruction += "-do \"source #{@actualLeaf.getPath}src/wave.do; run #{@vsim_simtime}; #{ @vsim_options.include?("-c") ? 'exit' : ''}\" "
+        instruction += "-sdfmax /DUT=#{@shareDir}/#{@actualLeaf.name}.sdf -noglitch -t ps "
+        instruction += "2>&1"
+        
+        msg = ""; runInVarDir { msg = `#{instruction}` } 
+        raise Fhlow::FhlowPluginException.new("Modelsim"), "There were some errors during simulation!\n       Message from Modelsim:\n-----\n#{msg}\n-----" if $? != 0
+
+        @pen.print msg
+
+    end
+        
+
+
+    # --- some private helper functions ---
+    private
+        def printFile(_file, _ok, _color, _width=90)
+            if _ok == true or _ok == false
+                @pen.puts  "| [ ", _ok ? @pen.lightgreen+"ok     "+@pen.clear : @pen.lightred+"failed "+@pen.clear, " ]  ", _color, _file, @pen.clear
+            else
+                @pen.puts  "| [ ", _ok, " ]  ", _color, _file, @pen.clear
+            end
+        end
+
+
+        def initWork(_dir=@varDir)
+            FileUtils.rm_r(_dir+"work") if File.directory?(_dir+"work")
+            FileUtils.makedirs(_dir)
+            runInVarDir { `#{@actualLeaf.conf["Modelsim"]["BinDir"]}vlib #{_dir}work` }
+            runInVarDir { `#{@actualLeaf.conf["Modelsim"]["BinDir"]}vmap work #{_dir}work` }
+        end
+
+
+        def callVcom(_file, _lib="work")
+            instruction = "#{@actualLeaf.conf["Modelsim"]["BinDir"]}vcom #{@vcom_options.join(" ")} -work #{@varDir}#{_lib} #{_file} "
+            instruction += "2>&1"
+            @log.debug("Modelsim", "Running vcom: #{instruction}")
+            runInVarDir { `#{instruction}` }
+        end
+
+
+end