1 /**************************************************************
2 *
3 * Licensed to the Apache Software Foundation (ASF) under one
4 * or more contributor license agreements. See the NOTICE file
5 * distributed with this work for additional information
6 * regarding copyright ownership. The ASF licenses this file
7 * to you under the Apache License, Version 2.0 (the
8 * "License"); you may not use this file except in compliance
9 * with the License. You may obtain a copy of the License at
10 *
11 * http://www.apache.org/licenses/LICENSE-2.0
12 *
13 * Unless required by applicable law or agreed to in writing,
14 * software distributed under the License is distributed on an
15 * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16 * KIND, either express or implied. See the License for the
17 * specific language governing permissions and limitations
18 * under the License.
19 *
20 *************************************************************/
21
22
23
24 // MARKER(update_precomp.py): autogen include statement, do not remove
25 #include "precompiled_forms.hxx"
26 #include "CheckBox.hxx"
27 #include "property.hxx"
28 #ifndef _FRM_PROPERTY_HRC_
29 #include "property.hrc"
30 #endif
31 #include "services.hxx"
32 #include <tools/debug.hxx>
33 #include <comphelper/basicio.hxx>
34
35 //.........................................................................
36 namespace frm
37 {
38 using namespace ::com::sun::star::uno;
39 using namespace ::com::sun::star::sdb;
40 using namespace ::com::sun::star::sdbc;
41 using namespace ::com::sun::star::sdbcx;
42 using namespace ::com::sun::star::beans;
43 using namespace ::com::sun::star::container;
44 using namespace ::com::sun::star::form;
45 using namespace ::com::sun::star::awt;
46 using namespace ::com::sun::star::io;
47 using namespace ::com::sun::star::lang;
48 using namespace ::com::sun::star::util;
49 using namespace ::com::sun::star::form::binding;
50
51 //==================================================================
52 //= OCheckBoxControl
53 //==================================================================
54
55 //------------------------------------------------------------------
OCheckBoxControl(const Reference<XMultiServiceFactory> & _rxFactory)56 OCheckBoxControl::OCheckBoxControl(const Reference<XMultiServiceFactory>& _rxFactory)
57 :OBoundControl(_rxFactory, VCL_CONTROL_CHECKBOX)
58 {
59 }
60
61 //------------------------------------------------------------------
OCheckBoxControl_CreateInstance(const Reference<XMultiServiceFactory> & _rxFactory)62 InterfaceRef SAL_CALL OCheckBoxControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
63 {
64 return *(new OCheckBoxControl(_rxFactory));
65 }
66
67 //------------------------------------------------------------------------------
getSupportedServiceNames()68 StringSequence SAL_CALL OCheckBoxControl::getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException)
69 {
70 StringSequence aSupported = OBoundControl::getSupportedServiceNames();
71 aSupported.realloc(aSupported.getLength() + 1);
72
73 ::rtl::OUString* pArray = aSupported.getArray();
74 pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_CHECKBOX;
75 return aSupported;
76 }
77
78 //==================================================================
79 //= OCheckBoxModel
80 //==================================================================
81
82 //==================================================================
OCheckBoxModel_CreateInstance(const Reference<XMultiServiceFactory> & _rxFactory)83 InterfaceRef SAL_CALL OCheckBoxModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
84 {
85 return *(new OCheckBoxModel(_rxFactory));
86 }
87
88 //------------------------------------------------------------------
DBG_NAME(OCheckBoxModel)89 DBG_NAME( OCheckBoxModel )
90 //------------------------------------------------------------------
91 OCheckBoxModel::OCheckBoxModel(const Reference<XMultiServiceFactory>& _rxFactory)
92 :OReferenceValueComponent( _rxFactory, VCL_CONTROLMODEL_CHECKBOX, FRM_SUN_CONTROL_CHECKBOX, sal_True )
93 // use the old control name for compytibility reasons
94 {
95 DBG_CTOR( OCheckBoxModel, NULL );
96
97 m_nClassId = FormComponentType::CHECKBOX;
98 initValueProperty( PROPERTY_STATE, PROPERTY_ID_STATE );
99 }
100
101 //------------------------------------------------------------------
OCheckBoxModel(const OCheckBoxModel * _pOriginal,const Reference<XMultiServiceFactory> & _rxFactory)102 OCheckBoxModel::OCheckBoxModel( const OCheckBoxModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
103 :OReferenceValueComponent( _pOriginal, _rxFactory )
104 {
105 DBG_CTOR( OCheckBoxModel, NULL );
106 }
107
108 //------------------------------------------------------------------------------
~OCheckBoxModel()109 OCheckBoxModel::~OCheckBoxModel()
110 {
111 DBG_DTOR( OCheckBoxModel, NULL );
112 }
113
114 //------------------------------------------------------------------------------
IMPLEMENT_DEFAULT_CLONING(OCheckBoxModel)115 IMPLEMENT_DEFAULT_CLONING( OCheckBoxModel )
116
117 // XServiceInfo
118 //------------------------------------------------------------------------------
119 StringSequence SAL_CALL OCheckBoxModel::getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException)
120 {
121 StringSequence aSupported = OReferenceValueComponent::getSupportedServiceNames();
122
123 sal_Int32 nOldLen = aSupported.getLength();
124 aSupported.realloc( nOldLen + 8 );
125 ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
126
127 *pStoreTo++ = BINDABLE_CONTROL_MODEL;
128 *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
129 *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
130
131 *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
132 *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
133
134 *pStoreTo++ = FRM_SUN_COMPONENT_CHECKBOX;
135 *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_CHECKBOX;
136 *pStoreTo++ = BINDABLE_DATABASE_CHECK_BOX;
137
138 return aSupported;
139 }
140
141 //------------------------------------------------------------------------------
describeFixedProperties(Sequence<Property> & _rProps) const142 void OCheckBoxModel::describeFixedProperties( Sequence< Property >& _rProps ) const
143 {
144 BEGIN_DESCRIBE_PROPERTIES( 1, OReferenceValueComponent )
145 DECL_PROP1(TABINDEX, sal_Int16, BOUND);
146 END_DESCRIBE_PROPERTIES();
147 }
148
149 //------------------------------------------------------------------------------
getServiceName()150 ::rtl::OUString SAL_CALL OCheckBoxModel::getServiceName() throw(RuntimeException)
151 {
152 return FRM_COMPONENT_CHECKBOX; // old (non-sun) name for compatibility !
153 }
154
155 //------------------------------------------------------------------------------
write(const Reference<stario::XObjectOutputStream> & _rxOutStream)156 void SAL_CALL OCheckBoxModel::write(const Reference<stario::XObjectOutputStream>& _rxOutStream)
157 throw(stario::IOException, RuntimeException)
158 {
159 OReferenceValueComponent::write(_rxOutStream);
160
161 // Version
162 _rxOutStream->writeShort(0x0003);
163 // Properties
164 _rxOutStream << getReferenceValue();
165 _rxOutStream << (sal_Int16)getDefaultChecked();
166 writeHelpTextCompatibly(_rxOutStream);
167 // from version 0x0003 : common properties
168 writeCommonProperties(_rxOutStream);
169 }
170
171 //------------------------------------------------------------------------------
read(const Reference<stario::XObjectInputStream> & _rxInStream)172 void SAL_CALL OCheckBoxModel::read(const Reference<stario::XObjectInputStream>& _rxInStream) throw(stario::IOException, RuntimeException)
173 {
174 OReferenceValueComponent::read(_rxInStream);
175 osl::MutexGuard aGuard(m_aMutex);
176
177 // Version
178 sal_uInt16 nVersion = _rxInStream->readShort();
179
180 ::rtl::OUString sReferenceValue;
181 sal_Int16 nDefaultChecked( 0 );
182 switch ( nVersion )
183 {
184 case 0x0001:
185 _rxInStream >> sReferenceValue;
186 nDefaultChecked = _rxInStream->readShort();
187 break;
188 case 0x0002:
189 _rxInStream >> sReferenceValue;
190 _rxInStream >> nDefaultChecked;
191 readHelpTextCompatibly( _rxInStream );
192 break;
193 case 0x0003:
194 _rxInStream >> sReferenceValue;
195 _rxInStream >> nDefaultChecked;
196 readHelpTextCompatibly(_rxInStream);
197 readCommonProperties(_rxInStream);
198 break;
199 default:
200 DBG_ERROR("OCheckBoxModel::read : unknown version !");
201 defaultCommonProperties();
202 break;
203 }
204 setReferenceValue( sReferenceValue );
205 setDefaultChecked( static_cast< ToggleState >( nDefaultChecked ) );
206
207 // Nach dem Lesen die Defaultwerte anzeigen
208 if ( getControlSource().getLength() )
209 // (not if we don't have a control source - the "State" property acts like it is persistent, then
210 resetNoBroadcast();
211 }
212
213 //------------------------------------------------------------------------------
translateDbColumnToControlValue()214 Any OCheckBoxModel::translateDbColumnToControlValue()
215 {
216 Any aValue;
217
218 //////////////////////////////////////////////////////////////////
219 // Wert an ControlModel setzen
220 sal_Bool bValue = m_xColumn->getBoolean();
221 if ( m_xColumn->wasNull() )
222 {
223 sal_Bool bTriState = sal_True;
224 if ( m_xAggregateSet.is() )
225 m_xAggregateSet->getPropertyValue( PROPERTY_TRISTATE ) >>= bTriState;
226 aValue <<= (sal_Int16)( bTriState ? STATE_DONTKNOW : getDefaultChecked() );
227 }
228 else
229 aValue <<= (sal_Int16)( bValue ? STATE_CHECK : STATE_NOCHECK );
230
231 return aValue;
232 }
233
234 //-----------------------------------------------------------------------------
commitControlValueToDbColumn(bool)235 sal_Bool OCheckBoxModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
236 {
237 OSL_PRECOND( m_xColumnUpdate.is(), "OCheckBoxModel::commitControlValueToDbColumn: not bound!" );
238 if ( m_xColumnUpdate.is() )
239 {
240 Any aControlValue( m_xAggregateSet->getPropertyValue( PROPERTY_STATE ) );
241 try
242 {
243 sal_Int16 nValue = STATE_DONTKNOW;
244 aControlValue >>= nValue;
245 switch (nValue)
246 {
247 case STATE_DONTKNOW:
248 m_xColumnUpdate->updateNull();
249 break;
250 case STATE_CHECK:
251 m_xColumnUpdate->updateBoolean( sal_True );
252 break;
253 case STATE_NOCHECK:
254 m_xColumnUpdate->updateBoolean( sal_False );
255 break;
256 default:
257 DBG_ERROR("OCheckBoxModel::commitControlValueToDbColumn: invalid value !");
258 }
259 }
260 catch(Exception&)
261 {
262 DBG_ERROR("OCheckBoxModel::commitControlValueToDbColumn: could not commit !");
263 }
264 }
265 return sal_True;
266 }
267
268 //.........................................................................
269 }
270 //.........................................................................
271
272