toolkit/source/awt/vclxgraphics.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: vclxgraphics.cxx,v $
  10  * $Revision: 1.5 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_toolkit.hxx"
  33
  34 #include <toolkit/awt/vclxgraphics.hxx>
  35 #include <toolkit/awt/vclxdevice.hxx>
  36 #include <toolkit/helper/macros.hxx>
  37 #include <toolkit/helper/vclunohelper.hxx>
  38 #include <cppuhelper/typeprovider.hxx>
  39 #include <rtl/memory.h>
  40 #include <rtl/uuid.h>
  41
  42 #include <vcl/svapp.hxx>
  43 #include <vcl/outdev.hxx>
  44 #include <vcl/gradient.hxx>
  45 #include <tools/debug.hxx>
  46
  47
  48 //      ----------------------------------------------------
  49 //      class VCLXGraphics
  50 //      ----------------------------------------------------
  51
  52 // ::com::sun::star::uno::XInterface
  53 ::com::sun::star::uno::Any VCLXGraphics::queryInterface( const ::com::sun::star::uno::Type & rType ) throw(::com::sun::star::uno::RuntimeException)
  54 {
  55     ::com::sun::star::uno::Any aRet = ::cppu::queryInterface( rType,
  56                                         SAL_STATIC_CAST( ::com::sun::star::awt::XGraphics*, this ),
  57                                         SAL_STATIC_CAST( ::com::sun::star::lang::XTypeProvider*, this ),
  58                                         SAL_STATIC_CAST( ::com::sun::star::lang::XUnoTunnel*, this ) );
  59     return (aRet.hasValue() ? aRet : OWeakObject::queryInterface( rType ));
  60 }
  61
  62 // ::com::sun::star::lang::XUnoTunnel
  63 IMPL_XUNOTUNNEL( VCLXGraphics )
  64
  65 // ::com::sun::star::lang::XTypeProvider
  66 IMPL_XTYPEPROVIDER_START( VCLXGraphics )
  67     getCppuType( ( ::com::sun::star::uno::Reference< ::com::sun::star::awt::XGraphics>* ) NULL )
  68 IMPL_XTYPEPROVIDER_END
  69
  70 VCLXGraphics::VCLXGraphics() : mrMutex( Application::GetSolarMutex() )
  71 {
  72     mpOutputDevice = NULL;
  73     mpClipRegion = NULL;
  74 }
  75
  76 VCLXGraphics::~VCLXGraphics()
  77 {
  78     List* pLst = mpOutputDevice ? mpOutputDevice->GetUnoGraphicsList() : NULL;
  79     if ( pLst )
  80         pLst->Remove( this );
  81
  82     delete mpClipRegion;
  83 }
  84
  85 void VCLXGraphics::SetOutputDevice( OutputDevice* pOutDev )
  86 {
  87     mpOutputDevice = pOutDev;
  88     mxDevice = NULL;
  89 }
  90
  91 void VCLXGraphics::Init( OutputDevice* pOutDev )
  92 {
  93     DBG_ASSERT( !mpOutputDevice, "VCLXGraphics::Init allready has pOutDev !" );
  94     mpOutputDevice      = pOutDev;
  95
  96     maFont                      = mpOutputDevice->GetFont();
  97     maTextColor         = COL_BLACK;
  98     maTextFillColor = COL_TRANSPARENT;
  99     maLineColor         = COL_BLACK;
 100     maFillColor         = COL_WHITE;
 101     meRasterOp          = ROP_OVERPAINT;
 102     mpClipRegion        = NULL;
 103
 104     // Register at OutputDevice
 105     List* pLst = mpOutputDevice->GetUnoGraphicsList();
 106     if ( !pLst )
 107         pLst = mpOutputDevice->CreateUnoGraphicsList();
 108     pLst->Insert( this, LIST_APPEND );
 109 }
 110
 111 void VCLXGraphics::InitOutputDevice( sal_uInt16 nFlags )
 112 {
 113     if(mpOutputDevice)
 114     {
 115         NAMESPACE_VOS(OGuard) aVclGuard( Application::GetSolarMutex()  );
 116
 117         if ( nFlags & INITOUTDEV_FONT )
 118         {
 119             mpOutputDevice->SetFont( maFont );
 120             mpOutputDevice->SetTextColor( maTextColor );
 121             mpOutputDevice->SetTextFillColor( maTextFillColor );
 122         }
 123
 124         if ( nFlags & INITOUTDEV_COLORS )
 125         {
 126             mpOutputDevice->SetLineColor( maLineColor );
 127             mpOutputDevice->SetFillColor( maFillColor );
 128         }
 129
 130         if ( nFlags & INITOUTDEV_RASTEROP )
 131         {
 132             mpOutputDevice->SetRasterOp( meRasterOp );
 133         }
 134
 135         if ( nFlags & INITOUTDEV_CLIPREGION )
 136         {
 137             if( mpClipRegion )
 138                 mpOutputDevice->SetClipRegion( *mpClipRegion );
 139             else
 140                 mpOutputDevice->SetClipRegion();
 141         }
 142     }
 143 }
 144
 145 ::com::sun::star::uno::Reference< ::com::sun::star::awt::XDevice > VCLXGraphics::getDevice() throw(::com::sun::star::uno::RuntimeException)
 146 {
 147     ::vos::OGuard aGuard( GetMutex() );
 148
 149     if( !mxDevice.is() && mpOutputDevice )
 150     {
 151         VCLXDevice* pDev = new VCLXDevice;
 152         pDev->SetOutputDevice( mpOutputDevice );
 153         mxDevice = pDev;
 154     }
 155     return mxDevice;
 156 }
 157
 158 ::com::sun::star::awt::SimpleFontMetric VCLXGraphics::getFontMetric() throw(::com::sun::star::uno::RuntimeException)
 159 {
 160     ::vos::OGuard aGuard( GetMutex() );
 161
 162     ::com::sun::star::awt::SimpleFontMetric aM;
 163     if( mpOutputDevice )
 164     {
 165         mpOutputDevice->SetFont( maFont );
 166         aM = VCLUnoHelper::CreateFontMetric( mpOutputDevice->GetFontMetric() );
 167     }
 168     return aM;
 169 }
 170
 171 void VCLXGraphics::setFont( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XFont >& rxFont ) throw(::com::sun::star::uno::RuntimeException)
 172 {
 173     ::vos::OGuard aGuard( GetMutex() );
 174
 175     maFont = VCLUnoHelper::CreateFont( rxFont );
 176 }
 177
 178 void VCLXGraphics::selectFont( const ::com::sun::star::awt::FontDescriptor& rDescription ) throw(::com::sun::star::uno::RuntimeException)
 179 {
 180     ::vos::OGuard aGuard( GetMutex() );
 181
 182     maFont = VCLUnoHelper::CreateFont( rDescription, Font() );
 183 }
 184
 185 void VCLXGraphics::setTextColor( sal_Int32 nColor ) throw(::com::sun::star::uno::RuntimeException)
 186 {
 187     ::vos::OGuard aGuard( GetMutex() );
 188
 189     maTextColor = Color( (sal_uInt32)nColor );
 190 }
 191
 192 void VCLXGraphics::setTextFillColor( sal_Int32 nColor ) throw(::com::sun::star::uno::RuntimeException)
 193 {
 194     ::vos::OGuard aGuard( GetMutex() );
 195
 196     maTextFillColor = Color( (sal_uInt32)nColor );
 197 }
 198
 199 void VCLXGraphics::setLineColor( sal_Int32 nColor ) throw(::com::sun::star::uno::RuntimeException)
 200 {
 201     ::vos::OGuard aGuard( GetMutex() );
 202
 203     maLineColor = Color( (sal_uInt32)nColor );
 204 }
 205
 206 void VCLXGraphics::setFillColor( sal_Int32 nColor ) throw(::com::sun::star::uno::RuntimeException)
 207 {
 208     ::vos::OGuard aGuard( GetMutex() );
 209
 210     maFillColor = Color( (sal_uInt32)nColor );
 211 }
 212
 213 void VCLXGraphics::setRasterOp( ::com::sun::star::awt::RasterOperation eROP ) throw(::com::sun::star::uno::RuntimeException)
 214 {
 215     ::vos::OGuard aGuard( GetMutex() );
 216
 217     meRasterOp = (RasterOp)eROP;
 218 }
 219
 220 void VCLXGraphics::setClipRegion( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XRegion >& rxRegion ) throw(::com::sun::star::uno::RuntimeException)
 221 {
 222     ::vos::OGuard aGuard( GetMutex() );
 223
 224     delete mpClipRegion;
 225     if ( rxRegion.is() )
 226         mpClipRegion = new Region( VCLUnoHelper::GetRegion( rxRegion ) );
 227     else
 228         mpClipRegion = NULL;
 229 }
 230
 231 void VCLXGraphics::intersectClipRegion( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XRegion >& rxRegion ) throw(::com::sun::star::uno::RuntimeException)
 232 {
 233     ::vos::OGuard aGuard( GetMutex() );
 234
 235     if ( rxRegion.is() )
 236     {
 237         Region aRegion( VCLUnoHelper::GetRegion( rxRegion ) );
 238         if ( !mpClipRegion )
 239             mpClipRegion = new Region( aRegion );
 240         else
 241             mpClipRegion->Intersect( aRegion );
 242     }
 243 }
 244
 245 void VCLXGraphics::push(  ) throw(::com::sun::star::uno::RuntimeException)
 246 {
 247     ::vos::OGuard aGuard( GetMutex() );
 248
 249
 250     if( mpOutputDevice )
 251         mpOutputDevice->Push();
 252 }
 253
 254 void VCLXGraphics::pop(  ) throw(::com::sun::star::uno::RuntimeException)
 255 {
 256     ::vos::OGuard aGuard( GetMutex() );
 257
 258
 259     if( mpOutputDevice )
 260         mpOutputDevice->Pop();
 261 }
 262
 263 void VCLXGraphics::copy( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XDevice >& rxSource, sal_Int32 nSourceX, sal_Int32 nSourceY, sal_Int32 nSourceWidth, sal_Int32 nSourceHeight, sal_Int32 nDestX, sal_Int32 nDestY, sal_Int32 nDestWidth, sal_Int32 nDestHeight ) throw(::com::sun::star::uno::RuntimeException)
 264 {
 265     ::vos::OGuard aGuard( GetMutex() );
 266
 267     if ( mpOutputDevice )
 268     {
 269         VCLXDevice* pFromDev = VCLXDevice::GetImplementation( rxSource );
 270         DBG_ASSERT( pFromDev, "VCLXGraphics::copy - invalid device" );
 271         if ( pFromDev )
 272         {
 273             InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP );
 274             mpOutputDevice->DrawOutDev( Point( nDestX, nDestY ), Size( nDestWidth, nDestHeight ),
 275                                     Point( nSourceX, nSourceY ), Size( nSourceWidth, nSourceHeight ), *pFromDev->GetOutputDevice() );
 276         }
 277     }
 278 }
 279
 280 void VCLXGraphics::draw( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XDisplayBitmap >& rxBitmapHandle, sal_Int32 nSourceX, sal_Int32 nSourceY, sal_Int32 nSourceWidth, sal_Int32 nSourceHeight, sal_Int32 nDestX, sal_Int32 nDestY, sal_Int32 nDestWidth, sal_Int32 nDestHeight ) throw(::com::sun::star::uno::RuntimeException)
 281 {
 282     ::vos::OGuard aGuard( GetMutex() );
 283
 284     if( mpOutputDevice )
 285     {
 286         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP);
 287         ::com::sun::star::uno::Reference< ::com::sun::star::awt::XBitmap > xBitmap( rxBitmapHandle, ::com::sun::star::uno::UNO_QUERY );
 288         BitmapEx aBmpEx = VCLUnoHelper::GetBitmap( xBitmap );
 289
 290         Point aPos(nDestX - nSourceX, nDestY - nSourceY);
 291           Size aSz = aBmpEx.GetSizePixel();
 292
 293         if(nDestWidth != nSourceWidth)
 294         {
 295             float zoomX = (float)nDestWidth / (float)nSourceWidth;
 296             aSz.Width() = (long) ((float)aSz.Width() * zoomX);
 297         }
 298
 299         if(nDestHeight != nSourceHeight)
 300         {
 301             float zoomY = (float)nDestHeight / (float)nSourceHeight;
 302             aSz.Height() = (long) ((float)aSz.Height() * zoomY);
 303         }
 304
 305         if(nSourceX || nSourceY || aSz.Width() != nSourceWidth || aSz.Height() != nSourceHeight)
 306             mpOutputDevice->IntersectClipRegion(Region(Rectangle(nDestX, nDestY, nDestX + nDestWidth - 1, nDestY + nDestHeight - 1)));
 307
 308         mpOutputDevice->DrawBitmapEx( aPos, aSz, aBmpEx );
 309     }
 310 }
 311
 312 void VCLXGraphics::drawPixel( sal_Int32 x, sal_Int32 y ) throw(::com::sun::star::uno::RuntimeException)
 313 {
 314     ::vos::OGuard aGuard( GetMutex() );
 315
 316     if( mpOutputDevice )
 317     {
 318         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 319         mpOutputDevice->DrawPixel( Point( x, y ) );
 320     }
 321 }
 322
 323 void VCLXGraphics::drawLine( sal_Int32 x1, sal_Int32 y1, sal_Int32 x2, sal_Int32 y2 ) throw(::com::sun::star::uno::RuntimeException)
 324 {
 325     ::vos::OGuard aGuard( GetMutex() );
 326
 327     if( mpOutputDevice )
 328     {
 329         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 330         mpOutputDevice->DrawLine( Point( x1, y1 ), Point( x2, y2 ) );
 331     }
 332 }
 333
 334 void VCLXGraphics::drawRect( sal_Int32 x, sal_Int32 y, sal_Int32 width, sal_Int32 height ) throw(::com::sun::star::uno::RuntimeException)
 335 {
 336     ::vos::OGuard aGuard( GetMutex() );
 337
 338     if( mpOutputDevice )
 339     {
 340         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 341         mpOutputDevice->DrawRect( Rectangle( Point( x, y ), Size( width, height ) ) );
 342     }
 343 }
 344
 345 void VCLXGraphics::drawRoundedRect( sal_Int32 x, sal_Int32 y, sal_Int32 width, sal_Int32 height, sal_Int32 nHorzRound, sal_Int32 nVertRound ) throw(::com::sun::star::uno::RuntimeException)
 346 {
 347     ::vos::OGuard aGuard( GetMutex() );
 348
 349     if( mpOutputDevice )
 350     {
 351         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 352         mpOutputDevice->DrawRect( Rectangle( Point( x, y ), Size( width, height ) ), nHorzRound, nVertRound );
 353     }
 354 }
 355
 356 void VCLXGraphics::drawPolyLine( const ::com::sun::star::uno::Sequence< sal_Int32 >& DataX, const ::com::sun::star::uno::Sequence< sal_Int32 >& DataY ) throw(::com::sun::star::uno::RuntimeException)
 357 {
 358     ::vos::OGuard aGuard( GetMutex() );
 359
 360     if( mpOutputDevice )
 361     {
 362         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 363         mpOutputDevice->DrawPolyLine( VCLUnoHelper::CreatePolygon( DataX, DataY ) );
 364     }
 365 }
 366
 367 void VCLXGraphics::drawPolygon( const ::com::sun::star::uno::Sequence< sal_Int32 >& DataX, const ::com::sun::star::uno::Sequence< sal_Int32 >& DataY ) throw(::com::sun::star::uno::RuntimeException)
 368 {
 369     ::vos::OGuard aGuard( GetMutex() );
 370
 371     if( mpOutputDevice )
 372     {
 373         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 374         mpOutputDevice->DrawPolygon( VCLUnoHelper::CreatePolygon( DataX, DataY ) );
 375     }
 376 }
 377
 378 void VCLXGraphics::drawPolyPolygon( const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Sequence< sal_Int32 > >& DataX, const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Sequence< sal_Int32 > >& DataY ) throw(::com::sun::star::uno::RuntimeException)
 379 {
 380     ::vos::OGuard aGuard( GetMutex() );
 381
 382     if( mpOutputDevice )
 383     {
 384         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 385         sal_uInt16 nPolys = (sal_uInt16) DataX.getLength();
 386         PolyPolygon aPolyPoly( nPolys );
 387         for ( sal_uInt16 n = 0; n < nPolys; n++ )
 388             aPolyPoly[n] = VCLUnoHelper::CreatePolygon( DataX.getConstArray()[n], DataY.getConstArray()[n] );
 389
 390         mpOutputDevice->DrawPolyPolygon( aPolyPoly );
 391     }
 392 }
 393
 394 void VCLXGraphics::drawEllipse( sal_Int32 x, sal_Int32 y, sal_Int32 width, sal_Int32 height ) throw(::com::sun::star::uno::RuntimeException)
 395 {
 396     ::vos::OGuard aGuard( GetMutex() );
 397
 398     if( mpOutputDevice )
 399     {
 400         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 401         mpOutputDevice->DrawEllipse( Rectangle( Point( x, y ), Size( width, height ) ) );
 402     }
 403 }
 404
 405 void VCLXGraphics::drawArc( sal_Int32 x, sal_Int32 y, sal_Int32 width, sal_Int32 height, sal_Int32 x1, sal_Int32 y1, sal_Int32 x2, sal_Int32 y2 ) throw(::com::sun::star::uno::RuntimeException)
 406 {
 407     ::vos::OGuard aGuard( GetMutex() );
 408
 409     if( mpOutputDevice )
 410     {
 411         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 412         mpOutputDevice->DrawArc( Rectangle( Point( x, y ), Size( width, height ) ), Point( x1, y1 ), Point( x2, y2 ) );
 413     }
 414 }
 415
 416 void VCLXGraphics::drawPie( sal_Int32 x, sal_Int32 y, sal_Int32 width, sal_Int32 height, sal_Int32 x1, sal_Int32 y1, sal_Int32 x2, sal_Int32 y2 ) throw(::com::sun::star::uno::RuntimeException)
 417 {
 418     ::vos::OGuard aGuard( GetMutex() );
 419
 420     if( mpOutputDevice )
 421     {
 422         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 423         mpOutputDevice->DrawPie( Rectangle( Point( x, y ), Size( width, height ) ), Point( x1, y1 ), Point( x2, y2 ) );
 424     }
 425 }
 426
 427 void VCLXGraphics::drawChord( sal_Int32 x, sal_Int32 y, sal_Int32 width, sal_Int32 height, sal_Int32 x1, sal_Int32 y1, sal_Int32 x2, sal_Int32 y2 ) throw(::com::sun::star::uno::RuntimeException)
 428 {
 429     ::vos::OGuard aGuard( GetMutex() );
 430
 431     if( mpOutputDevice )
 432     {
 433         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 434         mpOutputDevice->DrawChord( Rectangle( Point( x, y ), Size( width, height ) ), Point( x1, y1 ), Point( x2, y2 ) );
 435     }
 436 }
 437
 438 void VCLXGraphics::drawGradient( sal_Int32 x, sal_Int32 y, sal_Int32 width, sal_Int32 height, const ::com::sun::star::awt::Gradient& rGradient ) throw(::com::sun::star::uno::RuntimeException)
 439 {
 440     ::vos::OGuard aGuard( GetMutex() );
 441
 442     if( mpOutputDevice )
 443     {
 444         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS );
 445         Gradient aGradient((GradientStyle)rGradient.Style, rGradient.StartColor, rGradient.EndColor);
 446         aGradient.SetAngle(rGradient.Angle);
 447         aGradient.SetBorder(rGradient.Border);
 448         aGradient.SetOfsX(rGradient.XOffset);
 449         aGradient.SetOfsY(rGradient.YOffset);
 450         aGradient.SetStartIntensity(rGradient.StartIntensity);
 451         aGradient.SetEndIntensity(rGradient.EndIntensity);
 452         aGradient.SetSteps(rGradient.StepCount);
 453         mpOutputDevice->DrawGradient( Rectangle( Point( x, y ), Size( width, height ) ), aGradient );
 454     }
 455 }
 456
 457 void VCLXGraphics::drawText( sal_Int32 x, sal_Int32 y, const ::rtl::OUString& rText ) throw(::com::sun::star::uno::RuntimeException)
 458 {
 459     ::vos::OGuard aGuard( GetMutex() );
 460
 461     if( mpOutputDevice )
 462     {
 463         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS |INITOUTDEV_FONT);
 464         mpOutputDevice->DrawText( Point( x, y ), rText );
 465     }
 466 }
 467
 468 void VCLXGraphics::drawTextArray( sal_Int32 x, sal_Int32 y, const ::rtl::OUString& rText, const ::com::sun::star::uno::Sequence< sal_Int32 >& rLongs ) throw(::com::sun::star::uno::RuntimeException)
 469 {
 470     ::vos::OGuard aGuard( GetMutex() );
 471
 472     if( mpOutputDevice )
 473     {
 474         InitOutputDevice( INITOUTDEV_CLIPREGION|INITOUTDEV_RASTEROP|INITOUTDEV_COLORS|INITOUTDEV_FONT );
 475         mpOutputDevice->DrawTextArray( Point( x, y ), rText, rLongs.getConstArray() );
 476     }
 477 }
 478
 479
 480
 481