manqod 1.1505.0

data/lib/ListHolder/ListPanel/ListFilter.rb

@@ -0,0 +1,42 @@
+#this file is part of manqod
+#manqod is distributed under the CDDL licence
+#the author of manqod is Dobai-Pataky Balint(dpblnt@gmail.com)
+
+class MyListFilter < Gtk::HBox
+	def initialize(list_holder)
+		@list_holder=list_holder
+		@columns=Hash.new
+		super()
+		set_no_show_all(true)
+		set_border_width(0)
+		set_resize_mode(Gtk::ResizeMode::PARENT)
+	end
+  
+	def update(notifier)
+		self.each{|frenderer| frenderer.destroy}
+		notifier.columns.each {|column| 
+			@columns[column.data]=MyFRenderer.new(notifier,column)
+			pack_start(Gtk::Alignment.new(0,0,1,1).set_padding(0,0,0,0).add(@columns[column.data]))
+		}
+		self
+	end
+  
+	def list_holder
+		@list_holder
+	end
+	def columns
+		@columns
+	end
+
+	def set_visible(visible)
+		each{|child|
+			if visible
+				child.show_all
+				else
+				child.hide_all
+			end
+		}
+		super
+	end
+end
+

data/lib/ListHolder/ListPanel/ListSum/Text.rb

@@ -0,0 +1,32 @@
+#this file is part of manqod
+#manqod is distributed under the CDDL licence
+#the author of manqod is Dobai-Pataky Balint(dpblnt@gmail.com)
+
+class SumRendererText < Gtk::Label
+	include ManqodCommon
+	def initialize(column)
+		@column=column
+		@decimals=case column.header["type"]
+			when "gtk_float" then 2
+			else 0
+		end
+		super()
+		set_alignment(column.alignment,0.5)
+	end
+	attr_accessor :column
+	
+	def update(new_value=0)
+		set_text(case column.header['type']
+			when "gtk_int" then number_format(new_value,@column.decimals_attribute)
+			when "gtk_float" then number_format(new_value,@column.decimals_attribute)
+			when "gtk_duration" then Time.at(new_value).strftime(column.duration_format)
+		end)
+	end
+	
+	def to_s
+		"SumRenderer of #{column}"
+	end
+	def inspect
+		to_s
+	end
+end

data/lib/ListHolder/ListPanel/ListSum.rb

@@ -0,0 +1,72 @@
+#this file is part of manqod
+#manqod is distributed under the CDDL licence
+#the author of manqod is Dobai-Pataky Balint(dpblnt@gmail.com)
+
+class ListSum < Gtk::HBox
+	def initialize(list_holder)
+		@list_holder=list_holder
+		super()
+		@columns=Hash.new
+		@renderers=Hash.new
+		@values=Hash.new
+		set_no_show_all(true)
+		set_border_width(0)
+		set_resize_mode(Gtk::ResizeMode::PARENT)
+		signal_connect('destroy'){|me|
+			renderers.each_value{|r| r.destroy if r}
+		}
+	end
+	attr_accessor :list_holder
+	attr_accessor :columns
+	attr_accessor :renderers
+
+	def update(notifier)
+		@renderers.each_value{|renderer| renderer.destroy}
+		@columns.clear
+		@renderers.clear
+		@values.clear
+		list_holder.list.columns.each {|column| 
+			renderers[column.data]=SumRendererText.new(column)
+			pack_start(renderers[column.data])
+			if column.summable?
+				@values[column.data]=0.0
+				@columns[column.data]=column
+			end
+		}
+		return self
+	end
+
+	def set_visible(visible)
+		each{|child|
+			if visible
+				child.show
+			else
+				child.hide
+			end
+#			p child.inspect + child.visible?.to_s
+		}
+		super
+	end
+
+	def zero
+		@values.each_key{|key| @values[key]=0.0}
+	end
+  
+	def calculate
+		zero
+		if list_holder.list.model
+		list_holder.list.model.each{|model,path,iter|
+			@columns.each_pair{|col_data,col| @values[col_data]+=iter[col.header["model_col"]].to_f}
+		}
+		end
+		columns.each_key{|col_data| renderers[col_data].update(@values[col_data])}
+	end
+	
+	def inspect
+		"ListSum of #{list_holder.list}"
+	end
+	def to_s
+		inspect
+	end
+end
+

data/lib/ListHolder/ListPanel.rb

@@ -0,0 +1,60 @@
+#this file is part of manqod
+#manqod is distributed under the CDDL licence
+#the author of manqod is Dobai-Pataky Balint(dpblnt@gmail.com)
+
+public
+class ListPanel < Gtk::Viewport
+	include ManqodCommon
+
+	def initialize(list_holder)
+		@list_holder=list_holder
+		super(list_holder.list_scroller.hadjustment,Gtk::Adjustment.new(0,0,0,0,0,0))
+		set_resize_mode(Gtk::RESIZE_PARENT)
+		set_width_request(1)
+		set_no_show_all(true)
+		
+		add(@vbox=Gtk::VBox.new(false))
+		vbox.pack_start(@list_sum=ListSum.new(list_holder),false,false,0)
+		vbox.pack_end(@list_filter=MyListFilter.new(list_holder),false,false,0)
+	
+		signal_connect('destroy'){|me|
+			@list_sum.destroy if @list_sum
+			@list_filter.destroy if @list_filter
+		}
+  end
+  attr_accessor :list_holder
+  attr_accessor :list_filter
+  attr_accessor :list_sum
+  attr_accessor :vbox
+  attr_accessor :visibility
+  
+	
+  def update(notifier)
+		list_filter.update(notifier)
+		list_sum.update(notifier)
+		set_visibility
+		self
+  end
+  
+	def set_visibility
+		if visibility!=(list_holder.sum_button.active? || list_holder.advanced_filter.active?)
+			@visibility=list_holder.sum_button.active? || list_holder.advanced_filter.active?
+			set_visible(visibility)
+			vbox.set_visible(visibility)
+			list_holder.placeholder_button.set_visible(visibility)
+#			set_visible(list_holder.advanced_filter.active?)
+#			vbox.set_visible(list_holder.advanced_filter.active?)
+			edebug("#{self} visibility set to #{visibility}","list","info")
+		end
+		list_filter.set_visible(list_holder.advanced_filter.active?)
+		list_sum.set_visible(list_holder.sum_button.active?)
+	end
+
+	def inspect
+		"ListPanel of #{@list_holder}"
+	end
+	def to_s
+		inspect
+	end
+end
+

data/lib/ListHolder.rb

@@ -0,0 +1,241 @@
+#this file is part of manqod
+#manqod is distributed under the CDDL licence
+#the author of manqod is Dobai-Pataky Balint(dpblnt@gmail.com)
+
+module Mylist
+
+	class MyListHolder < Gtk::Frame
+		include ManqodCommon
+		include Conf
+		
+		class VHolder < Gtk::VPaned
+			def initialize(holder)
+				@holder=holder
+				super()
+			end
+			attr_reader :holder
+			def title
+				@holder.title
+			end
+			def list
+				@holder.list
+			end
+		end
+		class HHolder < Gtk::HPaned
+			def initialize(holder)
+				@holder=holder
+				super()
+			end
+			attr_reader :holder
+			def title
+				@holder.title
+			end
+			def list
+				@holder.list
+			end
+		end
+
+		def initialize(caller)
+			@caller=caller
+			@list_id=nil
+			@parentM=nil
+			@info=Gtk::Label.new('initializing')
+			@list=MyEditableList.new(self)
+			@list.signal_connect('size-allocate'){|me,alloc|
+				me.columns.each{|col|
+					list_panel.list_filter.columns[col.data].set_width_request(col.width) unless list_panel.list_filter.columns[col.data].nil? || list_panel.list_filter.columns[col.data].destroyed?
+					list_panel.list_sum.renderers[col.data].set_width_request(col.width) unless list_panel.list_sum.renderers[col.data].nil? || list_panel.list_sum.renderers[col.data].destroyed?
+				}
+			}
+			@flistbox=Gtk::VBox.new(false).pack_start(@list_scroller=Gtk::ScrolledWindow.new.add(@list),true,true,0)
+			@list_scroller.set_policy(Gtk::POLICY_AUTOMATIC,Gtk::POLICY_ALWAYS)
+
+			
+			@list_panel=ListPanel.new(self)
+			@flistbox.pack_end(Gtk::HBox.new.pack_start(list_panel).pack_end(@placeholder_button=Gtk::Button.new.set_relief(Gtk::ReliefStyle::NONE),false,false),false,true,0)
+			placeholder_button.set_no_show_all(true)
+			@list_scroller.vscrollbar.signal_connect("size-allocate",placeholder_button){|me,alloc,pl|
+				pl.set_width_request(alloc.width)
+			}
+			@buttonholder=ListButtonHolder.new(self,Gtk::ORIENTATION_HORIZONTAL)
+			@placeholder_button.
+				signal_connect('clicked'){|me|
+					menuw=Gtk::Window.new(Gtk::Window::POPUP).add(bar=Gtk::VBox.new.
+						add(refresh=Gtk::Button.new.set_image(Gtk::Image.new(Gtk::Stock::REFRESH,Gtk::IconSize::MENU))).
+						add(history=Gtk::Button.new.set_image(Gtk::Image.new(Gtk::Stock::INDEX,Gtk::IconSize::MENU))).
+						add(cancel=Gtk::Button.new.set_image(Gtk::Image.new(Gtk::Stock::CANCEL,Gtk::IconSize::MENU)))
+						)
+				refresh.set_relief(Gtk::ReliefStyle::NONE).signal_connect('clicked',menuw,self){|button,menuw,me|
+					ManqodDB.instance.manqod_db.reload_moditem(me.list.list_id)
+					menuw.hide unless menuw.destroyed?
+				}
+				history.set_relief(Gtk::ReliefStyle::NONE).signal_connect('clicked',menuw,self){|button,menuw,me|
+					history_window
+					menuw.hide unless menuw.destroyed?
+				}
+				cancel.set_relief(Gtk::ReliefStyle::NONE).signal_connect('clicked',menuw,self){|button,menuw,me|
+					menuw.hide
+				}
+				menuw.set_modal(true).set_window_position(Gtk::Window::POS_MOUSE).show_all
+=begin
+#disabled per current compiz is generating the leave notify event in the wrong order
+=end
+				menuw.signal_connect('leave-notify-event'){|me,e|
+#					me.destroy if e.window == me.window
+					me.hide if e.window == me.window
+				}
+			}
+
+			super()
+			set_shadow_type(Gtk::SHADOW_NONE)
+			signal_connect('destroy'){|me|
+				@notebook.wipe unless @notebook.nil?
+				@list.wipe unless @list.nil? || @list.destroyed?
+				unless @listbox.nil?
+					list_panel.destroy unless list_panel.destroyed?
+					@flistbox.destroy unless @flistbox.destroyed?
+					@listbox.destroy unless @listbox.destroyed?
+					@buttonholder.holder.destroy unless @buttonholder.holder.destroyed?
+					@list_panel.destroy unless @list_panel.destroyed?
+				end 
+				@info.destroy unless @info.destroyed?
+			}
+		end
+		attr_accessor :list, :list_scroller, :list_panel, :list_id
+		attr_accessor :notebook, :child_placement
+		attr_reader :caller, :parentM, :widget, :info
+		attr_accessor :buttonholder, :placeholder_button
+
+	def embedd?
+		@list.embedd?
+	end
+
+  	def update(notifier)
+			case notifier.class.name 
+				when 'BarMenuItem', 'ButtonMenuItem', 'MyRendererButton'
+					list.set_id(@list_id=notifier.target)
+				when 'MyEditableList' 
+					list.set_id(@list_id) #preserve the last id
+				else
+					edebug("unknown routing: #{notifier.class.name}","list","warning")
+			end
+
+			@child_placement=list.gtk_attribute('child_placement') || 'bottom'
+			@button_placement=list.gtk_attribute('button_placement') || 'bottom'
+			@gantt_start=list.gtk_attribute('gantt_start')
+			@gantt_duration=list.gtk_attribute('gantt_duration')
+				
+			@listbox.remove(@flistbox).remove(@buttonholder.holder) unless @listbox.nil?
+			@gantt.destroy unless @gantt.nil?
+			@gantt=nil
+			unless @widget.nil?
+				@widget.remove(child1) unless child1.nil?
+				@widget.remove(child2) unless child2.nil?
+				@widget.destroy
+			end
+
+			@buttonholder.set_orientation((@button_placement == 'right' ? Gtk::ORIENTATION_VERTICAL : Gtk::ORIENTATION_HORIZONTAL))
+				
+			@widget=if @child_placement == 'right' then HHolder.new(self) else VHolder.new(self) end
+			@listbox=if @button_placement == 'right' then Gtk::HBox.new else Gtk::VBox.new end
+			@listbox.pack_start(@flistbox,true,true,0).pack_start(@buttonholder.holder,false,false,0)
+				
+			if @gantt_start.nil?
+				gantt_box=@listbox
+				else
+				gantt_box=Gtk::HPaned.new.add1(@listbox).add2(@gantt=GanttHolder.new(self))
+				if gpos=get_conf(@list.get_id,0,"gantt_position")
+					gantt_box.set_position(gpos.to_i).set_position_set(true)
+				end
+				gantt_box.signal_connect("size-allocate"){|me,alloc|
+					set_conf(@list.get_id,0,"gantt_position",me.position)
+				}
+			end
+
+			@widget.pack1(gantt_box,true,true)
+			@widget.signal_connect("size_allocate"){|me,alloc|
+				set_conf(@list.get_id,0,"position",me.position) unless me.position == 0
+			}
+
+			add(@widget)
+			
+			#children
+			@submodules=list.list_model.drbmodel.childs.size
+  		if @submodules>0
+				@notebook=MyNotebook.new(self)
+    		@notebook.show_all
+				pack2(@notebook)
+				if (position=get_conf(list_id,0,"position")||0) !=0
+					widget.set_position(position.to_i)
+					widget.set_position_set(true)
+				end
+    	else
+    		@notebook.wipe if @notebook
+    		@notebook=nil
+				@widget.remove(child2) unless child2.nil?
+			end
+
+			show_all
+			list_panel.set_visibility
+			@notebook.update(@list) if @submodules>0
+			@list.load_data(notifier)
+			@gantt.update unless @gantt.nil?
+		end
+		
+		def repack_widget
+		end
+
+		def history_window
+			HistoryWindow.new(self)
+		end
+
+		def set_id(new_list_id)
+			@list_id=new_list_id
+		end
+		def set_parentM(parentM)
+			@parentM=parentM
+			list.set_parentM(parentM)
+		end
+		
+		def progress
+			SB.instance.progress
+		end
+		def advanced_filter
+			@buttonholder.advanced_filter
+		end
+		def sum_button
+			@buttonholder.sum_button
+		end
+		def archive_button
+			@buttonholder.archive_button
+		end
+		def pack1(widget_to_pack)
+			@widget.pack1(widget_to_pack,true,true)
+		end
+		def pack2(widget_to_pack)
+			@widget.pack2(widget_to_pack,true,true)
+		end
+		def position
+			@widget.position
+		end
+		def child1
+			@widget.child1
+		end
+		def child2
+			@widget.child2
+		end
+		def set_position_set(set_pos)
+			@widget.set_position_set(set_pos)
+		end
+		def set_position(pos)
+			@widget.set_position(pos)
+		end
+		def title
+			@list.title || 'none'
+		end
+
+		def to_s
+			"Holder of #{@list}"
+		end
+	end
+end

data/lib/LoginWindow.rb

@@ -0,0 +1,77 @@
+#this file is part of manqod
+#manqod is distributed under the CDDL licence
+#the author of manqod is Dobai-Pataky Balint(dpblnt@gmail.com)
+
+class LoginWindow < Gtk::Dialog
+	include ManqodCommon
+	def initialize(show_connections_combo=false)
+		@curcon=nil
+		super("manqod login",nil,nil,[Gtk::Stock::OK,Gtk::Dialog::RESPONSE_ACCEPT],[Gtk::Stock::QUIT,Gtk::Dialog::RESPONSE_REJECT])
+		set_window_position(Gtk::Window::POS_CENTER)
+		
+		table=Gtk::Table.new(3,2,false)
+		@conn_combo=Gtk::ComboBox.new(conn_model=Gtk::ListStore.new(String,String))
+		if show_connections_combo
+			table.attach(Gtk::Label.new('Connection'),0,1,0,1,Gtk::FILL,Gtk::FILL)
+			table.attach(@conn_combo,1,2,0,1,Gtk::FILL|Gtk::EXPAND,Gtk::FILL|Gtk::EXPAND)
+		end
+		@conn_combo.pack_start(renderer=Gtk::CellRendererText.new,true).add_attribute(renderer,:text,0)
+		table.attach(Gtk::Label.new('Username'),0,1,1,2,Gtk::FILL,Gtk::FILL)
+		table.attach(@nick_entry=Gtk::Entry.new,1,2,1,2,Gtk::FILL|Gtk::EXPAND,Gtk::FILL|Gtk::EXPAND)
+		table.attach(@passwd_label=Gtk::Label.new('Password'),0,1,2,3,Gtk::FILL,Gtk::FILL)
+		table.attach(@passwd=Gtk::Entry.new.set_visibility(false),1,2,2,3,Gtk::FILL|Gtk::EXPAND,Gtk::FILL|Gtk::EXPAND)
+		@passwd.signal_connect("activate") {|me|response(Gtk::Dialog::RESPONSE_ACCEPT)}
+		@nick_entry.signal_connect("activate") {|me|response(Gtk::Dialog::RESPONSE_ACCEPT)}
+		@conn_combo.signal_connect("changed"){|me|
+			@curcon=ManqodRPC.instance.manqod_server.conn(@conn_combo.active_iter[1])
+		}
+		ManqodRPC.instance.manqod_server.conn_list{|conn_name,conn|
+			begin
+				alive=ManqodRPC.instance.manqod_server.dbs[conn_name].alive?
+				rescue =>err
+				alive=false
+			end
+			if alive
+		  	iter=conn_model.append
+		  	iter[0]=conn["name"]
+		  	iter[1]=conn_name
+		  	if conn.has_key?("client_default") and conn["client_default"]==true
+					@conn_combo.set_active_iter(iter)
+				end
+			end
+		}
+
+
+	vbox.pack_start(table)
+	end
+	
+	def run
+		show_all
+		@nick_entry.grab_focus
+		ret=nil
+		while not (nick or ret==Gtk::Dialog::RESPONSE_REJECT)
+			ret=super()
+			if ret==Gtk::Dialog::RESPONSE_ACCEPT and !@curcon.nil?
+				#auth
+				np = Digest::MD5.new
+				np.update(@passwd.text)
+				if set_manqod_db_uri(@curcon['uri']) #"druby://#{@curcon['drb_host']}:#{@curcon['drb_port']}")
+					if @passwd.visible? then
+						if ManqodDB.instance.manqod_db.auth?(@nick_entry.text,np.hexdigest)
+							set_nick(@nick_entry.text)
+						else
+							errwin=Gtk::MessageDialog.new(nil,Gtk::Dialog::Flags::MODAL,Gtk::MessageDialog::ERROR,Gtk::MessageDialog::ButtonsType::CLOSE,"login failed!");errwin.run;errwin.destroy
+						end
+					else
+						set_nick(@nick_entry.text)
+					end
+				else
+					errwin=Gtk::MessageDialog.new(nil,Gtk::Dialog::Flags::MODAL,Gtk::MessageDialog::ERROR,Gtk::MessageDialog::ButtonsType::CLOSE,"connecting to server #{@curcon['name']} failed!");errwin.run;errwin.destroy
+				end
+			end
+		end
+		hide_all
+		nick
+	end
+end
+

data/lib/MainRouter.rb

@@ -0,0 +1,64 @@
+#this file is part of manqod
+#manqod is distributed under the CDDL licence
+#the author of manqod is Dobai-Pataky Balint(dpblnt@gmail.com)
+
+class MainRouter < Gtk::Frame
+	include ManqodCommon
+	def initialize(mainwindow)
+		@mainwindow=mainwindow
+		@last_notifier=nil
+		@mymodule=nil
+		super()
+	end
+	attr_accessor :mainwindow
+	attr_accessor :mymodule
+	attr_accessor :last_notifier,:notifier
+  
+  def reset_child
+  	#used by F5 refresh
+		unless mymodule.nil?
+			child.destroy unless child.destroyed?
+			@mymodule=nil
+		end
+		@last_notifier=nil
+  end
+  
+	def update(notifier)
+		if ['help','quit'].include?(notifier.modname)
+			case notifier.modname
+				when "quit"
+					notifier=last_notifier
+					@mainwindow.destroy if @mainwindow.shut_down?
+				when "help" then 
+					notifier=last_notifier
+					ManqodHelp.new.populate.show_all
+			end
+			else
+		mainwindow.window.set_cursor(Gdk::Cursor.new(Gdk::Cursor::WATCH))
+		child.destroy unless child.nil?
+		@mymodule=nil
+		@notifier=notifier
+		case notifier.modname
+			when "listing" then set_child(Mylist::MyListHolder.new(self))
+			when "about" then set_child(About.new())
+			when "config" then set_child(MyConfig.new())
+			when "relation_builder" then set_child(RelationBuilder.new())
+			when "form" then set_child(Myform::MyFormHolder.new("embedded",notifier,"dry",notifier.target))
+	  end
+	  @mymodule=child.destroyed? ? nil : child
+	  Gtk.show_thread_changes
+
+		unless mymodule.nil? || @mainwindow.destroyed?
+			begin
+				mymodule.update(notifier)
+			rescue => err
+				tell_exception("internal error occured",backtrace_to_debug(err),"main","error")
+			end
+			@mainwindow.set_title(mymodule.title)
+			mymodule.show_all
+			@last_notifier=@notifier
+		end
+		mainwindow.window.set_cursor(nil) unless @mainwindow.destroyed?
+		end
+	end
+end