cyberweb 0.4.174

data/lib/cyberweb/svg/tilted_arcs.svg

@@ -0,0 +1,74 @@
+<?xml version="1.0"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN" 
+         "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+
+<svg xmlns="http://www.w3.org/2000/svg" 
+     xmlns:xlink="http://www.w3.org/1999/xlink"
+     id="canvas" 
+     width="2000" 
+     height="2000"
+     onload="init()">
+    
+  <style type="text/css">
+      .ellipse
+      {
+        stroke: red;
+        stroke-width: 2;
+        fill: blue;
+        fill-opacity: 0.1;
+      }
+
+      .axes
+      {
+        stroke: blue;
+        stroke-width: 1;
+      }   
+  </style>
+
+  <script>
+      <![CDATA[
+      var COLS = 4;
+      var ROWS = 4;
+      var RX   = 80;
+      var RY   = 30;
+
+      function init()
+      {
+        var canvas = document.getElementById("canvas");
+
+        var angleStep = 360.0/(COLS*ROWS);
+        var spacing = 2*Math.max(RX, RY)+10;
+        for (var c = 0; c < COLS; ++c) {
+          for (var r = 0; r < ROWS; ++r) {
+            var ellipse = createEllipse((c+ COLS*r)*angleStep, spacing*(c+0.5), spacing*(r+0.5), RX, RY);
+            canvas.appendChild(ellipse);
+          }
+        }
+      }
+
+      function createEllipse(phi, x, y, rx, ry)
+      {
+        var degPerRad = Math.PI/180.0;
+        var e1x = rx*Math.cos(phi*degPerRad);
+        var e1y = rx*Math.sin(phi*degPerRad);
+        var e2x = ry*Math.cos((phi+90)*degPerRad);
+        var e2y = ry*Math.sin((phi+90)*degPerRad);
+
+        var axes  = document.createElementNS("http://www.w3.org/2000/svg", "path");
+        axes.setAttribute("class", "axes");
+        axes.setAttribute("d", "M"+x+","+y+" l"+e1x+","+e1y+"M"+x+","+y+" l"+e2x+","+e2y);
+        var ellipse = document.createElementNS("http://www.w3.org/2000/svg", "path");
+        ellipse.setAttribute("class", "ellipse");
+        ellipse.setAttribute("d", "M" + (x+e1x) + "," + (y+e1y) +
+                                  "A" + rx + "," + ry + " " + phi + " 0,1 " + (x+e2x) + "," + (y+e2y) +
+                                  "A" + rx + "," + ry + " " + phi + " 1,1 " + (x+e1x) + "," + (y+e1y) +"z");
+
+        var group = document.createElementNS("http://www.w3.org/2000/svg", "g");
+        group.appendChild(axes);
+        group.appendChild(ellipse);
+        return group;
+      }
+
+      ]]>
+    </script>
+</svg>

data/lib/cyberweb/svg/transparent_rect.svg

@@ -0,0 +1,12 @@
+<?xml version="1.0" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN" 
+"http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+
+<svg width="100%" height="100%" version="1.1"
+xmlns="http://www.w3.org/2000/svg">
+
+<rect x="20" y="20" width="250" height="250"
+style="fill:blue;stroke:pink;stroke-width:5;
+fill-opacity:0.1;stroke-opacity:0.9"/>
+
+</svg>

data/lib/cyberweb/svg/yellow_fe_blending.svg

@@ -0,0 +1,42 @@
+<?xml version="1.0" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN" 
+"http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+
+<svg width="100%" height="100%" version="1.1"
+xmlns="http://www.w3.org/2000/svg">
+
+<defs> 
+<linearGradient id="MyGradient" gradientUnits="userSpaceOnUse" x1="100" y1="0" x2="300" y2="0"> 
+	<stop offset="0" style="stop-color:#000000"/> 
+	<stop offset=".67" style="stop-color:#ffff00"/> 
+	<stop offset="1" style="stop-color:#000000"/> 
+</linearGradient> 
+<filter id="normal"> 
+	<feBlend mode="normal" in2="BackgroundImage"/> 
+</filter> 
+<filter id="multiply"> 
+	<feBlend mode="multiply" in2="BackgroundImage"/> 
+</filter> 
+<filter id="screen"> 
+	<feBlend mode="screen" in2="BackgroundImage"/> 
+</filter> 
+<filter id="darken"> 
+	<feBlend mode="darken" in2="BackgroundImage"/> 
+</filter> 
+<filter id="lighten"> 
+	<feBlend mode="lighten" in2="BackgroundImage"/> 
+</filter> 
+</defs> 
+
+<g style="enable-background: new"> 
+<rect x="40" y="20" width="300" height="450" style="fill:url(#MyGradient)"/> 
+<g style="font-size:75;fill:#888888;fill-opacity:.6"> 
+	<text x="50" y="90" style="filter:url(#normal)">Normal</text> 
+	<text x="50" y="180" style="filter:url(#multiply)">Multiply</text> 
+	<text x="50" y="270" style="filter:url(#screen)">Screen</text> 
+	<text x="50" y="360" style="filter:url(#darken)">Darken</text> 
+	<text x="50" y="450" style="filter:url(#lighten)">Lighten</text> 
+</g> 
+</g>
+
+</svg>

data/lib/cyberweb/toplevel_methods/a.rb

@@ -0,0 +1,131 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# require 'cyberweb/toplevel_methods/a.rb'
+# =========================================================================== #
+module Cyberweb
+
+  require 'cyberweb/toplevel_methods/ee.rb'
+
+  # ========================================================================= #
+  # === Cyberweb.parse_a
+  # ========================================================================= #
+  def self.parse_a(
+      i = 'FileUtils.copyDirectory(): http://commons.apache.org/proper/commons-io/apidocs/org/apache/commons/io/FileUtils.html#copyDirectory%28java.io.File,%20java.io.File%29'
+    )
+    if i.include? ':'
+      splitted    = i.split(':')
+      content     = splitted.first
+      link_target = splitted.last
+      a(
+        href: link_target,
+        content: content
+      )
+    end
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.a                                          (link tag, a tag)
+  #
+  # This method will delegate onto the HtmlTags project, after doing
+  # some pre-processing. It will create the HTML tag that governs
+  # HTML-related links.
+  #
+  # a() is a shortcut and means to "anchor" a link into a html document.
+  # link() is a convenient alias to this method, in my opinion. In plain
+  # HTML, this would correspond to a <a> html tag.
+  #
+  # Thus, this method will effectively create a link to a specific
+  # location.
+  #
+  # If the second argument, `link_description`, is set to :n then
+  # we will use link_hyperref as name. This argument also accepts some
+  # special argument-names, such as SELF_BASE - see the body of this
+  # method for a full explanation of these.
+  #
+  # Specific Usage Examples:
+  #
+  #   Cyberweb.link('Some Site','www.xyllomer.de','s1em','','id','aaaa',1)
+  #   link hyperref = 'www.xyllomer.de', description = 'StdLink', linebreak = 0,
+  #   link 'Some Desc','www.xyllomer.de','css s3px','style','id',1
+  #   Cyberweb.a(content: 'https://en.wikipedia.org/wiki/Bacteriochlorophyll', description: 'SELF')
+  #
+  # ========================================================================= #
+  def self.a(*i)
+    arguments = i.flatten
+    # ======================================================================= #
+    # The old order of the arguments was:
+    #
+    #   link_hyperref     = 'www.google.at',
+    #   link_description  = 'SELF',
+    #   default_linebreak = 1,
+    #   css_class         = A.to_s, # Use the default CSS class here.
+    #   the_id            = '',
+    #   css_style         = '',
+    #   use_js            = 0,
+    #   target            = '',
+    #   title             = ''
+    #
+    # ======================================================================= #
+    arguments[0] = sanitize_url(arguments[0]).to_s # pass link_hyperref through sanitize_url()
+    if arguments[2] == :br # Use an exception here.
+      arguments[2] = :make_newline
+    end
+    yield if block_given? # yield extra params
+    # ======================================================================= #
+    # In the past we delegate onto string_link(), but we will use
+    # HtmlTags.a() instead as of 31.01.2020.
+    # ======================================================================= #
+    ee HtmlTags.a(arguments)
+  end; self.instance_eval { alias link a } # === Cyberweb.link
+
+  # ========================================================================= #
+  # === a
+  # ========================================================================= #
+  def a(*i, &block)
+    ::Cyberweb.a(i, &block)
+  end; alias link a # === link
+
+  # ========================================================================= #
+  # === Cyberweb.abr
+  #
+  # This method combines the <a> tag with the <br> tag.
+  # ========================================================================= #
+  def self.abr(*i)
+    ::Cyberweb.a(i)
+    ::Cyberweb.br
+  end
+
+  # ========================================================================= #
+  # === abr
+  # ========================================================================= #
+  def abr(*i, &block)
+    ::Cyberweb.abr(i, &block)
+  end
+
+  # ========================================================================= #
+  # === Cyberweb.linkbr
+  #
+  # This method combines a() with <br> essentially.
+  # ========================================================================= #
+  def self.linkbr(*i)
+    ::Cyberweb.a(i)
+    br
+  end
+
+  # ========================================================================= #
+  # === linkbr
+  # ========================================================================= #
+  def linkbr(*i)
+    ::Cyberweb.linkbr(i)
+  end
+
+  # ========================================================================= #
+  # === parse_a
+  # ========================================================================= #
+  def parse_a(i = '')
+    ::Cyberweb.parse_a(i)
+  end
+
+end

data/lib/cyberweb/toplevel_methods/anmerkung.rb

@@ -0,0 +1,67 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+module Cyberweb
+
+  # ========================================================================= #
+  # === Cyberweb.anmerkung
+  #
+  # This method will do a little notification on the website.
+  #
+  # The default css class is assigned through the object css.
+  # This object is defined in the file css.rb.
+  # ========================================================================= #
+  def self.anmerkung(
+      i                  = '',
+      css_class          = css.optional, # Obtain the default css-class.
+      optional_id        = '',
+      optional_css_style = '',
+      use_this_as_image  = sg(:anmerkung, 'marr5px')
+    )
+    anmerkung_image = use_this_as_image
+    if css_class.is_a? Hash
+      if css_class.has_key? :margin_left
+        optional_css_style << " margin-left: #{css_class.delete(:margin_left)}"
+        css_class = ''
+      end
+    end
+    case css_class
+    when :error_box # Then we display it in an error-box layout.
+      error_box(i, css_class, optional_id, optional_css_style) {
+        { use_this_as_image: anmerkung_image }
+      }
+    else # Else assume this to be a <span> tag, followed by a <br> tag. 
+      e "#{anmerkung_image}#{i}",
+        css_class, optional_id, optional_css_style
+    end
+  end; self.instance_eval { alias anm        anmerkung } # === Cyberweb.anm (anm tag)
+       self.instance_eval { alias annotation anmerkung } # === Cyberweb.annotation
+
+  # ========================================================================= #
+  # === anmerkung
+  # ========================================================================= #
+  def anmerkung(
+      a = '', b = css.optional, c = '', d = ''
+    )
+    ::Cyberweb.anmerkung(a, b, c, d)
+  end; alias anm        anmerkung # === anm
+       alias annotation anmerkung # === annotation
+
+  # ========================================================================= #
+  # === doppel_anm
+  #
+  # This is as "anmerkung" but with two anmerkung_images.
+  # ========================================================================= #
+  def doppel_anm(
+      i                  = '',
+      css_class          = css.optional, # Obtain the default css-class.
+      optional_id        = '',
+      optional_css_style = ''
+    )
+    anmerkung_image = sg(:anmerkung, 'marr5px')
+    e "#{anmerkung_image}#{i} #{anmerkung_image}",
+      css_class, optional_id, optional_css_style
+  end
+
+end

data/lib/cyberweb/toplevel_methods/audio.rb

@@ -0,0 +1,59 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# require 'cyberweb/toplevel_methods/audio.rb'
+# Cyberweb.audio
+# =========================================================================== #
+module Cyberweb
+
+  # ========================================================================= #
+  # === Cyberweb.audio
+  #
+  # Use this method to embed audio into a webpage, via HTML5.
+  #
+  # Example documentation for the <audio> tag can be found here:
+  #
+  #   https://www.w3schools.com/tags/tag_audio.asp
+  #   https://developer.mozilla.org/en/docs/Web/HTML/Element/audio
+  #
+  # In pure HTML5, we could generate code such as the following:
+  #
+  #   <audio src="song.ogg" controls="controls">
+  #   </audio>
+  #
+  # All <audio> HTML 5 Attributes:
+  #
+  # Attribute    Value     Description
+  #
+  #   autoplay   autoplay  Specifies that the audio will start playing as soon
+  #                        as it is ready.
+  #   controls   controls  Specifies that controls will be displayed, i.e. a
+  #                        play button.
+  #   loop       loop      Specifies that audio will start playing again in
+  #                        a loop when end is reached
+  #   preload    preload   Specifies that audio will be loaded at page load,
+  #                        and ready to run. Ignored if autoplay is present.
+  #   src        url       Specifies the URL of the audio to play
+  #
+  # To use this in my setup:
+  #
+  #   audio '/Depot/Audio/Vivaldi_4Seasons_Winter.mp3'
+  #
+  # ========================================================================= #
+  def self.audio(
+      url               = '',
+      optional_autoplay = false
+    )
+    result = HtmlTags.audio(url, optional_autoplay)
+    return result if result
+  end
+
+  # ========================================================================= #
+  # === audio
+  # ========================================================================= #
+  def audio(a = '', b = false)
+    ::Cyberweb.audio(a,b)
+  end
+
+end

data/lib/cyberweb/toplevel_methods/bold.rb

@@ -0,0 +1,65 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# require 'cyberweb/toplevel_methods/bold.rb'
+# =========================================================================== #
+module Cyberweb
+
+  require 'cyberweb/toplevel_methods/sbr.rb'
+  require 'cyberweb/html_tags/span.rb'
+
+  # ========================================================================= #
+  # === bold
+  # ========================================================================= #
+  def bold(a, b = '', c = '', d = '')
+    ::Cyberweb.bold(a, b, c, d)
+  end; alias b bold # === b
+
+  # ========================================================================= #
+  # === Cyberweb.bold
+  #
+  # This will output whatever is passed in BOLD fashion. b is an alias
+  # to this method.
+  # ========================================================================= #
+  def self.bold(
+      text, css_class = '', the_id = '', css_style = ''
+    )
+    if css_class.include? ' BO '
+      css_class.sub!(/ BO /,' ') # We have to remove any 'BO' class.
+    end
+    s(text, 'span', 'BO '+css_class, the_id, css_style)
+  end; self.instance_eval { alias b bold } # === Cyberweb.b
+
+  # ========================================================================= #
+  # === boldbr
+  #
+  # This will output whatever is passed in BOLD fashion. bbr is an alias
+  # to it.
+  # ========================================================================= #
+  def boldbr(text,
+      css_class = '', the_id = '', css_style = ''
+    )
+    bold(text, 'BO '+css_class, the_id, css_style)
+    br
+  end; alias bbr  boldbr
+       alias bsbr boldbr # bsbr because of sbr, and prepending a b to it is often easier.
+
+  # ========================================================================= #
+  # === bbr2
+  # ========================================================================= #
+  def self.bbr2(
+      text, css_class = '', the_id = '', css_style = ''
+    )
+    bold(text, 'BO padl1em '+css_class, the_id, css_style)
+    br
+  end
+  
+  # ========================================================================= #
+  # === bbr2
+  # ========================================================================= #
+  def bbr2(a, b = '', c = '', d = '')
+    ::Cyberweb.bbr2(a, 'BO padl1em '+b, c, d)
+  end
+  
+end

data/lib/cyberweb/toplevel_methods/cgi.rb

@@ -0,0 +1,65 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# This file contains toplevel-code that relates to the CGI interface of
+# Cyberweb, which in turn is just copy-paste of ruby's core cgi method.
+# =========================================================================== #
+# require 'cyberweb/toplevel_methods/cgi.rb'
+# =========================================================================== #
+module Cyberweb
+
+  # ========================================================================= #
+  # === cgi?
+  # ========================================================================= #
+  def cgi?
+    ::Cyberweb::CGI.new
+  end
+
+  # ========================================================================= #
+  # === query_string?
+  # ========================================================================= #
+  def query_string?(i = cgi?)
+    i.query_string
+  end; alias env? query_string? # === env?
+
+  # ========================================================================= #
+  # === load_cgi                                                    (cgi tag)
+  #
+  # Use this to method to load a .cgi file. The input to this method
+  # should be a proper .cgi file in question. 
+  # ========================================================================= #
+  def load_cgi(
+      i = 'symbols.cgi'
+    )
+    _ = readlines(i)
+    _.shift if _.first.start_with? '#'
+    _.shift if _.first.start_with? '#' # kill the first two leading lines if they start with a '#' character.
+    _ = _.join
+    if block_given?
+      yielded = yield
+      case yielded
+      when :with_border # We want a border.
+        div('pad1em padt0_5em marb0_5em','','border: 2px dashed darkseagreen;')
+      end
+    end
+    # eval _ # This was the eval case.
+    load(i) # This can take advantage of the input alone.
+    if block_given?
+      cdiv if yield == :with_border # We close the border properly again.
+    end
+  end; alias run_cgi               load_cgi # === run_cgi
+       alias show_cgi              load_cgi # === show_cgi
+       alias view_cgi_file         load_cgi # === view_cgi_file
+       alias display_this_cgi_file load_cgi # === display_this_cgi_file
+
+  # ========================================================================= #
+  # === unescape_html
+  #
+  # Cyberweb.unescape_html('a < 100 & &')
+  # ========================================================================= #
+  def unescape_html(i)
+    ee ::Cyberweb::CGI.unescape_html(i)
+  end
+
+end

data/lib/cyberweb/toplevel_methods/charsets.rb

@@ -0,0 +1,52 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# Note that CSS can also use an encoding charset, via something like:
+#
+#   @charset "UTF-8";
+#
+# =========================================================================== #
+# require 'cyberweb/toplevel_methods/charsets.rb'
+# =========================================================================== #
+module Cyberweb
+
+  require 'cyberweb/constants/standalone_constants.rb'
+
+  # ========================================================================= #
+  # === Cyberweb.return_utf_charset                                 (utf tag)
+  #
+  # Return the proper UTF charset in the header. Note that UTF-8 is the
+  # default charset for HTML5.
+  #
+  # This would return the string '<meta charset="UTF-8">'.
+  # ========================================================================= #
+  def self.return_utf_charset
+    "<meta charset=\"UTF-8\">#{NL}"
+  end; self.instance_eval { alias return_utf          return_utf_charset } # === Cyberweb.return_utf
+       self.instance_eval { alias return_unicode_meta return_utf_charset } # === Cyberweb.return_unicode_meta
+
+  # ========================================================================= #
+  # === Cyberweb.return_iso_8859_charset                           (iso tag)
+  # ========================================================================= #
+  def self.return_iso_8859_charset
+    "<meta charset=\"ISO-8859-1\">#{NL}"
+  end; self.instance_eval { alias return_iso          return_iso_8859_charset } # === Cyberweb.return_iso
+       self.instance_eval { alias return_iso_encoding return_iso_8859_charset } # === Cyberweb.return_iso_encoding
+
+  # ========================================================================= #
+  # === return_iso_8859_charset
+  # ========================================================================= #
+  def return_iso_8859_charset
+    ::Cyberweb.return_iso_8859_charset
+  end; alias return_iso          return_iso_8859_charset # === return_iso
+       alias return_iso_encoding return_iso_8859_charset # === return_iso_encoding
+
+  # ========================================================================= #
+  # === return_utf_charset
+  # ========================================================================= #
+  def return_utf_charset
+    ::Cyberweb.return_utf_charset
+  end; alias return_utf return_utf_charset # === return_utf 
+
+end

data/lib/cyberweb/toplevel_methods/clear.rb

@@ -0,0 +1,30 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# require 'cyberweb/toplevel_methods/clear.rb'
+# =========================================================================== #
+module Cyberweb
+
+  # ========================================================================= #
+  # === Cyberweb.clear
+  #
+  # We can use this to clear any predefined-css for any tag. The
+  # alternative would be to, e. g., use Div.clear.
+  #
+  # The name of the tag should be passed to this method.
+  #
+  # Usage example:
+  #
+  #   Cyberweb.clear :div
+  #
+  # ========================================================================= #
+  def self.clear(
+      clear_this_html_tag = :div
+    ) # Need to clear the <div> tag again.
+    namespace  = "::Cyberweb::#{clear_this_html_tag.to_s.capitalize}"
+    class_name = Object.const_get(namespace)
+    class_name.send :clear
+  end; self.instance_eval { alias clear_this_html_tag clear } # === Cyberweb.clear_this_html_tag
+
+end

data/lib/cyberweb/toplevel_methods/close.rb

@@ -0,0 +1,62 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# require 'cyberweb/toplevel_methods/close.rb'
+# =========================================================================== #
+module Cyberweb
+
+  # ========================================================================= #
+  # === Cyberweb.string_close
+  # ========================================================================= #
+  def self.string_close(
+      i = 'div',
+      &block
+    )
+    i = i.to_s.dup
+    if i.include?('"') and i.include?('class')
+      i = i.split('class').first.strip
+    end
+    HtmlTags.close(i, &block) # Delegate towards HtmlTags.
+  end; self.instance_eval { alias sclose string_close } # === Cyberweb.sclose
+
+  # ========================================================================= #
+  # === string_close      (string close. Closes a html tag. string_close tag)
+  #
+  # This method will return a closed </tag> string.
+  #
+  # Does a tiny bit of sanitizing if special tags are applied - this will 
+  # be done as part of the HtmlTags library.
+  #
+  # Usage examples:
+  #
+  #   sclose 'div'
+  #   sclose :div
+  #
+  # ========================================================================= #
+  def string_close(
+      i = 'div',
+      &block
+    )
+    ::Cyberweb.string_close(i, &block)
+  end; alias sclose string_close # (sclose tag)
+
+  # ========================================================================= #
+  # === Cyberweb.eclose
+  #
+  # close, c tag. close tag. Invokes sclose(), then outputs the result.
+  # ========================================================================= #
+  def self.eclose(i, &block)
+    ee string_close(i, &block)
+  end; self.instance_eval { alias c eclose } # (c tag)
+
+  # ========================================================================= #
+  # === eclose
+  #
+  # close, c tag. close tag. Invokes sclose(), then outputs the result.
+  # ========================================================================= #
+  def eclose(i, &block)
+    ::Cyberweb.eclose(i, &block)
+  end; alias c eclose # (c tag)
+
+end