cyberweb 0.4.174

data/lib/cyberweb/cgi/util.rb

@@ -0,0 +1,239 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+module Cyberweb
+
+require 'cyberweb/encoding/encoding.rb'
+
+class CGI
+  module Util; end
+  extend Util
+end # Define the Util module, and extend class CGI with it.
+
+module CGI::Util
+
+  @@accept_charset = 'UTF-8' unless defined?(@@accept_charset)
+
+  # ========================================================================= #
+  # === US_ASCII_ENCODING
+  # ========================================================================= #
+  US_ASCII_ENCODING = ::Cyberweb::Encoding::US_ASCII
+
+  # ========================================================================= #
+  # === Cyberweb::CGI::Util::TABLE_FOR_ESCAPE_HTML__
+  #
+  # The set of special characters and their escaped values
+  # ========================================================================= #
+  TABLE_FOR_ESCAPE_HTML__ = {
+    "'" => ''',
+    '&' => '&',
+    '"' => '"',
+    '<' => '&lt;',
+    '>' => '&gt;',
+  }
+
+  # ========================================================================= #
+  # === escape
+  #
+  # URL-encode a string.
+  #
+  # Invocation example:
+  #
+  #   url_encoded_string = CGI.escape("'Stop!' said Fred")
+  #      # => "%27Stop%21%27+said+Fred"
+  # ========================================================================= #
+  def escape(i)
+    encoding = i.encoding
+    i.b.gsub(/([^ a-zA-Z0-9_.\-~]+)/) { |m| # Tilde is escaped as well.
+      '%' + m.unpack('H2' * m.bytesize).join('%').upcase
+    }.tr(' ', '+').force_encoding(encoding)
+  end
+
+  # ========================================================================= #
+  # === unescape
+  #
+  # URL-decode a string with encoding(optional).
+  #   string = CGI.unescape("%27Stop%21%27+said+Fred")
+  #      # => "'Stop!' said Fred"
+  # ========================================================================= #
+  def unescape(string, encoding = @@accept_charset)
+    str = string.tr('+', ' ').b.gsub(/((?:%[0-9a-fA-F]{2})+)/) do |m|
+      [m.delete('%')].pack('H*')
+    end.force_encoding(encoding)
+    str.valid_encoding? ? str : str.force_encoding(string.encoding)
+  end
+
+  # ========================================================================= #
+  # === unescapeHTML
+  #
+  # Unescape a string that has been HTML-escaped.
+  #
+  # Usage example:
+  #
+  #   CGI.unescapeHTML("Usage: foo &quot;bar&quot; &lt;baz&gt;")
+  #      # => "Usage: foo \"bar\" <baz>"
+  # ========================================================================= #
+  def unescapeHTML(string)
+    return string unless string.include? '&'
+    enc = string.encoding
+    if enc != Encoding::UTF_8 && [Encoding::UTF_16BE, Encoding::UTF_16LE, Encoding::UTF_32BE, Encoding::UTF_32LE].include?(enc)
+      return string.gsub(Regexp.new('&(apos|amp|quot|gt|lt|#[0-9]+|#x[0-9A-Fa-f]+);'.encode(enc))) do
+        case $1.encode(US_ASCII_ENCODING)
+        when 'apos'               then "'".encode(enc)
+        when 'amp'                then '&'.encode(enc)
+        when 'quot'               then '"'.encode(enc)
+        when 'gt'                 then '>'.encode(enc)
+        when 'lt'                 then '<'.encode(enc)
+        when /\A#0*(\d+)\z/       then $1.to_i.chr(enc)
+        when /\A#x([0-9a-f]+)\z/i then $1.hex.chr(enc)
+        end
+      end
+    end
+    asciicompat = Encoding.compatible?(string, "a")
+    string.gsub(/&(apos|amp|quot|gt|lt|\#[0-9]+|\#[xX][0-9A-Fa-f]+);/) do
+      match = $1.dup
+      case match
+      when 'apos' then "'"
+      when 'amp'  then '&'
+      when 'quot' then '"'
+      when 'gt'   then '>'
+      when 'lt'   then '<'
+      when /\A#0*(\d+)\z/
+        n = $1.to_i
+        if enc == Encoding::UTF_8 or
+          enc == Encoding::ISO_8859_1 && n < 256 or
+          asciicompat && n < 128
+          n.chr(enc)
+        else
+          "&##{$1};"
+        end
+      when /\A#x([0-9a-f]+)\z/i
+        n = $1.hex
+        if enc == Encoding::UTF_8 or
+          enc == Encoding::ISO_8859_1 && n < 256 or
+          asciicompat && n < 128
+          n.chr(enc)
+        else
+          "&#x#{$1};"
+        end
+      else
+        "&#{match};"
+      end
+    end
+  end; alias unescape_html unescapeHTML # Synonym for CGI.unescapeHTML(str)
+
+  # ========================================================================= #
+  # === escape_element
+  #
+  # Escape only the tags of certain HTML elements in +string+.
+  #
+  # Takes an element or elements or array of elements.  Each element
+  # is specified by the name of the element, without angle brackets.
+  # This matches both the start and the end tag of that element.
+  # The attribute list of the open tag will also be escaped (for
+  # instance, the double-quotes surrounding attribute values).
+  #
+  #   print CGI.escapeElement('<BR><A HREF="url"></A>', "A", "IMG")
+  #     # "<BR>&lt;A HREF=&quot;url&quot;&gt;&lt;/A&gt"
+  #
+  #   print CGI.escapeElement('<BR><A HREF="url"></A>', ["A", "IMG"])
+  #     # "<BR>&lt;A HREF=&quot;url&quot;&gt;&lt;/A&gt"
+  # ========================================================================= #
+  def escape_element(string, *elements)
+    elements = elements.first if elements.first.is_a? Array
+    unless elements.empty?
+      string.gsub(/<\/?(?:#{elements.join("|")})(?!\w)(?:.|\n)*?>/i) do
+        CGI.escapeHTML($&)
+      end
+    else
+      string
+    end
+  end; alias escapeElement escape_element # Synonym for CGI.escape_element(i)
+
+  # ========================================================================= #
+  # === unescape_element
+  #
+  # Undo escaping such as that done by CGI.escapeElement()
+  #
+  #   print CGI.unescapeElement(
+  #           CGI.escapeHTML('<BR><A HREF="url"></A>'), "A", "IMG")
+  #     # "&lt;BR&gt;<A HREF="url"></A>"
+  #
+  #   print CGI.unescapeElement(
+  #           CGI.escapeHTML('<BR><A HREF="url"></A>'), ["A", "IMG"])
+  #     # "&lt;BR&gt;<A HREF="url"></A>"
+  # ========================================================================= #
+  def unescape_element(string, *elements)
+    elements = elements.first if elements.first.is_a? Array
+    unless elements.empty?
+      string.gsub(/&lt;\/?(?:#{elements.join("|")})(?!\w)(?:.|\n)*?&gt;/i) do
+        unescapeHTML($&)
+      end
+    else
+      string
+    end
+  end; alias unescapeElement unescape_element # Synonym for CGI.unescapeElement(i)
+
+  # ========================================================================= #
+  # === rfc1123_date
+  #
+  # Format a +Time+ object as a String using the format specified by RFC 1123.
+  #
+  #   CGI::rfc1123_date(Time.now)
+  #     # Sat, 01 Jan 2000 00:00:00 GMT
+  # ========================================================================= #
+  def rfc1123_date(time)
+    t = time.clone.gmtime
+    return format(
+      '%s, %.2d %s %.4d %.2d:%.2d:%.2d GMT',
+      RFC822_DAYS[t.wday], t.day, RFC822_MONTHS[t.month-1], t.year,
+      t.hour, t.min, t.sec
+    )
+  end
+
+  # ========================================================================= #
+  # === pretty
+  #
+  # Prettify (indent) a HTML string.
+  #
+  # +string+ is the HTML string to indent.
+  #
+  # +shift+ is the indentation unit to use; it defaults to two spaces.
+  #
+  #   print CGI.pretty("<HTML><BODY></BODY></HTML>")
+  #     # <HTML>
+  #     #   <BODY>
+  #     #   </BODY>
+  #     # </HTML>
+  #
+  #   print CGI.pretty("<HTML><BODY></BODY></HTML>", "\t")
+  #     # <HTML>
+  #     #         <BODY>
+  #     #         </BODY>
+  #     # </HTML>
+  # ========================================================================= #
+  def pretty(string, shift = '  ')
+    lines = string.gsub(/(?!\A)<.*?>/m, "\n\\0").gsub(/<.*?>(?!\n)/m, "\\0\n")
+    end_pos = 0
+    while end_pos = lines.index(/^<\/(\w+)/, end_pos)
+      element = $1.dup
+      start_pos = lines.rindex(/^\s*<#{element}/i, end_pos)
+      lines[start_pos ... end_pos] = "__" + lines[start_pos ... end_pos].gsub(/\n(?!\z)/, "\n" + shift) + "__"
+    end
+    lines.gsub(/^((?:#{Regexp.quote(shift)})*)__(?=<\/?\w)/, '\1')
+  end
+
+  # ========================================================================= #
+  # === escape_html
+  #
+  # Escape special characters in HTML, namely &\"<>
+  #   CGI.escapeHTML('Usage: foo "bar" <baz>')
+  #      # => "Usage: foo &quot;bar&quot; &lt;baz&gt;"
+  # ========================================================================= #
+  def escape_html(i)
+    i.gsub(/['&\"<>]/, TABLE_FOR_ESCAPE_HTML__)
+  end; alias h          escape_html
+       alias escapeHTML escape_html # === Synonym for CGI.escapeHTML(i)
+
+end; end

data/lib/cyberweb/charts/README.md

@@ -0,0 +1,2 @@
+This directory will contain charts, that is, charts that can
+be used to draw something on a webpage, via javascript.

data/lib/cyberweb/charts/google_charts.rb

@@ -0,0 +1,51 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+module Cyberweb
+
+  # ========================================================================= #
+  # === Cyberweb.create_chart
+  # ========================================================================= #
+  def self.create_chart(
+      i              = '',
+      use_this_title = 'How Much Pizza I Ate Last Night'
+    )
+    ejavascript "  // Load the Visualization API and the corechart package.
+      google.charts.load('current', {'packages':['corechart']});
+
+      // Set a callback to run when the Google Visualization API is loaded.
+      google.charts.setOnLoadCallback(drawChart);
+
+      // Callback that creates and populates a data table,
+      // instantiates the pie chart, passes in the data and
+      // draws it.
+      function drawChart() {
+
+        // Create the data table.
+        var data = new google.visualization.DataTable();
+        data.addColumn('string', 'Topping');
+        data.addColumn('number', 'Slices');
+        data.addRows([
+          ['Mushrooms', 3],
+          ['Onions', 1],
+          ['Olives', 1],
+          ['Zucchini', 1],
+          ['Pepperoni', 2]
+        ]);
+
+        // Set chart options
+        var options = {
+          'title': '"+use_this_title+"',
+          'width':400,
+          'height':300
+        };
+
+        // Instantiate and draw our chart, passing in some options.
+        var chart = new google.visualization.BarChart(document.getElementById('chart_div'));
+        chart.draw(data, options);
+      }
+"
+  end
+
+end

data/lib/cyberweb/classes/simple_form.rb

@@ -0,0 +1,55 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# require 'cyberweb/classes/simple_form.rb'
+# =========================================================================== #
+module Cyberweb
+
+# =========================================================================== #
+# === Cyberweb::SimpleForm
+#
+# This class will create a short <form> tag. Something like:
+#
+#   <form name="animation">
+#
+# To use it, do something like this:
+#
+#   simple_form.name = "animation"
+#
+# It is sort of experimental - my main aim was to be able to call methods
+# on HTML-entities within the main web-app.
+# =========================================================================== #
+class SimpleForm
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    reset
+  end
+
+  # ========================================================================= #
+  # === reset
+  # ========================================================================= #
+  def reset
+    @_ = '<form'.dup
+    @_
+  end
+
+  # ========================================================================= #
+  # === name=
+  # ========================================================================= #
+  def name=(i)
+    @_ << ' name="'+i+'"'
+    @_ << '>' # Add closing tag.
+  end
+
+  # ========================================================================= #
+  # === _?
+  # ========================================================================= #
+  def _?
+    @_
+  end
+
+end; end

data/lib/cyberweb/classes/tooltips.rb

@@ -0,0 +1,169 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Cyberweb::Tooltips
+#
+# This class will output code for a Tooltip. This tooltip can then be used
+# to style specific elements on a webpage.
+#
+# To use this in the web_object-project, do:
+#
+#   tooltip('yo there') {{ border_colour: 'yellow' }}
+#   tooltip('yo there') {{ border_colour: 'gray' }}
+#
+# First part is the text that should be displayed on the tooltip
+# in question. You can style things in the associated block.
+#
+# Usage example:
+#
+#   Cyberweb::Tooltips.new
+#
+# =========================================================================== #
+# require 'cyberweb/classes/tooltips.rb'
+# =========================================================================== #
+module Cyberweb
+
+class Tooltips # === Cyberweb::Tooltips
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      optional_hash = {},
+      run_already = true
+    )
+    reset
+    set_data(optional_hash)
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === reset                                                     (reset tag)
+  # ========================================================================= #
+  def reset
+    @_ = ''.dup
+    set_padding
+    @colour_of_border = '#dfdfdf'
+  end
+
+  # ========================================================================= #
+  # === set_data
+  # ========================================================================= #
+  def set_data(i = {})
+    @data = i
+  end
+
+  # ========================================================================= #
+  # === set_padding
+  # ========================================================================= #
+  def set_padding(i = 70)
+    i = i.to_i # Should be an Integer.
+    @padding_of_the_box = i
+  end
+
+  # ========================================================================= #
+  # === key?
+  # ========================================================================= #
+  def key?(i)
+    @data.has_key?(i)
+  end
+
+  # ========================================================================= #
+  # === set_colour
+  # ========================================================================= #
+  def set_colour(i)
+    @colour_of_border = i
+  end
+
+  # ========================================================================= #
+  # === process_main_hash
+  # ========================================================================= #
+  def process_main_hash
+    @data = Hash[@data.map{ |k, v| [k.to_s, v] }] # We wish to have strings.
+    if key? 'colour_of_border'
+      set_colour @data.delete('colour_of_border').to_s
+    end
+    if key? 'padding'
+      set_padding @data.delete('padding').to_s
+    end
+  end
+
+  # ========================================================================= #
+  # === string?
+  # ========================================================================= #
+  def string?
+    @_
+  end; alias result string? # === result
+       alias string string? # === string
+
+  # ========================================================================= #
+  # === add
+  # ========================================================================= #
+  def add(i)
+    @_ << i
+  end
+
+  # ========================================================================= #
+  # === append_css_style_string
+  # ========================================================================= #
+  def append_css_style_string
+    add "span.tooltip {
+  background: none repeat scroll 0 0 #F8F8F8;
+  border: 5px solid #{@colour_of_border};
+  color: #717171;
+  font-size: 13px;
+  height: 30px;
+  letter-spacing: 1px;
+  line-height: 30px;
+  margin: 0 auto;
+  position: relative;
+  text-align: center;
+  text-transform: uppercase;
+  top: -75px;
+  left:-45px;
+  display:none;
+  padding:0 #{@padding_of_the_box}px;
+}
+
+span.tooltip:after{
+  content:'';
+  position:absolute;
+  bottom: -10px;
+  width:   10px;
+  height:  10px;
+  border-bottom:5px solid #{@colour_of_border};
+  border-right: 5px solid #{@colour_of_border};
+  background:#f8f8f8;
+  left:50%;
+  margin-left:-5px;
+  -moz-transform:rotate(45deg);
+  -webkit-transform:rotate(45deg);
+  transform:rotate(45deg);
+}
+p {
+  margin:100px;
+  float:left;
+  position:relative;
+  cursor:pointer;
+}
+
+p:hover span {
+  display:block;
+}"
+  end
+
+  # ========================================================================= #
+  # === run                                                         (run tag)
+  # ========================================================================= #
+  def run
+    process_main_hash
+    append_css_style_string
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  _ = Cyberweb::Tooltips.new(ARGV)
+  puts _.result
+end # tooltips