ig3tool 0.1.0

data/lib/ui/internewindow.rb

@@ -0,0 +1,126 @@
+module Ig3tool
+
+	class InterneWindow < GladeHelper
+
+		## - Constants ----
+		MENU_PATH = ["Interne", "Interne"]
+		ICON = "emblem-money.png"
+
+
+		def initialize
+			super("interne.glade")
+
+			@debugger1 = @glade.get_widget("debugger1")
+			@debugger2 = @glade.get_widget("debugger2")
+			@saldo     = @glade.get_widget("saldo")
+			@amount    = @glade.get_widget("amount")
+			@list      = @glade.get_widget("list")
+
+			r = Gtk::CellRendererText.new
+			#@list.model = Gtk::ListStore.new(String, String, Float, String)
+			#%w(Van Naar Aantal Mededeling).each_with_index do |str, i|
+			#	@list.insert_column(-1, str, r, :text => i)
+			#end
+
+			# TIJDELIJK: Het is beter dat de debugger meer info kan zien -> Lezen uit log ipv interne_transaction
+			# XXX TODO IN SERVER -> changen naar interne transacties als deze dan overal ingevuld worden!
+			@list.model = Gtk::ListStore.new(String, String, String, String)
+			%w(Systeem Subsysteem Tijd Mededeling).each_with_index do |str, i|
+				@list.insert_column(-1, str, r, :text => i)
+			end
+
+			make_debugger_combo @debugger1
+			make_debugger_combo @debugger2
+
+			@window.show_all
+		end
+
+		def make_debugger_combo(combo) # kas is ook een "debugger"
+			super(combo)
+			r = combo.model.prepend
+			r[0] = nil
+			r[1] = "kas"
+			combo.active = 0
+		end
+
+		def left_clicked
+			amount = @amount.text.to_c
+			_transfer(@debugger1, @debugger2, -amount)
+		end
+
+		def right_clicked
+			amount = @amount.text.to_c
+			_transfer(@debugger1, @debugger2, amount)
+		end
+
+		def debugger1_changed
+			username = _get_username(@debugger1)
+			return if username.nil?
+
+			if username != "kas"
+				saldo = $global["client"].interne(username)
+				@saldo.text = saldo.from_c.to_s
+			else
+				@saldo.text = ""
+			end
+
+			m = _get_widget("list").model
+			m.clear
+
+			_get_widget("list").model = nil
+
+			username = nil if username == "kas"
+
+			transactions = $global["client"].interne_log(username)
+			transactions.each do |t|
+				r = m.append
+				r[0] = t.system
+				r[1] = t.subsystem
+				time = Time.at(t.timestamp.to_i)
+				r[2] = time.asctime
+				r[3] = t.message
+			end
+
+			_get_widget("list").model = m
+		end
+
+		def eval_amount
+			t = @amount.text.strip
+			t.gsub!(/[^\d+\/*().-]/, "")
+			if t =~ /[+\/*()-]/
+				t = begin eval(t).to_s rescue "0" end
+			else
+				t = t.to_f.to_s
+			end
+			@amount.text = t
+			0
+		end
+
+		private
+		def _transfer(from_widget, to_widget, amount)
+			from = _get_username(from_widget)
+			to   = _get_username(to_widget)
+			return if from.nil? or to.nil? or from == to or amount == 0
+
+			args = {
+				:from   => from,
+				:to     => to,
+				:amount => amount
+			}
+
+			new_saldo = $global["client"].interne_transfer! args
+			@saldo.text = $global["client"].interne(from).from_c.to_s
+
+			# Fake Debugger1 changed -> updaten log kaderke
+			debugger1_changed
+		end
+
+		def _get_username(widget)
+			return nil if widget.active == -1
+			return widget.active_iter[1]
+		end
+	end
+
+	register_window(InterneWindow)
+
+end

data/lib/ui/loginwindow.rb

@@ -0,0 +1,60 @@
+module Ig3tool
+	class LoginWindow < GladeHelper
+		include GetText
+
+    MENU_PATH = ["Login", "Login"]
+    ICON = "stock_print.png"
+
+		attr :glade
+
+		def initialize(client, &block)
+      super("loginwindow.glade", "loginwindow")
+
+			@c = client
+
+			@username = @glade.get_widget("username")
+			@password = @glade.get_widget("password")
+			@apply    = @glade.get_widget("apply")
+			@loginwin = @glade.get_widget("loginwindow")
+			@success  = block
+
+		end
+
+		def password_activate(widget)
+			@apply.activate
+		end
+		def apply(widget)
+			h = {"username" => @username.text, "password" => @password.text}
+      @username.text = ""
+      @password.text = ""
+			@c.wannabe!(h)
+      @loginwin.hide
+			@success.call
+		rescue Token => t
+			puts "ERROR: #{t.message}"
+			error_dialog(self, t)
+		end
+		def cancel(widget)
+      @username.text = ""
+      @password.text = ""
+      @loginwin.hide
+      Gtk.main_quit
+			return nil
+		end
+		def destroy_event(widget, arg0)
+      @username.text = ""
+      @password.text = ""
+      @loginwin.hide
+		end
+		def delete_event(widget, arg0)
+      @username.text = ""
+      @password.text = ""
+      @loginwin.hide
+		end
+		def username_activate(widget)
+			@password.grab_focus
+		end
+	end
+
+end
+

data/lib/ui/memberswindow.rb

@@ -0,0 +1,327 @@
+module Ig3tool
+
+	class MembersWindow < GladeHelper
+		MENU_PATH = ["Leden"]
+		ICON = "members_xklein.png"
+		FIELDS = %w(first_name last_name email username rolnr address phone)
+
+		def initialize
+			super("members.glade")
+
+			@people_view = _get_widget("people_view")
+			@people_view.model = @people_store = Gtk::ListStore.new(Object, String)
+			r = Gtk::CellRendererText.new
+			@people_view.insert_column(-1, "Naam", r, :text => 1)
+
+			past_view = _get_widget("past_view")
+			past_view.model = Gtk::ListStore.new(String, String, String)
+			past_view.insert_column(-1, "Jaar",      r, :text => 0)
+			past_view.insert_column(-1, "Status",    r, :text => 1)
+			past_view.insert_column(-1, "Lidnummer", r, :text => 2)
+			past_view.columns.last.expand = true
+
+			sg = Gtk::SizeGroup.new(Gtk::SizeGroup::BOTH)
+
+			@glade.widget_names.grep(/^slabel/).each do |n|
+				sg.add_widget(_get_widget(n))
+			end
+
+			@notification_label = _get_widget("notification_label")
+
+			_get_widget("first_name").grab_focus
+			statussen = $global["client"].person_statussen
+			make_status_combo(_get_widget("status"), statussen)
+
+			Thread.new do
+				_get_widget("query").active = 0 # triggers query_changed
+				_get_widget("status").active = 0 # triggers status_changed
+			end
+
+			_create_people_rightclick_menu # Instantieer een rightclick menu
+
+			@window.show
+		end
+
+		## - Handlers (GUI) ----
+		# Rechtermuisknop op een persoon in de lijst
+		def people_button_press_event (widget, event)
+			if event.kind_of? Gdk::EventButton and event.button == 3
+				@people_view_menu.popup(nil, nil, event.button, event.time)
+			end
+		end
+
+		# Bij dubbel klik op een naam in de lijst
+		def people_view_row_activated (widget, path, column)
+			iter = widget.model.get_iter(path)
+			_show iter[0]
+		end
+
+		def new_clicked
+			_clear
+		end
+
+		def ok_clicked
+			_save
+		end
+
+		def delete_clicked
+			_delete(@selected_person)
+		end
+
+		def query_changed
+			_update_people
+		end
+
+		def entry_activate
+			lookup_clicked
+		end
+
+		def focus_changed
+			@notification_label.text = ""
+			false
+		end
+
+		def lookup_clicked
+			attrs = {}
+
+			FIELDS.each do |k|
+				v = _get_widget(k).text.strip
+				attrs[k] = v unless v.nil? or v.empty?
+			end
+
+			begin
+				people = $global["client"].person_lookup(attrs)
+				_set_people(people)
+			rescue Exception => e
+				_print_msg "Error: Lookup: #{$!}"
+			end
+		end
+
+		def status_changed (status)
+			sensitive = status.active > 0
+			_get_widget("slabel_memberid").sensitive = sensitive
+			_get_widget("memberid").sensitive = sensitive
+		end
+
+		def image_button_release_event
+			dialog = Gtk::FileChooserDialog.new("Open File", nil, Gtk::FileChooser::ACTION_OPEN, nil, [Gtk::Stock::CANCEL, Gtk::Dialog::RESPONSE_CANCEL],[Gtk::Stock::OPEN, Gtk::Dialog::RESPONSE_ACCEPT])
+			if dialog.run == Gtk::Dialog::RESPONSE_ACCEPT
+				filename = dialog.filename
+				_get_widget("image").set = filename
+				# Upload filename naar server?
+				# Blob?
+				# lokaal saven in /usr/share?
+				# TODO!
+			end
+			dialog.destroy
+		end
+
+		# Private
+		private
+		def	_create_people_rightclick_menu
+			# Creeer een menu
+			@people_view_menu = Gtk::Menu.new
+			people_view_menu_edit_item = Gtk::MenuItem.new("Edit")
+			people_view_menu_delete_item = Gtk::MenuItem.new("Delete")
+			people_view_menu_edit_item.signal_connect("activate") {
+				# Show selected Persoon
+				# Treeview heeft default Mode Gtk::SELECTION_SINGLE
+				@people_view.selection.selected_each { |model, path, iter| _show(iter[0]) }
+			}
+
+			# Delete de geselecteerde persoon
+			people_view_menu_delete_item.signal_connect("activate") { 
+				@people_view.selection.selected_each { |model, path, iter|
+				_delete(iter[0],false)
+				model.remove(iter) # Verwijder uit de lijst
+			}
+			}
+
+			@people_view_menu.append(people_view_menu_edit_item)
+			@people_view_menu.append(people_view_menu_delete_item)
+			@people_view_menu.show_all
+		end
+
+		def _show (who)
+			@selected_person = who
+
+			begin
+				FIELDS.each {|n| _get_widget(n).text = who.send(n.to_sym).to_s }
+
+				ms = $global["client"].person_memberships(who.username)
+
+
+				if !ms.nil?
+					ms.sort! {|a, b| b.year <=> a.year }
+					if !ms.empty? and ms[0].year.to_i == Time.werkjaar
+						_get_widget("status").active = statussen.index(ms[0].status)
+						_get_widget("memberid").text = ms[0].barcode
+						ms.shift
+					else
+						_get_widget("status").active = 0
+						_get_widget("memberid").text = ""
+					end
+
+				end
+
+				model = _get_widget("past_view").model
+				model.clear
+
+				ms.each do |m|
+					row = model.append
+					row[0] = m.year.to_s
+					row[1] = m.status.to_s
+					row[2] = m.barcode.to_s
+				end
+			rescue Exception => e
+				_print_msg "Fout: Memberinfo: #{$!}"
+				_clear
+			end
+
+		end
+
+		def _delete(who, refresh = true)
+			begin
+				$global["client"].person_remove!({ :username => who.username })
+				_clear
+				_update_people if refresh
+			rescue Exception => e
+				_print_msg "Error: Delete: #{$!}"
+			else
+				_print_msg "Person deleted!"
+			end
+		end
+
+		def _clear
+			@selected_person = nil
+			(FIELDS + %w(memberid)).each {|n| _get_widget(n).text = "" }
+			_get_widget("status").active = 0
+			_get_widget("past_view").model.clear
+			_get_widget("first_name").grab_focus
+		end
+
+
+		def _save
+			data = {
+				:last_name  => _get_widget("last_name").text,
+				:first_name => _get_widget("first_name").text,
+				:rolnr      => _get_widget("rolnr").text,
+				:username   => _get_widget("username").text,
+				:email      => _get_widget("email").text,
+				:address    => _get_widget("address").text,
+				:phone      => _get_widget("phone").text,
+				:gsm        => _get_widget("gsm").text,
+				:status     => _get_widget("status").active_iter[1],
+				:memberid   => _get_widget("memberid").text
+			}
+			if @selected_person.nil? or @selected_person.username != data[:username]
+				# Indien hij nog niet bestaat, aanmaken in de database
+				begin
+					answer = $global["client"].person_add! data
+					@selected_person = $global["client"].person_lookup("username" => data[:username])[0]
+					iter = _insert_person(@selected_person)
+					@people_view.selection.select_iter(iter)
+				rescue Exception => e
+					_print_msg "Fout: Toevoegen: #{$!}"
+				else
+					_print_msg "Persoon toegevoegd", answer
+				end
+
+			else
+				# Anders-> zorg voor update via people.real_id
+				begin
+					answer = $global["client"].person_update! data
+					@selected_person = $global["client"].person_lookup("username" => data[:username])[0]
+					iter = _insert_person(@selected_person)
+					@people_view.selection.select_iter(iter)
+				rescue Exception => e
+					_print_msg "Fout: Aanpassen: #{$!}"
+				else
+					_print_msg "Persoonsinformatie aangepast", answer
+				end
+			end
+		end
+
+		def _update_people(clear = true)
+			case _get_widget("query").active
+			when 1; sym = :person_debuggers
+			when 2; sym = :person_honorarymembers
+			when 3; sym = :person_members
+			when 4; sym = :person_nonmembers
+			else    sym = :person_everybody
+			end
+
+			if clear
+				@people_store.clear
+				r = @people_store.append
+				r[0] = nil
+				r[1] = "Loading..."
+			end
+			people = $global["client"].send(sym)
+			_set_people(people)
+		end
+
+		def _set_people(people, clear = true)
+			people.sort! do |a,b|
+				x = a.last_name <=> b.last_name
+				x == 0 ? a.first_name <=> b.first_name : x
+			end
+
+			@people_view.model = nil
+			@people_store.clear if clear
+
+			people.each do |p|
+				row = @people_store.append
+				row[0] = p
+				row[1] = p.last_name + " " + p.first_name
+			end
+
+			@people_view.model = @people_store
+		end
+
+		def _print_msg (msg, extra_info = nil)
+			puts msg
+			puts "  - #{extra_info}" if extra_info
+			@notification_label.text = msg
+		end
+
+		def _insert_person(person)
+			iter = @people_store.iter_first
+			while iter[0].last_name <= person.last_name and iter.next!
+				break if iter[0].username == person.username
+				1
+			end
+
+			p person
+			if iter[0].username == person.username
+				new = iter
+				new[0] = person
+				new[1] = "#{person.last_name} #{person.first_name}"
+				@people_store.row_changed(new.path, new)
+				puts "replaced #{new[1]}, (#{new.path})"
+			else
+				new = @people_store.insert_before(iter)
+				new[0] = person
+				new[1] = "#{person.last_name} #{person.first_name}"
+				@people_store.row_changed(new.path, new)
+				puts "inserted #{new[1]} before #{iter[1]}, (#{new.path})"
+			end
+
+			new
+		end
+
+		def _delete_person(person)
+			iter = @people_store.iter_first
+			while iter[0].last_name <= person.last_name and iter.next!
+				if iter[0].username == person.username
+					@people_store.remove(iter)
+					break
+				end
+			end
+		end
+
+	end
+
+	register_window(MembersWindow)
+
+end

data/lib/ui/messagebox.rb

@@ -0,0 +1,23 @@
+module Ig3tool
+
+	module_function
+
+	def messagebox(title,message)
+
+		overwrite = false
+		dialog = Gtk::MessageDialog.new(nil,
+																		Gtk::Dialog::DESTROY_WITH_PARENT | Gtk::Dialog::MODAL,
+																		Gtk::MessageDialog::QUESTION,
+																		Gtk::MessageDialog::BUTTONS_YES_NO,
+																		message)
+		dialog.title = title
+		dialog.run do |response|
+			case response
+			when Gtk::Dialog::RESPONSE_YES
+				overwrite = true
+			end
+			dialog.destroy
+		end
+		overwrite # Return overwrite? boolean -> true indien 'YES'
+	end
+end