Newer
Older
/***********************************************************************
* FXRuby -- the Ruby language bindings for the FOX GUI toolkit.
* Copyright (c) 2001-2009 by Lyle Johnson. All Rights Reserved.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
* For further information please contact the author by e-mail
* at "lyle@lylejohnson.name".
***********************************************************************/
/***********************************************************************
* $Id: FXRbDataTarget.cpp 2713 2007-11-14 15:27:36Z lyle $
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
***********************************************************************/
#include "FXRbCommon.h"
/**
* Data targets for FXRuby are implemented slightly different from
* those in the C++ implementation since we don't have the concept
* of C++ references for immutable types (like integers, floats and
* strings).
*/
// Initialize a data target with this value
FXRbDataTarget::FXRbDataTarget(VALUE value,FXObject* tgt,FXSelector sel) : FXDataTarget(tgt,sel), intValue(0), doubleValue(0.0), boolValue(FALSE) {
setValue(value);
}
// Set new value for data target
void FXRbDataTarget::setValue(VALUE value){
switch (TYPE(value)) {
case T_NIL:
connect();
break;
case T_FIXNUM:
intValue=NUM2LONG(value);
connect(intValue);
break;
case T_BIGNUM: /* still not sure about this conversion */
intValue=NUM2ULONG(value);
connect(intValue);
break;
case T_FLOAT:
doubleValue=NUM2DBL(value);
connect(doubleValue);
break;
case T_STRING:
stringValue=StringValuePtr(value);
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
connect(stringValue);
break;
case T_TRUE:
boolValue=TRUE;
connect(boolValue);
break;
case T_FALSE:
boolValue=FALSE;
connect(boolValue);
break;
default:
rb_raise(rb_eTypeError,
"can't initialize FXDataTarget with type %s.",
rb_class2name(CLASS_OF(value)));
}
}
// Return current value for this data target
VALUE FXRbDataTarget::getValue() const {
switch(type){
case DT_VOID:
return Qnil;
case DT_CHAR:
return to_ruby(*reinterpret_cast<FXchar*>(data));
case DT_UCHAR:
return to_ruby(*reinterpret_cast<FXuchar*>(data));
case DT_SHORT:
return to_ruby(*reinterpret_cast<FXshort*>(data));
case DT_USHORT:
return to_ruby(*reinterpret_cast<FXushort*>(data));
case DT_INT:
return to_ruby(*reinterpret_cast<FXint*>(data));
case DT_UINT:
return to_ruby(*reinterpret_cast<FXuint*>(data));
case DT_LONG:
return to_ruby(*reinterpret_cast<FXlong*>(data));
case DT_ULONG:
return to_ruby(*reinterpret_cast<FXulong*>(data));
case DT_FLOAT:
return to_ruby(*reinterpret_cast<FXfloat*>(data));
case DT_DOUBLE:
return to_ruby(*reinterpret_cast<FXdouble*>(data));
case DT_STRING:
return to_ruby(*reinterpret_cast<FXString*>(data));
default:
fxerror("unknown data type in FXRbDataTarget::getValue()");
}
return Qnil;
}