ontomde-core 1.0.2 → 1.0.4

data/lib/ontomde-core/context.rb

@@ -1,115 +1,114 @@
-# Context management
-#:include: ../shared/license.rdoc
-
-require 'fileutils'
-#require 'ontomde-core/exceptions.rb'
-
-#Internal use.
-# 
-#Used for storing context.
-class WarningHash < Hash
-
-#Returns context value associated to key.
-#Raises an error if key is not found.
-	# Returns default, when context is undefined for key, and a default value is provided.
-	def [](key,default=Object.class)
-		val=super(key)
-		return val unless val.nil?
-		#Note: Object.class is used as a magic number.
-		return default unless default==Object.class
-		raise Warning.new(), <<FINCODE
-Evaluation interrompue:
-La session ne contient pas la variable :#{key}.
-L'exemple de code suivant permet de definir une variable de contexte:
-
-  votre code
-  mtk_context(:#{key}=>'valeur'){
-     votre code
-     puts context[:#{key}]
-     votre code
-     }
-FINCODE
-	end
-	def get(key)
-		return self[key] if self.include?(key)
-		return nil
-	end
-end
-
-module Mrdf_Model
-@@context=WarningHash.new()
-
-def context
-	return @@context
-end
-
-# Similar to mtk_context but preserves already defined context.
-# Used to provide a default context.
-def mtk_default_context(*additional_context,&block)
-	filtered_context=Array.new
-	additional_context.each { |item| item.each { |k,v|
-		next if @@context.include?(k)
-		filtered_context << item
-	}}
-	mtk_context(*filtered_context,&block)
-end
-
-#Defines context variables for use in block passed as parameter.
-#Existing context variable are redefined. (cf. mtk_default_context )
-#When exiting block, previously defined context variables are restored.
-#
-#Example 1:
-#  mtk_context( :build => "build\", :option => true) {
-#     your-code
-#     puts context[:build]
-#     your-code
-#     puts context[:option]
-#     your-code
-#  }
-#
-#Example 2:
-#  mtk_context( :build => "BUILD_ONE\") {
-#       your-code
-#       puts context[:build] # BUILD_ONE
-#    mtk_context( :build => "NEW_DIR", :option => true) {
-#       your-code
-#       puts context[:build] # NEW_DIR\ 
-#       your-code
-#       puts context[:option]
-#       your-code
-#    }
-#    puts context[:build] # BUILD_ONE 
-#  }
-def mtk_context(*additional_context,&block)
-	context_save=@@context
-	@@context=context_save.clone
-	additional_context.each { |item| item.each { |k,v|
-		@@context[k]=v
-		}}
-	yield
-	@@context=context_save
-	return nil
-end
-
-end
-
-module Mrdf_Resource
-
-# returns current context
-def context
-	return @rdf_model.context
-end
-
-# cf: Mrdf_Model::mtk_context
-def mtk_context(*args,&block)
-	return @rdf_model.mtk_context(*args,&block)
-end
-#
-# cf: Mrdf_Model::mtk_default_context
-def mtk_default_context(*args,&block)
-	return @rdf_model.mtk_default_context(*args,&block)
-end
-
-end
-
-
+# Context management
+
+require 'fileutils'
+#require 'ontomde-core/exceptions.rb'
+
+#Internal use.
+#
+#Used for storing context.
+class WarningHash < Hash
+
+  #Returns context value associated to key.
+  #Raises an error if key is not found.
+  # Returns default, when context is undefined for key, and a default value is provided.
+  def [](key,default=Object.class)
+    val=super(key)
+    return val unless val.nil?
+    #Note: Object.class is used as a magic number.
+    return default unless default==Object.class
+    raise Warning.new(), <<FINCODE
+Evaluation interrompue:
+La session ne contient pas la variable :#{key}.
+L'exemple de code suivant permet de definir une variable de contexte:
+
+  votre code
+  mtk_context(:#{key}=>'valeur'){
+     votre code
+     puts context[:#{key}]
+     votre code
+     }
+FINCODE
+  end
+  def get(key)
+    return self[key] if self.include?(key)
+    return nil
+  end
+end
+
+module Mrdf_Model
+  @@context=WarningHash.new()
+
+  def context
+    return @@context
+  end
+
+  # Similar to mtk_context but preserves already defined context.
+  # Used to provide a default context.
+  def mtk_default_context(*additional_context,&block)
+    filtered_context=Array.new
+    additional_context.each { |item| item.each { |k,v|
+        next if @@context.include?(k)
+        filtered_context << item
+      }}
+    mtk_context(*filtered_context,&block)
+  end
+
+  #Defines context variables for use in block passed as parameter.
+  #Existing context variable are redefined. (cf. mtk_default_context )
+  #When exiting block, previously defined context variables are restored.
+  #
+  #Example 1:
+  #  mtk_context( :build => "build\", :option => true) {
+  #     your-code
+  #     puts context[:build]
+  #     your-code
+  #     puts context[:option]
+  #     your-code
+  #  }
+  #
+  #Example 2:
+  #  mtk_context( :build => "BUILD_ONE\") {
+  #       your-code
+  #       puts context[:build] # BUILD_ONE
+  #    mtk_context( :build => "NEW_DIR", :option => true) {
+  #       your-code
+  #       puts context[:build] # NEW_DIR\
+  #       your-code
+  #       puts context[:option]
+  #       your-code
+  #    }
+  #    puts context[:build] # BUILD_ONE
+  #  }
+  def mtk_context(*additional_context,&block)
+    context_save=@@context
+    @@context=context_save.clone
+    additional_context.each { |item| item.each { |k,v|
+        @@context[k]=v
+      }}
+    yield
+    @@context=context_save
+    return nil
+  end
+
+end
+
+module Mrdf_Resource
+
+  # returns current context
+  def context
+    return @rdf_model.context
+  end
+
+  # cf: Mrdf_Model::mtk_context
+  def mtk_context(*args,&block)
+    return @rdf_model.mtk_context(*args,&block)
+  end
+  #
+  # cf: Mrdf_Model::mtk_default_context
+  def mtk_default_context(*args,&block)
+    return @rdf_model.mtk_default_context(*args,&block)
+  end
+
+end
+
+

data/lib/ontomde-core/customERB.rb

@@ -1,14 +1,14 @@
 
 class Crdf_Ressource
-def loadTPL(name)
-	tpl=""
-	File.open(name) { |f|
-		f.each { |l|
-			tpl=tpl+l
-			}
-	}
-	return CustomERB.new(tpl)
-end
+  def loadTPL(name)
+    tpl=""
+    File.open(name) { |f|
+      f.each { |l|
+        tpl=tpl+l
+      }
+    }
+    return CustomERB.new(tpl)
+  end
 end
 
 
@@ -35,7 +35,7 @@ end
 # purposes of generating document information details and/or flow control.
 #
 # A very simple example is this:
-# 
+#
 #   require 'erb'
 #
 #   x = 42
@@ -83,39 +83,39 @@ end
 # <tt>@q{...}</tt> to avoid trouble with the backslash.
 #
 #   require "erb"
-#   
+#
 #   # Create template.
 #   template = @q{
 #     From:  James Edward Gray II <james@grayproductions.net>
 #     To:  <@= to @>
 #     Subject:  Addressing Needs
-#   
+#
 #     <@= to[/\w+/] @>:
-#   
+#
 #     Just wanted to send a quick note assuring that your needs are being
 #     addressed.
-#   
+#
 #     I want you to know that my team will keep working on the issues,
 #     especially:
-#   
+#
 #     <@# ignore numerous minor requests -- focus on priorities @>
 #     @ priorities.each do |priority|
 #       * <@= priority @>
 #     @ end
-#   
+#
 #     Thanks for your patience.
-#   
+#
 #     James Edward Gray II
 #   }.gsub(/^  /, '')
-#   
+#
 #   message = CustomERB.new(template, 0, "@<>")
-#   
+#
 #   # Set up template data.
 #   to = "Community Spokesman <spokesman@ruby_community.org>"
 #   priorities = [ "Run Ruby Quiz",
 #                  "Document Modules",
 #                  "Answer Questions on Ruby Talk" ]
-#   
+#
 #   # Produce result.
 #   email = message.result
 #   puts email
@@ -125,19 +125,19 @@ end
 #   From:  James Edward Gray II <james@grayproductions.net>
 #   To:  Community Spokesman <spokesman@ruby_community.org>
 #   Subject:  Addressing Needs
-#   
+#
 #   Community:
-#   
+#
 #   Just wanted to send a quick note assuring that your needs are being addressed.
-#   
+#
 #   I want you to know that my team will keep working on the issues, especially:
-#   
+#
 #       * Run Ruby Quiz
 #       * Document Modules
 #       * Answer Questions on Ruby Talk
-#   
+#
 #   Thanks for your patience.
-#   
+#
 #   James Edward Gray II
 #
 # === Ruby in HTML
@@ -147,7 +147,7 @@ end
 # variables in the Product object can be resolved.
 #
 #   require "erb"
-#   
+#
 #   # Build template data class.
 #   class Product
 #     def initialize( code, name, desc, cost )
@@ -155,37 +155,37 @@ end
 #       @name = name
 #       @desc = desc
 #       @cost = cost
-#        	
+#
 #       @features = [ ]
 #     end
-#   
+#
 #     def add_feature( feature )
 #       @features << feature
 #     end
-#   
+#
 #     # Support templating of member data.
 #     def get_binding
 #       binding
 #     end
-#   
+#
 #     # ...
 #   end
-#   
+#
 #   # Create template.
 #   template = @{
 #     <html>
 #       <head><title>Ruby Toys -- <@= @name @></title></head>
 #       <body>
-#   
+#
 #         <h1><@= @name @> (<@= @code @>)</h1>
 #         <p><@= @desc @></p>
-#   
+#
 #         <ul>
 #           <@ @features.each do |f| @>
 #             <li><b><@= f @></b></li>
 #           <@ end @>
 #         </ul>
-#   
+#
 #         <p>
 #           <@ if @cost < 10 @>
 #             <b>Only <@= @cost @>!!!</b>
@@ -193,13 +193,13 @@ end
 #              Call for a price, today!
 #           <@ end @>
 #         </p>
-#    
+#
 #       </body>
 #     </html>
 #   }.gsub(/^  /, '')
-#   
+#
 #   rhtml = CustomERB.new(template)
-#   
+#
 #   # Set up template data.
 #   toy = Product.new( "TZ-1002",
 #                      "Rubysapien",
@@ -210,7 +210,7 @@ end
 #   toy.add_feature("Karate-Chop Action!!!")
 #   toy.add_feature("Matz signature on left leg.")
 #   toy.add_feature("Gem studded eyes... Rubies, of course!")
-#   
+#
 #   # Produce result.
 #   rhtml.run(toy.get_binding)
 #
@@ -219,10 +219,10 @@ end
 #    <html>
 #      <head><title>Ruby Toys -- Rubysapien</title></head>
 #      <body>
-#    
+#
 #        <h1>Rubysapien (TZ-1002)</h1>
 #        <p>Geek's Best Friend!  Responds to Ruby commands...</p>
-#    
+#
 #        <ul>
 #            <li><b>Listens for verbal commands in the Ruby language!</b></li>
 #            <li><b>Ignores Perl, Java, and all C variants.</b></li>
@@ -230,15 +230,15 @@ end
 #            <li><b>Matz signature on left leg.</b></li>
 #            <li><b>Gem studded eyes... Rubies, of course!</b></li>
 #        </ul>
-#    
+#
 #        <p>
 #             Call for a price, today!
 #        </p>
-#    
+#
 #      </body>
 #    </html>
 #
-# 
+#
 # == Notes
 #
 # There are a variety of templating solutions available in various Ruby projects:
@@ -315,7 +315,7 @@ class CustomERB
 	end
       end
       attr_accessor :stag
-      
+
       def scan(&block)
 	@stag = nil
 	if @percent
@@ -415,7 +415,7 @@ class CustomERB
 	end
       end
     end
-    
+
     Scanner.regist_scanner(SimpleScanner, nil, false)
 
     begin
@@ -514,13 +514,13 @@ class CustomERB
       def push(cmd)
 	@line << cmd
       end
-      
+
       def cr
 	@script << (@line.join('; '))
 	@line = []
 	@script << "\n"
       end
-      
+
       def close
 	return unless @line
 	@compiler.post_cmd.each do |x|
@@ -636,19 +636,19 @@ end
 class CustomERB
   #
   # Constructs a new CustomERB object with the template specified in _str_.
-  # 
+  #
   # An CustomERB object works by building a chunk of Ruby code that will output
   # the completed template when run. If _safe_level_ is set to a non-nil value,
   # CustomERB code will be run in a separate thread with <b>$SAFE</b> set to the
   # provided level.
-  # 
+  #
   # If _trim_mode_ is passed a String containing one or more of the following
   # modifiers, CustomERB will adjust its code generation as listed:
-  # 
+  #
   # 	@  enables Ruby code processing for lines beginning with @
   # 	<> omit newline for lines starting with <@ and ending in @>
   # 	>  omit newline for lines ending in @>
-  # 
+  #
   # _eoutvar_ can be used to set the name of the variable CustomERB will build up
   # its output in.  This is useful when you need to run multiple CustomERB
   # templates through the same binding and/or when you want to control where
@@ -657,20 +657,20 @@ class CustomERB
   # === Example
   #
   #  require "erb"
-  #  
+  #
   #  # build data class
   #  class Listings
   #    PRODUCT = { :name => "Chicken Fried Steak",
   #                :desc => "A well messages pattie, breaded and fried.",
   #                :cost => 9.95 }
-  #  
+  #
   #    attr_reader :product, :price
-  #    
+  #
   #    def initialize( product = "", price = "" )
   #      @product = product
   #      @price = price
   #    end
-  #    
+  #
   #    def build
   #      b = binding
   #      # create and run templates, filling member data variebles
@@ -684,21 +684,21 @@ class CustomERB
   #      END_PRICE
   #    end
   #  end
-  #  
+  #
   #  # setup template data
   #  listings = Listings.new
   #  listings.build
-  #  
+  #
   #  puts listings.product + "\n" + listings.price
   #
   # _Generates_
   #
   #  Chicken Fried Steak
   #  A well messages pattie, breaded and fried.
-  #  
+  #
   #  Chicken Fried Steak -- 9.95
   #  A well messages pattie, breaded and fried.
-  #  
+  #
   def initialize(str, safe_level=nil, trim_mode=nil, eoutvar='_erbout')
     @safe_level = safe_level
     compiler = CustomERB::Compiler.new(trim_mode)
@@ -725,7 +725,7 @@ class CustomERB
 
     cmd = []
     cmd.push "#{eoutvar} = ''"
-    
+
     compiler.pre_cmd = cmd
 
     cmd = []
@@ -743,13 +743,13 @@ class CustomERB
   # Executes the generated CustomERB code to produce a completed template, returning
   # the results of that code.  (See CustomERB#new for details on how this process can
   # be affected by _safe_level_.)
-  # 
+  #
   # _b_ accepts a Binding or Proc object which is used to set the context of
   # code evaluation.
   #
   def result(b=TOPLEVEL_BINDING)
     if @safe_level
-      th = Thread.start { 
+      th = Thread.start {
 	$SAFE = @safe_level
 	eval(@src, b, (@filename || '(erb)'), 1)
       }
@@ -784,14 +784,14 @@ class CustomERB
     public
     #
     # A utility method for escaping HTML tag characters in _s_.
-    # 
+    #
     # 	require "erb"
     # 	include CustomERB::Util
-    # 	
+    #
     # 	puts html_escape("is a > 0 & a < 10?")
-    # 
+    #
     # _Generates_
-    # 
+    #
     # 	is a &gt; 0 &amp; a &lt; 10?
     #
     def html_escape(s)
@@ -800,17 +800,17 @@ class CustomERB
     alias h html_escape
     module_function :h
     module_function :html_escape
-    
+
     #
     # A utility method for encoding the String _s_ as a URL.
-    # 
+    #
     # 	require "erb"
     # 	include CustomERB::Util
-    # 	
+    #
     # 	puts url_encode("Programming Ruby:  The Pragmatic Programmer's Guide")
-    # 
+    #
     # _Generates_
-    # 
+    #
     # 	Programming@20Ruby@3A@20@20The@20Pragmatic@20Programmer@27s@20Guide
     #
     def url_encode(s)