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 <ado/AKeys.hxx>
21 #include <ado/AKey.hxx>
22 #include <com/sun/star/sdbc/XRow.hpp>
23 #include <com/sun/star/sdbc/XResultSet.hpp>
24 #include <com/sun/star/sdbcx/KeyType.hpp>
25 #include <com/sun/star/sdbc/KeyRule.hpp>
26 #include <ado/AConnection.hxx>
27 #include <comphelper/servicehelper.hxx>
28 #include <comphelper/types.hxx>
29 #include <ado/Awrapado.hxx>
30 #include <connectivity/dbexception.hxx>
31 #include <strings.hrc>
32
33 using namespace ::comphelper;
34 using namespace connectivity;
35 using namespace connectivity::ado;
36 using namespace com::sun::star::uno;
37 using namespace com::sun::star::lang;
38 using namespace com::sun::star::beans;
39 using namespace com::sun::star::sdbc;
40 using namespace com::sun::star::sdbcx;
41 using namespace com::sun::star::container;
42
createObject(const OUString & _rName)43 sdbcx::ObjectType OKeys::createObject(const OUString& _rName)
44 {
45 return new OAdoKey(isCaseSensitive(),m_pConnection,m_aCollection.GetItem(_rName));
46 }
47
impl_refresh()48 void OKeys::impl_refresh()
49 {
50 m_aCollection.Refresh();
51 }
52
createDescriptor()53 Reference< XPropertySet > OKeys::createDescriptor()
54 {
55 return new OAdoKey(isCaseSensitive(),m_pConnection);
56 }
57
58 // XAppend
appendObject(const OUString &,const Reference<XPropertySet> & descriptor)59 sdbcx::ObjectType OKeys::appendObject( const OUString&, const Reference< XPropertySet >& descriptor )
60 {
61 OAdoKey* pKey = getUnoTunnelImplementation<OAdoKey>( descriptor );
62 if ( pKey == nullptr)
63 m_pConnection->throwGenericSQLException( STR_INVALID_KEY_DESCRIPTOR_ERROR,static_cast<XTypeProvider*>(this) );
64
65 // To pass as column parameter to Key's Append method
66 OLEVariant vOptional;
67 vOptional.setNoArg();
68
69 OAdoKey::Map2KeyRule(getINT32(descriptor->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_TYPE))));
70
71 WpADOKey aKey = pKey->getImpl();
72 OUString sName = aKey.get_Name();
73 if(!sName.getLength())
74 aKey.put_Name(u"PrimaryKey");
75
76 ADOKeys* pKeys = m_aCollection;
77 if ( FAILED(pKeys->Append(OLEVariant(static_cast<ADOKey*>(aKey)),
78 adKeyPrimary, // must be every time adKeyPrimary
79 vOptional)) )
80 {
81 ADOS::ThrowException(*m_pConnection->getConnection(),static_cast<XTypeProvider*>(this));
82 // just make sure that an SQLExceptionis thrown here
83 m_pConnection->throwGenericSQLException( STR_INVALID_KEY_DESCRIPTOR_ERROR,static_cast<XTypeProvider*>(this) );
84 }
85
86 return new OAdoKey(isCaseSensitive(),m_pConnection,pKey->getImpl());
87 }
88
89 // XDrop
dropObject(sal_Int32,const OUString & _sElementName)90 void OKeys::dropObject(sal_Int32 /*_nPos*/,const OUString& _sElementName)
91 {
92 if(!m_aCollection.Delete(OLEVariant(_sElementName).getString()))
93 ADOS::ThrowException(*m_pConnection->getConnection(),static_cast<XTypeProvider*>(this));
94 }
95
96
97 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
98