remove debugging statement
[moonshot.git] / mech_eap / util_saml.cpp
1 /*
2  * Copyright (c) 2011, JANET(UK)
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  *
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  *
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * 3. Neither the name of JANET(UK) nor the names of its contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
21  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  */
32
33 /*
34  * SAML attribute provider implementation.
35  */
36
37 #include "gssapiP_eap.h"
38
39 #include <sstream>
40
41 #include <xercesc/util/XMLUniDefs.hpp>
42 #include <xmltooling/unicode.h>
43 #include <xmltooling/XMLToolingConfig.h>
44 #include <xmltooling/util/XMLHelper.h>
45 #include <xmltooling/util/ParserPool.h>
46 #include <xmltooling/util/DateTime.h>
47
48 #include <saml/exceptions.h>
49 #include <saml/saml1/core/Assertions.h>
50 #include <saml/saml2/core/Assertions.h>
51 #include <saml/saml2/metadata/Metadata.h>
52 #include <saml/saml2/metadata/MetadataProvider.h>
53
54 using namespace xmltooling;
55 using namespace opensaml::saml2md;
56 using namespace opensaml;
57 using namespace xercesc;
58 using namespace std;
59
60 /*
61  * gss_eap_saml_assertion_provider is for retrieving the underlying
62  * assertion.
63  */
64 gss_eap_saml_assertion_provider::gss_eap_saml_assertion_provider(void)
65 {
66     m_assertion = NULL;
67     m_authenticated = false;
68 }
69
70 gss_eap_saml_assertion_provider::~gss_eap_saml_assertion_provider(void)
71 {
72     delete m_assertion;
73 }
74
75 bool
76 gss_eap_saml_assertion_provider::initFromExistingContext(const gss_eap_attr_ctx *manager,
77                                                          const gss_eap_attr_provider *ctx)
78 {
79     /* Then we may be creating from an existing attribute context */
80     const gss_eap_saml_assertion_provider *saml;
81
82     assert(m_assertion == NULL);
83
84     if (!gss_eap_attr_provider::initFromExistingContext(manager, ctx))
85         return false;
86
87     saml = static_cast<const gss_eap_saml_assertion_provider *>(ctx);
88     setAssertion(saml->getAssertion(), saml->authenticated());
89
90     return true;
91 }
92
93 bool
94 gss_eap_saml_assertion_provider::initFromGssContext(const gss_eap_attr_ctx *manager,
95                                                     const gss_cred_id_t gssCred,
96                                                     const gss_ctx_id_t gssCtx)
97 {
98     const gss_eap_radius_attr_provider *radius;
99     gss_buffer_desc value = GSS_C_EMPTY_BUFFER;
100     int authenticated, complete;
101     OM_uint32 minor;
102
103     assert(m_assertion == NULL);
104
105     if (!gss_eap_attr_provider::initFromGssContext(manager, gssCred, gssCtx))
106         return false;
107
108     /*
109      * XXX TODO we need to support draft-howlett-radius-saml-attr-00
110      */
111     radius = static_cast<const gss_eap_radius_attr_provider *>
112         (m_manager->getProvider(ATTR_TYPE_RADIUS));
113     if (radius != NULL &&
114         radius->getFragmentedAttribute(PW_SAML_AAA_ASSERTION,
115                                        VENDORPEC_UKERNA,
116                                        &authenticated, &complete, &value)) {
117         setAssertion(&value, authenticated);
118         gss_release_buffer(&minor, &value);
119     } else {
120         m_assertion = NULL;
121     }
122
123     return true;
124 }
125
126 void
127 gss_eap_saml_assertion_provider::setAssertion(const saml2::Assertion *assertion,
128                                               bool authenticated)
129 {
130
131     delete m_assertion;
132
133     if (assertion != NULL) {
134 #ifdef __APPLE__
135         m_assertion = (saml2::Assertion *)((void *)assertion->clone());
136 #else
137         m_assertion = dynamic_cast<saml2::Assertion *>(assertion->clone());
138 #endif
139         m_authenticated = authenticated;
140     } else {
141         m_assertion = NULL;
142         m_authenticated = false;
143     }
144 }
145
146 void
147 gss_eap_saml_assertion_provider::setAssertion(const gss_buffer_t buffer,
148                                               bool authenticated)
149 {
150     delete m_assertion;
151
152     m_assertion = parseAssertion(buffer);
153     m_authenticated = (m_assertion != NULL && authenticated);
154 }
155
156 saml2::Assertion *
157 gss_eap_saml_assertion_provider::parseAssertion(const gss_buffer_t buffer)
158 {
159     string str((char *)buffer->value, buffer->length);
160     istringstream istream(str);
161     DOMDocument *doc;
162     const XMLObjectBuilder *b;
163
164     try {
165         doc = XMLToolingConfig::getConfig().getParser().parse(istream);
166         if (doc == NULL)
167             return NULL;
168
169         b = XMLObjectBuilder::getBuilder(doc->getDocumentElement());
170
171 #ifdef __APPLE__
172         return (saml2::Assertion *)((void *)b->buildFromDocument(doc));
173 #else
174         return dynamic_cast<saml2::Assertion *>(b->buildFromDocument(doc));
175 #endif
176     } catch (exception &e) {
177         return NULL;
178     }
179 }
180
181 bool
182 gss_eap_saml_assertion_provider::getAttributeTypes(gss_eap_attr_enumeration_cb addAttribute,
183                                                    void *data) const
184 {
185     bool ret;
186
187     /* just add the prefix */
188     if (m_assertion != NULL)
189         ret = addAttribute(this, GSS_C_NO_BUFFER, data);
190     else
191         ret = true;
192
193     return ret;
194 }
195
196 bool
197 gss_eap_saml_assertion_provider::setAttribute(int complete GSSEAP_UNUSED,
198                                               const gss_buffer_t attr,
199                                               const gss_buffer_t value)
200 {
201     if (attr == GSS_C_NO_BUFFER || attr->length == 0) {
202         setAssertion(value);
203         return true;
204     }
205
206     return false;
207 }
208
209 bool
210 gss_eap_saml_assertion_provider::deleteAttribute(const gss_buffer_t value GSSEAP_UNUSED)
211 {
212     delete m_assertion;
213     m_assertion = NULL;
214     m_authenticated = false;
215
216     return true;
217 }
218
219 time_t
220 gss_eap_saml_assertion_provider::getExpiryTime(void) const
221 {
222     saml2::Conditions *conditions;
223     time_t expiryTime = 0;
224
225     if (m_assertion == NULL)
226         return 0;
227
228     conditions = m_assertion->getConditions();
229
230     if (conditions != NULL && conditions->getNotOnOrAfter() != NULL)
231         expiryTime = conditions->getNotOnOrAfter()->getEpoch();
232
233     return expiryTime;
234 }
235
236 OM_uint32
237 gss_eap_saml_assertion_provider::mapException(OM_uint32 *minor,
238                                               std::exception &e) const
239 {
240     if (typeid(e) == typeid(SecurityPolicyException))
241         *minor = GSSEAP_SAML_SEC_POLICY_FAILURE;
242     else if (typeid(e) == typeid(BindingException))
243         *minor = GSSEAP_SAML_BINDING_FAILURE;
244     else if (typeid(e) == typeid(ProfileException))
245         *minor = GSSEAP_SAML_PROFILE_FAILURE;
246     else if (typeid(e) == typeid(FatalProfileException))
247         *minor = GSSEAP_SAML_FATAL_PROFILE_FAILURE;
248     else if (typeid(e) == typeid(RetryableProfileException))
249         *minor = GSSEAP_SAML_RETRY_PROFILE_FAILURE;
250     else if (typeid(e) == typeid(MetadataException))
251         *minor = GSSEAP_SAML_METADATA_FAILURE;
252     else
253         return GSS_S_CONTINUE_NEEDED;
254
255     return GSS_S_FAILURE;
256 }
257
258 bool
259 gss_eap_saml_assertion_provider::getAttribute(const gss_buffer_t attr,
260                                               int *authenticated,
261                                               int *complete,
262                                               gss_buffer_t value,
263                                               gss_buffer_t display_value GSSEAP_UNUSED,
264                                               int *more) const
265 {
266     string str;
267
268     if (attr != GSS_C_NO_BUFFER && attr->length != 0)
269         return false;
270
271     if (m_assertion == NULL)
272         return false;
273
274     if (*more != -1)
275         return false;
276
277     if (authenticated != NULL)
278         *authenticated = m_authenticated;
279     if (complete != NULL)
280         *complete = true;
281
282     XMLHelper::serialize(m_assertion->marshall((DOMDocument *)NULL), str);
283
284     duplicateBuffer(str, value);
285     *more = 0;
286
287     return true;
288 }
289
290 gss_any_t
291 gss_eap_saml_assertion_provider::mapToAny(int authenticated,
292                                           gss_buffer_t type_id GSSEAP_UNUSED) const
293 {
294     if (authenticated && !m_authenticated)
295         return (gss_any_t)NULL;
296
297     return (gss_any_t)m_assertion;
298 }
299
300 void
301 gss_eap_saml_assertion_provider::releaseAnyNameMapping(gss_buffer_t type_id GSSEAP_UNUSED,
302                                                        gss_any_t input) const
303 {
304     delete ((saml2::Assertion *)input);
305 }
306
307 bool
308 gss_eap_saml_assertion_provider::init(void)
309 {
310     gss_eap_attr_ctx::registerProvider(ATTR_TYPE_SAML_ASSERTION,
311                                        "urn:ietf:params:gss-eap:saml-aaa-assertion",
312                                        createAttrContext);
313     return true;
314 }
315
316 void
317 gss_eap_saml_assertion_provider::finalize(void)
318 {
319     gss_eap_attr_ctx::unregisterProvider(ATTR_TYPE_SAML_ASSERTION);
320 }
321
322 gss_eap_attr_provider *
323 gss_eap_saml_assertion_provider::createAttrContext(void)
324 {
325     return new gss_eap_saml_assertion_provider;
326 }
327
328 saml2::Assertion *
329 gss_eap_saml_assertion_provider::initAssertion(void)
330 {
331     delete m_assertion;
332     m_assertion = saml2::AssertionBuilder::buildAssertion();
333     m_authenticated = false;
334
335     return m_assertion;
336 }
337
338 /*
339  * gss_eap_saml_attr_provider is for retrieving the underlying attributes.
340  */
341 bool
342 gss_eap_saml_attr_provider::getAssertion(int *authenticated,
343                                          saml2::Assertion **pAssertion,
344                                          bool createIfAbsent) const
345 {
346     gss_eap_saml_assertion_provider *saml;
347
348     if (authenticated != NULL)
349         *authenticated = false;
350     if (pAssertion != NULL)
351         *pAssertion = NULL;
352
353     saml = static_cast<const gss_eap_saml_assertion_provider *>
354         (m_manager->getProvider(ATTR_TYPE_SAML_ASSERTION));
355     if (saml == NULL)
356         return false;
357
358     if (authenticated != NULL)
359         *authenticated = saml->authenticated();
360     if (pAssertion != NULL)
361         *pAssertion = saml->getAssertion();
362
363     if (saml->getAssertion() == NULL) {
364         if (createIfAbsent) {
365             if (authenticated != NULL)
366                 *authenticated = false;
367             if (pAssertion != NULL)
368                 *pAssertion = saml->initAssertion();
369         } else
370             return false;
371     }
372
373     return true;
374 }
375
376 bool
377 gss_eap_saml_attr_provider::getAttributeTypes(gss_eap_attr_enumeration_cb addAttribute,
378                                               void *data) const
379 {
380     saml2::Assertion *assertion;
381     int authenticated;
382
383     if (!getAssertion(&authenticated, &assertion))
384         return true;
385
386     /*
387      * Note: the first prefix is added by the attribute provider manager
388      *
389      * From draft-hartman-gss-eap-naming-00:
390      *
391      *   Each attribute carried in the assertion SHOULD also be a GSS name
392      *   attribute.  The name of this attribute has three parts, all separated
393      *   by an ASCII space character.  The first part is
394      *   urn:ietf:params:gss-eap:saml-attr.  The second part is the URI for
395      *   the SAML attribute name format.  The final part is the name of the
396      *   SAML attribute.  If the mechanism performs an additional attribute
397      *   query, the retrieved attributes SHOULD be GSS-API name attributes
398      *   using the same name syntax.
399      */
400     /* For each attribute statement, look for an attribute match */
401     const vector <saml2::AttributeStatement *> &statements =
402         const_cast<const saml2::Assertion *>(assertion)->getAttributeStatements();
403
404     for (vector<saml2::AttributeStatement *>::const_iterator s = statements.begin();
405         s != statements.end();
406         ++s) {
407         const vector<saml2::Attribute*> &attrs =
408             const_cast<const saml2::AttributeStatement*>(*s)->getAttributes();
409
410         for (vector<saml2::Attribute*>::const_iterator a = attrs.begin(); a != attrs.end(); ++a) {
411             const XMLCh *attributeName, *attributeNameFormat;
412             XMLCh *qualifiedName;
413             XMLCh space[2] = { ' ', 0 };
414             gss_buffer_desc utf8;
415             bool ret;
416
417             attributeName = (*a)->getName();
418             attributeNameFormat = (*a)->getNameFormat();
419             if (attributeNameFormat == NULL || attributeNameFormat[0] == '\0')
420                 attributeNameFormat = saml2::Attribute::UNSPECIFIED;
421
422             qualifiedName = new XMLCh[XMLString::stringLen(attributeNameFormat) + 1 +
423                                       XMLString::stringLen(attributeName) + 1];
424             XMLString::copyString(qualifiedName, attributeNameFormat);
425             XMLString::catString(qualifiedName, space);
426             XMLString::catString(qualifiedName, attributeName);
427
428             utf8.value = (void *)toUTF8(qualifiedName);
429             utf8.length = strlen((char *)utf8.value);
430
431             ret = addAttribute(this, &utf8, data);
432
433             delete qualifiedName;
434
435             if (!ret)
436                 return ret;
437         }
438     }
439
440     return true;
441 }
442
443 static BaseRefVectorOf<XMLCh> *
444 decomposeAttributeName(const gss_buffer_t attr)
445 {
446     XMLCh *qualifiedAttr = new XMLCh[attr->length + 1];
447     XMLString::transcode((const char *)attr->value, qualifiedAttr, attr->length);
448
449     BaseRefVectorOf<XMLCh> *components = XMLString::tokenizeString(qualifiedAttr);
450
451     delete qualifiedAttr;
452
453     if (components->size() != 2) {
454         delete components;
455         components = NULL;
456     }
457
458     return components;
459 }
460
461 bool
462 gss_eap_saml_attr_provider::setAttribute(int complete GSSEAP_UNUSED,
463                                          const gss_buffer_t attr,
464                                          const gss_buffer_t value)
465 {
466     saml2::Assertion *assertion;
467     saml2::Attribute *attribute;
468     saml2::AttributeValue *attributeValue;
469     saml2::AttributeStatement *attributeStatement;
470
471     if (!getAssertion(NULL, &assertion, true))
472         return false;
473
474     if (assertion->getAttributeStatements().size() != 0) {
475         attributeStatement = assertion->getAttributeStatements().front();
476     } else {
477         attributeStatement = saml2::AttributeStatementBuilder::buildAttributeStatement();
478         assertion->getAttributeStatements().push_back(attributeStatement);
479     }
480
481     /* Check the attribute name consists of name format | whsp | name */
482     BaseRefVectorOf<XMLCh> *components = decomposeAttributeName(attr);
483     if (components == NULL)
484         return false;
485
486     attribute = saml2::AttributeBuilder::buildAttribute();
487     attribute->setNameFormat(components->elementAt(0));
488     attribute->setName(components->elementAt(1));
489
490     XMLCh *xmlValue = new XMLCh[value->length + 1];
491     XMLString::transcode((const char *)value->value, xmlValue, attr->length);
492
493     attributeValue = saml2::AttributeValueBuilder::buildAttributeValue();
494     attributeValue->setTextContent(xmlValue);
495
496     attribute->getAttributeValues().push_back(attributeValue);
497
498     assert(attributeStatement != NULL);
499     attributeStatement->getAttributes().push_back(attribute);
500
501     delete components;
502     delete xmlValue;
503
504     return true;
505 }
506
507 bool
508 gss_eap_saml_attr_provider::deleteAttribute(const gss_buffer_t attr)
509 {
510     saml2::Assertion *assertion;
511     bool ret = false;
512
513     if (!getAssertion(NULL, &assertion) ||
514         assertion->getAttributeStatements().size() == 0)
515         return false;
516
517     /* Check the attribute name consists of name format | whsp | name */
518     BaseRefVectorOf<XMLCh> *components = decomposeAttributeName(attr);
519     if (components == NULL)
520         return false;
521
522     /* For each attribute statement, look for an attribute match */
523     const vector<saml2::AttributeStatement *> &statements =
524         const_cast<const saml2::Assertion *>(assertion)->getAttributeStatements();
525
526     for (vector<saml2::AttributeStatement *>::const_iterator s = statements.begin();
527         s != statements.end();
528         ++s) {
529         const vector<saml2::Attribute *> &attrs =
530             const_cast<const saml2::AttributeStatement *>(*s)->getAttributes();
531         ssize_t index = -1, i = 0;
532
533         /* There's got to be an easier way to do this */
534         for (vector<saml2::Attribute *>::const_iterator a = attrs.begin();
535              a != attrs.end();
536              ++a) {
537             if (XMLString::equals((*a)->getNameFormat(), components->elementAt(0)) &&
538                 XMLString::equals((*a)->getName(), components->elementAt(1))) {
539                 index = i;
540                 break;
541             }
542             ++i;
543         }
544         if (index != -1) {
545             (*s)->getAttributes().erase((*s)->getAttributes().begin() + index);
546             ret = true;
547         }
548     }
549
550     delete components;
551
552     return ret;
553 }
554
555 bool
556 gss_eap_saml_attr_provider::getAttribute(const gss_buffer_t attr,
557                                          int *authenticated,
558                                          int *complete,
559                                          const saml2::Attribute **pAttribute) const
560 {
561     saml2::Assertion *assertion;
562
563     if (authenticated != NULL)
564         *authenticated = false;
565     if (complete != NULL)
566         *complete = true;
567     *pAttribute = NULL;
568
569     if (!getAssertion(authenticated, &assertion) ||
570         assertion->getAttributeStatements().size() == 0)
571         return false;
572
573     /* Check the attribute name consists of name format | whsp | name */
574     BaseRefVectorOf<XMLCh> *components = decomposeAttributeName(attr);
575     if (components == NULL)
576         return false;
577
578     /* For each attribute statement, look for an attribute match */
579     const vector <saml2::AttributeStatement *> &statements =
580         const_cast<const saml2::Assertion *>(assertion)->getAttributeStatements();
581     const saml2::Attribute *ret = NULL;
582
583     for (vector<saml2::AttributeStatement *>::const_iterator s = statements.begin();
584         s != statements.end();
585         ++s) {
586         const vector<saml2::Attribute *> &attrs =
587             const_cast<const saml2::AttributeStatement*>(*s)->getAttributes();
588
589         for (vector<saml2::Attribute *>::const_iterator a = attrs.begin(); a != attrs.end(); ++a) {
590             const XMLCh *attributeName, *attributeNameFormat;
591
592             attributeName = (*a)->getName();
593             attributeNameFormat = (*a)->getNameFormat();
594             if (attributeNameFormat == NULL || attributeNameFormat[0] == '\0')
595                 attributeNameFormat = saml2::Attribute::UNSPECIFIED;
596
597             if (XMLString::equals(attributeNameFormat, components->elementAt(0)) &&
598                 XMLString::equals(attributeName, components->elementAt(1))) {
599                 ret = *a;
600                 break;
601             }
602         }
603
604         if (ret != NULL)
605             break;
606     }
607
608     delete components;
609
610     *pAttribute = ret;
611
612     return (ret != NULL);
613 }
614
615 bool
616 gss_eap_saml_attr_provider::getAttribute(const gss_buffer_t attr,
617                                          int *authenticated,
618                                          int *complete,
619                                          gss_buffer_t value,
620                                          gss_buffer_t display_value,
621                                          int *more) const
622 {
623     const saml2::Attribute *a;
624     const saml2::AttributeValue *av;
625     int nvalues, i = *more;
626
627     *more = 0;
628
629     if (!getAttribute(attr, authenticated, complete, &a))
630         return false;
631
632     nvalues = a->getAttributeValues().size();
633
634     if (i == -1)
635         i = 0;
636     else if (i >= nvalues)
637         return false;
638 #ifdef __APPLE__
639     av = (const saml2::AttributeValue *)((void *)(a->getAttributeValues().at(i)));
640 #else
641     av = dynamic_cast<const saml2::AttributeValue *>(a->getAttributeValues().at(i));
642 #endif
643     if (av != NULL) {
644         if (value != NULL) {
645             value->value = toUTF8(av->getTextContent(), true);
646             value->length = strlen((char *)value->value);
647         }
648         if (display_value != NULL) {
649             display_value->value = toUTF8(av->getTextContent(), true);
650             display_value->length = strlen((char *)value->value);
651         }
652     }
653
654     if (nvalues > ++i)
655         *more = i;
656
657     return true;
658 }
659
660 gss_any_t
661 gss_eap_saml_attr_provider::mapToAny(int authenticated GSSEAP_UNUSED,
662                                      gss_buffer_t type_id GSSEAP_UNUSED) const
663 {
664     return (gss_any_t)NULL;
665 }
666
667 void
668 gss_eap_saml_attr_provider::releaseAnyNameMapping(gss_buffer_t type_id GSSEAP_UNUSED,
669                                                   gss_any_t input GSSEAP_UNUSED) const
670 {
671 }
672
673 bool
674 gss_eap_saml_attr_provider::init(void)
675 {
676     gss_eap_attr_ctx::registerProvider(ATTR_TYPE_SAML,
677                                        "urn:ietf:params:gss-eap:saml-attr",
678                                        createAttrContext);
679     return true;
680 }
681
682 void
683 gss_eap_saml_attr_provider::finalize(void)
684 {
685     gss_eap_attr_ctx::unregisterProvider(ATTR_TYPE_SAML);
686 }
687
688 gss_eap_attr_provider *
689 gss_eap_saml_attr_provider::createAttrContext(void)
690 {
691     return new gss_eap_saml_attr_provider;
692 }
693
694 OM_uint32
695 gssEapSamlAttrProvidersInit(OM_uint32 *minor)
696 {
697     if (!gss_eap_saml_assertion_provider::init() ||
698         !gss_eap_saml_attr_provider::init()) {
699         *minor = GSSEAP_SAML_INIT_FAILURE;
700         return GSS_S_FAILURE;
701     }
702
703     return GSS_S_COMPLETE;
704 }
705
706 OM_uint32
707 gssEapSamlAttrProvidersFinalize(OM_uint32 *minor)
708 {
709     gss_eap_saml_attr_provider::finalize();
710     gss_eap_saml_assertion_provider::finalize();
711
712     *minor = 0;
713     return GSS_S_COMPLETE;
714 }