Assertion export and lookup service using URI binding.
[shibboleth/sp.git] / shibsp / handler / impl / AssertionLookup.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  * AssertionLookup.cpp
19  * 
20  * Handler for looking assertions in SessionCache
21  */
22
23 #include "internal.h"
24 #include "Application.h"
25 #include "exceptions.h"
26 #include "ServiceProvider.h"
27 #include "SessionCache.h"
28 #include "handler/AbstractHandler.h"
29 #include "handler/RemotedHandler.h"
30 #include "util/SPConstants.h"
31
32 using namespace shibspconstants;
33 using namespace shibsp;
34 using namespace opensaml;
35 using namespace xmltooling;
36 using namespace log4cpp;
37 using namespace std;
38
39 namespace shibsp {
40
41 #if defined (_MSC_VER)
42     #pragma warning( push )
43     #pragma warning( disable : 4250 )
44 #endif
45
46     class SHIBSP_API AssertionLookup : public AbstractHandler, public RemotedHandler 
47     {
48     public:
49         AssertionLookup(const DOMElement* e, const char* appId);
50         virtual ~AssertionLookup() {}
51
52         pair<bool,long> run(SPRequest& request, bool isHandler=true) const;
53         void receive(DDF& in, ostream& out);
54
55     private:
56         pair<bool,long> processMessage(const Application& application, HTTPRequest& httpRequest, HTTPResponse& httpResponse) const;
57
58         set<string> m_acl;
59     };
60
61 #if defined (_MSC_VER)
62     #pragma warning( pop )
63 #endif
64
65     Handler* SHIBSP_DLLLOCAL AssertionLookupFactory(const pair<const DOMElement*,const char*>& p)
66     {
67         return new AssertionLookup(p.first, p.second);
68     }
69
70 };
71
72 AssertionLookup::AssertionLookup(const DOMElement* e, const char* appId)
73     : AbstractHandler(e, Category::getInstance(SHIBSP_LOGCAT".AssertionLookup"))
74 {
75     setAddress("run::AssertionLookup");
76     if (SPConfig::getConfig().isEnabled(SPConfig::InProcess)) {
77         pair<bool,const char*> acl = getString("exportACL");
78         if (!acl.first) {
79             m_acl.insert("127.0.0.1");
80             return;
81         }
82         string aclbuf=acl.second;
83         int j = 0;
84         for (unsigned int i=0;  i < aclbuf.length();  i++) {
85             if (aclbuf.at(i)==' ') {
86                 m_acl.insert(aclbuf.substr(j, i-j));
87                 j = i+1;
88             }
89         }
90         m_acl.insert(aclbuf.substr(j, aclbuf.length()-j));
91     }
92 }
93
94 pair<bool,long> AssertionLookup::run(SPRequest& request, bool isHandler) const
95 {
96     string relayState;
97     SPConfig& conf = SPConfig::getConfig();
98     if (conf.isEnabled(SPConfig::InProcess)) {
99         if (m_acl.count(request.getRemoteAddr()) == 0) {
100             m_log.error("request for assertion lookup blocked from invalid address (%s)", request.getRemoteAddr());
101             istringstream msg("Assertion Lookup Blocked");
102             return make_pair(true,request.sendResponse(msg, HTTPResponse::XMLTOOLING_HTTP_STATUS_FORBIDDEN));
103         }
104     }
105     
106     try {
107         if (conf.isEnabled(SPConfig::OutOfProcess)) {
108             // When out of process, we run natively and directly process the message.
109             return processMessage(request.getApplication(), request, request);
110         }
111         else {
112             // When not out of process, we remote all the message processing.
113             DDF out,in = wrap(request, NULL, true);
114             DDFJanitor jin(in), jout(out);
115             
116             in.addmember("application_id").string(request.getApplication().getId());
117             out=request.getServiceProvider().getListenerService()->send(in);
118             return unwrap(request, out);
119         }
120     }
121     catch (exception& ex) {
122         m_log.error("error while processing request: %s", ex.what());
123         istringstream msg("Assertion Lookup Failed");
124         return make_pair(true,request.sendResponse(msg, HTTPResponse::XMLTOOLING_HTTP_STATUS_ERROR));
125     }
126 }
127
128 void AssertionLookup::receive(DDF& in, ostream& out)
129 {
130     // Find application.
131     const char* aid=in["application_id"].string();
132     const Application* app=aid ? SPConfig::getConfig().getServiceProvider()->getApplication(aid) : NULL;
133     if (!app) {
134         // Something's horribly wrong.
135         m_log.error("couldn't find application (%s) for assertion lookup", aid ? aid : "(missing)");
136         throw ConfigurationException("Unable to locate application for assertion lookup, deleted?");
137     }
138     
139     // Unpack the request.
140     auto_ptr<HTTPRequest> req(getRequest(in));
141     //m_log.debug("found %d client certificates", req->getClientCertificates().size());
142
143     // Wrap a response shim.
144     DDF ret(NULL);
145     DDFJanitor jout(ret);
146     auto_ptr<HTTPResponse> resp(getResponse(ret));
147         
148     // Since we're remoted, the result should either be a throw, a false/0 return,
149     // which we just return as an empty structure, or a response/redirect,
150     // which we capture in the facade and send back.
151     processMessage(*app, *req.get(), *resp.get());
152     out << ret;
153 }
154
155 pair<bool,long> AssertionLookup::processMessage(const Application& application, HTTPRequest& httpRequest, HTTPResponse& httpResponse) const
156 {
157 #ifndef SHIBSP_LITE
158     const char* key = httpRequest.getParameter("key");
159     const char* ID = httpRequest.getParameter("ID");
160     if (!key || !*key || !ID || !*ID) {
161         m_log.error("assertion lookup request failed, missing required parameters");
162         throw FatalProfileException("Missing key or ID parameters.");
163     }
164
165     m_log.debug("processing assertion lookup request (session: %s, assertion: %s)", key, ID);
166
167     // The cache will either silently pass a session or NULL back, or throw an exception out.
168     Session* session = application.getServiceProvider().getSessionCache()->find(key, application);
169     if (!session) {
170         m_log.error("valid session (%s) not found for assertion lookup", key);
171         throw FatalProfileException("Session key not found.");
172     }
173
174     Locker locker(session, false);
175
176     const Assertion* assertion = session->getAssertion(ID);
177     if (!assertion) {
178         m_log.error("assertion (%s) not found in session (%s)", ID, key);
179         throw FatalProfileException("Assertion not found.");
180     }
181
182     stringstream s;\r
183     s << *assertion;\r
184     httpResponse.setContentType("application/samlassertion+xml");
185     return make_pair(true, httpResponse.sendResponse(s));
186 #else
187     return make_pair(false,0);
188 #endif
189 }