ydim-html 1.0.1

data/lib/ydim/html/view/navigation.rb

@@ -0,0 +1,29 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::View::Navigation -- ydim -- 13.01.2006 -- hwyss@ywesee.com
+
+require 'htmlgrid/divcomposite'
+require 'htmlgrid/link'
+
+module YDIM
+	module Html
+		module View
+class NavigationLink < HtmlGrid::Link
+	def init
+		super
+		self.value = @lookandfeel.lookup(@name)
+		self.href = @lookandfeel._event_url(@name)
+	end
+end
+class Navigation < HtmlGrid::DivComposite
+	COMPONENTS = {
+		[0,0]	=>	:debitors,
+		[1,0]	=>	:invoices,
+		[2,0]	=>	:logout,
+	}	
+  CSS_ID_MAP = ['navigation']
+	DEFAULT_CLASS = NavigationLink
+end
+		end
+	end
+end

data/lib/ydim/html/view/pdf.rb

@@ -0,0 +1,24 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::View::Pdf -- ydim -- 17.01.2006 -- hwyss@ywesee.com
+
+require 'htmlgrid/component'
+
+module YDIM
+	module Html
+		module View
+class Pdf < HtmlGrid::Component
+  def to_html(context)
+    @model.to_pdf :sortby => (@session.state.sortby || []).first,
+                  :sort_reverse => @session.state.sort_reverse
+  end
+	def http_headers(*args)
+		super.update(
+			'Content-Type'				=>	'application/pdf',
+			'Content-Disposition' =>  "attachment; filename=#{@model.unique_id}.pdf"
+		)
+	end
+end
+		end
+	end
+end

data/lib/ydim/html/view/template.rb

@@ -0,0 +1,71 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::View::Template -- ydim -- 12.01.2006 -- hwyss@ywesee.com
+
+require 'htmlgrid/divtemplate'
+require 'htmlgrid/span'
+require 'ydim/html/view/htmlgrid'
+require 'ydim/html/view/navigation'
+
+module YDIM
+	module Html
+		module View
+class Template < HtmlGrid::DivTemplate
+	COMPONENTS = {
+		[0,0]		=>	:subnavigation,
+		[1,0]		=>	:foot,
+		[0,1]		=>	:content,
+		[0,2]		=>	:version,
+		[1,2]		=>	'ydim',
+	}
+	CSS_MAP = ['head', 'content', 'foot',]
+	DIV_CLASS = 'template'
+	FOOT = Navigation
+	LEGACY_INTERFACE = false
+	def content(model)
+		@content ||= super
+	end
+	def cpr_link(model)
+		link = standard_link(:cpr_link, model)
+		link.href = 'http://www.ywesee.com'
+		link
+	end
+	def lgpl_license(model)
+		link = standard_link(:lgpl_license, model)
+		link.href = 'http://www.gnu.org/copyleft/lesser.html'
+		link
+	end
+	def other_html_headers(context)
+		res = super
+		['dojo', 'ydim'].each { |name|
+			properties = {
+				"language"	=>	"JavaScript",
+				"type"			=>	"text/javascript",
+				"src"				=>	@lookandfeel.resource_global(:javascript, "#{name}.js"),
+			}
+			res << context.script(properties)
+		}
+		res
+	end
+	def standard_link(key, model)
+		HtmlGrid::Link.new(key, model, @session, self)
+	end
+	def version(model)
+		span = HtmlGrid::Span.new(model, @session, self)
+		span.css_id = 'version'
+		span.value = [ 
+			lgpl_license(model), @lookandfeel.lookup('comma'), Time.now.year.to_s,
+			cpr_link(model), @lookandfeel.lookup('comma'), ydim_version(model),
+		]
+		span
+	end
+	def ydim_version(model)
+		link = standard_link(:ydim_version, model)
+		link.href = 'https://github.com/zdavatz/ydim-html'
+		link.set_attribute('title', YDIM_VERSION)
+		link
+	end
+end
+		end
+	end
+end

data/readme.md

@@ -0,0 +1,28 @@
+# ydim_html
+
+* https://github.com/zdavatz/ydim-html.git
+
+## DESCRIPTION:
+
+ywesee Distributed Invoice Manager HTML Interface, Ruby
+
+This is an application. Therefore it is not distributed as a gem, instead it has  Gemfile which specifies all dependencies.
+
+## INSTALL:
+
+* bundle install
+
+## TEST:
+
+Currently we have neither working unit tnor spec tests.
+
+## DEVELOPERS:
+
+* Masaomi Hatakeyama
+* Zeno R.R. Davatz
+* Hannes Wyss (up to Version 1.0)
+* Niklaus Giger (ported to Ruby 2.3.0)
+
+## LICENSE:
+
+* GPLv2

data/spec/smoketest_spec.rb

@@ -0,0 +1,234 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+require 'spec_helper'
+require 'ydim/invoice'
+
+describe "ydim-html" do
+  include FlexMock::TestCase
+
+  before :all do
+    @idx ||= 0
+    puts "setup_ydim_test before all @browser is #{@browser} @idx #{@idx}"
+  end
+
+  before :each do
+    @idx += 1
+    puts "before each @idx: #{@idx}"
+    setup_ydim_test
+#    waitForYdimToBeReady(@browser)
+  end
+
+  after :each do
+    @idx += 10
+    puts "after each @idx: #{@idx}"
+    teardown_ydim_test
+#    createScreenshot(@browser, '_'+@idx.to_s)
+  end
+  after :all do
+    puts "after :all @browser #{@browser.class}  $browser #{$browser.class}"
+    $browser.close if $browser
+  end
+
+    # next test work, if only one test is invoked, else we get nil error
+  it "should be possible to use login from spec_helper" do
+    @session = login
+    debitor = OpenStruct.new
+    debitor.unique_id = 1
+    @session.should_ignore_missing
+    @session.should_receive(:create_debitor).and_return(debitor)
+    @browser.button(:name => 'create_debitor').click
+    expect(@browser.url).to match /debitor/
+  end if false
+  it "should allow to log in" do
+    @browser.goto "#{YDIM::Html.config.http_server}:10080/de/"
+    windowSize = @browser.windows.size
+    expect(@browser.url).to match YDIM::Html.config.http_server
+    text = @browser.text.clone
+    # binding.pry unless /Email/.match text
+    expect(text).to match /Email\nPasswort\n/
+    expect(@browser.title).to eql 'YDIM'
+    @browser.element(:name => 'email').wait_until_present
+    @browser.text_field(:name => 'email').set 'test@ywesee.com'
+    @browser.element(:name => 'pass').wait_until_present
+    @browser.text_field(:name => 'pass').set 'secret'
+    @browser.element(:name => 'login').wait_until_present
+    expect(@browser.forms.size).to eql 1
+    @browser.forms.first.submit
+    # @browser.button(:name => 'login').click
+    text = @browser.text.clone
+    expect(text).to match /Nächste Rechnung/ # UTF-8 Problem
+    expect(text).to match /Rechnungen/
+  end
+
+  it "should succedd creating an invoice" do
+    @session = login()
+    expect(@browser.title).to eql 'YDIM'
+    @debitor_values = {
+      "contact" => "Contact",
+      "contact_firstname" => "Firstname",
+      "contact_title" => "Dr.",
+      "address_lines" => "Street 45",
+      "location" => "8006 Zuerich",
+      "emails" => "testywesee.com",
+      "phone" => "043 540 0549",
+    }
+    create_debitor(@debitor_values)
+    check_debitor(@debitor_values)
+  end if false
+
+  def create_debitor(values= Hash.new)
+    @session = login()
+    # click "update"
+
+    expect(@browser.title).to eql 'YDIM'
+    @invoice = YDIM::AutoInvoice.new(10001)
+    @invoice.debitor = setup_debitor
+    @invoice.description = 'AutoInvoice'
+    flexstub(@invoice).should_receive(:odba_store)
+    item = YDIM::Item.new(:text => 'Item', :price => '100',
+                          :quantity => 5)
+    @invoice.add_item(item)
+    expect(@browser.title).to eql 'YDIM'
+    @session.should_receive(:debitor).and_return(@debitor)
+    @session.should_receive(:autoinvoice).and_return(@invoice)
+    @session.should_receive(:generate_invoice).and_return(@invoice)
+    @session.should_ignore_missing
+    binding.pry
+    values.each do |key, value|
+      @browser.text_field(:name => 'key').set value
+    end
+  end if false
+  def check_debitor(values = Hash.new)
+#        click "update"
+
+    binding.pry
+    expect(@browser.title).to eql 'YDIM'
+    values.each do |key, value|
+      expect(@browser.text_field(:name => 'key').value).to eq value
+    end
+  end
+
+  def setup_debitor
+    @debitor = YDIM::Debitor.new(1)
+    @debitor.name = 'Foo'
+    @debitor.email = 'debitor@ywesee.com'
+    @debitor.phone = '0041435400549'
+    @debitor.debitor_type = 'dt_pharmacy'
+    @debitor
+  end
+
+  if false
+    # next test work, if only one test is invoked, else we get nil error
+  it "should be possible to use login from spec_helper" do
+    login
+  end
+  it "should succedd creating an invoice" do
+    # binding.pry
+    TODO = %(
+    click "link=Foo"
+    wait_for_page_to_load "30000"
+    assert_equal "YDIM", get_title
+
+    click "create_invoice"
+    wait_for_page_to_load "30000"
+    assert_equal "YDIM", get_title
+
+    type "description", "Newly created Invoice"
+
+    @invoice = nil
+    @session.should_receive(:create_invoice).and_return {
+      @invoice = Invoice.new(10001)
+      @invoice.debitor = debitor
+      flexstub(invoice).should_receive(:odba_store)
+      @invoice
+    }
+
+    click "update"
+    wait_for_page_to_load "30000"
+
+    assert_equal("Newly created Invoice", invoice.description)
+    assert_equal(Date.today, invoice.date)
+    assert_equal("CHF", invoice.currency)
+    assert_equal(2, invoice.precision)
+
+    assert !is_text_present('Bitte geben Sie das Feld "Beschreibung" an.')
+    assert is_element_present("update")
+    assert is_element_present("create_item")
+    assert !is_element_present("pdf")
+    assert !is_element_present("send_invoice")
+
+    assert_equal "Newly created Invoice",
+      get_value("//input[@name='description']")
+
+    item = nil
+    @session.should_receive(:add_items).and_return { |invoice_id, items, invoice_key|
+      assert_equal(10001, invoice_id)
+      assert_equal(:invoice, invoice_key)
+      assert_equal(1, items.size)
+      hash = items.first
+      assert_instance_of(Hash, hash)
+      assert_equal(1, hash.size)
+      assert_instance_of(Time, hash[:time])
+      item = YDIM::Item.new(hash)
+      item.index = 0
+      @invoice.items.push(item)
+      item
+    }
+    click "create_item"
+    ## waitForElementPresent:
+    assert !60.times {
+      break if (is_element_present("text[0]") rescue false)
+      sleep 1
+    }
+    assert is_element_present("quantity[0]")
+    assert is_element_present("unit[0]")
+    assert is_element_present("price[0]")
+    assert_equal "0.00", get_text("total_netto0")
+
+    assert is_element_present("update")
+    assert is_element_present("create_item")
+    assert !is_element_present("pdf")
+    assert !is_element_present("send_invoice")
+
+    @session.should_receive(:update_item).and_return { |invoice_id, item_index, data, invoice_key|
+      assert_equal(10001, invoice_id)
+      assert_equal(0, item_index)
+      assert_equal(:invoice, invoice_key)
+      data.each { |key, val|
+        item.send("\#{key}=", val)
+      }
+      item
+    }
+
+    type "text[0]", "Item 1"
+    type "quantity[0]", "2"
+    type "unit[0]", "pieces"
+    type "price[0]", "3.25"
+    sleep 0.1
+    assert_equal "6.50", get_text("total_netto0")
+
+    assert is_element_present("update")
+    assert is_element_present("create_item")
+    assert !is_element_present("pdf")
+    assert !is_element_present("send_invoice")
+
+    click "update"
+    wait_for_page_to_load "30000"
+
+    assert is_text_present("Total Netto")
+    assert is_text_present("MwSt. (7.6%)")
+    assert is_text_present("Total Brutto")
+
+    assert is_element_present("update")
+    assert is_element_present("create_item")
+    assert is_element_present("pdf")
+    assert is_element_present("send_invoice")
+
+    click "link=debitor@ywesee.com"
+    wait_for_page_to_load "30000"
+    assert is_text_present("Newly created Invoice")
+)
+  end if false
+  end
+end
+

data/spec/spec_helper.rb

@@ -0,0 +1,117 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# require 'simplecov'
+# SimpleCov.start
+$: << File.expand_path('../../lib', File.dirname(__FILE__))
+require 'ydim/html/config'
+require 'digest'
+require 'minitest/autorun'
+require 'flexmock/test_unit'
+require_relative 'stub/http_server'
+require 'ydim/html/util/server'
+require 'watir'
+require "watir-webdriver/wait"
+begin
+  require 'pry'
+rescue LoadError
+end
+
+RSpec.configure do |config|
+  config.mock_with :flexmock
+  config.expect_with :rspec do |c|
+    c.syntax = [:expect]
+  end
+end
+
+BreakIntoPry = false
+begin
+  require 'pry'
+rescue LoadError
+  # ignore error for Travis-CI
+end
+
+@homeUrl ||= "http://localhost:8752"
+YdimUrl = @homeUrl
+ImageDest = File.join(Dir.pwd, 'images')
+FileUtils.makedirs(ImageDest, :verbose => true) unless File.exists?(ImageDest)
+$browser ||= Watir::Browser.new :firefox
+WEBrick::BasicLog.new(nil, WEBrick::BasicLog::DEBUG)
+
+def setup_ydim_test
+  @browser = $browser
+  include FlexMock::TestCase
+  YDIM::Html.config.email = 'test@ywesee.com'
+  YDIM::Html.config.md5_pass = Digest::MD5.hexdigest('secret')
+  YDIM::Html.config.config=['/tmp/ignore_if_not_exists']
+
+  debitors=[]
+  session = flexmock('session')
+  @ydim_server =  flexmock('ydim_server')
+  @ydim_server.should_receive(:login).and_return(session).by_default
+  @ydim_server.should_receive(:logout)
+  session.should_receive(:debitors).and_return(debitors)
+# created ssh-keygen -f id_dsa -t dsa (with empty-passphrase
+  @server = YDIM::Html::Util::Server.new(@ydim_server)
+  @server.extend(DRbUndumped)
+  drb_url = "druby://localhost:10081"
+  @drb = Thread.new {
+    @drb_server = DRb.start_service(drb_url, @server)
+  }
+  @drb.abort_on_exception = true
+  @http_server = YDIM::Html::Stub.http_server(drb_url)
+  @http_server.logger.level = WEBrick::BasicLog::DEBUG
+  @webrick = Thread.new { @http_server.start }
+  puts "setup_ydim_test #{@http_server.class} #{@drb_server.class}"
+end
+
+def teardown_ydim_test
+  @http_server ||= false
+  @drb_server ||= false
+  puts "teardown_ydim_test #{@http_server.class} #{@drb_server.class} @browser #{@browser.class}"
+  @drb_server.stop_service if @drb_server
+  @http_server.shutdown if @http_server
+  @ydim_server = nil
+end
+
+def small_delay
+  sleep(0.1)
+end
+
+def createScreenshot(browser=@browser, added=nil)
+  small_delay
+  if browser.url.index('?')
+    name = File.join(ImageDest, File.basename(browser.url.split('?')[0]).gsub(/\W/, '_'))
+  else
+    name = File.join(ImageDest, browser.url.split('/')[-1].gsub(/\W/, '_'))
+  end
+  name = "#{name}#{added}.png"
+  browser.screenshot.save (name)
+  puts "createScreenshot: #{name} done" if $VERBOSE
+end
+
+def login(debitors=[])
+  session = flexmock('session')
+  @ydim_server.should_receive(:login).and_return(session).by_default
+  session.should_receive(:debitors).and_return(debitors)
+  @ydim_server.should_receive(:logout)
+  # @browser.link(:name => 'logout').click if @browser.link(:name => 'logout').present?
+  @browser.goto "#{YDIM::Html.config.http_server}:10080/"
+  sleep 0.5
+  puts @browser.text
+  @browser.element(:name => 'email').wait_until_present(3) # wait at most 3 seconds
+  expect(@browser.title).to eql 'YDIM'
+  expect(@browser.text).to match /Email\nPasswort\n/
+  @browser.text_field(:name => 'email').set 'test@ywesee.com'
+  @browser.element(:name => 'pass').wait_until_present
+  @browser.text_field(:name => 'pass').set 'secret'
+  @browser.element(:name => 'login').wait_until_present
+  @browser.forms.first.submit
+
+  converter = flexmock('session')
+  converter.should_receive(:convert).and_return { |amount, from, to|
+    amount
+  }
+  session.should_receive(:currency_converter).and_return(converter)
+  session
+end
+