cyberweb 0.4.174

data/lib/cyberweb/html_tags/table.rb

@@ -0,0 +1,273 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# require 'cyberweb/html_tags/table.rb'
+# =========================================================================== #
+module Cyberweb
+
+  require 'cyberweb/toplevel_methods/css.rb'
+  require 'cyberweb/web_base/web_base.rb'
+  require 'cyberweb/html_tags/tr.rb'
+  require 'cyberweb/html_tags/td.rb'
+
+  # ========================================================================= #
+  # === @array_tables
+  #
+  # All table-strings are stored in this Array as well.
+  # ========================================================================= #
+  @array_tables = []
+
+  # ========================================================================= #
+  # === Cyberweb.array_tables?
+  # ========================================================================= #
+  def self.array_tables?
+    @array_tables
+  end; self.instance_eval { alias tables? array_tables? } # === Cyberweb.tables?
+
+  # ========================================================================= #
+  # === Cyberweb.append_to_tables
+  # ========================================================================= #
+  def self.append_to_tables(i = nil)
+    @array_tables << i if i
+  end; self.instance_eval { alias add_this_to_the_registered_tables append_to_tables } # === Cyberweb.add_this_to_the_registered_tables
+
+  # ========================================================================= #
+  # === Cyberweb::Table
+  #
+  # Usage example for setting to a default CSS class to use in <table>
+  # tags goes like so:
+  #
+  #   Table.set_css_class 'red'
+  #
+  # This will then have set a new default for all <table> tags, as
+  # they will be red from this point on.
+  #
+  # To test it, try:
+  #
+  #   Cyberweb::Table.to_s
+  #
+  # ========================================================================= #
+  class Table < WebBase # This module allows us to style it a bit.
+
+    # ======================================================================= #
+    # === @table_css_class
+    # ======================================================================= #
+    @table_css_class = nil
+
+    # ======================================================================= #
+    # === Cyberweb::Table.return_alternate_backgrounds
+    #
+    # This table will use alternative backgrounds.
+    # ======================================================================= #
+    def self.return_alternate_backgrounds(
+        array              = [],
+        optional_css_class = '',
+        &block
+      )
+      use_this_class_for_even_rows = 'dark_background'
+      use_this_class_for_odd_rows  = 'light_background'
+      # ===================================================================== #
+      # === Handle blocks next
+      # ===================================================================== #
+      if block_given?
+        yielded = yield
+        if array.empty? and !yielded.empty?
+          array = yielded
+        end
+      end
+      _ = '<table'.dup
+      _ << ::Cyberweb.return_css_class(optional_css_class)
+      _ << '>'
+      array.each_with_index {|entry, index|
+        _ << "<tr>#{N}"
+        case index % 2
+        when 0
+          _ << '<td class="'+use_this_class_for_even_rows+'">'+N
+        when 1
+          _ << '<td class="'+use_this_class_for_odd_rows+'">'+N
+        end
+        _ << entry+N
+        _ << '</td>'+N
+        _ << '</tr>'+N
+      }
+      _ << '</table>'+N
+      return _
+    end
+
+    # ======================================================================= #
+    # === Table.set_css_class
+    # ======================================================================= #
+    def self.set_css_class(i = DEFAULT_CSS_CLASS)
+      @table_css_class = i
+    end
+
+    # ======================================================================= #
+    # === Cyberweb::Table.to_s
+    # ======================================================================= #
+    def self.to_s
+      @table_css_class
+    end
+  
+    # ======================================================================= #
+    # === Cyberweb::Table.enable_padding
+    # ======================================================================= #
+    def self.enable_padding # This is supposed to enable padding.
+      Table.set_css_class 'pad15px'
+    end
+
+    # ======================================================================= #
+    # === Cyberweb::Table.padding=
+    #
+    # This is an alias towards "bspace", aka the "border-spacing" property.
+    # ======================================================================= #
+    def self.padding=(i)
+      Table.set_css_class('bspace'+i.to_s)
+    end
+
+    # ======================================================================= #
+    # === Cyberweb::Table.clear
+    # ======================================================================= #
+    def self.clear
+      @table_css_class = nil
+    end; self.instance_eval { alias reset clear } # === Cyberweb::Table.reset
+
+    # ======================================================================= #
+    # === Cyberweb::Table.alternate_backgrounds
+    #
+    # Next, define the method Table.alternate_backgrounds().
+    #
+    # The first argument to this method must be an Array.
+    #
+    # Usage examples:
+    #
+    #   Cyberweb::Table.alternate_backgrounds(%w( one two three four ), 'bblack1 pad0_5em')
+    #   Table.alternate_backgrounds(%w( one two three four ), 'bblack1 pad0_5em')
+    #
+    # ======================================================================= #
+    def self.alternate_backgrounds(
+        array, optional_css_class = ''
+      )
+      ee ::Cyberweb::Table.return_alternate_backgrounds(array, optional_css_class)
+    end
+
+  end
+
+  # ========================================================================= #
+  # === table_with_caption
+  #
+  # This is a table with a leading "caption".
+  # ========================================================================= #
+  def table_with_caption(
+      caption   = 'README',
+      css_class = Table.to_s,
+      the_id    = '',
+      css_style = ''
+    )
+    fieldset(style: 'width: 70%;margin-left:1em'){
+      legend caption
+      table(css_class, the_id, css_style) { yield if block_given? }
+    }
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.ctable
+  # ========================================================================= #
+  def self.ctable
+    eclose :table
+  end
+
+  # ========================================================================= #
+  # === ctable
+  # ========================================================================= #
+  def ctable
+    ::Cyberweb.ctable
+  end
+
+  # ========================================================================= #
+  # === Table.parse
+  # ========================================================================= #
+  def Table.parse(*i)
+    ::Cyberweb.parse_table(i)
+  end
+
+  # ========================================================================= #
+  # === table
+  #
+  # The last argument allows us to easily pass blocks to the parent method.
+  #
+  # Usage example:
+  #
+  #   table('mars1em','test_table','border:1px solid rand') { %w( abc def ghi jkl ) }
+  #
+  # ========================================================================= #
+  def table(
+      a = Table.to_s, b = '', c = '', &block
+    )
+    ::Cyberweb.table(a,b,c, &block)
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.table                                            (table tag)
+  #
+  # This will simply create a <table> tag.
+  #
+  # You can optionally pass a block, which will then be used as input for
+  # the method (its dataset). We need an array for it to work.
+  #
+  # In case the input is a Hash, we convert it into array format first.
+  #
+  # Usage example:
+  #
+  #   Cyberweb.table('mars1em','test_table','border:1px solid rand') { %w( abc def ghi jkl ) }
+  #
+  # ========================================================================= #  
+  def self.table(
+      css_class = Table.to_s,
+      the_id    = '',
+      css_style = '',
+      &block
+    )
+    result = ''.dup
+    result << string_tag(:table, css_class, the_id, css_style) # Delegate towards tag().
+    css_class = Table.to_s if css_class == 'DEF' # Use default here.
+    yielded = nil
+    yielded = yield if block_given?
+    if yielded
+      yielded = yielded.to_a.flatten if yielded.is_a? Hash # Convert into Array in this case.
+      if yielded.is_a? Array # If we pass in an array.
+        yielded.each_with_index { |entry, index|
+          if (index % 2) == 0
+            result << string_tr
+            result << string_td(entry)
+          else
+            result << string_td(entry)
+            result << string_ctr
+          end
+        }
+      end
+      result << string_ctable # Close the table again if we passed a block.
+    end
+    # self.append_to_tables << result if result # Store the result in our Tables.
+    ee result # Output the result too. 
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.string_ctable
+  #
+  # This returns a properly closed </table> tag.
+  # ========================================================================= #
+  def self.string_ctable
+    HtmlTags.ctable
+  end
+
+  # ========================================================================= #
+  # === string_ctable
+  #
+  # This returns a properly closed </table> tag.
+  # ========================================================================= #
+  def string_ctable
+    ::Cyberweb.ctable
+  end
+
+end

data/lib/cyberweb/html_tags/tbody.rb

@@ -0,0 +1,24 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+module Cyberweb
+
+  # ========================================================================= #
+  # === tbody
+  #
+  # For the <tbody> tag we will simply delegate towards the HtmlTags
+  # project.
+  #
+  # Documentation for the <tbody> tag can be found here:
+  #
+  #   https://www.w3schools.com/tags/tag_tbody.asp
+  #
+  # ========================================================================= #
+  def tbody(
+      css_class = '', the_id = '', css_style = ''
+    )
+    HtmlTags.tbody(css_class, the_id, css_style) # Delegate to HtmlTags here.
+  end
+
+end

data/lib/cyberweb/html_tags/td.rb

@@ -0,0 +1,214 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# require 'cyberweb/html_tags/td.rb'
+# =========================================================================== #
+module Cyberweb
+
+  require 'cyberweb/toplevel_methods/s2.rb'
+
+  # ========================================================================= #
+  # === Td
+  #
+  # To use class Td, do this:
+  #
+  #   Td.set_css_class 'marl1em'
+  #   table(Td.to_s,'test_table2','') { %w( cat dog hamster ) }
+  #
+  # ========================================================================= #
+  class Td < WebBase
+
+    # ======================================================================= #
+    # === @td_css_class
+    # ======================================================================= #
+    @td_css_class = nil
+
+    # ======================================================================= #
+    # === Td.set_css_class
+    # ======================================================================= #
+    def self.set_css_class(i = DEFAULT_CSS_CLASS) # DEFAULT_CSS_CLASS is defined in cyberweb/toplevel_methods/css.rb
+      @td_css_class = i
+    end
+
+    # ======================================================================= #
+    # === Td.to_s
+    # ======================================================================= #
+    def self.to_s; @td_css_class.to_s; end
+
+    # ======================================================================= #
+    # === Td.padding=
+    #
+    # This is an alias towards "bspace", aka the "border-spacing" property.
+    # ======================================================================= #
+    def self.padding=(i)
+      Td.set_css_class('bspace'+i.to_s)
+    end
+
+    # ======================================================================= #
+    # === Td.reset
+    # ======================================================================= #
+    def self.reset
+      @td_css_class = nil
+    end; self.instance_eval { alias clear reset } # === Td.clear
+
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.string_td                                           (td tag)
+  #
+  # This creates a '<td>' tag, as String, which can be used in HTML Tables.
+  #
+  # Right now we will always close this tag.
+  # ========================================================================= #
+  def self.string_td(
+      optional_input = '',
+      css_class      = Td.to_s,
+      the_id         = '',
+      css_style      = ''
+    )
+    result = ''.dup
+    result << string_tag('td', css_class, the_id, css_style)
+    # ======================================================================= #
+    # === Handle blocks if given
+    #
+    # Yield if a block was given.
+    # ======================================================================= #
+    if block_given?
+      result << yield.to_s
+    elsif optional_input.to_s.empty? # Pass through as we did not pass in anything.
+    else
+      result << string_s2(optional_input) # Else, display it.
+    end
+    result << string_ctd
+    result
+  end
+
+  # ========================================================================= #
+  # === ctdtd
+  # ========================================================================= #
+  def ctdtd(optional_input = '')
+    ctd {
+      ee optional_input unless optional_input.empty?
+    }
+  end
+
+  # ========================================================================= #
+  # === ctdtr
+  # ========================================================================= #
+  def ctdtr
+    ctd
+    tr
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.ctrctd
+  # ========================================================================= #
+  def self.ctrctd
+    ctr; ctd
+  end
+
+  # ========================================================================= #
+  # === ctrctd
+  # ========================================================================= #
+  def ctrctd
+    ::Cyberweb.ctrctd
+  end
+
+  # ========================================================================= #
+  # === trtd
+  #
+  # This method generates a <tr> and a <td> tag.
+  # ========================================================================= #
+  def trtd(
+      optional_input = '',
+      css            = '',
+      the_id         = '',
+      css_style      = ''
+    )
+    tr css, the_id, css_style
+    ee '<td>'
+    s2 optional_input unless optional_input.empty?
+    if block_given?
+      yield
+      ctd
+      ctr
+    end
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.td
+  # ========================================================================= #
+  def self.td(
+      a = '', b = Td.to_s, c = '', d = '', &block
+    )
+    ee ::Cyberweb.string_td(a, b, c, d, &block)
+  end
+
+  # ========================================================================= #
+  # === ctd
+  # ========================================================================= #
+  def ctd(&block)
+    ::Cyberweb.ctd(&block)
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.ctd
+  # ========================================================================= #
+  def self.ctd(&block)
+    ee ::Cyberweb.string_ctd(&block)
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.string_ctd
+  # ========================================================================= #
+  def self.string_ctd(&block)
+    result = ''.dup
+    if block
+      result << block # Yield the content, then close the tag.
+    end
+    result << string_close(:td)
+    result
+  end
+
+  # ========================================================================= #
+  # === string_ctr
+  # ========================================================================= #
+  def string_ctr
+    ::Cyberweb.string_ctr
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.string_ctr
+  #
+  # This is equivalent to the string '</tr>', usually surrounded by two
+  # newlines - so "\n</tr>\n".
+  # ========================================================================= #
+  def self.string_ctr
+    string_close(:tr)
+  end; self.instance_eval { alias ctr string_ctr } # === Cyberweb.ctr
+
+  # ========================================================================= #
+  # === td
+  # ========================================================================= #
+  def td(
+      a = '', b = Td.to_s, c = '', d = '', &block
+    )
+    ::Cyberweb.td(a, b, c, d, &block)
+  end
+
+  # ========================================================================= #
+  # === ctdctr
+  # ========================================================================= #
+  def ctdctr
+    ctd; ctr
+  end
+
+  # ========================================================================= #
+  # === ctr
+  # ========================================================================= #
+  def ctr
+    ee ::Cyberweb.string_ctr
+  end
+
+end

data/lib/cyberweb/html_tags/textarea.rb

@@ -0,0 +1,138 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# require 'cyberweb/html_tags/textarea.rb'
+# Cyberweb.string_textarea()
+# =========================================================================== #
+module Cyberweb
+
+  require 'cyberweb/javascript/javascript.rb'
+
+  # ========================================================================= #
+  # === Textarea
+  # ========================================================================= #
+  class Textarea < WebBase
+
+    # ======================================================================= #
+    # === @textarea_css_class
+    # ======================================================================= #
+    @textarea_css_class = nil
+
+    # ======================================================================= #
+    # === Textarea.set_css_class
+    # ======================================================================= #
+    def self.set_css_class(i = DEFAULT_CSS_CLASS)
+      @textarea_css_class = i
+    end
+
+    # ======================================================================= #
+    # === Textarea.to_s
+    # ======================================================================= #
+    def self.to_s; @textarea_css_class; end
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.string_textarea
+  #
+  # This method will create a <textarea> tag, in a String representation.
+  # Thus, a String will be returned from this method.
+  #
+  #   print string_textarea('css_class','css_style','textarea_name',cols,rows,
+  #         'def content','javascript')
+  #
+  # Keep in mind that the following input is valid as well:
+  #
+  #   textarea {{ css_class: 'bblack' }}
+  #
+  # ========================================================================= #
+  def self.string_textarea(
+      default_content = '', # 1) content
+      css_class       = '', # 2) css-class
+      the_id          = '', # 3) the id
+      css_style       = '', # 4) css_style
+      n_cols          = 25, # 5) n columns
+      n_rows          = 8,  # 6) n rows
+      javascript      = '', # 7) javascript
+      name            = '', # 8) name
+      &block
+    )
+    if default_content.is_a? Hash
+      if default_content.has_key? :css_class
+        css_class = default_content.delete :css_class
+      end
+      if default_content.has_key? :css_style
+        css_style = default_content.delete :css_style
+      end
+    end
+    unless default_content.is_a? String
+      if default_content.is_a? Hash and default_content.empty?
+        default_content = ''
+      end
+      default_content = default_content.to_s
+    end
+    formtag  = '<textarea'.dup
+    formtag << ' cols="'+n_cols.to_s+'"'
+    formtag << ' rows="'+n_rows.to_s+'"'
+
+    # ======================================================================= #
+    # === Handle blocks given to this method next
+    # ======================================================================= #
+    if block_given?
+      yielded = yield
+      if yielded.is_a? Hash
+        if yielded.has_key? :css_class
+          css_class = yielded.delete(:css_class)
+        end
+      end
+    end
+
+    formtag << return_css_class(css_class)
+    formtag << return_the_id(the_id)
+    formtag << return_css_style(css_style)
+
+    if javascript
+      formtag << ' '
+      formtag << sanitize_javascript(javascript)
+    end
+    # ======================================================================= #
+    # Disable spellchecking:
+    # ======================================================================= #
+    formtag << ' spellcheck="false"'
+    if name and name.is_a?(String) and !name.empty?
+      formtag << " name=#{name}"
+    end
+    formtag << '>'
+    formtag << default_content
+    formtag << '</textarea>'
+    return formtag
+  end; self.instance_eval { alias stextarea string_textarea } # === Cyberweb.stextarea
+
+  # ========================================================================= #
+  # === textarea.
+  #
+  # Makes a html textarea, by delegating to the method stextarea().
+  #
+  # Cyberweb.textarea
+  #
+  #   x.textarea('Fill Me up')
+  #
+  # ========================================================================= #
+  def textarea(
+      default_content = '',
+      css_class  = Textarea.to_s,
+      the_id     = '',
+      css_style  = 'padding:5px',
+      n_cols     = 60,
+      n_rows     =  8,
+      javascript = '',
+      name       = ''
+    )
+    ee string_textarea(default_content, 
+      css_class, the_id, css_style,
+      n_cols, n_rows, javascript, name
+    )
+    newline
+  end; alias add_write_area textarea # === add_write_area
+
+end