qooxview 1.9.9

data/lib/qooxview.rb

@@ -0,0 +1,83 @@
+=begin rdoc
+:title:QooxView
+:main:QooxView.rb
+QooxView - a nice interface to use QooxDoo in Ruby, following the MVC-model.
+It is split in a *backend*, containing the _model_ and _controller_-part (and some
+of the _view_), written in Ruby, and the *frontend*, handling the main part of the
+_view_, written in JavaScript, using QooxDoo.
+
+*Backend* with logic, including
+- Entities for logical blocks (the _model_)
+- View for how to display the blocks (part of the _view_ and the _controller_)
+*Frontend*, holding all code to work with QooxDoo and display the _view_, linked
+to the Backend using RPC-calls
+
+It is thought to do as much autoconfiguration as possible.
+
+=View s
+
+Thus, the most simple example is the following:
+
+require 'QooxView.rb'
+
+class Welcome < View
+def initialize
+show_info :welcome, "hello world"
+end
+end
+
+QooxView::startWeb
+
+Which does nothing else than show off "hello world". We can add some buttons
+and act upon pressing them:
+
+require 'QooxView.rb'
+
+class Welcome < View
+def initialize
+show_info :welcome, "hello world"
+show_button :welt, :world
+end
+def rpc_button_welt( session, args* )
+reply( 'update', { :welcome => "Hallo Welt" } )
+end
+def rpc_button_world( session, args* )
+reply( 'update', { :welcome => "Hello world" } )
+end
+end
+
+QooxView::startWeb
+
+= Entities
+
+In addition to views, it is possible to have a _model_ of data using the *Entities*.
+Copied from ActiveRecords, there is the class in Plural, containing the general
+handling (searching, saving, loading) of the data, and the class in the singular,
+doing the handling of the special cases on one data.
+
+To make things nicer, a definition of an entity starts out with a list of the elements
+found therein, which happen to be used often also in the view-part, so it's a bit
+of both:
+
+=== CSV storage
+
+=== LDAP storage
+
+=== SQLite storage
+
+= Other goodies
+
+=== Session handling
+
+=== Permission checking
+
+=== Loading of Entities and View s from directories
+
+=== Configuration-file
+
+A simple YAML-configuration style is supported by default.
+
+=end
+
+require 'bundler/setup'
+require 'qooxview/qooxview'

data/qooxview.gemspec

@@ -0,0 +1,50 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'qooxview/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = 'qooxview'
+  spec.version       = Qooxview::VERSION
+  spec.authors       = ['Linus Gasser']
+  spec.email         = ['ineiti@linusetviviane.ch']
+  spec.summary       = %q{Implements a ruby-backend for QooxDoo.org}
+  spec.description   = %q{This is a very simple framework to create small
+  frontends in a webserver}
+  spec.homepage      = 'https://github.com/ineiti/qooxview'
+  spec.license       = 'GPLv3'
+
+  spec.files         = `git ls-files -z`.split("\x0")
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.test_files    = spec.files.grep(%r{^(test|spec|features)/})
+  spec.require_paths = ['lib']
+
+  spec.add_dependency 'activemodel', '3.1.1'
+  spec.add_dependency 'activerecord', '3.1.1'
+  spec.add_dependency 'sqlite3', '1.3.10'
+  spec.add_dependency 'activesupport', '3.1.1'
+  spec.add_dependency 'arel', '2.2.1'
+  spec.add_dependency 'chunky_png', '1.3.4'
+  spec.add_dependency 'gettext', '3.0.0'
+  spec.add_dependency 'i18n', '0.6.0'
+  spec.add_dependency 'iconv', '1.0.3'
+  spec.add_dependency 'json', '1.8.2'
+  spec.add_dependency 'locale', '2.0.8'
+  spec.add_dependency 'multi_json', '1.0.3'
+  spec.add_dependency 'net-ldap', '0.5.1'
+  spec.add_dependency 'parseconfig', '0.5.2'
+  spec.add_dependency 'pdf-core', '0.5.1'
+  spec.add_dependency 'prawn', '2.0.1'
+  spec.add_dependency 'rqrcode', '0.4.2'
+  spec.add_dependency 'rubyzip', '1.1.7'
+  spec.add_dependency 'serialport', '1.3.1'
+  spec.add_dependency 'text', '1.2.3'
+  spec.add_dependency 'ttfunk', '1.4.0'
+  spec.add_dependency 'docsplit', '0.7.6'
+  spec.add_dependency 'rqrcode-with-patches', '0.5.4'
+  spec.add_dependency 'helper_classes', '0.3.1'
+  spec.add_development_dependency 'perftools.rb', '2.0.1'
+  spec.add_development_dependency 'bundler', '~> 1.7'
+  spec.add_development_dependency 'rake', '~> 10.0'
+end
+

data/test/benchmark_creation.rb

@@ -0,0 +1,37 @@
+#!/usr/bin/env ruby -I.. -I.
+DEBUG_LVL = 0
+CONFIG_FILE='config.yaml'
+require 'QooxView'
+require 'st_dummy'
+
+
+Permission.add( 'default', 'View,View.Login' )
+Permission.add( 'admin', '.*' )
+Permission.add( 'internet', 'Internet,PersonShow', 'default' )
+Permission.add( 'student', '', 'internet' )
+Permission.add( 'professor', '', 'student' )
+Permission.add( 'secretary', 'PersonModify,FlagAddInternet', 'professor' )
+
+QooxView.init( 'entities', 'views' )
+
+require 'rubygems'
+require 'perftools'
+PerfTools::CpuProfiler.start("/tmp/profile.create") do
+  Entities.delete_all_data()
+  Benchmark.bm{|x|
+			
+    (0..4).each{|b|
+      x.report( "Users #{(b*50).to_s.rjust(3)}" ){
+        (1..50).each{|i|
+          Entities.Persons.create( :first_name => "admin#{b*50+i}", :pass => "super123", :session_id => '0.1', :permission => 'admin' )
+        }
+      }
+    }
+  }
+end
+
+puts 'Now run the following:
+    pprof.rb --pdf /tmp/profile.create > /tmp/profile.create.pdf
+    open /tmp/profile.create.pdf
+    CPUPROFILE_FREQUENCY=500
+'

data/test/config.yaml

@@ -0,0 +1,36 @@
+StorageType:
+  CSV:
+    csv_dir: ./data2/
+
+Views:
+ Welcome:
+  need_pass: true
+  hide_pass: false
+
+Entities:
+  LogActions:
+    logging: false
+
+StorageType:
+  STdummy1:
+    conf: passit
+    
+TestConfig:
+  One: true
+  Two: "hello"
+  Three:
+    Thirty: 30
+
+TestList:
+  - one
+  - two three
+
+TestLink2: |
+  Something over
+  multiple lines:
+  one two three
+
+TestLink1:
+  - "Link: <a href='hello there'>link</a>"
+
+#profiling: profile.txt

data/test/entities/config.rb

@@ -0,0 +1,33 @@
+require 'qooxview/helpers/config_base'
+
+class ConfigBases < Entities
+  def add_config
+    @@functions = %w( take over world now or never linux on desktop ).to_sym
+    @@functions_base = {:take => [:now, :never], :linux => [:now]}
+    @@functions_conflict = [[:now, :or]]
+
+    value_list :value, "%w( one two three )"
+    value_int :integer
+  end
+end
+
+class ConfigBase < Entity
+  def setup_defaults
+    self.integer ||= 0
+  end
+
+  def update(action, value_new, value_old = nil)
+    dputs(3){"Action #{action.inspect} changed to #{value_new.inspect} from "+
+        "#{value_old.inspect}"}
+    case action
+      when :function_add
+        if value_new.index :now
+          self.integer += 1
+        end
+      when :function_del
+        if value_new.index :now
+          self.integer += 3
+        end
+    end
+  end
+end

data/test/entities/course.rb

@@ -0,0 +1,28 @@
+class Courses < Entities
+  attr_accessor :static
+
+  def setup_data
+    value_block :first_name
+    value_str :first_name
+    value_date :start
+    value_date :end
+    
+    value_block :address
+    value_str :street
+    value_str :plz
+    value_str :tel
+    
+    value_block :names
+    value_entity_Persons_all :teacher, :drop, :first_name, proc { |p| p.credit and p.credit > 1000 }
+    value_entity_Persons_empty_all :assistant, :drop, :first_name
+    value_list_entity_persons :students, :login_name
+
+    ConfigBases.add_observer(self)
+  end
+
+  def update(action, value, old)
+    if action == :function_add
+      Courses.search_all_.each{|c| c.tel = c.tel.to_s + '1'}
+    end
+  end
+end

data/test/entities/databases.rb

@@ -0,0 +1,17 @@
+class Movements < Entities
+  def setup_data
+    @default_type = :SQLite
+    
+    value_str :desc
+    value_int :money
+  end
+end
+
+class Accounts < Entities
+  def setup_data
+    @default_type = :SQLite
+    
+    value_str :name
+    value_int :multiplier
+  end
+end

data/test/entities/doubleCase.rb

@@ -0,0 +1,12 @@
+class DoubleCases < Entities
+  def setup_data
+    value_str :name
+  end
+end
+
+class Doubles < Entities
+  def setup_data
+    value_str :name
+    value_entity_doubleCase :dc
+  end
+end

data/test/entities/dummies.rb

@@ -0,0 +1,24 @@
+class Dummies < Entities
+  def setup_data
+    @default_type = :STdummy1
+    add_new_storage :STdummy2, :conf => 'hello'
+    
+    value_str :first_name
+    value_str_STdummy2 :phone, :length => 20
+    value_list_array_STdummy2 :address, '[]', :size => 40
+    
+    value_int_STdummy2 :dummy_id, :chars => 30
+    
+    value_str_STdummy3 :no_cache
+  end
+end
+
+class Dummy < Entity
+  def get_storage
+    @proxy.storage
+  end
+  
+  def field_args( field )
+    @proxy.field_args( field )
+  end
+end

data/test/entities/inventory.rb

@@ -0,0 +1,6 @@
+class CVSInventories < Entities
+  def setup_data
+    value_date :date
+    value_str :iname
+  end
+end

data/test/entities/needs.rb

@@ -0,0 +1,20 @@
+
+class Need1s < Entities
+  attr :ok
+  self.needs :Need2s
+
+  def setup_data
+    dputs(2) { 'Need1s setting up' }
+    @ok = Entities.is_setup?(:Need2)
+  end
+end
+
+
+class Need2s < Entities
+  attr :ok
+
+  def setup_data
+    dputs(2) { 'Need2s setting up' }
+    @ok = !Entities.is_setup?(:Need1)
+  end
+end

data/test/entities/person.rb

@@ -0,0 +1,73 @@
+class Persons < Entities
+  attr_reader :longtransfer_size
+
+  def setup_data
+    value_block :block_one
+    value_str :first_name
+    value_str :pass
+
+    value_block :login
+    value_str :login_name
+    value_str :password_plain
+    
+#    value_block :array
+#    value_array :a, :String
+    
+    value_block :lists
+    value_list_array :l_a, "[]"
+    value_list_choice :l_c, "[]"
+    value_list_drop :l_d, "[]"
+    value_list_single :l_s, "[]"
+    value_list :l, "[]"
+
+    value_block :block_two
+    value_str :address
+    value_int :credit
+    
+    value_block :rest
+    value_int :session_id
+    value_list :permissions
+    
+    value_block :override
+    value_int :value1
+    value_int :value2
+    
+#    value_block :add_new
+#    value_bogus :name_bogus
+#    value_africompta_bogus :name_2, "account_name"
+    @longtransfer_size = 0
+  end
+
+  def icc_adduser( tr )
+    dputs(2){"Data is #{tr._data}"}
+    Persons.create( tr._data )
+  end
+
+  def icc_longtransfer( tr )
+    @longtransfer_size = tr._data.size
+    dputs(2){"Received #{@longtransfer_size} bytes"}
+  end
+
+  def icc_getbinary( _args )
+    return IO.read('file_binary.bin').force_encoding(Encoding::ASCII_8BIT)
+  end
+
+  def get_longtransfer_bytes
+    @longtransfer_size
+  end
+end
+
+class Person < Entity
+  def value1
+    _value1 / 2
+  end
+
+  def value1=( v )
+    self._value1 = v
+    self.value2 = 2 * v
+  end
+
+  def check_pass( p )
+    p == password_plain
+  end
+end

data/test/gettext.po

@@ -0,0 +1,24 @@
+# SOME DESCRIPTIVE TITLE.
+# Copyright (C) 2012
+# This file is distributed under the same license as the QooxView package.
+# Linus Gasser <ineiti@linusetviviane.ch>
+#
+msgid ""
+msgstr ""
+"Project-Id-Version: 0.1\n"
+"POT-Creation-Date: 2012-05-02 20:59+0100\n"
+"PO-Revision-Date: 2012-05-02 20:59+0100\n"
+"Last-Translator: Linus Gasser\n"
+"Language-Team: LANGUAGE <LL@li.org>\n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+"Plural-Forms: nplurals=2; plural=s;\n"
+
+#: qv_gettext.rb:6
+msgid "one"
+msgstr "un"
+
+#: qv_gettext.rb:7
+msgid "two"
+msgstr "deux"

data/test/qooxdoo-layout-frontend.js

@@ -0,0 +1,49 @@
+ret = [1,2,3];
+alert( ret );
+ret = ret.concat( [4,5] );
+alert( ret );
+
+// Create a button
+var button1 = new qx.ui.form.Button("First Button", "icon/22/apps/internet-web-browser.png");
+
+// Document is the application root
+var doc = this.getRoot();
+
+var layout = new qx.ui.container.Composite();
+layout.setLayout( new qx.ui.layout.Canvas() );
+doc.add( layout, {width: "80%"} );
+
+var layout2 = new qx.ui.container.Composite();
+layout2.setLayout( new qx.ui.layout.Canvas() );
+layout.add( layout2, {width: "100%"} );
+
+var tabview = new qx.ui.tabview.TabView();
+layout2.add( tabview, {width:"100%"} );
+
+var page = new qx.ui.tabview.Page();
+page.setLayout( new qx.ui.layout.Canvas() );
+tabview.add( page );
+
+var scroll = new qx.ui.container.Scroll();
+page.add( scroll, {width: "100%"} );
+
+var comp = new qx.ui.container.Composite();
+comp.setLayout( new qx.ui.layout.Canvas() );
+scroll.add( comp );
+
+var hbox = new qx.ui.container.Composite();
+hbox.setLayout( new qx.ui.layout.HBox() );
+comp.add( hbox, {width: "50%"} );
+
+var comp2 = new qx.ui.container.Composite();
+comp2.setLayout( new qx.ui.layout.VBox( 1 ) );
+hbox.add( comp2, {width: "100%"} );
+
+var comp3 = new qx.ui.container.Composite();
+comp3.setLayout( new qx.ui.layout.VBox( 10 ) );
+comp2.add( comp3 );
+
+var group = new qx.ui.groupbox.GroupBox();
+group.setLayout( new qx.ui.layout.VBox( 10 ) );
+comp3.add( group );
+

data/test/qv_configbase.rb

@@ -0,0 +1,98 @@
+require 'test/unit'
+
+class TC_ConfigBase < Test::Unit::TestCase
+  def setup
+    Entities.delete_all_data
+  end
+  
+  def teardown
+  end
+  
+  def test_init
+    assert_equal [[1,:take],[2,:over],[3,:world],
+      [4,:now],[5,:or],[6,:never],
+      [7, :linux], [8, :on], [9, :desktop]], ConfigBases.list_functions
+  end
+  
+  def test_save
+    ConfigBase.store( :functions => [1,2] )
+    assert_equal [:take,:over], ConfigBase.get_functions
+
+    ConfigBase.store( :functions => [1] )
+    assert_equal [:take], ConfigBase.get_functions
+  end
+
+  def test_save_names
+    ConfigBase.store( :functions => [:take, :over] )
+    assert_equal [:take,:over], ConfigBase.get_functions
+
+    ConfigBase.store( :functions => [:take] )
+    assert_equal [:take], ConfigBase.get_functions
+  end
+  
+  def test_base
+    ConfigBase.store( :functions => [:now])
+    assert_equal [:now, :take, :linux], ConfigBase.get_functions
+
+    ConfigBase.store( :functions => [:take])
+    assert_equal [:take], ConfigBase.get_functions
+  end
+  
+  def test_conflict
+    ConfigBase.store( :functions => [:now, :or])
+    assert_equal [:or, :take, :linux], ConfigBase.get_functions
+  end
+  
+  def test_hasfunction
+    ConfigBase.store( :functions => [:take, :over ])
+    assert ConfigBase.has_function?(:take)
+    assert ConfigBase.has_function?(:over)
+    assert ! ConfigBase.has_function?(:or)
+  end
+  
+  def test_add_set_function
+    ConfigBase.set_functions([:now, :or])
+    assert_equal [:or, :take, :linux], ConfigBase.get_functions
+    
+    ConfigBase.add_function( :over )
+    assert ConfigBase.has_function? :over
+  end
+  
+  def test_add_multiple
+    ConfigBase.add_function :now
+    assert ConfigBase.has_function? :now
+    ConfigBase.add_function :or
+    assert ConfigBase.has_function? :or
+    assert ! ConfigBase.has_function?( :now )
+    ConfigBase.add_function :now
+    assert ConfigBase.has_function? :now
+    assert ! ConfigBase.has_function?( :or )
+  end
+
+  def test_value
+    ConfigBase.integer = 10
+    assert_equal 10, ConfigBase.integer
+  end
+
+  def test_change_value
+    ConfigBase.integer = 10
+    assert_equal 10, ConfigBase.integer
+    ConfigBase.add_function :now
+    assert_equal 11, ConfigBase.integer
+    ConfigBase.add_function :now
+    assert_equal 11, ConfigBase.integer
+    ConfigBase.del_function :now
+    assert_equal 14, ConfigBase.integer
+
+    c = Courses.create(name: 'test')
+    assert_equal nil, c.tel
+    ConfigBase.add_function :now
+    assert_equal '1', c.tel
+
+    Entities.delete_all_data
+    c = Courses.create(name: 'test')
+    assert_equal nil, c.tel
+    ConfigBase.add_function :now
+    assert_equal '1', c.tel
+  end
+end