Hanmac/rwx

/*
 * wxCheckListBox.cpp
 *
 *  Created on: 14.03.2013
 *      Author: hanmac
 */

#include "wxCheckListBox.hpp"
#include "wxItemContainer.hpp"

VALUE rb_cWXCheckListBox;

#if wxUSE_CHECKLISTBOX

namespace RubyWX {
namespace CheckListBox {
#define _self unwrap<wxCheckListBox*>(self)

APP_PROTECT(wxCheckListBox)

singlereturn_array(GetCheckedItems, wxArrayInt)

/*
 * call-seq:
 *   CheckListBox.new(parent, name, [options])
 *   CheckListBox.new(parent, [options])
 *
 * creates a new CheckListBox widget.
 * ===Arguments
 * * parent of this window or nil
 * * name is a String describing a resource in a loaded xrc
 *
 * *options: Hash with possible options to set
 *
*/
DLL_LOCAL VALUE _initialize(int argc,VALUE *argv,VALUE self)
{
    VALUE parent,name,hash;
    rb_scan_args(argc, argv, "11:", &parent, &name, &hash);
    if(!_created && !rb_obj_is_kind_of(name,rb_cString)) {
        wxWindowID id(wxID_ANY);
        wxArrayString choices;
        int style(0);

        if(rb_obj_is_kind_of(hash,rb_cHash)) {
            set_hash_option(hash, "id", id, unwrapID);
            set_hash_option(hash, "choices", choices);
            set_hash_option(hash, "style", style);

            ListBox::set_style_flags(hash,style);
        }
        if(nil_check(parent)) {
            _self->Create(
                unwrap<wxWindow*>(parent), id,
                wxDefaultPosition, wxDefaultSize,
                choices, style
            );

        }
    }
    rb_call_super(argc,argv);

    if(rb_obj_is_kind_of(hash,rb_cHash)) {
        set_ruby_option(hash, "selection", ItemContainer::_setSelection, self);
    }
    return self;
}


DLL_LOCAL VALUE _each_checked_size(VALUE self)
{
    wxArrayInt data;
    return RB_UINT2NUM(_self->GetCheckedItems(data));
}


/*
 * call-seq:
 *   each_checked -> Enumerator
 *   each_checked { |idx, text| } -> self
 *
 * iterates the checked items of the list box.
 * ===Return value
 * self
 *
*/
DLL_LOCAL VALUE _each_checked(VALUE self)
{
    RETURN_SIZED_ENUMERATOR(self,0,NULL,RUBY_METHOD_FUNC(_each_checked_size));

    wxArrayInt data;
    _self->GetCheckedItems(data);

    for(wxArrayInt::iterator it = data.begin(); it != data.end();++it)
        rb_yield_values(2,RB_INT2NUM(*it),check_index(*it, _self->GetCount()) ? wrap(_self->GetString(*it)) : Qnil );

    return self;
}

/*
 * call-seq:
 *   checked_strings -> Array
 *
 * returns the strings of all checked items as array
 * ===Return value
 * Array
 *
*/
DLL_LOCAL VALUE _getCheckedStrings(VALUE self)
{
    wxArrayInt data;
    size_t size = _self->GetCheckedItems(data);

    VALUE result = rb_ary_new_capa(size);
    for(wxArrayInt::iterator it = data.begin(); it != data.end();++it)
        rb_ary_push(result, wrap(_self->GetString(*it)));

    return result;
}

/*
 * call-seq:
 *   check_all(val = true) -> self
 *
 * check or uncheck all elements
 * ===Return value
 * self
 *
*/
DLL_LOCAL VALUE _check_all(int argc,VALUE *argv,VALUE self)
{
    VALUE val(Qtrue);
    rb_scan_args(argc, argv, "01", &val);

    bool cval = RTEST(val);

    for(unsigned int i = 0; i < _self->GetCount(); ++i)
        _self->Check(i, cval);

    return self;
}

macro_attr_item(ItemChecked, IsChecked, Check, GetCount, bool)

}
}

#endif

/* Document-method: get_item_checked
 * call-seq:
 *   get_item_checked(pos) -> true/false
 *
 * Determines whether an item is checked.
 * ===Arguments
 * * pos of the item. Integer
 * ===Return value
 * true/false
 * === Exceptions
 * [IndexError]
 * * pos is greater than the count of items
 *
*/

/* Document-method: set_item_checked
 * call-seq:
 *   set_item_checkedpos,val) -> self
 *
 * sets the item at the position as checked if val is true.
 * ===Arguments
 * * pos of the item. Integer
 * * val if item should be checked. true/false
 * ===Return value
 * self
 * === Exceptions
 * [IndexError]
 * * pos is greater than the count of items
 *
*/



/* Document-method: checked_items
 * call-seq:
 *   checked_items -> Array
 *
 * returns all checked items as array
 * ===Return value
 * Array
 *
*/

DLL_LOCAL void Init_WXCheckListBox(VALUE rb_mWX)
{
#if 0
    rb_mWX = rb_define_module("WX");
    rb_cWXWindow = rb_define_class_under(rb_mWX,"Window",rb_cObject);

    rb_cWXControl = rb_define_class_under(rb_mWX,"Control",rb_cWXWindow);
    rb_cWXListBox = rb_define_class_under(rb_mWX,"ListBox",rb_cWXControl);
#endif

#if wxUSE_CHECKLISTBOX
    using namespace RubyWX::CheckListBox;
    rb_cWXCheckListBox = rb_define_class_under(rb_mWX,"CheckListBox",rb_cWXListBox);
    rb_define_alloc_func(rb_cWXCheckListBox,_alloc);

    rb_define_method(rb_cWXCheckListBox,"initialize",RUBY_METHOD_FUNC(_initialize),-1);


    rb_define_method(rb_cWXCheckListBox,"each_checked",RUBY_METHOD_FUNC(_each_checked),0);
    rb_define_method(rb_cWXCheckListBox,"checked_items",RUBY_METHOD_FUNC(_GetCheckedItems),0);
    rb_define_method(rb_cWXCheckListBox,"checked_strings",RUBY_METHOD_FUNC(_getCheckedStrings),0);

    rb_define_method(rb_cWXCheckListBox,"get_item_checked",RUBY_METHOD_FUNC(_getItemChecked),1);
    rb_define_method(rb_cWXCheckListBox,"set_item_checked",RUBY_METHOD_FUNC(_setItemChecked),2);

    rb_define_method(rb_cWXCheckListBox,"check_all",RUBY_METHOD_FUNC(_check_all),-1);


    registerEventType("checklistbox", wxEVT_CHECKLISTBOX,rb_cWXCommandEvent);

    registerInfo<wxCheckListBox>(rb_cWXCheckListBox);
#endif

}