tools/source/ref/globname.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include <ctype.h>
  21 #include <stdio.h>
  22 #include <string.h>
  23
  24 #include <rtl/strbuf.hxx>
  25
  26 #include <tools/stream.hxx>
  27 #include <tools/globname.hxx>
  28
  29 // ImpSvGlobalName ------------------------------------------------------------
  30
  31 ImpSvGlobalName::ImpSvGlobalName( const ImpSvGlobalName & rObj )
  32 {
  33     nRefCount = 0;
  34     memcpy( szData, rObj.szData, sizeof( szData ) );
  35 }
  36
  37 ImpSvGlobalName::ImpSvGlobalName( Empty )
  38 {
  39     nRefCount = 1;
  40     memset( szData, 0, sizeof( szData ) );
  41 }
  42
  43 sal_Bool ImpSvGlobalName::operator == ( const ImpSvGlobalName & rObj ) const
  44 {
  45     return !memcmp( szData, rObj.szData, sizeof( szData ) );
  46 }
  47
  48 // SvGlobalName ----------------------------------------------------------------
  49
  50 SvGlobalName::SvGlobalName()
  51 {
  52     static ImpSvGlobalName aNoName( ImpSvGlobalName::EMPTY );
  53
  54     pImp = &aNoName;
  55     pImp->nRefCount++;
  56 }
  57
  58 #ifdef WNT
  59 struct _GUID
  60 #else
  61 struct GUID
  62 #endif
  63 {
  64     sal_uInt32 Data1;
  65     sal_uInt16 Data2;
  66     sal_uInt16 Data3;
  67     sal_uInt8  Data4[8];
  68 };
  69 SvGlobalName::SvGlobalName( const CLSID & rId )
  70 {
  71     pImp = new ImpSvGlobalName();
  72     pImp->nRefCount++;
  73     memcpy( pImp->szData, &rId, sizeof( pImp->szData ) );
  74 }
  75
  76 SvGlobalName::SvGlobalName( sal_uInt32 n1, sal_uInt16 n2, sal_uInt16 n3,
  77                             sal_uInt8 b8, sal_uInt8 b9, sal_uInt8 b10, sal_uInt8 b11,
  78                             sal_uInt8 b12, sal_uInt8 b13, sal_uInt8 b14, sal_uInt8 b15 )
  79 {
  80     pImp = new ImpSvGlobalName();
  81     pImp->nRefCount++;
  82
  83     memcpy(pImp->szData, &n1, sizeof(n1));
  84     memcpy(pImp->szData+4, &n2, sizeof(n2));
  85     memcpy(pImp->szData+6, &n3, sizeof(n3));
  86     pImp->szData[ 8  ] = b8;
  87     pImp->szData[ 9  ] = b9;
  88     pImp->szData[ 10 ] = b10;
  89     pImp->szData[ 11 ] = b11;
  90     pImp->szData[ 12 ] = b12;
  91     pImp->szData[ 13 ] = b13;
  92     pImp->szData[ 14 ] = b14;
  93     pImp->szData[ 15 ] = b15;
  94 }
  95
  96 SvGlobalName::~SvGlobalName()
  97 {
  98     pImp->nRefCount--;
  99     if( !pImp->nRefCount )
 100         delete pImp;
 101 }
 102
 103 SvGlobalName & SvGlobalName::operator = ( const SvGlobalName & rObj )
 104 {
 105     rObj.pImp->nRefCount++;
 106     pImp->nRefCount--;
 107     if( !pImp->nRefCount )
 108         delete pImp;
 109     pImp = rObj.pImp;
 110     return *this;
 111 }
 112
 113 void SvGlobalName::NewImp()
 114 {
 115     if( pImp->nRefCount > 1 )
 116     {
 117         pImp->nRefCount--;
 118         pImp = new ImpSvGlobalName( *pImp );
 119         pImp->nRefCount++;
 120     }
 121 }
 122
 123 SvStream& operator << ( SvStream& rOStr, const SvGlobalName & rObj )
 124 {
 125     sal_uInt32 a;
 126     memcpy(&a, rObj.pImp->szData, sizeof(sal_uInt32));
 127     rOStr << a;
 128
 129     sal_uInt16 b;
 130     memcpy(&b, rObj.pImp->szData+4, sizeof(sal_uInt16));
 131     rOStr << b;
 132
 133     memcpy(&b, rObj.pImp->szData+6, sizeof(sal_uInt16));
 134     rOStr << b;
 135
 136     rOStr.Write( (sal_Char *)&rObj.pImp->szData[ 8 ], 8 );
 137     return rOStr;
 138 }
 139
 140 SvStream& operator >> ( SvStream& rStr, SvGlobalName & rObj )
 141 {
 142     rObj.NewImp(); // copy if necessary
 143
 144     sal_uInt32 a;
 145     rStr >> a;
 146     memcpy(rObj.pImp->szData, &a, sizeof(sal_uInt32));
 147
 148     sal_uInt16 b;
 149     rStr >> b;
 150     memcpy(rObj.pImp->szData+4, &b, sizeof(sal_uInt16));
 151
 152     rStr >> b;
 153     memcpy(rObj.pImp->szData+6, &b, sizeof(sal_uInt16));
 154
 155     rStr.Read( (sal_Char *)&rObj.pImp->szData[ 8 ], 8 );
 156     return rStr;
 157 }
 158
 159
 160 sal_Bool SvGlobalName::operator < ( const SvGlobalName & rObj ) const
 161 {
 162     int n = memcmp( pImp->szData +6, rObj.pImp->szData +6,
 163                     sizeof( pImp->szData ) -6);
 164     if( n < 0 )
 165         return sal_True;
 166     else if( n > 0 )
 167         return sal_False;
 168
 169     sal_uInt16 Data2_a;
 170     memcpy(&Data2_a, pImp->szData+4, sizeof(sal_uInt16));
 171
 172     sal_uInt16 Data2_b;
 173     memcpy(&Data2_b, rObj.pImp->szData+4, sizeof(sal_uInt16));
 174
 175     if( Data2_a < Data2_b )
 176         return sal_True;
 177     else if( Data2_a == Data2_b )
 178     {
 179         sal_uInt32 Data1_a;
 180         memcpy(&Data1_a, pImp->szData, sizeof(sal_uInt32));
 181
 182         sal_uInt32 Data1_b;
 183         memcpy(&Data1_b, rObj.pImp->szData, sizeof(sal_uInt32));
 184
 185         return Data1_a  < Data1_b;
 186     }
 187     else
 188         return sal_False;
 189
 190 }
 191
 192 SvGlobalName & SvGlobalName::operator += ( sal_uInt32 n )
 193 {
 194     NewImp();
 195
 196     sal_uInt32 nOld;
 197     memcpy(&nOld, pImp->szData, sizeof(sal_uInt32));
 198     sal_uInt32 nNew = nOld + n;
 199     memcpy(pImp->szData, &nNew, sizeof(sal_uInt32));
 200
 201     if( nOld > nNew )
 202     {
 203         // overflow
 204         sal_uInt16 Data2;
 205         memcpy(&Data2, pImp->szData + 4, sizeof(sal_uInt16));
 206         ++Data2;
 207         memcpy(pImp->szData + 4, &Data2, sizeof(sal_uInt16));
 208     }
 209     return *this;
 210 }
 211
 212 sal_Bool SvGlobalName::operator == ( const SvGlobalName & rObj ) const
 213 {
 214     return *pImp == *rObj.pImp;
 215 }
 216
 217 void SvGlobalName::MakeFromMemory( void * pData )
 218 {
 219     NewImp();
 220     memcpy( pImp->szData, pData, sizeof( pImp->szData ) );
 221 }
 222
 223 sal_Bool SvGlobalName::MakeId( const String & rIdStr )
 224 {
 225     OString aStr(OUStringToOString(rIdStr,
 226         RTL_TEXTENCODING_ASCII_US));
 227     const sal_Char *pStr = aStr.getStr();
 228     if( rIdStr.Len() == 36
 229       && '-' == pStr[ 8 ]  && '-' == pStr[ 13 ]
 230       && '-' == pStr[ 18 ] && '-' == pStr[ 23 ] )
 231     {
 232         sal_uInt32 nFirst = 0;
 233         int i = 0;
 234         for( i = 0; i < 8; i++ )
 235         {
 236             if( isxdigit( *pStr ) )
 237                 if( isdigit( *pStr ) )
 238                     nFirst = nFirst * 16 + (*pStr - '0');
 239                 else
 240                     nFirst = nFirst * 16 + (toupper( *pStr ) - 'A' + 10 );
 241             else
 242                 return sal_False;
 243             pStr++;
 244         }
 245
 246         sal_uInt16 nSec = 0;
 247         pStr++;
 248         for( i = 0; i < 4; i++ )
 249         {
 250             if( isxdigit( *pStr ) )
 251                 if( isdigit( *pStr ) )
 252                     nSec = nSec * 16 + (*pStr - '0');
 253                 else
 254                     nSec = nSec * 16 + (sal_uInt16)(toupper( *pStr ) - 'A' + 10 );
 255             else
 256                 return sal_False;
 257             pStr++;
 258         }
 259
 260         sal_uInt16 nThird = 0;
 261         pStr++;
 262         for( i = 0; i < 4; i++ )
 263         {
 264             if( isxdigit( *pStr ) )
 265                 if( isdigit( *pStr ) )
 266                     nThird = nThird * 16 + (*pStr - '0');
 267                 else
 268                     nThird = nThird * 16 + (sal_uInt16)(toupper( *pStr ) - 'A' + 10 );
 269             else
 270                 return sal_False;
 271             pStr++;
 272         }
 273
 274         sal_Int8 szRemain[ 8 ];
 275         memset( szRemain, 0, sizeof( szRemain ) );
 276         pStr++;
 277         for( i = 0; i < 16; i++ )
 278         {
 279             if( isxdigit( *pStr ) )
 280                 if( isdigit( *pStr ) )
 281                     szRemain[i/2] = szRemain[i/2] * 16 + (*pStr - '0');
 282                 else
 283                     szRemain[i/2] = szRemain[i/2] * 16 + (sal_Int8)(toupper( *pStr ) - 'A' + 10 );
 284             else
 285                 return sal_False;
 286             pStr++;
 287             if( i == 3 )
 288                 pStr++;
 289         }
 290
 291         NewImp();
 292         memcpy(&pImp->szData[0], &nFirst, sizeof(nFirst));
 293         memcpy(&pImp->szData[4], &nSec, sizeof(nSec));
 294         memcpy(&pImp->szData[6], &nThird, sizeof(nThird));
 295         memcpy(&pImp->szData[ 8 ], szRemain, 8);
 296         return sal_True;
 297     }
 298     return sal_False;
 299 }
 300
 301 String SvGlobalName::GetHexName() const
 302 {
 303     OStringBuffer aHexBuffer;
 304
 305     sal_Char buf[ 10 ];
 306     sal_uInt32 Data1;
 307     memcpy(&Data1, pImp->szData, sizeof(sal_uInt32));
 308     sprintf( buf, "%8.8" SAL_PRIXUINT32, Data1 );
 309     aHexBuffer.append(buf);
 310     aHexBuffer.append('-');
 311     sal_uInt16 i ;
 312     for( i = 4; i < 8; i += 2 )
 313     {
 314         sal_uInt16 Data2;
 315         memcpy(&Data2, pImp->szData+i, sizeof(sal_uInt16));
 316         sprintf( buf, "%4.4X", Data2 );
 317         aHexBuffer.append(buf);
 318         aHexBuffer.append('-');
 319     }
 320     for( i = 8; i < 10; i++ )
 321     {
 322         sprintf( buf, "%2.2x", pImp->szData[ i ] );
 323         aHexBuffer.append(buf);
 324     }
 325     aHexBuffer.append('-');
 326     for( i = 10; i < 16; i++ )
 327     {
 328         sprintf( buf, "%2.2x", pImp->szData[ i ] );
 329         aHexBuffer.append(buf);
 330     }
 331     return OStringToOUString(aHexBuffer.makeStringAndClear(), RTL_TEXTENCODING_ASCII_US);
 332 }
 333
 334 com::sun::star::uno::Sequence < sal_Int8 > SvGlobalName::GetByteSequence() const
 335 {
 336     // platform independent representation of a "GlobalName"
 337     // maybe transported remotely
 338     com::sun::star::uno::Sequence< sal_Int8 > aResult( 16 );
 339
 340     sal_uInt32 Data1;
 341     memcpy(&Data1, pImp->szData, sizeof(sal_uInt32));
 342     aResult[0] = (sal_Int8) (Data1 >> 24);
 343     aResult[1] = (sal_Int8) ((Data1 << 8 ) >> 24);
 344     aResult[2] = (sal_Int8) ((Data1 << 16 ) >> 24);
 345     aResult[3] = (sal_Int8) ((Data1 << 24 ) >> 24);
 346     sal_uInt16 Data2;
 347     memcpy(&Data2, pImp->szData+4, sizeof(sal_uInt16));
 348     aResult[4] = (sal_Int8) (Data2 >> 8);
 349     aResult[5] = (sal_Int8) ((Data2 << 8 ) >> 8);
 350     sal_uInt16 Data3;
 351     memcpy(&Data3, pImp->szData+6, sizeof(sal_uInt16));
 352     aResult[6] = (sal_Int8) (Data3 >> 8);
 353     aResult[7] = (sal_Int8) ((Data3 << 8 ) >> 8);
 354     aResult[8] = pImp->szData[ 8 ];
 355     aResult[9] = pImp->szData[ 9 ];
 356     aResult[10] = pImp->szData[ 10 ];
 357     aResult[11] = pImp->szData[ 11 ];
 358     aResult[12] = pImp->szData[ 12 ];
 359     aResult[13] = pImp->szData[ 13 ];
 360     aResult[14] = pImp->szData[ 14 ];
 361     aResult[15] = pImp->szData[ 15 ];
 362
 363     return aResult;
 364 }
 365
 366 SvGlobalName::SvGlobalName( const com::sun::star::uno::Sequence < sal_Int8 >& aSeq )
 367 {
 368     // create SvGlobalName from a platform independent representation
 369     GUID aResult;
 370     memset( &aResult, 0, sizeof( aResult ) );
 371     if ( aSeq.getLength() == 16 )
 372     {
 373         aResult.Data1 = ( ( ( ( ( ( sal_uInt8 )aSeq[0] << 8 ) + ( sal_uInt8 )aSeq[1] ) << 8 ) + ( sal_uInt8 )aSeq[2] ) << 8 ) + ( sal_uInt8 )aSeq[3];
 374         aResult.Data2 = ( ( sal_uInt8 )aSeq[4] << 8 ) + ( sal_uInt8 )aSeq[5];
 375         aResult.Data3 = ( ( sal_uInt8 )aSeq[6] << 8 ) + ( sal_uInt8 )aSeq[7];
 376         for( int nInd = 0; nInd < 8; nInd++ )
 377             aResult.Data4[nInd] = ( sal_uInt8 )aSeq[nInd+8];
 378     }
 379
 380     pImp = new ImpSvGlobalName();
 381     pImp->nRefCount++;
 382     memcpy( pImp->szData, &aResult, sizeof( pImp->szData ) );
 383 }
 384
 385 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */