Class: Canis::MenuBar

Inherits:
Object show all
Defined in:
lib/canis/core/widgets/rmenu.rb

Overview

An application related menubar. Currently, I am adding this to a form. But should this not be application specific ? It should popup no matter which window you are on ?? XXX

Instance Attribute Summary collapse

Instance Method Summary collapse

Constructor Details

#initialize(&block) ⇒ MenuBar

Returns a new instance of MenuBar.



682
683
684
685
686
687
688
689
690
 
# File 'lib/canis/core/widgets/rmenu.rb', line 682

def initialize &block
  @window = nil
  @text = "menubar"
  @items = []
  init_vars
  @visible = false
  @cols = Ncurses.COLS-1
  instance_eval &block if block_given?
end

Instance Attribute Details

#_object_created ⇒ Object

2011-10-7 if visible then Form will call this



681
682
683
 
# File 'lib/canis/core/widgets/rmenu.rb', line 681

def _object_created
  @_object_created
end

#active_index ⇒ Object

Returns the value of attribute active_index.



677
678
679
 
# File 'lib/canis/core/widgets/rmenu.rb', line 677

def active_index
  @active_index
end

#bgcolor ⇒ Object

2011-09-25 V1.3.1



680
681
682
 
# File 'lib/canis/core/widgets/rmenu.rb', line 680

def bgcolor
  @bgcolor
end

#color ⇒ Object

2011-09-25 V1.3.1



680
681
682
 
# File 'lib/canis/core/widgets/rmenu.rb', line 680

def color
  @color
end

#items ⇒ Object (readonly)

Returns the value of attribute items.



671
672
673
 
# File 'lib/canis/core/widgets/rmenu.rb', line 671

def items
  @items
end

#panel ⇒ Object (readonly)

Returns the value of attribute panel.



673
674
675
 
# File 'lib/canis/core/widgets/rmenu.rb', line 673

def panel
  @panel
end

#selected ⇒ Object (readonly)

Returns the value of attribute selected.



674
675
676
 
# File 'lib/canis/core/widgets/rmenu.rb', line 674

def selected
  @selected
end

#state ⇒ Object

normal, selected, highlighted



678
679
680
 
# File 'lib/canis/core/widgets/rmenu.rb', line 678

def state
  @state
end

#text ⇒ Object (readonly)

temp 2011-09-24 V1.3.1



675
676
677
 
# File 'lib/canis/core/widgets/rmenu.rb', line 675

def text
  @text
end

#toggle_key ⇒ Object

key used to popup, should be set prior to attaching to form



679
680
681
 
# File 'lib/canis/core/widgets/rmenu.rb', line 679

def toggle_key
  @toggle_key
end

#visible ⇒ Object

Returns the value of attribute visible.



676
677
678
 
# File 'lib/canis/core/widgets/rmenu.rb', line 676

def visible
  @visible
end

#window ⇒ Object (readonly)

Returns the value of attribute window.



672
673
674
 
# File 'lib/canis/core/widgets/rmenu.rb', line 672

def window
  @window
end

Instance Method Details

#add(menu) ⇒ Object Also known as: <<

add a precreated menu, returning self



701
702
703
704
 
# File 'lib/canis/core/widgets/rmenu.rb', line 701

def add menu
  @items << menu
  return self
end

#create_window_menubar ⇒ Object 



887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
 
# File 'lib/canis/core/widgets/rmenu.rb', line 887

def create_window_menubar
  @layout = { :height => 1, :width => 0, :top => 0, :left => 0 } 
  $log.debug "create window menu bar "
  @win = Canis::Window.new(@layout)
  @win.name = "WINDOW:menubar"
  @window = @win
  # hack since we put all windows in there, and this should not be coming after Root.
  # This should not have been a window in the first place.
  $global_windows.delete @win
  att = get_attrib @attr
  @win.bkgd(Ncurses.COLOR_PAIR(5)); # <---- FIXME
  len = @window.width
  len = Ncurses.COLS-0 if len == 0
  # print a bar across the screen , which hopefully will not go blank in some terms
  @window.attron(Ncurses.COLOR_PAIR(@color_pair) | att)
  @window.mvhline(0, 0, 1, len)
  @window.attroff(Ncurses.COLOR_PAIR(@color_pair) | att)
  @panel = @win.panel
  return @window
end

#current_menu ⇒ Object

returns current_menu



825
826
827
 
# File 'lib/canis/core/widgets/rmenu.rb', line 825

def current_menu
  @items[@active_index]
end

#destroy ⇒ Object 



907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
 
# File 'lib/canis/core/widgets/rmenu.rb', line 907

def destroy
  $log.debug "DESTRY menubar #{@keep_visible} "

  # when we close, but keep visible, we don't want menu to still be hightlighted
  # added on 2011-12-12 
  menu = @items[@active_index]
  menu.on_leave # hide its window, if open

  @items.each do |item|
    item.destroy
  end
  $log.debug "  DESTROY finished with items "
  # TODO the current menu should not be highlighted
  # FIXME even here i think underlying windows need to be repainted.
  #return if @keep_visible
  if @keep_visible
    Window.refresh_all
    return
  end
  @visible = false
  # replacing next 3 lines with destroy. 2014-05-12 - 17:07 CANIS
  #panel = @window.panel
  #Ncurses::Panel.del_panel(panel.pointer) if !panel.nil?   
  #@window.delwin if [email protected]?
  $log.debug "  CALLING WINDOW DESTROY from menubar"
  @window.destroy
  @window = nil
end

#focusable ⇒ Object Also known as: focusable?

is this widget focusable, always returns false



696
697
698
 
# File 'lib/canis/core/widgets/rmenu.rb', line 696

def focusable
  false
end

#handle_keys ⇒ Object

menubar LEFT, RIGHT, DOWN



765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
 
# File 'lib/canis/core/widgets/rmenu.rb', line 765

def handle_keys
  @selected = false
  @repaint_required = true # added 2011-12-12 otherwise keeps repainting and you see a flicker
  @toggle_key ||= 27 # default switch off with ESC, if nothing else defined
  set_menu 0
  begin
  catch(:menubarclose) do
  while((ch = @window.getchar()) != @toggle_key )
   #$log.debug "menuubar inside handle_keys :  #{ch}"  if ch != -1
    case ch
    when -1
      next
    when KEY_DOWN

      if !@selected
        current_menu.fire
      else
        current_menu.handle_key ch
      end
        
      @selected = true
    when KEY_ENTER, 10, 13, 32
      @selected = true
      ret = current_menu.handle_key ch
      #break; ## 2008-12-29 18:00  This will close after firing anything
      break if ret == :CLOSE
    when KEY_UP
      current_menu.handle_key ch
    when KEY_LEFT
      ret = current_menu.handle_key ch
      prev_menu if ret == :UNHANDLED
    when KEY_RIGHT
      ret = current_menu.handle_key ch
      next_menu if ret == :UNHANDLED
    when ?\C-g.getbyte(0) # abort
      throw :menubarclose
    else
      ret = current_menu.handle_key ch
      if ret == :UNHANDLED
        Ncurses.beep 
      else
        break  # we handled a menu action, close menubar (THIS WORKS FOR MNEMONICS ONLY and always)
      end
    end
    Ncurses::Panel.update_panels();
    Ncurses.doupdate();

    @window.wrefresh
  end
  end # catch
  ensure
    #ensure is required becos one can throw a :close
    $log.debug " DESTROY IN ENSURE"
    current_menu.clear_menus
    @repaint_required = false
    destroy  # Note that we destroy the menu bar upon exit
  end
end

#hide ⇒ Object 



847
848
849
850
 
# File 'lib/canis/core/widgets/rmenu.rb', line 847

def hide
  @visible = false
  @window.hide if !@window.nil? # seems to cause auto-firing when we resume toggle 2011-09-26 
end

#init_vars ⇒ Object 



691
692
693
694
 
# File 'lib/canis/core/widgets/rmenu.rb', line 691

def init_vars
  @active_index = 0
  @repaint_required = true
end

#keep_visible(flag = nil) ⇒ Object

keep the menu bar visible at all times. If not, then it appears only on using the toggle key. In any case, control only goes to the menubar when you use the toggle key, so it is best NOT to keep it visible.



758
759
760
761
762
763
 
# File 'lib/canis/core/widgets/rmenu.rb', line 758

def keep_visible flag=nil
  return @keep_visible unless flag
  @keep_visible = flag
  @visible = flag
  self
end

#menu(text, &block) ⇒ Object

add a menu through the block, this would happen through instance eval 2010-09-10 12:07 added while simplifying the interface this calls add so you get the MB back, not a ref to the menu created NOTE



710
711
712
713
714
715
716
 
# File 'lib/canis/core/widgets/rmenu.rb', line 710

def menu text, &block
  m = Menu.new text, &block 
  m.color = @color
  m.bgcolor = @bgcolor
  add m
  return m
end

#next_menu ⇒ Object

move focus to next menu



718
719
720
721
722
723
724
725
 
# File 'lib/canis/core/widgets/rmenu.rb', line 718

def next_menu
  #$log.debug "next meu: #{@active_index}  " 
  if @active_index < @items.length-1
    set_menu @active_index + 1
  else
    set_menu 0
  end
end

#prev_menu ⇒ Object

move focus to previous menu



727
728
729
730
731
732
733
734
 
# File 'lib/canis/core/widgets/rmenu.rb', line 727

def prev_menu
  #$log.debug "prev meu: #{@active_index} " 
  if @active_index > 0
    set_menu @active_index-1
  else
    set_menu @items.length-1
  end
end

#repaint ⇒ Object

menubar TODO: check for menu to be flush right (only for last one). TODO: repaint only if needed



862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
 
# File 'lib/canis/core/widgets/rmenu.rb', line 862

def repaint
  return if !@visible
  return unless @repaint_required
  @repaint_required = false
  @color_pair = get_color($reversecolor, @color, @bgcolor)
  @window ||= create_window_menubar
  #@window.printstring( 0, 0, "%-*s" % [@cols," "], @color_pair) # this becomes blank in some terms
  c = 1; r = 0;
  @items.each do |item|
    item.row = r; item.col = c; item.coffset = c; item.parent = self
    item.color = @color
    item.bgcolor = @bgcolor
    @window.printstring( r, c, " %s " % item.text, @color_pair)
    # 2011-09-26 V1.3.1 quick dirty highlighting of first menu on menubar
    # on opening since calling highlight was giving bug in parent.width
    #if c == 1
      #att =  Ncurses::A_REVERSE
      #@window.mvchgat(y=r, x=c+1, item.text.length+1, att, @color_pair, nil)
    #end
    c += (item.text.length + 2)
  end
  #@items[0].on_enter # 2011-09-25 V1.3.1  caused issues when toggling, first item fired on DOWN
  @items[0].highlight unless @keep_visible # 2011-09-26 V1.3.1   fixed to take both cases into account
  @window.wrefresh
end

#set_menu(index) ⇒ Object

set the given menu index as the current or active menu

after closing the active menu.

Parameters:

  • Fixnum —

    index of menu to activate, starting 0



739
740
741
742
743
744
745
746
747
748
749
750
751
752
 
# File 'lib/canis/core/widgets/rmenu.rb', line 739

def set_menu index
  #$log.debug "set meu: #{@active_index} #{index}" 
  # first leave the existing window
  menu = @items[@active_index]
  menu.on_leave # hide its window, if open
  # now move to given menu
  @active_index = index
  menu = @items[@active_index]
  menu.on_enter #display window, if previous was displayed
  # move cursor to selected menu option on top, not inside list
  @window.wmove menu.row, menu.col
#     menu.show
#     menu.window.wrefresh # XXX we need this
end

#show ⇒ Object 



851
852
853
854
855
856
857
858
 
# File 'lib/canis/core/widgets/rmenu.rb', line 851

def show
  @visible = true
  if @window.nil?
    repaint  # XXX FIXME
  else
    @window.show 
  end
end

#toggle ⇒ Object

called by set_menu_bar in widget.rb (class Form).



829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
 
# File 'lib/canis/core/widgets/rmenu.rb', line 829

def toggle
  # added keeping it visible, 2011-10-7 being tested in dbdemo
  if @keep_visible
    init_vars
    show
    @items[0].highlight
    @window.ungetch(KEY_DOWN)
    return
  end
  #@items.each { |i| $log.debug " ITEM DDD : #{i.text}" }
  @visible = !@visible
  if !@visible
    hide
  else
    init_vars
    show
  end
end