1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/persistentdata/persistentstorage/dbms/usql/UQ_LIT.CPP Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,261 @@
1.4 +// Copyright (c) 1998-2009 Nokia Corporation and/or its subsidiary(-ies).
1.5 +// All rights reserved.
1.6 +// This component and the accompanying materials are made available
1.7 +// under the terms of "Eclipse Public License v1.0"
1.8 +// which accompanies this distribution, and is available
1.9 +// at the URL "http://www.eclipse.org/legal/epl-v10.html".
1.10 +//
1.11 +// Initial Contributors:
1.12 +// Nokia Corporation - initial contribution.
1.13 +//
1.14 +// Contributors:
1.15 +//
1.16 +// Description:
1.17 +// SQL Literal value and node classes
1.18 +//
1.19 +//
1.20 +
1.21 +#include "UQ_STD.H"
1.22 +
1.23 +// internalising literal strings, overload selectors
1.24 +
1.25 +inline HBufC8* Alloc8L(const TDesC8& aDes)
1.26 + {return aDes.AllocL();}
1.27 +inline HBufC8* Alloc8L(const TDesC16& aDes)
1.28 + {HBufC8* cell=HBufC8::NewL(aDes.Length());cell->Des().Copy(aDes);return cell;}
1.29 +inline HBufC16* Alloc16L(const TDesC16& aDes)
1.30 + {return aDes.AllocL();}
1.31 +inline HBufC16* Alloc16L(const TDesC8& aDes)
1.32 + {HBufC16* cell=HBufC16::NewL(aDes.Length());cell->Des().Copy(aDes);return cell;}
1.33 +
1.34 +template <class B,class T>
1.35 +inline B* DoInternString(B* aBuf,T*)
1.36 + {
1.37 + const T* base=aBuf->Ptr();
1.38 + const T* from=base;
1.39 + const T* end=base+aBuf->Length();
1.40 + for (;;)
1.41 + {
1.42 + if (from==end)
1.43 + return aBuf;
1.44 + if (*from++=='\'')
1.45 + break;
1.46 + }
1.47 + T* to=(T*)from;
1.48 + ++from;
1.49 + while (from<end)
1.50 + {
1.51 + T c=*from++;
1.52 + if (c=='\'')
1.53 + ++from;
1.54 + *to++=c;
1.55 + }
1.56 + aBuf->Des().SetLength(to-base);
1.57 + return aBuf;
1.58 + }
1.59 +
1.60 +template <class B>
1.61 +inline B* InternString(B* aBuf)
1.62 + {return DoInternString(aBuf,PtrType(*aBuf));}
1.63 +
1.64 +// Class RSqlLiteral
1.65 +
1.66 +void RSqlLiteral::Close()
1.67 +//
1.68 +// Free any allocated cell
1.69 +//
1.70 + {
1.71 + if(iBuffer)
1.72 + delete iBuffer;
1.73 + if (IsAlloc())
1.74 + User::Free(iVal.iAlloc);
1.75 +
1.76 +
1.77 + }
1.78 +
1.79 +void RSqlLiteral::ToInt32L()
1.80 +//
1.81 +// Convert a numeric type to Int32
1.82 +//
1.83 + {
1.84 + ToInt64L();
1.85 + const TInt64& v=iVal.iInt64;
1.86 + TInt32 l = I64LOW(v);
1.87 + TInt32 h = I64HIGH(v);
1.88 + if (h==(l>>31)) // domain check, in signed 32-bit range
1.89 + {
1.90 + iVal.iInt32=l;
1.91 + iType=EInt32;
1.92 + }
1.93 + else
1.94 + __LEAVE(KErrOverflow); // cannot convert
1.95 + }
1.96 +
1.97 +void RSqlLiteral::ToUint32L()
1.98 +//
1.99 +// Convert a numeric type to Uint32
1.100 +//
1.101 + {
1.102 + ToInt64L();
1.103 + const TInt64& v=iVal.iInt64;
1.104 + if (I64HIGH(v)==0) // domain check, in unsigned 32-bit range
1.105 + {
1.106 + iVal.iUint32 = I64LOW(v);
1.107 + iType=EUint32;
1.108 + }
1.109 + else
1.110 + __LEAVE(KErrOverflow); // cannot convert
1.111 + }
1.112 +
1.113 +void RSqlLiteral::ToInt64L()
1.114 +//
1.115 +// Convert a numeric type to int64
1.116 +//
1.117 + {
1.118 + __ASSERT(IsBasic()); // only apply conversions once
1.119 + TType t=iType;
1.120 + if (t==EReal64)
1.121 + {
1.122 + iVal.iInt64() = static_cast<TInt64>(Real64());
1.123 + iType=EInt64;
1.124 + }
1.125 + else if (t!=EInt64)
1.126 + __LEAVE(KErrGeneral);
1.127 + }
1.128 +
1.129 +void RSqlLiteral::ToReal64L()
1.130 +//
1.131 +// Convert a numeric type to real64
1.132 +//
1.133 + {
1.134 + __ASSERT(IsBasic()); // only apply conversions once
1.135 + TType t=iType;
1.136 + if (t==EInt64)
1.137 + {
1.138 + iVal.iReal64=I64REAL(Int64());
1.139 + iType=EReal64;
1.140 + }
1.141 + else if (t!=EReal64)
1.142 + __LEAVE(KErrGeneral);
1.143 + }
1.144 +
1.145 +void RSqlLiteral::ToReal32L()
1.146 +//
1.147 +// Convert a numeric type to real32
1.148 +//
1.149 + {
1.150 + ToReal64L();
1.151 + __LEAVE_IF_ERROR(TRealX(iVal.iReal64).GetTReal(iVal.iReal32));
1.152 + iType=EReal32;
1.153 + }
1.154 +
1.155 +void RSqlLiteral::ToTimeL()
1.156 +//
1.157 +// Ensure we are a time
1.158 +//
1.159 + {
1.160 + __ASSERT(IsBasic()); // only apply conversions once
1.161 + if (iType!=ETime)
1.162 + __LEAVE(KErrGeneral); // type mismatch
1.163 + }
1.164 +
1.165 +void RSqlLiteral::ToText8L()
1.166 +//
1.167 +// Convert a ptr to a text8
1.168 +//
1.169 + {
1.170 + __ASSERT(IsBasic()); // only apply conversions once
1.171 + if (iType==EPtr)
1.172 + {
1.173 + iVal.iAlloc=InternString(Alloc8L(DesC()));
1.174 + iType=EBuf8;
1.175 + }
1.176 + else
1.177 + __LEAVE(KErrGeneral); // type mismatch
1.178 + }
1.179 +
1.180 +void RSqlLiteral::ToText16L()
1.181 +//
1.182 +// Convert a ptr to a text8
1.183 +//
1.184 + {
1.185 + __ASSERT(IsBasic()); // only apply conversions once
1.186 + if (iType==EPtr)
1.187 + {
1.188 + iVal.iAlloc=InternString(Alloc16L(DesC()));
1.189 + iType=EBuf16;
1.190 + }
1.191 + else
1.192 + __LEAVE(KErrGeneral); // type mismatch
1.193 + }
1.194 +
1.195 +
1.196 +
1.197 +// class CSqlLiteralNode
1.198 +
1.199 +CSqlLiteralNode::CSqlLiteralNode(TType aType,const TDesC& aColumn,const RSqlLiteral& aLiteral)
1.200 + :CSqlBoundNode(aType,aColumn),iLiteral(aLiteral)
1.201 + {}
1.202 +
1.203 +CSqlLiteralNode::~CSqlLiteralNode()
1.204 + {
1.205 + iLiteral.Close();
1.206 + }
1.207 +
1.208 +void CSqlLiteralNode::BindL(const RDbTableRow& aSource)
1.209 + {
1.210 + CSqlBoundNode::BindL(aSource);
1.211 + switch (ColType())
1.212 + {
1.213 + default: // type not allowed in evaluation expressions
1.214 + __LEAVE(KErrGeneral);
1.215 + break;
1.216 + case EDbColBit:
1.217 + case EDbColInt8:
1.218 + case EDbColUint8:
1.219 + case EDbColInt16:
1.220 + case EDbColUint16:
1.221 + case EDbColInt32:
1.222 + case EDbColUint32:
1.223 + case EDbColInt64:
1.224 + iLiteral.ToInt64L();
1.225 + break;
1.226 + case EDbColReal32:
1.227 + case EDbColReal64:
1.228 + iLiteral.ToReal64L();
1.229 + break;
1.230 + case EDbColDateTime:
1.231 + iLiteral.ToTimeL();
1.232 + break;
1.233 + case EDbColText8:
1.234 + case EDbColLongText8:
1.235 + iLiteral.ToText8L();
1.236 + break;
1.237 + case EDbColText16:
1.238 + case EDbColLongText16:
1.239 + iLiteral.ToText16L();
1.240 + break;
1.241 + }
1.242 + }
1.243 +// copy text to buffer for LIKE Escape support
1.244 +TInt RSqlLiteral::CopyText()
1.245 + {
1.246 + if (iType==EPtr)
1.247 + {
1.248 + TInt length = iVal.iPtr.iEnd - iVal.iPtr.iPtr;
1.249 + if(iBuffer)
1.250 + delete iBuffer;
1.251 + if((iBuffer=HBufC::New(length+1)) == NULL)
1.252 + {
1.253 + return KErrNoMemory;
1.254 + }
1.255 + iBuffer->Des().Copy(iVal.iPtr.iPtr,length);
1.256 + iVal.iPtr.iPtr= &iBuffer->Des()[0];
1.257 + iBuffer->Des().Append(iVal.iPtr.iEnd,1);
1.258 + iVal.iPtr.iEnd=&iBuffer->Des()[length];
1.259 + }
1.260 + else
1.261 + return KErrGeneral; // type mismatch
1.262 + return KErrNone;
1.263 + }
1.264 +