manqod 1.1505.0

data/lib/ListHolder/EditableList.rb

@@ -0,0 +1,309 @@
+#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 MyEditableList < Gtk::TreeView
+  include Observable
+  include GtkAttributes
+  include ListPrint
+  include ManqodCommon
+  include	Conf
+  
+	def initialize(caller)
+		@caller=caller
+		@list_id=nil
+		@parentM=nil
+		@info=caller.info
+		@title="list"
+		@tip=Gtk::Tooltips.new
+		super(nil)
+		@list_model=ListModel.new(self)
+		set_enable_grid_lines(case get_conf(0,0,"grid")
+			when "both" then Gtk::TreeView::GridLines::BOTH
+			when "vertical" then Gtk::TreeView::GridLines::VERTICAL
+			when "horizontal" then Gtk::TreeView::GridLines::HORIZONTAL
+				else Gtk::TreeView::GridLines::NONE
+			end
+		) if Gtk.check_version?(2,10,9)
+		set_enable_tree_lines(true)
+		set_fixed_height_mode(false)
+		set_reorderable(false)# drag and drop of rows
+		headers_clickable=false
+		set_rules_hint(true)
+		selection.set_mode(Gtk::SELECTION_MULTIPLE)
+		signal_connect('cursor-changed') { |me|
+			if !cursor[0].nil? and iter=model.get_iter(cursor[0])
+				id_at_cursor=iter[@list_model.column_of_id]
+				else
+				id_at_cursor=-1
+			end
+			if id_at_cursor != get_cursor_id
+				save_cursor_id(id_at_cursor)
+				edebug("#{self} selection changed to #{id_at_cursor}, notifying observers","list","info")
+				changed
+				begin
+					notify_observers(self)
+				rescue =>err
+					eerror("error notifying observers:#{err}","list")
+				end
+			end
+		}
+
+		signal_connect("button-press-event"){|me,ev|
+			holder.buttonholder.activate_default if ev.event_type == Gdk::Event::BUTTON2_PRESS
+			false
+		}
+		@tmp=Hash.new
+		@is_embedded=nil
+	end
+	attr_accessor :caller, :selected, :list_id, :list_model, :parentM, :headertypes, :headers, :info, :title, :tip, :pop, :tmp, :is_embedded
+
+	def holder
+		@caller
+	end
+
+	def get_model
+		@list_model
+	end
+	def save_config
+		set_conf(get_id,0,"search",search_column)
+	end
+	def parentselected
+		@list_model.parentselected
+	end
+	def moditem
+		@list_model.moditem
+	end
+	def progress
+		@caller.progress
+	end
+	
+	def is_embedded
+		@is_embedded
+	end
+	
+	def embedd?
+		if @moditem && @moditem['on_embed'].length >0 
+			eeval(@moditem['on_embed'],self)
+			else 
+			true
+		end
+	end
+	
+	def get_id
+		@list_id
+	end
+	
+	
+	def set_id(newid)
+		if newid.to_i != @list_id.to_i
+#			save_config
+			@list_id=newid.to_i
+			@caller.set_id(list_id)
+			create_skeleton
+		end
+		self
+	end
+	
+	def set_parentM(parentM)
+		@parentM=parentM
+		self
+	end
+	
+	def my
+		@@my
+	end
+	def headertypes
+		@list_model.headertypes
+	end
+	def load_data(notifier,the_one=nil)
+		@list_model.load_data(notifier,the_one=nil)
+	end
+	
+	def refilter
+		@list_model.refilter
+	end
+
+	def set_cursor_id(id_to_set=get_cursor_id,scroll=true)
+		current_id=cursor[0] ? @list_model.sorter.get_iter(cursor[0])[@list_model.column_of_id] : -1
+
+		if current_id != id_to_set.to_i
+			if iter=@list_model.iter_of_id(id_to_set)
+				edebug("setting cursor to #{id_to_set.inspect}","list")
+				expand_to_path(iter.path)
+				scroll_to_cell(iter.path,nil,false,0,0) if scroll
+				set_cursor(iter.path,nil,nil)
+				save_cursor_id(id_to_set)
+			else
+				unless cursor[0].nil?
+					edebug("setting cursor none#{id_to_set != -1?"insted of #{id_to_set.inspect}":""}","list")
+					set_cursor(Gtk::TreePath.new,nil,nil)
+				end
+				save_cursor_id(-1)
+			end
+		end
+		iter
+	end
+
+	def save_cursor_id(id_to_set)
+		edebug("saving cursor to #{id_to_set.inspect}","list")
+		set_conf(get_id,0,"cursor",id_to_set)
+	end
+	def get_cursor_id
+		get_conf(get_id,0,"cursor").to_i
+	end
+
+	def scroll_to_cursor(id_to_scroll=get_cursor_id,scroll=true)
+		set_cursor_id(id_to_scroll,scroll)
+		changed
+		notify_observers(self)
+		get_cursor_id
+	end
+  
+	def set_info(new_info)
+		info.set_label(new_info)
+	end
+	
+	def update_tip
+		case get_conf(0,0,"list-tooltip")
+			when "filters" then
+				t="filters:"
+				@caller.list_filter_panel.list_filter.columns.each_key{|key|
+					h=@caller.list_filter_panel.list_filter.columns[key].header
+					fl=get_conf(get_id,h['id'],"filter")
+					case h['type']
+						when 'gtk_combo', 'gtk_const_combo' then fl = (fl=="-1" or fl=="") ? "" : "=#{fl}"
+					end
+					t+="\n#{h['header']}: #{fl}" if !fl.nil? and fl.length>0
+				}
+				t="#{t}\nnone" if t=="filters:"
+				@tip.set_tip(self,t,'extra hint')
+				@tip.enable
+		end
+	end
+	
+	def create_skeleton
+		if get_id.nil?
+			edebug(" can't update","list","error")
+			return
+		end
+		set_model(nil)
+		@list_model.create_skeleton
+		set_info("initializing")
+		@title=moditem["display"]
+		while c=get_column(0)
+			remove_column(c)
+			c.wipe
+		end
+
+		
+		col_num=1;
+		@list_model.headers.sort{|a,b| a[1]["oid"].to_f<=>b[1]["oid"].to_f}.each{|hk,header|
+			header['editable']="false" if header['writable']=="0"
+			column=nil
+			if column=MyColumn.new(self,header)
+				append_column(column)
+				col_num+=1
+			end if header['visible']
+		}
+		edebug("#{self} skeleton created","list","info")
+		set_search_column(get_conf(get_id,0,"search").to_i)
+		
+		set_info("loading")
+		@caller.list_panel.update(self)
+		@caller.advanced_filter.update
+		@caller.sum_button.update
+		@caller.buttonholder.update(self)
+		self
+	end
+	
+	def update(notifier)
+		@list_model.update(notifier)
+		scroll_to_cursor
+		update_tip
+		self
+	end
+	
+	def selected_ids
+		ids=Array.new
+		selection.selected_each { |model, path, iter| ids.push(iter[@list_model.column_of_id])}
+		ids
+	end
+
+	def duplicate_selected(caller)
+		ret=nil
+		run_events(get_id,'list-OnDuplicate-BeforeSQL')
+		selection.selected_each { |model, path, iter| ret=@list_model.duplicate_iter(iter)}
+		run_events(get_id,'list-OnDuplicate-AfterSQL')
+		ret
+	end
+
+	def remove_selected(caller,ids=nil)
+		ids=[get_cursor_id] if ids.nil?
+		@removing=ids
+		run_events(get_id,'list-OnRemove-BeforeSQL')
+		@list_model.remove_iters(ids)
+		run_events(get_id,'list-OnRemove-AfterSQL')
+	end
+
+	def add_row(caller, added_id=nil)
+		if added_id.nil?
+			run_events(get_id,'list-OnInsert-BeforeSQL')
+			added_id=@list_model.add_iter
+			run_events(get_id,'list-OnInsert-AfterSQL')
+			else
+				row_modified(added_id)
+		end
+#		@rowcount=@rowcount+1
+		#select insereted
+		#scroll_to_cursor(added_id)
+		set_conf(get_id,0,"cursor",added_id)
+	end
+	
+	def row_modified(modified_id=list.get_cursor_id)
+		@list_model.row_modified(modified_id)
+	end
+
+	def child_by_id(mid)
+		@caller.notebook.moditem_by_id(mid)
+	end
+	
+	def next_editable_column(column)
+		next_col=nil
+		col_num=nil
+		i=0
+		columns.each{|col|
+			col_num=i if col == column
+			if !col_num.nil? and i > col_num and col.header["editable"]=="true" and col.header["type"]!='gtk_toggle'
+				next_col=col
+				break
+			end
+			i+=1
+		}
+		next_col
+	end
+
+	def wipe
+		save_config
+		set_model(nil)
+		if @list_model.thread and @list_model.thread.alive?
+			progress.killed(object_id)
+			p Thread.kill(@list_model.thread)
+			while @list_model.thread.alive? do ecode("waiting for thread"); end
+		end
+	  @list_model.wipe
+	  while c=get_column(0)
+			remove_column(c)
+			c.wipe
+	  end
+		destroy
+	end
+
+	def inspect
+		"List(#{title})"
+	end
+	def to_s
+		inspect
+	end
+end
+

data/lib/ListHolder/GanttHolder/Gantt/Rectangle.rb

@@ -0,0 +1,290 @@
+#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 Rectangle
+	def initialize(gantt,iter)
+		@iter=iter
+		@gantt=gantt
+		@has_child=iter.has_child?
+		@level=0
+		@iter_id=iter[gantt.list.list_model.column_of_id].to_i
+		@parent_r=@gantt.rectangles[iter.parent[gantt.list.list_model.column_of_id].to_i] unless iter.parent.nil?
+		@successors=Hash.new
+		if gantt.successors_column
+				iter[gantt.successors_column].split(',').each{|pid|
+					@successors[pid.to_i]=nil
+				}
+		end
+		@group=iter[gantt.group_column] if gantt.group_column
+		@partial=if gantt.partial_column then iter[gantt.partial_column].to_i else 100 end
+		@percentage=if gantt.percentage_column then iter[gantt.percentage_column].to_i else 0 end
+		if gantt.group_color_column
+			begin
+				@color=Gdk::Color.parse("##{iter[@gantt.group_color_column]}")
+			rescue
+				@color=nil
+			end
+			else
+			@color=nil
+		end
+		@color=Gdk::Color.parse("#1782E0") if @color.nil?
+		#we assume it's mysql unix_timestamp
+		@start=iter[gantt.start_column].to_i
+		@dur=iter[gantt.dur_column].to_i
+		
+		@y1=0
+		@height=10
+		@gantt_min_x=0
+		iter_coordinates
+		@visible=iter[gantt.list.list_model.column_of_visible]
+	end
+	attr_reader :iter, :iter_id, :height, :y1, :successors, :start, :dur, :group, :percentage
+	attr_accessor :level
+	
+	def finish
+		@start+@dur
+	end
+		
+	def set_duration(ndur,store=false)
+		@dur=ndur
+		@gantt.list.list_model.change_value_of_id(iter_id,@gantt.list.gtk_attribute('gantt_duration'),@dur) if store
+	end
+
+	def set_percentage(npercentage,store=false)
+		@percentage=npercentage
+		@gantt.list.list_model.change_value_of_id(iter_id,@gantt.list.gtk_attribute('gantt_percentage'),@percentage) if store && @gantt.percentage_column
+	end
+
+	def set_height(new_height)
+		@height=new_height
+	end
+
+		def iter_coordinates
+			r=@gantt.list.get_background_area(@gantt.list.model.convert_child_path_to_path(@gantt.list.model.model.convert_child_path_to_path(iter.path)),nil)
+			@y1=r.y+@gantt.vadjustment.value+r.height/3
+			@height=r.height*2/3
+		end
+		def x1
+			@start/@gantt.res-@gantt_min_x
+		end
+		def to_gui(x)
+			x.to_f/@gantt.res-@gantt_min_x
+		end
+		def x2
+			x1+width
+		end
+		def partial_width
+			width*@partial.to_f/100.0
+		end
+		def partial_x2
+			x1+partial_width
+		end
+		def partial_duration
+			@dur*@partial.to_f/100.0
+		end
+		def partial_finish
+			@start+@dur*@partial.to_f/100.0
+		end
+		def y2
+			@y1+@height
+		end
+		def in_area?(x,y)
+			x1<=x && x<=x2 && y1<y && y<y2
+		end
+		def width
+			@dur/@gantt.res
+		end
+		def x
+			x1+width/2
+		end
+		def y
+			y1+height/2
+		end
+		def draw(cr,hilight=false)
+			return self unless visible?
+			#fill bar
+			cr.set_source_rgba(@color.red.to_f/0x10000,@color.green.to_f/0x10000,@color.blue.to_f/0x10000,if @has_child then 0.05 else 0.7 end)
+			cr.set_line_width(1).set_dash(100000)
+			cr.rounded_rectangle(x1,y1,width,height,4)
+			cr.fill
+			cr.stroke
+			#bar border
+			if hilight
+				cr.set_source_rgba(0.7,0.1,0.1,0.7)
+			else
+				cr.set_source_rgba(0,0,0,0.7)
+			end
+			cr.rounded_rectangle(x1,y1,width,height,4)
+			cr.stroke
+			#draw collisions
+			cr.set_source_rgba(1,0,0,0.1)
+			@gantt.collisions(self).each{|coo|
+				cr.rectangle(to_gui(coo[0]),0,to_gui(coo[1])-to_gui(coo[0]),@gantt.widget.allocation.height)
+				cr.fill
+				cr.stroke
+			}
+			#draw percentage
+			if @gantt.percentage_column
+				cr.set_source_rgba((1-@color.red.to_f)/0x10000,(1-@color.green.to_f)/0x10000,(1-@color.blue.to_f)/0x10000,if @has_child then 0.05 else 0.3 end)
+				cr.rounded_rectangle(x1,y1+1,@percentage*width/100,height-2,3)
+				cr.fill
+				cr.stroke
+			end
+			self
+		end
+
+		def draw_arrow(cr)
+			#successors arrow
+			@successors.each_value{|pred|
+				if pred && visible? && pred.visible?
+					cr.set_line_width(2).set_source_rgba(0.1,0.1,0.1,0.7).set_dash(100000)
+					xx1=[x+10,x2].min
+					yy4=if y<pred.y then pred.y1-1 else pred.y2+1 end
+					yya=if y<pred.y then -3 else 3 end
+					cr.move_to(xx1,y)
+					cr.curve_to(pred.x,y,pred.x,y,pred.x,yy4)
+#					cr.stroke
+=begin					
+					cr.set_source_rgba(1,0,0,0.5)
+					cr.move_to(pred.x,y)
+					cr.line_to(pred.x,yy4)
+
+					cr.stroke
+
+					cr.set_source_rgba(1,1,0,0.5)
+					cr.move_to(xx1,y)
+					cr.line_to(pred.x,y)
+					cr.stroke
+=end
+					#arrow
+					cr.move_to(pred.x,yy4).rel_line_to(-3,yya)
+					cr.move_to(pred.x,yy4).rel_line_to(3,yya)
+					cr.stroke
+				end
+			}
+			self
+		end
+		def print_percentage(cr)
+			if visible? && @gantt.percentage_column && width >22 && width*Pango::SCALE < 1073741824
+				pl=cr.create_pango_layout
+				font="Sans 7"
+				pl.set_font_description(Pango::FontDescription.new(font))
+				pl.set_width(width*Pango::SCALE) 
+				pl.set_wrap(Pango::Layout::WRAP_WORD_CHAR).set_ellipsize(Pango::Layout::ELLIPSIZE_NONE).set_alignment(Pango::Layout::ALIGN_CENTER)
+				cr.set_source_rgba(0,0,1,1)
+					
+				pl.set_text("#{@percentage}%")
+				cr.move_to(x1,y1+2)
+				cr.show_pango_layout(pl)
+					
+				cr.stroke
+			end
+		end
+		def draw_verticals(cr)
+			return self unless visible?
+			#verticals
+			cr.set_source_rgba(48.0/255,88.0/255,116.0/255,0.4).set_line_width(0.7).set_dash(5)
+			cr.move_to(x1,0)
+			cr.rel_line_to(0,y1)
+			cr.move_to(x2,0)
+			cr.rel_line_to(0,y1)
+			cr.stroke
+			self
+		end
+		def draw_hilight(cr)
+			return self unless visible?
+			cr.set_source_rgba(0.5,0.5,0.5,0.3).set_dash(100000).set_line_cap(Cairo::LineCap::BUTT)
+			cr.set_line_width(height).move_to(0,y).line_to(x2,y).stroke
+			cr.set_line_width(width).move_to(x,0).line_to(x,y2).stroke
+			cr.set_line_cap(Cairo::LineCap::ROUND)
+		end
+
+		def set_gantt_min_x(gmin_x)
+			@gantt_min_x=gmin_x
+		end
+
+		def move_to(new_x,store=false)
+			return unless @gantt.start_editable
+			new_start=@gantt.res*(@gantt_min_x+new_x)
+			@store_start=true if @start!=new_start
+			@start=new_start
+			min=@gantt.min_for_rectangle(self)
+			new_start=min if new_start<min
+			@start=new_start
+			@gantt.clear
+			push_successors(store)
+			set_start(@start,store)
+		end
+		def move_finished
+			set_start(@start,true)
+			push_successors(true)
+		end
+		
+		def recursion?(starter=nil)
+			ret=false
+			successors.each_value{|pred|
+				next if pred.nil?
+				#avoid recursion
+				if starter == pred
+					ret=true
+					ewarn("recursion")
+					return ret
+				end
+				ret=pred.recursion?(if starter.nil? then self else starter end)
+			}
+			ret
+		end
+		
+		def init_successors
+			@successors.each_key{|k| @successors[k]=@gantt.rectangles[k]}
+		end
+
+		def toggle_successor(pr)
+			return false if pr.nil?
+			if ret=((@successors.has_key?(pr.iter_id)) || (pr==self))
+				#this successor exists, removing
+				@successors.delete(pr.iter_id)
+			else
+				#adding new successor
+				@successors[pr.iter_id]=pr
+				@successors.delete(pr.iter_id) if recursion?
+			end
+
+			#pr is successors rectangle, saving here
+			pids=""
+			@successors.each_key{|k| pids="#{pids}#{k},"}
+			@gantt.list.list_model.change_value_of_id(iter_id,@gantt.list.gtk_attribute('gantt_successors'),pids.chomp(","))
+			push_successors(true)
+			ret
+		end
+
+		def set_start(new_start,store=false)
+			#save start
+			@start=new_start
+			if store
+				@gantt.list.list_model.change_value_of_id(iter_id,@gantt.list.gtk_attribute('gantt_start'),@start)
+			end
+		end
+		def push_successors(store=false)
+			successors.each_value{|pred|
+				next if pred.nil?
+				if store then 
+					pred.move_to(pred.x1,store)
+				else 
+					pred.move_to(partial_x2,store)  if pred.start < @start+partial_duration
+				end
+				pred.push_successors(store)
+			}
+		end
+		def visible?
+			@visible && (@parent_r.nil? || y1!=@parent_r.y1)
+		end
+		def has_child?
+			@has_child
+		end
+		def to_s
+			"Rectangle(id:#{iter_id})"
+		end
+	end
+