cdk 0.9.0 → 0.10.0

data/lib/cdk/components.rb

@@ -0,0 +1,28 @@
+require_relative 'components/alphalist'
+require_relative 'components/buttonbox'
+require_relative 'components/calendar'
+require_relative 'components/dialog'
+require_relative 'components/graph'
+require_relative 'components/dscale'
+require_relative 'components/entry'
+require_relative 'components/fscale'
+require_relative 'components/fslider'
+require_relative 'components/fselect'
+require_relative 'components/histogram'
+require_relative 'components/itemlist'
+require_relative 'components/label'
+require_relative 'components/marquee'
+require_relative 'components/matrix'
+require_relative 'components/mentry'
+require_relative 'components/menu'
+require_relative 'components/radio'
+require_relative 'components/scale'
+require_relative 'components/scroll'
+require_relative 'components/button'
+require_relative 'components/selection'
+require_relative 'components/slider'
+require_relative 'components/swindow'
+require_relative 'components/template'
+require_relative 'components/uscale'
+require_relative 'components/uslider'
+require_relative 'components/viewer'

data/lib/cdk/{alphalist.rb → components/alphalist.rb}

@@ -1,7 +1,10 @@
-require_relative 'cdk_objs'
+require_relative '../cdk_objs'
+require_relative '../mixins/list_support'
 
 module CDK
   class ALPHALIST < CDK::CDKOBJS
+    include ListSupport
+
     attr_reader :scroll_field, :entry_field, :list
 
     def initialize(cdkscreen, xplace, yplace, height, width, title, label,
@@ -35,14 +38,14 @@ module CDK
       # Translate the label string to a chtype array
       if label.size > 0
         lentmp = []
-        chtype_label = CDK.char2Chtype(label, lentmp, [])
+        chtype_label = char2Chtype(label, lentmp, [])
         label_len = lentmp[0]
       end
 
       # Rejustify the x and y positions if we need to.
       xtmp = [xplace]
       ytmp = [yplace]
-      CDK.alignxy(cdkscreen.window, xtmp, ytmp, box_width, box_height)
+      alignxy(cdkscreen.window, xtmp, ytmp, box_width, box_height)
       xpos = xtmp[0]
       ypos = ytmp[0]
 
@@ -96,7 +99,7 @@ module CDK
           alphalist.injectMyScroller(key)
 
           # Set the value in the entry field.
-          current = CDK.chtype2Char(scrollp.item[scrollp.current_item])
+          current = chtype2Char(scrollp.item[scrollp.current_item])
           entry.setValue(current)
           entry.draw(entry.box)
           return true
@@ -118,7 +121,7 @@ module CDK
         end
         
         # Look for a unique word match.
-        index = CDK.searchList(alphalist.list, alphalist.list.size, entry.info)
+        index = search_list(alphalist.list, alphalist.list.size, entry.info)
 
         # if the index is less than zero, return we didn't find a match
         if index < 0
@@ -227,7 +230,7 @@ module CDK
 
           if pattern.size == 0
             empty = true
-          elsif (index = CDK.searchList(alphalist.list,
+          elsif (index = search_list(alphalist.list,
               alphalist.list.size, pattern)) >= 0
             # XXX: original uses n scroll downs/ups for <10 positions change
               scrollp.setPosition(index)

data/lib/cdk/components/button.rb

@@ -0,0 +1,405 @@
+require_relative '../cdk_objs'
+
+module CDK
+  class BUTTON < CDK::CDKOBJS
+    include Formattable
+
+    def initialize(cdkscreen, xplace, yplace, text, callback, box, shadow)
+      super()
+      parent_width = cdkscreen.window.getmaxx
+      parent_height = cdkscreen.window.getmaxy
+      box_width = 0
+      xpos = xplace
+      ypos = yplace
+
+      self.setBox(box)
+      box_height = 1 + 2 * @border_size
+
+      # Translate the string to a chtype array.
+      info_len = []
+      info_pos = []
+
+      if skip_formatting?
+        @info = text
+        @info_len = @info.size
+        @info_pos = 0
+
+      else
+        @orig_text = text
+        @info = char2Chtype(text, info_len, info_pos)
+        @info_len = info_len[0]
+        @info_pos = info_pos[0]
+      end
+
+      box_width = [box_width, @info_len].max + 2 * @border_size
+
+      # Create the string alignments.
+      @info_pos = justify_string(box_width - 2 * @border_size,
+          @info_len, @info_pos)
+
+      # Make sure we didn't extend beyond the dimensions of the window.
+      box_width = if box_width > parent_width
+                  then parent_width
+                  else box_width
+                  end
+      box_height = if box_height > parent_height
+                   then parent_height
+                   else box_height
+                   end
+
+      # Rejustify the x and y positions if we need to.
+      xtmp = [xpos]
+      ytmp = [ypos]
+      alignxy(cdkscreen.window, xtmp, ytmp, box_width, box_height)
+      xpos = xtmp[0]
+      ypos = ytmp[0]
+
+      # Create the button.
+      @screen = cdkscreen
+      # ObjOf (button)->fn = &my_funcs;
+      @parent = cdkscreen.window
+      @win = Ncurses::WINDOW.new(box_height, box_width, ypos, xpos)
+      @shadow_win = nil
+      @xpos = xpos
+      @ypos = ypos
+      @box_width = box_width
+      @box_height = box_height
+      @callback = callback
+      @input_window = @win
+      @accepts_focus = true
+      @shadow = shadow
+
+      if @win.nil?
+        self.destroy
+        return nil
+      end
+
+      @win.keypad(true)
+
+      # If a shadow was requested, then create the shadow window.
+      if shadow
+        @shadow_win = Ncurses::WINDOW.new(box_height, box_width,
+            ypos + 1, xpos + 1)
+      end
+
+      # Register this baby.
+      cdkscreen.register(:BUTTON, self)
+    end
+
+    def skip_formatting=(b)
+      super
+
+      if skip_formatting?
+        @info = @orig_text
+        @info_len = @info.size
+        @info_pos = 0
+      end
+    end
+
+    # This was added for the builder.
+    def activate(actions)
+      self.draw(@box)
+      ret = -1
+
+      if actions.nil? || actions.size == 0
+        while true
+          input = self.getch([])
+
+          # Inject the character into the widget.
+          ret = self.inject(input)
+          if @exit_type != :EARLY_EXIT
+            return ret
+          end
+        end
+      else
+        # Inject each character one at a time.
+        actions.each do |x|
+          ret = self.inject(x)
+          if @exit_type == :EARLY_EXIT
+            return ret
+          end
+        end
+      end
+
+      # Set the exit type and exit
+      self.setExitType(0)
+      return -1
+    end
+
+    # This sets multiple attributes of the widget.
+    def set(mesg, box)
+      self.setMessage(mesg)
+      self.setBox(box)
+    end
+
+    # This sets the information within the button.
+    def setMessage(info)
+      info_len = []
+      info_pos = []
+      if skip_formatting?
+        @info = info
+        @info_len = info.size
+        @info_pos = 0
+      else
+        @orig_text = info
+        @info = char2Chtype(info, info_len, info_pos)
+        @info_len = info_len[0]
+        @info_pos = justify_string(@box_width - 2 * @border_size,
+          @info_len, @info_pos)
+      end
+
+      # Redraw the button widget.
+      self.erase
+      self.draw(box)
+    end
+
+    def getMessage
+      return @info
+    end
+
+    # This sets the background attribute of the widget.
+    def setBKattr(attrib)
+      @win.wbkgd(attrib)
+    end
+
+    def drawText
+      # XXX : so we can draw unicode
+      if skip_formatting?
+        @win.mvaddstr(@border_size, @border_size, @info)
+        return
+      end
+
+      box_width = @box_width
+
+      # Draw in the message.
+      (0...(box_width - 2 * @border_size)).each do |i|
+        pos = @info_pos
+        len = @info_len
+        if i >= pos && (i - pos) < len
+          c = @info[i - pos]
+        else
+          c = ' '
+        end
+
+        if @has_focus
+          c = Ncurses::A_REVERSE | c
+        end
+
+        @win.mvwaddch(@border_size, i + @border_size, c)
+      end
+    end
+
+    # This draws the button widget
+    def draw(box)
+      # Is there a shadow?
+      unless @shadow_win.nil?
+        Draw.drawShadow(@shadow_win)
+      end
+
+      # Box the widget if asked.
+      if @box
+        Draw.drawObjBox(@win, self)
+      end
+      self.drawText
+      wrefresh
+    end
+
+    # This erases the button widget.
+    def erase
+      if self.validCDKObject
+        CDK.eraseCursesWindow(@win)
+        CDK.eraseCursesWindow(@shadow_win)
+      end
+    end
+
+    # This moves the button field to the given location.
+    def move(xplace, yplace, relative, refresh_flag)
+      current_x = @win.getbegx
+      current_y = @win.getbegy
+      xpos = xplace
+      ypos = yplace
+
+      # If this is a relative move, then we will adjust where we want
+      # to move to.
+      if relative
+        xpos = @win.getbegx + xplace
+        ypos = @win.getbegy + yplace
+      end
+
+      # Adjust the window if we need to.
+      xtmp = [xpos]
+      ytmp = [ypos]
+      alignxy(@screen.window, xtmp, ytmp, @box_width, @box_height)
+      xpos = xtmp[0]
+      ypos = ytmp[0]
+
+      # Get the difference
+      xdiff = current_x - xpos
+      ydiff = current_y - ypos
+
+      # Move the window to the new location.
+      CDK.moveCursesWindow(@win, -xdiff, -ydiff)
+      CDK.moveCursesWindow(@shadow_win, -xdiff, -ydiff)
+
+      # Thouch the windows so they 'move'.
+      CDK::SCREEN.refreshCDKWindow(@screen.window)
+
+      # Redraw the window, if they asked for it.
+      if refresh_flag
+        self.draw(@box)
+      end
+    end
+
+    # This allows the user to use the cursor keys to adjust the
+    # position of the widget.
+    def position
+      # Declare some variables
+      orig_x = @win.getbegx
+      orig_y = @win.getbegy
+      key = 0
+
+      # Let them move the widget around until they hit return
+      while key != Ncurses::KEY_ENTER && key != CDK::KEY_RETURN
+        key = self.getch([])
+        if key == Ncurses::KEY_UP || key == '8'.ord
+          if @win.getbegy > 0
+            self.move(0, -1, true, true)
+          else
+            CDK.Beep
+          end
+        elsif key == Ncurses::KEY_DOWN || key == '2'.ord
+          if @win.getbegy + @win.getmaxy < @screen.window.getmaxy - 1
+            self.move(0, 1, true, true)
+          else
+            CDK.Beep
+          end
+        elsif key == Ncurses::KEY_LEFT || key == '4'.ord
+          if @win.getbegx > 0
+            self.move(-1, 0, true, true)
+          else
+            CDK.Beep
+          end
+        elsif key == Ncurses::KEY_RIGHT || key == '6'.ord
+          if @win.getbegx + @win.getmaxx < @screen.window.getmaxx - 1
+            self.move(1, 0, true, true)
+          else
+            CDK.Beep
+          end
+        elsif key == '7'.ord
+          if @win.getbegy > 0 && @win.getbegx > 0
+            self.move(-1, -1, true, true)
+          else
+            CDK.Beep
+          end
+        elsif key == '9'.ord
+          if @win.getbegx + @win.getmaxx < @screen.window.getmaxx - 1 &&
+              @win.getbegy > 0
+            self.move(1, -1, true, true)
+          else
+            CDK.Beep
+          end
+        elsif key == '1'.ord
+          if @win.getbegx > 0 &&
+              @win.getbegx + @win.getmaxx < @screen.window.getmaxx - 1
+            self.move(-1, 1, true, true)
+          else
+            CDK.Beep
+          end
+        elsif key == '3'.ord
+          if @win.getbegx + @win.getmaxx < @screen.window.getmaxx - 1 &&
+              @win.getbegy + @win.getmaxy < @screen.window.getmaxy - 1
+            self.move(1, 1, true, true)
+          else
+            CDK.Beep
+          end
+        elsif key == '5'.ord
+          self.move(CDK::CENTER, CDK::CENTER, false, true)
+        elsif key == 't'.ord
+          self.move(@win.getbegx, CDK::TOP, false, true)
+        elsif key == 'b'.ord
+          self.move(@win.getbegx, CDK::BOTTOM, false, true)
+        elsif key == 'l'.ord
+          self.move(CDK::LEFT, @win.getbegy, false, true)
+        elsif key == 'r'
+          self.move(CDK::RIGHT, @win.getbegy, false, true)
+        elsif key == 'c'
+          self.move(CDK::CENTER, @win.getbegy, false, true)
+        elsif key == 'C'
+          self.move(@win.getbegx, CDK::CENTER, false, true)
+        elsif key == CDK::REFRESH
+          @screen.erase
+          @screen.refresh
+        elsif key == CDK::KEY_ESC
+          self.move(orig_x, orig_y, false, true)
+        elsif key != CDK::KEY_RETURN && key != Ncurses::KEY_ENTER
+          CDK.Beep
+        end
+      end
+    end
+
+    # This destroys the button object pointer.
+    def destroy
+      CDK.deleteCursesWindow(@shadow_win)
+      CDK.deleteCursesWindow(@win)
+
+      self.cleanBindings(:BUTTON)
+
+      CDK::SCREEN.unregister(:BUTTON, self)
+    end
+
+    # This injects a single character into the widget.
+    def inject(input)
+      ret = -1
+      @complete = false
+
+      self.setExitType(0)
+
+      # Check a predefined binding.
+      if self.checkBind(:BUTTON, input)
+        @complete = true
+      else
+        case input
+        when CDK::KEY_ESC
+          self.setExitType(input)
+          @complete = true
+        when Ncurses::ERR
+          self.setExitType(input)
+          @complete = true
+        when ' '.ord, CDK::KEY_RETURN, Ncurses::KEY_ENTER
+          unless @callback.nil?
+            @callback.call(self)
+          end
+          self.setExitType(Ncurses::KEY_ENTER)
+          ret = 0
+          @complete = true
+        when CDK::REFRESH
+          @screen.erase
+          @screen.refresh
+        else
+          CDK.Beep
+        end
+      end
+
+      unless @complete
+        self.setExitType(0)
+      end
+
+      @result_data = ret
+      return ret
+    end
+
+    def focus
+      self.drawText
+      wrefresh
+    end
+
+    def unfocus
+      self.drawText
+      wrefresh
+    end
+
+    def object_type
+      :BUTTON
+    end
+  end # class BUTTON
+end # module CDK