bbmb 2.0.0

data/lib/bbmb/html/state/show_pass.rb

@@ -0,0 +1,16 @@
+#!/usr/bin/env ruby
+# Html::State::ShowPass -- bbmb.ch -- 18.10.2006 -- hwyss@ywesee.com
+
+require 'bbmb/html/state/global'
+require 'bbmb/html/view/show_pass'
+
+module BBMB
+  module Html
+    module State
+class ShowPass < Global
+  VIEW = View::ShowPass
+  VOLATILE = true
+end
+    end
+  end
+end

data/lib/bbmb/html/state/viral/admin.rb

@@ -0,0 +1,41 @@
+#!/usr/bin/env ruby
+# Html::State::Viral::Admin -- bbmb.ch -- 18.09.2006 -- hwyss@ywesee.com
+
+require 'bbmb/html/state/customer'
+require 'bbmb/html/state/customers'
+require 'bbmb/html/state/orders'
+require 'bbmb/html/state/history'
+require 'sbsm/viralstate'
+
+module BBMB
+  module Html
+    module State
+      module Viral
+module Admin
+	include SBSM::ViralState
+  EVENT_MAP = {
+    :customers	=>	State::Customers,
+    :customer   =>  State::Customer,
+    :history    =>  State::History,
+    :orders     =>  State::Orders,
+  }
+  def _customer(customer_id = @session.user_input(:customer_id))
+    Model::Customer.find_by_customer_id(customer_id)
+  end
+  def home
+    trigger(@session.user.home || :customers)
+  end
+  def order
+    if(order_id = @session.user_input(:order_id))
+      customer_id, commit_id = order_id.split('-', 2)
+      State::Order.new(@session, _customer(customer_id).order(commit_id))
+    end
+  end
+  def zone_navigation
+    [:customers]
+  end
+end
+      end
+    end
+  end
+end

data/lib/bbmb/html/state/viral/customer.rb

@@ -0,0 +1,143 @@
+#!/usr/bin/env ruby
+# Html::State::Viral::Customer -- bbmb.ch -- 20.09.2006 -- hwyss@ywesee.com
+
+require 'bbmb/html/state/current_order'
+require 'bbmb/html/state/favorites'
+require 'bbmb/html/state/favorites_result'
+require 'bbmb/html/state/order'
+require 'bbmb/html/state/orders'
+require 'bbmb/html/state/result'
+require 'sbsm/viralstate'
+
+module BBMB
+  module Html
+    module State
+      module Viral
+module Customer
+  include SBSM::ViralState
+  EVENT_MAP = {
+    :current_order    =>  State::CurrentOrder,
+    :favorites        =>  State::Favorites,
+    :orders           =>  State::Orders,
+    :search           =>  State::Result,
+    :search_favorites =>  State::FavoritesResult,
+  }
+  def _customer
+    @customer ||= Model::Customer.find_by_email(@session.user.name)
+  end
+  def _increment_order(order)
+    quantities = user_input(:quantity)
+    if(error?)
+      false
+    else
+      quantities.each { |article_number, quantity|
+        if(prod = Model::Product.find_by_article_number(article_number))
+          order.increment(quantity.to_i, prod)
+        end
+      }
+      BBMB.persistence.save(order, _customer)
+      true
+    end
+  end
+  def _transfer(order)
+    if(io = user_input(:file_chooser))
+      BBMB::Util::TransferDat.parse(io) { |info|
+        if(product = Model::Product.find_by_pcode(info.pcode) \
+           || Model::Product.find_by_ean13(info.ean13))
+          order.increment(info.quantity, product)
+        else
+          order.unavailable.push(info)
+        end
+      }
+    end
+    self
+  end
+  def _update_order(order)
+    quantities = user_input(:quantity)
+    if(error?)
+      false
+    else
+      quantities.each { |article_number, quantity|
+        order.add(quantity.to_i, 
+                  Model::Product.find_by_article_number(article_number))
+      }
+      BBMB.persistence.save(order, _customer)
+      true
+    end
+  end
+  def clear_favorites
+    _customer.favorites.clear
+    self
+  end
+  def clear_order
+    _customer.current_order.clear
+    self
+  end
+  def delete_unavailable
+    if(@model.respond_to?(:unavailable) && (ids = user_input(:quantity)))
+      ids.each { |id, qty|
+        @model.unavailable.delete_at(id.to_i)
+      }
+      BBMB.persistence.save(@model)
+    end
+    self
+  end
+  def favorite_product
+    if(_update_order(_customer.favorites))
+      trigger(:favorites)
+    end
+  end
+  def favorite_transfer
+    _transfer(_customer.favorites)
+  end
+  def home
+    trigger(@session.user.home || :current_order)
+  end
+  def increment_order
+    if(_increment_order(_customer.current_order))
+      trigger(:current_order)
+    end
+  end
+  def order
+    if(order_id = @session.user_input(:order_id))
+      customer_id, commit_id = order_id.split('-', 2)
+      State::Order.new(@session, _customer.order(commit_id))
+    end
+  end
+  def order_product
+    if(_update_order(_customer.current_order))
+      trigger(:current_order)
+    end
+  end
+  def order_transfer
+    _transfer(_customer.current_order)
+  end
+  def scan
+    success = false
+    if(port = user_input(:comport))
+      @session.set_cookie_input(:comport, port)
+    end
+    if(@model.is_a?(Model::Order))
+      user_input(:EAN_13).each { |key, quantity|
+        success = true
+        if(product = Model::Product.find_by_ean13(key))
+          @model.increment(quantity.to_i, product)
+        else
+          info = Model::Order::Info.new
+          info.ean13 = key
+          info.quantity = quantity
+          @model.unavailable.push(info)
+        end
+      }
+      BBMB.persistence.save(@model)
+    end
+    State::Json.new(@session, {:success => success})
+  end
+  def zone_navigation
+    [ :current_order, :orders, :favorites ]
+  end
+end
+      end
+    end
+  end
+end

data/lib/bbmb/html/util/known_user.rb

@@ -0,0 +1,51 @@
+#!/usr/bin/env ruby
+# Html::Util::KnownUser -- bbmb.ch -- 18.09.2006 -- hwyss@ywesee.com
+
+require 'sbsm/user'
+
+module BBMB
+  module Html
+    module Util
+class KnownUser < SBSM::User
+  ### Admin users need permissions for:
+  # login BBMB.config.auth_domain + ".Admin"
+  # edit yus.entities
+  # set_password
+  # grant login
+  #
+  ### Customers need permissions for:
+  # login BBMB.config.auth_domain + ".Customer"
+  attr_reader :auth_session 
+  PREFERENCE_KEYS = [ :home, :pagestep ]
+  PREFERENCE_KEYS.each { |key|
+    define_method(key) {
+      remote_call(:get_preference, key) 
+    }
+  }
+  def initialize(session)
+    @auth_session = session
+  end
+  def allowed?(action, key=nil)
+    allowed = remote_call(:allowed?, action, key)
+    BBMB.logger.debug('User') {
+      sprintf('%s: allowed?(%s, %s) -> %s', name, action, key, allowed)
+    }
+    allowed
+  end
+  def entity_valid?(email)
+    !!(allowed?('edit', 'yus.entities') \
+      && (entity = remote_call(:find_entity, email)) && entity.valid?)
+  end
+  def navigation
+    [ :logout ]
+  end
+  def remote_call(method, *args, &block)
+    @auth_session.send(method, *args, &block)
+  rescue RangeError, DRb::DRbError => e
+    BBMB.logger.error('auth') { e }
+  end
+  alias :method_missing :remote_call
+end
+    end
+  end
+end

data/lib/bbmb/html/util/multilingual.rb

@@ -0,0 +1,18 @@
+#!/usr/bin/env ruby
+# Html::Util::Multilingual -- bbmb -- 09.08.2007 -- hwyss@ywesee.com
+
+module BBMB
+  module Html
+    module Util
+module Multilingual
+  def _(value)
+    if(value.is_a?(BBMB::Util::Multilingual))
+      value.send(@session.language) || value.default
+    else
+      value
+    end
+  end
+end
+    end
+  end
+end

data/lib/bbmb/html/util/session.rb

@@ -0,0 +1,52 @@
+#!/usr/bin/env ruby
+# Html::Util::Session -- bbmb.ch -- 15.09.2006 -- hwyss@ywesee.com
+
+require 'bbmb/config'
+require 'bbmb/html/util/known_user'
+require 'bbmb/html/state/login'
+require 'sbsm/session'
+require 'sbsm/redirector'
+
+module BBMB
+  module Html
+    module Util
+class Session < SBSM::Session
+  include SBSM::Redirector
+  DEFAULT_LANGUAGE = 'de'
+  DEFAULT_STATE = State::Login
+  EXPIRES = BBMB.config.session_timeout
+  PERSISTENT_COOKIE_NAME = "bbmb-barcodereader"
+  def login
+    @user = @app.login(user_input(:email), user_input(:pass))
+    @user.session = self if(@user.respond_to?(:session=))
+    @user
+  end
+  def logout
+    @app.logout(@user.auth_session) if(@user.respond_to?(:auth_session))
+    super
+  end
+  def lookandfeel
+    if(@lookandfeel.nil? \
+      || (@lookandfeel.language != persistent_user_input(:language)))
+      require 'bbmb/html/util/lookandfeel'
+      @lookandfeel = Lookandfeel.new(self) # dtsttcpw
+    end
+    @lookandfeel
+  end
+  def process(request)
+    begin 
+      if(@user.is_a?(KnownUser) && @user.auth_session.expired?)
+        logout
+      end
+    rescue DRb::DRbError, RangeError, NoMethodError
+      logout
+    end
+    super
+  end
+  def validate(key, value)
+    @validator.validate(key, value)
+  end
+end
+    end
+  end
+end

data/lib/bbmb/html/util/validator.rb

@@ -0,0 +1,55 @@
+#!/usr/bin/env ruby
+# Html::Util::Validator -- bbmb.ch -- 15.09.2006 -- hwyss@ywesee.com
+
+require 'sbsm/validator'
+
+module BBMB
+  module Html
+    module Util
+class Validator < SBSM::Validator
+  BOOLEAN = [ :accept_terms, :order_confirmation ]
+  ENUMS = {
+    :canton				=>	[
+      nil, "AG", "AI", "AR", "BE", "BL", "BS", "FR", "GE", "GL", "GR", "JU",
+      "LU", "NE", "NW", "OW", "SG", "SH", "SO", "SZ", "TG", "TI", "UR", "VD",
+      "VS", "ZG", "ZH" ],
+    :title => [nil, 'title_f', 'title_m']
+  }
+  EVENTS = [ :ajax, :change_pass, :clear_favorites, :clear_order, :commit,
+    :current_order, :customer, :customers, :delete_unavailable, :favorites,
+    :favorite_product, :favorite_transfer, :generate_pass, :history, :home,
+    :increment_order, :login, :logout, :order, :orders, :order_product,
+    :order_transfer, :request_access, :save, :scan, :show_pass, :search,
+    :search_favorites, :sort ]
+  FILES = [ :file_chooser ]
+  NUMERIC = [ :comport, :customer_id, :EAN_13, :index, :plz, :priority,
+    :quantity ]
+  STRINGS = [ :address1, :address2, :address3, :city, :comment,
+    :drtitle, :fax, :filter, :firstname, :lastname, :order_id,
+    :organisation, :phone_business, :phone_mobile, :phone_private,
+    :query, :reference, :sortvalue ]
+  def ean13(value)
+    return nil if(value.empty?)
+    match = /\d{13}/.match(value.to_s)
+    unless match
+      raise SBSM::InvalidDataError.new(:e_invalid_ean13, :ean13, value) 
+    end
+    values = match[0].split("")
+    check = values.pop
+    sum = 0
+    values.each_with_index { |val, index| 
+      modulus = ((index%2)*2)+1	
+      sum += (modulus*val.to_i)
+    }
+    unless (check.to_i == (10-(sum%10))%10)
+      raise SBSM::InvalidDataError.new(:e_invalid_ean13, :ean13, value) 
+    end
+    match[0]
+  end
+  def perform_validation(key, value)
+    super(key, u(value))
+  end
+end
+    end
+  end
+end

data/lib/bbmb/html/view/backorder.rb

@@ -0,0 +1,24 @@
+#!/usr/bin/env ruby
+# Html::View::Backorder -- bbmb.ch -- 06.10.2006 -- hwyss@ywesee.com
+
+module BBMB
+  module Html
+    module View
+module Backorder
+  def backorder(model)
+    value = if(date = model.backorder_date)
+              date.strftime(@lookandfeel.lookup(:backorder_date))
+            elsif(model.backorder)
+              @lookandfeel.lookup(:backorder)
+            end
+    if(value)
+      div = HtmlGrid::Div.new(model, @session, self)
+      div.css_class = 'limited'
+      div.value = value
+      div
+    end
+  end
+end
+    end
+  end
+end

data/lib/bbmb/html/view/change_password.rb

@@ -0,0 +1,42 @@
+#!/usr/bin/env ruby
+# Html::View::ChangePassword -- virbac.bbmb.ch -- 28.06.2007 -- hwyss@ywesee.com
+
+require 'bbmb/html/view/template'
+require 'htmlgrid/errormessage'
+require 'htmlgrid/form'
+
+module BBMB
+  module Html
+    module View
+class ChangePasswordForm < HtmlGrid::Form
+  include HtmlGrid::ErrorMessage
+  COMPONENTS = {
+    [0,0] => :email,
+    [0,1] => :pass,
+    [0,2] => :confirm_pass,
+    [1,3] => :submit,
+  }
+  EVENT = :save
+  LABELS = true
+  SYMBOL_MAP = {
+    :pass         => HtmlGrid::Pass,
+    :confirm_pass => HtmlGrid::Pass,
+  }
+  def init
+    super
+    error_message
+  end
+end
+class ChangePasswordComposite < HtmlGrid::DivComposite
+  COMPONENTS = {
+    [0,0] => "change_pass",
+    [0,1] => ChangePasswordForm,
+  }
+  CSS_ID_MAP = ['title']
+end
+class ChangePassword < Template
+  CONTENT = ChangePasswordComposite
+end
+    end
+  end
+end