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 #include "precompiled_reportdesign.hxx"
24 #include "RptPage.hxx"
25 #include "RptModel.hxx"
26 #include "Section.hxx"
27 #include "RptObject.hxx"
28 #include <svx/unoapi.hxx>
29 #include <svx/unoshape.hxx>
30 #include "ReportDrawPage.hxx"
31
32 namespace rptui
33 {
34 using namespace ::com::sun::star;
35 TYPEINIT1( OReportPage, SdrPage );
36
37 //----------------------------------------------------------------------------
DBG_NAME(rpt_OReportPage)38 DBG_NAME( rpt_OReportPage )
39 OReportPage::OReportPage( OReportModel& _rModel
40 ,const uno::Reference< report::XSection >& _xSection
41 ,FASTBOOL bMasterPage )
42 :SdrPage( _rModel, bMasterPage )
43 ,rModel(_rModel)
44 ,m_xSection(_xSection)
45 ,m_bSpecialInsertMode(false)
46 {
47 DBG_CTOR( rpt_OReportPage,NULL);
48 }
49
50 //----------------------------------------------------------------------------
51
OReportPage(const OReportPage & rPage)52 OReportPage::OReportPage( const OReportPage& rPage )
53 :SdrPage( rPage )
54 ,rModel(rPage.rModel)
55 ,m_xSection(rPage.m_xSection)
56 ,m_bSpecialInsertMode(rPage.m_bSpecialInsertMode)
57 ,m_aTemporaryObjectList(rPage.m_aTemporaryObjectList)
58 {
59 DBG_CTOR( rpt_OReportPage,NULL);
60 }
61
62 //----------------------------------------------------------------------------
63
~OReportPage()64 OReportPage::~OReportPage()
65 {
66 DBG_DTOR( rpt_OReportPage,NULL);
67 }
68
69 //----------------------------------------------------------------------------
70
Clone() const71 SdrPage* OReportPage::Clone() const
72 {
73 DBG_CHKTHIS( rpt_OReportPage,NULL);
74 return new OReportPage( *this );
75 }
76
77 //----------------------------------------------------------------------------
getIndexOf(const uno::Reference<report::XReportComponent> & _xObject)78 sal_uLong OReportPage::getIndexOf(const uno::Reference< report::XReportComponent >& _xObject)
79 {
80 DBG_CHKTHIS( rpt_OReportPage,NULL);
81 sal_uLong nCount = GetObjCount();
82 sal_uLong i = 0;
83 for (; i < nCount; ++i)
84 {
85 OObjectBase* pObj = dynamic_cast<OObjectBase*>(GetObj(i));
86 OSL_ENSURE(pObj,"Invalid object found!");
87 if ( pObj && pObj->getReportComponent() == _xObject )
88 {
89 break;
90 }
91 } // for (; i < nCount; ++i)
92 return i;
93 }
94 //----------------------------------------------------------------------------
removeSdrObject(const uno::Reference<report::XReportComponent> & _xObject)95 void OReportPage::removeSdrObject(const uno::Reference< report::XReportComponent >& _xObject)
96 {
97 DBG_CHKTHIS( rpt_OReportPage,NULL);
98 sal_uLong nPos = getIndexOf(_xObject);
99 if ( nPos < GetObjCount() )
100 {
101 OObjectBase* pBase = dynamic_cast<OObjectBase*>(GetObj(nPos));
102 OSL_ENSURE(pBase,"Why is this not a OObjectBase?");
103 if ( pBase )
104 pBase->EndListening();
105 /*delete */RemoveObject(nPos);
106 }
107 }
108 // -----------------------------------------------------------------------------
RemoveObject(sal_uLong nObjNum)109 SdrObject* OReportPage::RemoveObject(sal_uLong nObjNum)
110 {
111 SdrObject* pObj = SdrPage::RemoveObject(nObjNum);
112 if (getSpecialMode())
113 {
114 return pObj;
115 }
116
117 // this code is evil, but what else shall I do
118 reportdesign::OSection* pSection = reportdesign::OSection::getImplementation(m_xSection);
119 uno::Reference< drawing::XShape> xShape(pObj->getUnoShape(),uno::UNO_QUERY);
120 pSection->notifyElementRemoved(xShape);
121 if (pObj->ISA(OUnoObject))
122 {
123 OUnoObject* pUnoObj = dynamic_cast<OUnoObject*>(pObj);
124 uno::Reference< container::XChild> xChild(pUnoObj->GetUnoControlModel(),uno::UNO_QUERY);
125 if ( xChild.is() )
126 xChild->setParent(NULL);
127 }
128 return pObj;
129 }
130 //----------------------------------------------------------------------------
131 //namespace
132 //{
133 // ::rtl::OUString lcl_getControlName(const uno::Reference< lang::XServiceInfo >& _xServiceInfo)
134 // {
135 // if ( _xServiceInfo->supportsService( SERVICE_FIXEDTEXT ))
136 // return ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.component.FixedText"));
137 // if ( _xServiceInfo->supportsService( SERVICE_FORMATTEDFIELD ))
138 // return ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.component.FormattedField"));
139 // if ( _xServiceInfo->supportsService( SERVICE_IMAGECONTROL))
140 // return ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.component.DatabaseImageControl"));
141 //
142 // return ::rtl::OUString();
143 // }
144 //}
145 //----------------------------------------------------------------------------
insertObject(const uno::Reference<report::XReportComponent> & _xObject)146 void OReportPage::insertObject(const uno::Reference< report::XReportComponent >& _xObject)
147 {
148 DBG_CHKTHIS( rpt_OReportPage,NULL);
149 OSL_ENSURE(_xObject.is(),"Object is not valid to create a SdrObject!");
150 if ( !_xObject.is() ) // || !m_pView )
151 return;
152 sal_uLong nPos = getIndexOf(_xObject);
153 if ( nPos < GetObjCount() )
154 return; // Object already in list
155
156 SvxShape* pShape = SvxShape::getImplementation( _xObject );
157 OObjectBase* pObject = pShape ? dynamic_cast< OObjectBase* >( pShape->GetSdrObject() ) : NULL;
158 OSL_ENSURE( pObject, "OReportPage::insertObject: no implementation object found for the given shape/component!" );
159 if ( pObject )
160 pObject->StartListening();
161 }
162 // -----------------------------------------------------------------------------
getSection() const163 uno::Reference< report::XSection > OReportPage::getSection() const
164 {
165 return m_xSection;
166 }
167 // -----------------------------------------------------------------------------
createUnoPage()168 uno::Reference< uno::XInterface > OReportPage::createUnoPage()
169 {
170 return static_cast<cppu::OWeakObject*>( new reportdesign::OReportDrawPage(this,m_xSection) );
171 }
172 // -----------------------------------------------------------------------------
removeTempObject(SdrObject * _pToRemoveObj)173 void OReportPage::removeTempObject(SdrObject *_pToRemoveObj)
174 {
175 if (_pToRemoveObj)
176 {
177 for (sal_uLong i=0;i<GetObjCount();i++)
178 {
179 SdrObject *aObj = GetObj(i);
180 if (aObj && aObj == _pToRemoveObj)
181 {
182 SdrObject* pObject = RemoveObject(i);
183 (void)pObject;
184 break;
185 // delete pObject;
186 }
187 }
188 }
189 }
190
resetSpecialMode()191 void OReportPage::resetSpecialMode()
192 {
193 const sal_Bool bChanged = rModel.IsChanged();
194 ::std::vector<SdrObject*>::iterator aIter = m_aTemporaryObjectList.begin();
195 ::std::vector<SdrObject*>::iterator aEnd = m_aTemporaryObjectList.end();
196
197 for (; aIter != aEnd; ++aIter)
198 {
199 removeTempObject(*aIter);
200 }
201 m_aTemporaryObjectList.clear();
202 rModel.SetChanged(bChanged);
203
204 m_bSpecialInsertMode = false;
205 }
206 // -----------------------------------------------------------------------------
NbcInsertObject(SdrObject * pObj,sal_uLong nPos,const SdrInsertReason * pReason)207 void OReportPage::NbcInsertObject(SdrObject* pObj, sal_uLong nPos, const SdrInsertReason* pReason)
208 {
209 SdrPage::NbcInsertObject(pObj, nPos, pReason);
210
211 OUnoObject* pUnoObj = dynamic_cast< OUnoObject* >( pObj );
212 if (getSpecialMode())
213 {
214 m_aTemporaryObjectList.push_back(pObj);
215 return;
216 }
217
218 if ( pUnoObj )
219 {
220 pUnoObj->CreateMediator();
221 uno::Reference< container::XChild> xChild(pUnoObj->GetUnoControlModel(),uno::UNO_QUERY);
222 if ( xChild.is() && !xChild->getParent().is() )
223 xChild->setParent(m_xSection);
224 }
225
226 // this code is evil, but what else shall I do
227 reportdesign::OSection* pSection = reportdesign::OSection::getImplementation(m_xSection);
228 uno::Reference< drawing::XShape> xShape(pObj->getUnoShape(),uno::UNO_QUERY);
229 pSection->notifyElementAdded(xShape);
230
231 //// check if we are a shape
232 //uno::Reference<beans::XPropertySet> xProp(xShape,uno::UNO_QUERY);
233 //if ( xProp.is() && xProp->getPropertySetInfo()->hasPropertyByName(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("CLSID"))) )
234 //{
235 // // use MimeConfigurationHelper::GetStringClassIDRepresentation(MimeConfigurationHelper::GetSequenceClassID(SO3_SCH_OLE_EMBED_CLASSID_8))
236 // xProp->setPropertyValue(rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("CLSID")),uno::makeAny(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("12dcae26-281f-416f-a234-c3086127382e"))));
237 //}
238
239 // now that the shape is inserted into its structures, we can allow the OObjectBase
240 // to release the reference to it
241 OObjectBase* pObjectBase = dynamic_cast< OObjectBase* >( pObj );
242 OSL_ENSURE( pObjectBase, "OReportPage::NbcInsertObject: what is being inserted here?" );
243 if ( pObjectBase )
244 pObjectBase->releaseUnoShape();
245 }
246 //============================================================================
247 } // rptui
248 //============================================================================
249