Draft artifact resolver.
[shibboleth/sp.git] / shibsp / handler / impl / AssertionConsumerService.cpp
1 /*
2  *  Copyright 2001-2007 Internet2
3  * 
4  * Licensed under the Apache License, Version 2.0 (the "License");
5  * you may not use this file except in compliance with the License.
6  * You may obtain a copy of the License at
7  *
8  *     http://www.apache.org/licenses/LICENSE-2.0
9  *
10  * Unless required by applicable law or agreed to in writing, software
11  * distributed under the License is distributed on an "AS IS" BASIS,
12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13  * See the License for the specific language governing permissions and
14  * limitations under the License.
15  */
16
17 /**
18  * AssertionConsumerService.cpp
19  * 
20  * Base class for handlers that create sessions by consuming SSO protocol responses. 
21  */
22
23 #include "internal.h"
24 #include "Application.h"
25 #include "exceptions.h"
26 #include "ServiceProvider.h"
27 #include "handler/AssertionConsumerService.h"
28 #include "util/SPConstants.h"
29
30 # include <ctime>
31 #ifndef SHIBSP_LITE
32 # include "attribute/resolver/AttributeResolver.h"
33 # include "attribute/resolver/ResolutionContext.h"
34 # include "security/SecurityPolicy.h"
35 # include <saml/SAMLConfig.h>
36 # include <saml/saml1/core/Assertions.h>
37 # include <saml/util/CommonDomainCookie.h>
38 using namespace samlconstants;
39 #else
40 # include "lite/CommonDomainCookie.h"
41 #endif
42
43 using namespace shibspconstants;
44 using namespace shibsp;
45 using namespace opensaml;
46 using namespace xmltooling;
47 using namespace log4cpp;
48 using namespace std;
49
50 AssertionConsumerService::AssertionConsumerService(const DOMElement* e, const char* appId, Category& log)
51     : AbstractHandler(e, log)
52 #ifndef SHIBSP_LITE
53         ,m_decoder(NULL), m_role(samlconstants::SAML20MD_NS, opensaml::saml2md::IDPSSODescriptor::LOCAL_NAME)
54 #endif
55 {
56     string address(appId);
57     address += getString("Location").second;
58     address += "::run::ACS";
59     setAddress(address.c_str());
60 #ifndef SHIBSP_LITE
61     if (SPConfig::getConfig().isEnabled(SPConfig::OutOfProcess)) {
62         m_decoder = SAMLConfig::getConfig().MessageDecoderManager.newPlugin(getString("Binding").second,e);
63         m_decoder->setArtifactResolver(SPConfig::getConfig().getArtifactResolver());
64     }
65 #endif
66 }
67
68 AssertionConsumerService::~AssertionConsumerService()
69 {
70 #ifndef SHIBSP_LITE
71     delete m_decoder;
72 #endif
73 }
74
75 pair<bool,long> AssertionConsumerService::run(SPRequest& request, bool isHandler) const
76 {
77     string relayState;
78     SPConfig& conf = SPConfig::getConfig();
79     
80     try {
81         if (conf.isEnabled(SPConfig::OutOfProcess)) {
82             // When out of process, we run natively and directly process the message.
83             // RelayState will be fully handled during message processing.
84             string entityID;
85             string key = processMessage(request.getApplication(), request, entityID, relayState);
86             return sendRedirect(request, key.c_str(), entityID.c_str(), relayState.c_str());
87         }
88         else {
89             // When not out of process, we remote all the message processing.
90             DDF out,in = wrap(request);
91             DDFJanitor jin(in), jout(out);
92             
93             in.addmember("application_id").string(request.getApplication().getId());
94             try {
95                 out=request.getServiceProvider().getListenerService()->send(in);
96             }
97             catch (XMLToolingException& ex) {
98                 // Try for RelayState recovery.
99                 if (ex.getProperty("RelayState"))
100                     relayState = ex.getProperty("RelayState");
101                 try {
102                     recoverRelayState(request.getApplication(), request, relayState);
103                 }
104                 catch (exception& ex2) {
105                     m_log.error("trapped an error during RelayState recovery while handling an error: %s", ex2.what());
106                 }
107                 throw;
108             }
109                 
110             // We invoke RelayState recovery one last time on this side of the boundary.
111             if (out["RelayState"].isstring())
112                 relayState = out["RelayState"].string(); 
113             recoverRelayState(request.getApplication(), request, relayState);
114     
115             // If it worked, we have a session key.
116             if (!out["key"].isstring())
117                 throw FatalProfileException("Remote processing of SSO profile did not return a usable session key.");
118             
119             // Take care of cookie business and wrap it up.
120             return sendRedirect(request, out["key"].string(), out["entity_id"].string(), relayState.c_str());
121         }
122     }
123     catch (XMLToolingException& ex) {
124         // Try and preserve RelayState.
125         if (!relayState.empty())
126             ex.addProperty("RelayState", relayState.c_str());
127         throw;
128     }
129 }
130
131 void AssertionConsumerService::receive(DDF& in, ostream& out)
132 {
133     // Find application.
134     const char* aid=in["application_id"].string();
135     const Application* app=aid ? SPConfig::getConfig().getServiceProvider()->getApplication(aid) : NULL;
136     if (!app) {
137         // Something's horribly wrong.
138         m_log.error("couldn't find application (%s) for new session", aid ? aid : "(missing)");
139         throw ConfigurationException("Unable to locate application for new session, deleted?");
140     }
141     
142     // Unpack the request.
143     auto_ptr<HTTPRequest> http(getRequest(in));
144     
145     // Do the work.
146     string relayState, entityID;
147     try {
148         string key = processMessage(*app, *http.get(), entityID, relayState);
149
150         // Repack for return to caller.
151         DDF ret=DDF(NULL).structure();
152         DDFJanitor jret(ret);
153         ret.addmember("key").string(key.c_str());
154         if (!entityID.empty())
155             ret.addmember("entity_id").string(entityID.c_str());
156         if (!relayState.empty())
157             ret.addmember("RelayState").string(relayState.c_str());
158         out << ret;
159     }
160     catch (XMLToolingException& ex) {
161         // Try and preserve RelayState if we can.
162         if (!relayState.empty())
163             ex.addProperty("RelayState", relayState.c_str());
164         throw;
165     }
166 }
167
168 string AssertionConsumerService::processMessage(
169     const Application& application, HTTPRequest& httpRequest, string& entityID, string& relayState
170     ) const
171 {
172 #ifndef SHIBSP_LITE
173     // Locate policy key.
174     pair<bool,const char*> policyId = getString("policyId", m_configNS.get());  // namespace-qualified if inside handler element
175     if (!policyId.first)
176         policyId = application.getString("policyId");   // unqualified in Application(s) element
177         
178     // Access policy properties.
179     const PropertySet* settings = application.getServiceProvider().getPolicySettings(policyId.second);
180     pair<bool,bool> validate = settings->getBool("validate");
181
182     // Lock metadata for use by policy.
183     Locker metadataLocker(application.getMetadataProvider());
184
185     // Create the policy.
186     shibsp::SecurityPolicy policy(application, &m_role, validate.first && validate.second);
187     
188     // Decode the message and process it in a protocol-specific way.
189     auto_ptr<XMLObject> msg(m_decoder->decode(relayState, httpRequest, policy));
190     if (!msg.get())
191         throw BindingException("Failed to decode an SSO protocol response.");
192     recoverRelayState(application, httpRequest, relayState);
193     string key = implementProtocol(application, httpRequest, policy, settings, *msg.get());
194
195     auto_ptr_char issuer(policy.getIssuer() ? policy.getIssuer()->getName() : NULL);
196     if (issuer.get())
197         entityID = issuer.get();
198     
199     return key;
200 #else
201     throw ConfigurationException("Cannot process message using lite version of shibsp library.");
202 #endif
203 }
204
205 pair<bool,long> AssertionConsumerService::sendRedirect(
206     SPRequest& request, const char* key, const char* entityID, const char* relayState
207     ) const
208 {
209     // We've got a good session, so set the session cookie.
210     pair<string,const char*> shib_cookie=request.getApplication().getCookieNameProps("_shibsession_");
211     string k(key);
212     k += shib_cookie.second;
213     request.setCookie(shib_cookie.first.c_str(), k.c_str());
214
215     // History cookie.
216     maintainHistory(request, entityID, shib_cookie.second);
217
218     // Now redirect to the state value. By now, it should be set to *something* usable.
219     return make_pair(true, request.sendRedirect(relayState));
220 }
221
222 void AssertionConsumerService::checkAddress(
223     const Application& application, const HTTPRequest& httpRequest, const char* issuedTo
224     ) const
225 {
226     const PropertySet* props=application.getPropertySet("Sessions");
227     pair<bool,bool> checkAddress = props ? props->getBool("checkAddress") : make_pair(false,true);
228     if (!checkAddress.first)
229         checkAddress.second=true;
230
231     if (checkAddress.second) {
232         m_log.debug("checking client address");
233         if (httpRequest.getRemoteAddr() != issuedTo) {
234             throw FatalProfileException(
235                "Your client's current address ($client_addr) differs from the one used when you authenticated "
236                 "to your identity provider. To correct this problem, you may need to bypass a proxy server. "
237                 "Please contact your local support staff or help desk for assistance.",
238                 namedparams(1,"client_addr",httpRequest.getRemoteAddr().c_str())
239                 );
240         }
241     }
242 }
243
244 #ifndef SHIBSP_LITE
245 ResolutionContext* AssertionConsumerService::resolveAttributes(
246     const Application& application,
247     const saml2md::EntityDescriptor* issuer,
248     const saml2::NameID* nameid,
249     const char* authncontext_class,
250     const char* authncontext_decl,
251     const vector<const Assertion*>* tokens,
252     const multimap<string,Attribute*>* attributes
253     ) const
254 {
255     try {
256         AttributeResolver* resolver = application.getAttributeResolver();
257         if (!resolver) {
258             m_log.info("no AttributeResolver available, skipping resolution");
259             return NULL;
260         }
261         
262         m_log.debug("resolving attributes...");
263
264         Locker locker(resolver);
265         auto_ptr<ResolutionContext> ctx(
266             resolver->createResolutionContext(application, issuer, nameid, authncontext_class, authncontext_decl, tokens, attributes)
267             );
268         resolver->resolveAttributes(*ctx.get());
269         return ctx.release();
270     }
271     catch (exception& ex) {
272         m_log.error("attribute resolution failed: %s", ex.what());
273     }
274     
275     return NULL;
276 }
277 #endif
278
279 void AssertionConsumerService::maintainHistory(SPRequest& request, const char* entityID, const char* cookieProps) const
280 {
281     if (!entityID)
282         return;
283         
284     const PropertySet* sessionProps=request.getApplication().getPropertySet("Sessions");
285     pair<bool,bool> idpHistory=sessionProps->getBool("idpHistory");
286     if (!idpHistory.first || idpHistory.second) {
287         // Set an IdP history cookie locally (essentially just a CDC).
288         CommonDomainCookie cdc(request.getCookie(CommonDomainCookie::CDCName));
289
290         // Either leave in memory or set an expiration.
291         pair<bool,unsigned int> days=sessionProps->getUnsignedInt("idpHistoryDays");
292         if (!days.first || days.second==0) {
293             string c = string(cdc.set(entityID)) + cookieProps;
294             request.setCookie(CommonDomainCookie::CDCName, c.c_str());
295         }
296         else {
297             time_t now=time(NULL) + (days.second * 24 * 60 * 60);
298 #ifdef HAVE_GMTIME_R
299             struct tm res;
300             struct tm* ptime=gmtime_r(&now,&res);
301 #else
302             struct tm* ptime=gmtime(&now);
303 #endif
304             char timebuf[64];
305             strftime(timebuf,64,"%a, %d %b %Y %H:%M:%S GMT",ptime);
306             string c = string(cdc.set(entityID)) + cookieProps + "; expires=" + timebuf;
307             request.setCookie(CommonDomainCookie::CDCName, c.c_str());
308         }
309     }
310 }