ig3tool 0.3.0 → 0.4.0

data/lib/actions/product.rb

@@ -1,154 +0,0 @@
-require 'sales'
-module Ig3tool
-	class Actions
-
-	# Geeft alle categorieen terug.
-	def self.product_categories(params)
-		Category.find(:all)
-	end
-
-	# Geeft alle producten uit een categorie terug
-	def self.product_category(params)
-		raise Needed, "Category" if params[:given_uri] != 1
-		Category.find(params[:from_uri].first).products
-	end
-
-	# Verwacht een barcode in de URL
-	# Geeft het product terug
-	def self.product_lookup(params)
-		raise Needed, "Barcode" if params[:given_uri] != 1
-
-		p = params[:from_uri].first
-		_product(p)
-	end
-
-	# Verwacht geen parameters
-	# Geeft alle producten in de stock terug
-	def self.product_all(params)
-		#Product.find :all, :conditions => { 'stock_gt' => 0 } # Stock Greater than
-		Product.find :all, :include => [:purchases]
-	end
-
-	# Verwacht een barcode in de URL
-	# Geeft de stock terug
-	def self.product_stock(params)
-		raise Needed, "Barcode" if params[:given_uri] != 1
-
-		prod = _product(params[:from_uri].first)
-		prod.stock
-	end
-
-	# Verwacht een barcode en de stock in de URL
-	# Geeft de diff stock terug
-	# Verwijdert de oudste items indien newstock < oldstock
-	# Voegt items toe met de nieuwste prijs indien newstock > oldstock
-	def self.product_diff!(params)
-		barcode = params["barcode"] or raise Needed, "Barcode"
-		newstock = params["stock"] or raise Needed, "Stock"
-		p = _product(barcode)
-		oldstock = p.stock
-
-		if oldstock < newstock
-			# TODO XXX Set Price!
-		else
-			# TODO remove from stock!			
-		end
-
-		Logger::log :stock, :diff, "%s stock changed from %d to %d" %
-			            [ p.name, oldstock, p.stock ]
-	end
-
-	# Voegt een product toe aan de DB
-	# Verwacht 'barcode', 'name', 'category', 'nmprice', 'mprice' en 'dprice'
-	def self.product_add!(params)
-		notfound = []
-
-		[:barcode, :name, :category, :nmprice, :mprice, :dprice].each do |k|
-			notfound << k unless params.include? k.to_s and !params[k.to_s].nil?
-		end
-
-		raise Needed, notfound unless notfound.empty?
-
-		p = \
-		Product.create(:barcode  => params["barcode"],
-		               :name     => params["name"],
-		               :category => Category.find_by_name(params["category"].capitalize),
-		               :nmprice  => params["nmprice"],
-		               :mprice   => params["mprice"],
-		               :dprice   => params["dprice"],
-		               :stock    => 0) # XXX of params["amount"] ?
-
-		Logger::log :product, :add, "Added %d (%s)" % [ params["barcode"], params["name"] ]
-
-		"OK"
-	end
-
-	def self.product_remove!(params)
-		barcode = params["barcode"] or raise Needed, "Barcode"
-		p = _product(barcode)
-
-		raise "still in stock, won't delete!" if p.stock > 0
-
-		p.destroy
-
-		"OK"
-	end
-
-	# Laat een 'debugger' een aankoop ingeven, met factuurnummer 'reference'.
-	# Verwacht een hash barcode => [amount, cost] in 'items'.
-	def self.product_purchase!(params)
-		name = params["debugger"] or raise NeedDebugger
-		debugger = Person.find_by_username(name)
-		raise NotADebugger.new(name) unless !debugger.nil? && debugger.debugger?
-
-		notfound = []
-		params["items"].each do |barcode, item|
-			_product(barcode, false) or notfound << barcode
-			item[0] = item[0].to_i
-			item[1] = item[1].to_i
-			amount, cost = item
-			raise "You're funny." unless amount.integer?
-		end
-
-		raise ProductNotFound.new(notfound.join(', ')) unless notfound.empty?
-
-		Product.transaction do
-			params["items"].each do |barcode, data|
-				amount, cost = data
-				p = _product(barcode)
-				p.stock += amount
-				p.save
-
-				Purchase.create(:time      => Time.now,
-				                :debugger  => debugger,
-				                :product   => p,
-				                :count     => amount,
-				                :cost      => cost)
-
-				Logger::log :purchase, :add, "%s purchased %d x '%s' for %0.2f" %
-				                [ debugger.username, amount, p.name, cost ]
-			end
-		end
-
-		"OK"
-	end
-
-	def self.product_purchases(params)
-		p = params[:from_uri].first
-		if p.nil? or p == "all"
-			Purchase.find :all, :order => "product, time desc"
-		else
-			Purchase.find_all_by_barcode(p, :order => "product, time desc")
-		end
-	end
-
-	private
-	def self._product(barcode, complain=true)
-		Product.find(barcode, :include => [:purchases])
-	rescue
-		raise NotFound, "Product" if complain
-		nil
-	end
-
-	end
-end

data/lib/bib.rb

@@ -1,94 +0,0 @@
-module Ig3tool
-
-	class BibSection < ActiveRecord::Base
-
-		set_table_name "bib_sections"
-		set_nonauto_primary_key :name
-
-		validates_presence_of :name, :full_name
-
-		validates_uniqueness_of :name
-
-		has_many :books,
-		         :class_name  => "BibBook",
-		         :foreign_key => "section"
-
-	end
-
-	class BibBook < ActiveRecord::Base
-
-		set_table_name "bib_books"
-		set_nonauto_primary_key :isbn
-
-		validates_presence_of :isbn,
-		                      :title,
-		                      :author,
-		                      :publisher,
-		                      :section
-
-		validates_each :section do |record, attr, value|
-			begin
-				BibSection.find(value)
-			rescue
-				record.errors.add attr, "Invalid section: '#{value}'"
-				false
-			end
-		end
-
-		has_many :loans,
-		         :class_name  => "BibLoan",
-		         :foreign_key => "isbn"
-
-		def available?
-			available > 0
-		end
-
-		def available
-			copies - loans.length
-		end
-
-		# ISBN-13 -> ISBN-10
-		def self._isbn13(code)
-			raise "Invalid ISBN-10 number!" if code.length != 10
-			code.chop!
-			code = "978" + code
-
-			sum = 0
-			code.split(//).each_with_index do |c, i|
-				sum += c.to_i * ( i % 2 == 0 ? 1 : 3 )
-			end
-
-			rem   = sum % 10
-			check = (rem == 0) ? 0 : 10 - rem
-
-			code = code + check.to_s
-		end
-
-		# ISBN-10 -> ISBN-13
-		def self._isbn10(code)
-			raise "Invalid ISBN-13 number!" if code.length != 13
-			code = code[3..11]
-
-			sum = 0
-			9.times {|i| sum += code[i].chr.to_i * (10 - i) }
-
-			check = 11 - sum % 11
-			check = 0   if sum   == 0
-			check = 'X' if check == 10
-			code = code + check.to_s
-		end
-
-	end
-
-	class BibLoan < ActiveRecord::Base
-
-		set_table_name "bib_loans"
-
-		validates_presence_of :isbn,
-		                      :member_id,
-		                      :warranty,
-		                      :loan_date
-
-	end
-
-end

data/lib/billing.rb

@@ -1,112 +0,0 @@
-module Ig3tool
-
-#
-# Handige documentatie:
-#
-# Lesk, M.E.: "TBL -- A Program to Format Tables"
-#    http://www.cs.bell-labs.com/10thEdMan/tbl.pdf
-#
-# PIC -- A Graphics Language for Typesetting, Brian Kernighan
-#    http://www.cs.bell-labs.com/cm/cs/cstr/116.ps.gz
-#
- 
-# dit is het billing gedoe
-# om een fancy factuur uit te printen
-# again thx to Peter
-
-
-CONFIG = { 'groff'     => 'groff -ma4 -p -t | gv -',
-		    	 'groff_alt' => 'groff -ma4 -p -t -l -L-Pigprint@igwe' }
-
-
-  class Sales
-
-    def printout debugger
-      return if @sales.empty?
-      
-      p = Person.find(:first, :conditions => ['username=?', debugger])
-      return unless p
-      debugger = p.firstname + " " + p.lastname
-      date = dutch_date
-
-      def to_groff (str)
-        gr = ''
-        str.unpack('U*').each do |c|
-          gr += c < 256 ? c.chr : sprintf('\[u%04X]', c)
-        end
-        return gr
-      end
-
-      groff = IO.popen(CONFIG["groff"], "w")
-      groff.print <<EOF
-
-
-
-
-
-.TS
-box, expand ;
-l r
-^ r .
-T{
- Infogroep
- p/a Faculteit Wetenschappen
- lokaal 1E8, tel. 02/629 33 56
- Vrije Universiteit Brussel
-T}\tBrussel, #{date}
-\tT{
-.PS
-B: box height 1 width 3.3
-.ps 8
-" stempel" at B.sw above ljust
-.ps 10
-.PE
-T}
-
-
-
-.TE
-.TS
-box, expand ;
-l | c | c
-l | n | n .
-Omschrijving artikels\tAantal\tPrijs
-_
-EOF
-
-      each do |s|
-        groff.printf("%s\t%d\t%.2f\n", to_groff(s.product.name), s.count, s.price)
-      end
-
-      groff.print <<EOF
-_
-.T&
-l s nB .
-T{
-
-
- Voor Infogroep,
-
-
-
- #{to_groff(debugger)}
-T}\t#{sprintf '%.2f', total_price}
-.TE
-EOF
-
-      groff.close
-    end
-
-    def dutch_date
-      months = %w(_ januari februari maart april mei juni juli
-                  augustus september oktober november december)
-      days = %w(zondag maandag dinsdag woensdag donderdag
-                vrijdag zaterdag zondag)
-      t = Time.now
-      "#{days[t.wday]} #{t.day} #{months[t.month]} #{t.year}"
-    end
-    private :dutch_date
-
-  end
-     
-end

data/lib/bitching.rb

@@ -1,49 +0,0 @@
-require 'digest/md5'
-
-module Ig3tool
-
-	class Bitch < ActiveRecord::Base
-
-		set_table_name "bitches"
-
-		validates_presence_of :crap, :bitch
-
-		validates_uniqueness_of :crap
-
-    def self.lookup(crap)
-      Bitch.find(:first, :conditions => ["crap = ?", crap])
-    end
-
-    def self.bitch(crap)
-      Bitch.lookup(crap).bitch
-    end
-
-		def log_request(request)
-			r = Request.new
-			r.bitch = self.bitch
-			r.request = request
-			r.save
-		end
-
-		def self.can_request?(crap)
-			not Bitch.lookup(crap).nil?
-		end
-
-    def self.wannabe(user, pass)
-      # check if user isa ldap user
-      # generate some sort of token to auth with
-			raise Token, "you don't know the magic word..." unless IGLDAP.bitchke?(user, pass)
-			b = Bitch.new
-			b.bitch = user
-			#b.crap = user.crypt("$1$" + Time.now.strftime("%S%M"))
-			b.crap = Digest::MD5.hexdigest(user + Time.now.to_s)
-			b.save!
-			b.crap
-    end
-
-	end
-
-end
-
-
-

data/lib/config.rb

@@ -1,19 +0,0 @@
-module Ig3tool
-
-  require 'yaml'
-
-  class Config
-    def Config.load(file)
-      begin
-        @@file = YAML.load_file(file)
-      rescue SystemCallError => boom
-        abort "Kon config file niet laden: #{boom.message}"
-      end
-    end
-
-    def Config.[](attribute)
-      @@file[attribute]
-    end
-  end
-
-end

data/lib/horrible_hack.rb

@@ -1,15 +0,0 @@
-module ActiveRecord
-	class Base
-		# Deze methode laat toe TOCH primary keys te hebben.
-		def self.set_nonauto_primary_key(field)
-			set_primary_key field
-			define_method (field.to_s+"_before_type_cast").to_sym do; end
-			alias_method field.to_s+"=", :id=
-		end
-
-		def attributes_protected_by_default
-			[] # STERF.
-		end
-	end
-end
-