First set of logout base classes and non-building draft of SP-initiated logout.
[shibboleth/sp.git] / shibsp / impl / StorageServiceSessionCache.cpp
index fe53c1c..c607c39 100644 (file)
@@ -58,19 +58,18 @@ namespace shibsp {
     class StoredSession : public virtual Session\r
     {\r
     public:\r
-        StoredSession(SSCache* cache, DDF& obj) : m_obj(obj), m_cache(cache) {\r
+        StoredSession(SSCache* cache, DDF& obj) : m_obj(obj), m_nameid(NULL), m_cache(cache) {\r
             const char* nameid = obj["nameid"].string();\r
-            if (!nameid)\r
-                throw FatalProfileException("NameID missing from cached session.");\r
-            \r
-            // Parse and bind the document into an XMLObject.\r
-            istringstream instr(nameid);\r
-            DOMDocument* doc = XMLToolingConfig::getConfig().getParser().parse(instr); \r
-            XercesJanitor<DOMDocument> janitor(doc);\r
-            auto_ptr<saml2::NameID> n(saml2::NameIDBuilder::buildNameID());\r
-            n->unmarshall(doc->getDocumentElement(), true);\r
-            janitor.release();\r
-            m_nameid = n.release();\r
+            if (nameid) {\r
+                // Parse and bind the document into an XMLObject.\r
+                istringstream instr(nameid);\r
+                DOMDocument* doc = XMLToolingConfig::getConfig().getParser().parse(instr); \r
+                XercesJanitor<DOMDocument> janitor(doc);\r
+                auto_ptr<saml2::NameID> n(saml2::NameIDBuilder::buildNameID());\r
+                n->unmarshall(doc->getDocumentElement(), true);\r
+                janitor.release();\r
+                m_nameid = n.release();\r
+            }\r
         }\r
         \r
         ~StoredSession();\r
@@ -82,17 +81,23 @@ namespace shibsp {
             delete this;\r
         }\r
         \r
+        const char* getID() const {\r
+            return m_obj.name();\r
+        }\r
         const char* getClientAddress() const {\r
             return m_obj["client_addr"].string();\r
         }\r
         const char* getEntityID() const {\r
             return m_obj["entity_id"].string();\r
         }\r
+        const char* getProtocol() const {\r
+            return m_obj["protocol"].string();\r
+        }\r
         const char* getAuthnInstant() const {\r
             return m_obj["authn_instant"].string();\r
         }\r
-        const opensaml::saml2::NameID& getNameID() const {\r
-            return *m_nameid;\r
+        const opensaml::saml2::NameID* getNameID() const {\r
+            return m_nameid;\r
         }\r
         const char* getSessionIndex() const {\r
             return m_obj["session_index"].string();\r
@@ -103,34 +108,35 @@ namespace shibsp {
         const char* getAuthnContextDeclRef() const {\r
             return m_obj["authncontext_decl"].string();\r
         }\r
-        const map<string,const Attribute*>& getAttributes() const {\r
+        const multimap<string,Attribute*>& getAttributes() const {\r
             if (m_attributes.empty())\r
                 unmarshallAttributes();\r
             return m_attributes;\r
         }\r
         const vector<const char*>& getAssertionIDs() const {\r
             if (m_ids.empty()) {\r
-                DDF id = m_obj["assertions"].first();\r
+                DDF ids = m_obj["assertions"];\r
+                DDF id = ids.first();\r
                 while (id.isstring()) {\r
                     m_ids.push_back(id.string());\r
-                    id = id.next();\r
+                    id = ids.next();\r
                 }\r
             }\r
             return m_ids;\r
         }\r
         \r
         void addAttributes(const vector<Attribute*>& attributes);\r
-        const RootObject* getAssertion(const char* id) const;\r
-        void addAssertion(RootObject* assertion);\r
+        const Assertion* getAssertion(const char* id) const;\r
+        void addAssertion(Assertion* assertion);\r
 \r
     private:\r
         void unmarshallAttributes() const;\r
 \r
         DDF m_obj;\r
         saml2::NameID* m_nameid;\r
-        mutable map<string,const Attribute*> m_attributes;\r
+        mutable multimap<string,Attribute*> m_attributes;\r
         mutable vector<const char*> m_ids;\r
-        mutable map<string,RootObject*> m_tokens;\r
+        mutable map<string,Assertion*> m_tokens;\r
         SSCache* m_cache;\r
     };\r
     \r
@@ -138,28 +144,42 @@ namespace shibsp {
     {\r
     public:\r
         SSCache(const DOMElement* e);\r
-        ~SSCache() {}\r
+        ~SSCache();\r
     \r
         void receive(DDF& in, ostream& out);\r
         \r
         string insert(\r
             time_t expires,\r
             const Application& application,\r
-            const char* client_addr,\r
+            const char* client_addr=NULL,\r
+            const saml2md::EntityDescriptor* issuer=NULL,\r
+            const XMLCh* protocol=NULL,\r
+            const saml2::NameID* nameid=NULL,\r
+            const XMLCh* authn_instant=NULL,\r
+            const XMLCh* session_index=NULL,\r
+            const XMLCh* authncontext_class=NULL,\r
+            const XMLCh* authncontext_decl=NULL,\r
+            const vector<const Assertion*>* tokens=NULL,\r
+            const multimap<string,Attribute*>* attributes=NULL\r
+            );\r
+        Session* find(const char* key, const Application& application, const char* client_addr=NULL, time_t* timeout=NULL);\r
+        void remove(const char* key, const Application& application);\r
+        void remove(\r
             const saml2md::EntityDescriptor* issuer,\r
             const saml2::NameID& nameid,\r
-            const char* authn_instant=NULL,\r
-            const char* session_index=NULL,\r
-            const char* authncontext_class=NULL,\r
-            const char* authncontext_decl=NULL,\r
-            const RootObject* ssoToken=NULL,\r
-            const vector<Attribute*>* attributes=NULL\r
+            const char* index,\r
+            const Application& application,\r
+            vector<string>& sessions\r
             );\r
-        Session* find(const char* key, const Application& application, const char* client_addr=NULL, time_t timeout=0);\r
-        void remove(const char* key, const Application& application, const char* client_addr);\r
 \r
         Category& m_log;\r
         StorageService* m_storage;\r
+\r
+    private:\r
+        // maintain back-mappings of NameID/SessionIndex -> session key\r
+        void insert(const char* key, time_t expires, const char* name, const char* index);\r
+\r
+        bool stronglyMatches(const XMLCh* idp, const XMLCh* sp, const saml2::NameID& n1, const saml2::NameID& n2) const;\r
     };\r
 \r
     SessionCache* SHIBSP_DLLLOCAL StorageServiceCacheFactory(const DOMElement* const & e)\r
@@ -174,18 +194,19 @@ StoredSession::~StoredSession()
 {\r
     m_obj.destroy();\r
     delete m_nameid;\r
-    for_each(m_attributes.begin(), m_attributes.end(), cleanup_const_pair<string,Attribute>());\r
-    for_each(m_tokens.begin(), m_tokens.end(), cleanup_pair<string,RootObject>());\r
+    for_each(m_attributes.begin(), m_attributes.end(), cleanup_pair<string,Attribute>());\r
+    for_each(m_tokens.begin(), m_tokens.end(), cleanup_pair<string,Assertion>());\r
 }\r
 \r
 void StoredSession::unmarshallAttributes() const\r
 {\r
     Attribute* attribute;\r
-    DDF attr = m_obj["attributes"].first();\r
+    DDF attrs = m_obj["attributes"];\r
+    DDF attr = attrs.first();\r
     while (!attr.isnull()) {\r
         try {\r
             attribute = Attribute::unmarshall(attr);\r
-            m_attributes[attribute->getId()] = attribute;\r
+            m_attributes.insert(make_pair(attribute->getId(), attribute));\r
             if (m_cache->m_log.isDebugEnabled())\r
                 m_cache->m_log.debug("unmarshalled attribute (ID: %s) with %d value%s",\r
                     attribute->getId(), attr.first().integer(), attr.first().integer()!=1 ? "s" : "");\r
@@ -194,7 +215,7 @@ void StoredSession::unmarshallAttributes() const
             const char* id = attr.first().name();\r
             m_cache->m_log.error("error unmarshalling attribute (ID: %s): %s", id ? id : "none", ex.what());\r
         }\r
-        attr = attr.next();\r
+        attr = attrs.next();\r
     }\r
 }\r
 \r
@@ -204,7 +225,7 @@ void StoredSession::addAttributes(const vector<Attribute*>& attributes)
     xmltooling::NDC ndc("addAttributes");\r
 #endif\r
 \r
-    m_cache->m_log.debug("adding attributes to session (%s)", m_obj.name());\r
+    m_cache->m_log.debug("adding attributes to session (%s)", getID());\r
     \r
     int ver;\r
     do {\r
@@ -225,7 +246,7 @@ void StoredSession::addAttributes(const vector<Attribute*>& attributes)
         string record(str.str()); \r
 \r
         try {\r
-            ver = m_cache->m_storage->updateText(m_obj.name(), "session", record.c_str(), 0, m_obj["version"].integer()-1);\r
+            ver = m_cache->m_storage->updateText(getID(), "session", record.c_str(), 0, m_obj["version"].integer()-1);\r
         }\r
         catch (exception&) {\r
             // Roll back modification to record.\r
@@ -250,9 +271,9 @@ void StoredSession::addAttributes(const vector<Attribute*>& attributes)
         else if (ver < 0) {\r
             // Out of sync.\r
             m_cache->m_log.warn("storage service indicates the record is out of sync, updating with a fresh copy...");\r
-            ver = m_cache->m_storage->readText(m_obj.name(), "session", &record, NULL);\r
+            ver = m_cache->m_storage->readText(getID(), "session", &record, NULL);\r
             if (!ver) {\r
-                m_cache->m_log.error("readText failed on StorageService for session (%s)", m_obj.name());\r
+                m_cache->m_log.error("readText failed on StorageService for session (%s)", getID());\r
                 throw IOException("Unable to read back stored session.");\r
             }\r
             \r
@@ -276,7 +297,7 @@ void StoredSession::addAttributes(const vector<Attribute*>& attributes)
     Locker locker(xlog);\r
     xlog->log.infoStream() <<\r
         "Added the following attributes to session (ID: " <<\r
-            m_obj.name() <<\r
+            getID() <<\r
         ") for (applicationId: " <<\r
             m_obj["application_id"].string() <<\r
         ") {";\r
@@ -288,14 +309,14 @@ void StoredSession::addAttributes(const vector<Attribute*>& attributes)
     for_each(attributes.begin(), attributes.end(), xmltooling::cleanup<Attribute>());\r
 }\r
 \r
-const RootObject* StoredSession::getAssertion(const char* id) const\r
+const Assertion* StoredSession::getAssertion(const char* id) const\r
 {\r
-    map<string,RootObject*>::const_iterator i = m_tokens.find(id);\r
+    map<string,Assertion*>::const_iterator i = m_tokens.find(id);\r
     if (i!=m_tokens.end())\r
         return i->second;\r
     \r
     string tokenstr;\r
-    if (!m_cache->m_storage->readText(m_obj.name(), id, &tokenstr, NULL))\r
+    if (!m_cache->m_storage->readText(getID(), id, &tokenstr, NULL))\r
         throw FatalProfileException("Assertion not found in cache.");\r
 \r
     // Parse and bind the document into an XMLObject.\r
@@ -305,8 +326,8 @@ const RootObject* StoredSession::getAssertion(const char* id) const
     auto_ptr<XMLObject> xmlObject(XMLObjectBuilder::buildOneFromElement(doc->getDocumentElement(), true));\r
     janitor.release();\r
     \r
-    RootObject* token = dynamic_cast<RootObject*>(xmlObject.get());\r
-    if (!token || !token->isAssertion())\r
+    Assertion* token = dynamic_cast<Assertion*>(xmlObject.get());\r
+    if (!token)\r
         throw FatalProfileException("Request for cached assertion returned an unknown object type.");\r
 \r
     // Transfer ownership to us.\r
@@ -315,26 +336,27 @@ const RootObject* StoredSession::getAssertion(const char* id) const
     return token;\r
 }\r
 \r
-void StoredSession::addAssertion(RootObject* assertion)\r
+void StoredSession::addAssertion(Assertion* assertion)\r
 {\r
 #ifdef _DEBUG\r
     xmltooling::NDC ndc("addAssertion");\r
 #endif\r
     \r
-    if (!assertion || !assertion->isAssertion())\r
+    if (!assertion)\r
         throw FatalProfileException("Unknown object type passed to session for storage.");\r
 \r
     auto_ptr_char id(assertion->getID());\r
 \r
-    m_cache->m_log.debug("adding assertion (%s) to session (%s)", id.get(), m_obj.name());\r
+    m_cache->m_log.debug("adding assertion (%s) to session (%s)", id.get(), getID());\r
 \r
     time_t exp;\r
-    if (!m_cache->m_storage->readText(m_obj.name(), "session", NULL, &exp))\r
+    if (!m_cache->m_storage->readText(getID(), "session", NULL, &exp))\r
         throw IOException("Unable to load expiration time for stored session.");\r
 \r
     ostringstream tokenstr;\r
     tokenstr << *assertion;\r
-    m_cache->m_storage->createText(m_obj.name(), id.get(), tokenstr.str().c_str(), exp);\r
+    if (!m_cache->m_storage->createText(getID(), id.get(), tokenstr.str().c_str(), exp))\r
+        throw IOException("Attempted to insert duplicate assertion ID into session.");\r
     \r
     int ver;\r
     do {\r
@@ -349,12 +371,12 @@ void StoredSession::addAssertion(RootObject* assertion)
         string record(str.str()); \r
 \r
         try {\r
-            ver = m_cache->m_storage->updateText(m_obj.name(), "session", record.c_str(), 0, m_obj["version"].integer()-1);\r
+            ver = m_cache->m_storage->updateText(getID(), "session", record.c_str(), 0, m_obj["version"].integer()-1);\r
         }\r
         catch (exception&) {\r
             token.destroy();\r
             m_obj["version"].integer(m_obj["version"].integer()-1);\r
-            m_cache->m_storage->deleteText(m_obj.name(), id.get());\r
+            m_cache->m_storage->deleteText(getID(), id.get());\r
             throw;\r
         }\r
 \r
@@ -364,17 +386,17 @@ void StoredSession::addAssertion(RootObject* assertion)
         }            \r
         if (!ver) {\r
             // Fatal problem with update.\r
-            m_cache->m_log.error("updateText failed on StorageService for session (%s)", m_obj.name());\r
-            m_cache->m_storage->deleteText(m_obj.name(), id.get());\r
+            m_cache->m_log.error("updateText failed on StorageService for session (%s)", getID());\r
+            m_cache->m_storage->deleteText(getID(), id.get());\r
             throw IOException("Unable to update stored session.");\r
         }\r
         else if (ver < 0) {\r
             // Out of sync.\r
             m_cache->m_log.warn("storage service indicates the record is out of sync, updating with a fresh copy...");\r
-            ver = m_cache->m_storage->readText(m_obj.name(), "session", &record, NULL);\r
+            ver = m_cache->m_storage->readText(getID(), "session", &record, NULL);\r
             if (!ver) {\r
-                m_cache->m_log.error("readText failed on StorageService for session (%s)", m_obj.name());\r
-                m_cache->m_storage->deleteText(m_obj.name(), id.get());\r
+                m_cache->m_log.error("readText failed on StorageService for session (%s)", getID());\r
+                m_cache->m_storage->deleteText(getID(), id.get());\r
                 throw IOException("Unable to read back stored session.");\r
             }\r
             \r
@@ -401,7 +423,7 @@ void StoredSession::addAssertion(RootObject* assertion)
     Locker locker(xlog);\r
     xlog->log.info(\r
         "Added assertion (ID: %s) to session for (applicationId: %s) with (ID: %s)",\r
-        id.get(), m_obj["application_id"].string(), m_obj.name()\r
+        id.get(), m_obj["application_id"].string(), getID()\r
         );\r
 }\r
 \r
@@ -421,12 +443,76 @@ SSCache::SSCache(const DOMElement* e)
 \r
     ListenerService* listener=conf.getServiceProvider()->getListenerService(false);\r
     if (listener && conf.isEnabled(SPConfig::OutOfProcess)) {\r
-        listener->regListener("insert::"REMOTED_SESSION_CACHE,this);\r
-        listener->regListener("find::"REMOTED_SESSION_CACHE,this);\r
-        listener->regListener("remove::"REMOTED_SESSION_CACHE,this);\r
+        listener->regListener("find::"REMOTED_SESSION_CACHE"::SessionCache",this);\r
+        listener->regListener("remove::"REMOTED_SESSION_CACHE"::SessionCache",this);\r
+        listener->regListener("touch::"REMOTED_SESSION_CACHE"::SessionCache",this);\r
+        listener->regListener("getAssertion::"REMOTED_SESSION_CACHE"::SessionCache",this);\r
     }\r
     else {\r
-        m_log.info("no ListenerService available, cache remoting is disabled");\r
+        m_log.info("no ListenerService available, cache remoting disabled");\r
+    }\r
+}\r
+\r
+SSCache::~SSCache()\r
+{\r
+    SPConfig& conf = SPConfig::getConfig();\r
+    ListenerService* listener=conf.getServiceProvider()->getListenerService(false);\r
+    if (listener && conf.isEnabled(SPConfig::OutOfProcess)) {\r
+        listener->unregListener("find::"REMOTED_SESSION_CACHE"::SessionCache",this);\r
+        listener->unregListener("remove::"REMOTED_SESSION_CACHE"::SessionCache",this);\r
+        listener->unregListener("touch::"REMOTED_SESSION_CACHE"::SessionCache",this);\r
+        listener->unregListener("getAssertion::"REMOTED_SESSION_CACHE"::SessionCache",this);\r
+    }\r
+}\r
+\r
+void SSCache::insert(const char* key, time_t expires, const char* name, const char* index)\r
+{\r
+    string dup;\r
+    if (strlen(name) > 255) {\r
+        dup = string(name).substr(0,255);\r
+        name = dup.c_str();\r
+    }\r
+\r
+    DDF obj;\r
+    DDFJanitor jobj(obj);\r
+\r
+    // Since we can't guarantee uniqueness, check for an existing record.\r
+    string record;\r
+    time_t recordexp;\r
+    int ver = m_storage->readText("NameID", name, &record, &recordexp);\r
+    if (ver > 0) {\r
+        // Existing record, so we need to unmarshall it.\r
+        istringstream in(record);\r
+        in >> obj;\r
+    }\r
+    else {\r
+        // New record.\r
+        obj.structure();\r
+    }\r
+\r
+    if (!index || !*index)\r
+        index = "_shibnull";\r
+    DDF sessions = obj.addmember(index);\r
+    if (!sessions.islist())\r
+        sessions.list();\r
+    DDF session = DDF(NULL).string(key);\r
+    sessions.add(session);\r
+\r
+    // Remarshall the record.\r
+    ostringstream out;\r
+    out << obj;\r
+\r
+    // Try and store it back...\r
+    if (ver > 0) {\r
+        ver = m_storage->updateText("NameID", name, out.str().c_str(), max(expires, recordexp), ver);\r
+        if (ver <= 0) {\r
+            // Out of sync, or went missing, so retry.\r
+            return insert(key, expires, name, index);\r
+        }\r
+    }\r
+    else if (!m_storage->createText("NameID", name, out.str().c_str(), expires)) {\r
+        // Hit a dup, so just retry, hopefully hitting the other branch.\r
+        return insert(key, expires, name, index);\r
     }\r
 }\r
 \r
@@ -435,13 +521,14 @@ string SSCache::insert(
     const Application& application,\r
     const char* client_addr,\r
     const saml2md::EntityDescriptor* issuer,\r
-    const saml2::NameID& nameid,\r
-    const char* authn_instant,\r
-    const char* session_index,\r
-    const char* authncontext_class,\r
-    const char* authncontext_decl,\r
-    const RootObject* ssoToken,\r
-    const vector<Attribute*>* attributes\r
+    const XMLCh* protocol,\r
+    const saml2::NameID* nameid,\r
+    const XMLCh* authn_instant,\r
+    const XMLCh* session_index,\r
+    const XMLCh* authncontext_class,\r
+    const XMLCh* authncontext_decl,\r
+    const vector<const Assertion*>* tokens,\r
+    const multimap<string,Attribute*>* attributes\r
     )\r
 {\r
 #ifdef _DEBUG\r
@@ -456,51 +543,64 @@ string SSCache::insert(
     DDF obj = DDF(key.get()).structure();\r
     obj.addmember("version").integer(1);\r
     obj.addmember("application_id").string(application.getId());\r
-    if (expires > 0) {\r
-        // On 64-bit Windows, time_t doesn't fit in a long, so I'm using ISO timestamps.  \r
+\r
+    // On 64-bit Windows, time_t doesn't fit in a long, so I'm using ISO timestamps.  \r
 #ifndef HAVE_GMTIME_R\r
-        struct tm* ptime=gmtime(&expires);\r
+    struct tm* ptime=gmtime(&expires);\r
 #else\r
-        struct tm res;\r
-        struct tm* ptime=gmtime_r(&expires,&res);\r
+    struct tm res;\r
+    struct tm* ptime=gmtime_r(&expires,&res);\r
 #endif\r
-        char timebuf[32];\r
-        strftime(timebuf,32,"%Y-%m-%dT%H:%M:%SZ",ptime);\r
-        obj.addmember("expires").string(timebuf);\r
-    }\r
-    obj.addmember("client_addr").string(client_addr);\r
+    char timebuf[32];\r
+    strftime(timebuf,32,"%Y-%m-%dT%H:%M:%SZ",ptime);\r
+    obj.addmember("expires").string(timebuf);\r
+\r
+    if (client_addr)\r
+        obj.addmember("client_addr").string(client_addr);\r
     if (issuer) {\r
         auto_ptr_char entity_id(issuer->getEntityID());\r
         obj.addmember("entity_id").string(entity_id.get());\r
     }\r
-    if (authn_instant)\r
-        obj.addmember("authn_instant").string(authn_instant);\r
+    if (protocol) {\r
+        auto_ptr_char prot(protocol);\r
+        obj.addmember("protocol").string(prot.get());\r
+    }\r
+    if (authn_instant) {\r
+        auto_ptr_char instant(authn_instant);\r
+        obj.addmember("authn_instant").string(instant.get());\r
+    }\r
+    auto_ptr_char index(session_index);\r
     if (session_index)\r
-        obj.addmember("session_index").string(session_index);\r
-    if (authncontext_class)\r
-        obj.addmember("authncontext_class").string(authncontext_class);\r
-    if (authncontext_decl)\r
-        obj.addmember("authncontext_decl").string(authncontext_decl);\r
-\r
-    ostringstream namestr;\r
-    namestr << nameid;\r
-    obj.addmember("nameid").string(namestr.str().c_str());\r
-    \r
-    string tokenstr;\r
-    if (ssoToken) {\r
-        ostringstream tstr;\r
-        tstr << *ssoToken;\r
-        tokenstr = tstr.str();\r
-        auto_ptr_char tokenid(ssoToken->getID());\r
-        DDF tokid = DDF(NULL).string(tokenid.get());\r
-        obj.addmember("assertions").list().add(tokid);\r
+        obj.addmember("session_index").string(index.get());\r
+    if (authncontext_class) {\r
+        auto_ptr_char ac(authncontext_class);\r
+        obj.addmember("authncontext_class").string(ac.get());\r
+    }\r
+    if (authncontext_decl) {\r
+        auto_ptr_char ad(authncontext_decl);\r
+        obj.addmember("authncontext_decl").string(ad.get());\r
+    }\r
+\r
+    if (nameid) {\r
+        ostringstream namestr;\r
+        namestr << *nameid;\r
+        obj.addmember("nameid").string(namestr.str().c_str());\r
+    }\r
+\r
+    if (tokens) {\r
+        obj.addmember("assertions").list();\r
+        for (vector<const Assertion*>::const_iterator t = tokens->begin(); t!=tokens->end(); ++t) {\r
+            auto_ptr_char tokenid((*t)->getID());\r
+            DDF tokid = DDF(NULL).string(tokenid.get());\r
+            obj["assertions"].add(tokid);\r
+        }\r
     }\r
     \r
     if (attributes) {\r
         DDF attr;\r
         DDF attrlist = obj.addmember("attributes").list();\r
-        for (vector<Attribute*>::const_iterator a=attributes->begin(); a!=attributes->end(); ++a) {\r
-            attr = (*a)->marshall();\r
+        for (multimap<string,Attribute*>::const_iterator a=attributes->begin(); a!=attributes->end(); ++a) {\r
+            attr = a->second->marshall();\r
             attrlist.add(attr);\r
         }\r
     }\r
@@ -510,10 +610,28 @@ string SSCache::insert(
     \r
     m_log.debug("storing new session...");\r
     time_t now = time(NULL);\r
-    m_storage->createText(key.get(), "session", record.str().c_str(), now + m_cacheTimeout);\r
-    if (ssoToken) {\r
+    if (!m_storage->createText(key.get(), "session", record.str().c_str(), now + m_cacheTimeout))\r
+        throw FatalProfileException("Attempted to create a session with a duplicate key.");\r
+    \r
+    // Store the reverse mapping for logout.\r
+    auto_ptr_char name(nameid ? nameid->getName() : NULL);\r
+    try {\r
+        if (name.get())\r
+            insert(key.get(), expires, name.get(), index.get());\r
+    }\r
+    catch (exception& ex) {\r
+        m_log.error("error storing back mapping of NameID for logout: %s", ex.what());\r
+    }\r
+\r
+    if (tokens) {\r
         try {\r
-            m_storage->createText(key.get(), obj["assertions"].first().string(), tokenstr.c_str(), now + m_cacheTimeout);\r
+            for (vector<const Assertion*>::const_iterator t = tokens->begin(); t!=tokens->end(); ++t) {\r
+                ostringstream tokenstr;\r
+                tokenstr << *(*t);\r
+                auto_ptr_char tokenid((*t)->getID());\r
+                if (!m_storage->createText(key.get(), tokenid.get(), tokenstr.str().c_str(), now + m_cacheTimeout))\r
+                    throw IOException("duplicate assertion ID ($1)", params(1, tokenid.get()));\r
+            }\r
         }\r
         catch (exception& ex) {\r
             m_log.error("error storing assertion along with session: %s", ex.what());\r
@@ -521,11 +639,10 @@ string SSCache::insert(
     }\r
 \r
     const char* pid = obj["entity_id"].string();\r
-    m_log.debug("new session created: SessionID (%s) IdP (%s) Address (%s)", key.get(), pid ? pid : "none", client_addr);\r
+    m_log.info("new session created: SessionID (%s) IdP (%s) Address (%s)", key.get(), pid ? pid : "none", client_addr);\r
 \r
     // Transaction Logging\r
-    auto_ptr_char name(nameid.getName());\r
-    TransactionLog* xlog = SPConfig::getConfig().getServiceProvider()->getTransactionLog();\r
+    TransactionLog* xlog = application.getServiceProvider().getTransactionLog();\r
     Locker locker(xlog);\r
     xlog->log.infoStream() <<\r
         "New session (ID: " <<\r
@@ -535,9 +652,9 @@ string SSCache::insert(
         ") for principal from (IdP: " <<\r
             (pid ? pid : "none") <<\r
         ") at (ClientAddress: " <<\r
-            client_addr <<\r
+            (client_addr ? client_addr : "none") <<\r
         ") with (NameIdentifier: " <<\r
-            name.get() <<\r
+            (name.get() ? name.get() : "none") <<\r
         ")";\r
     \r
     if (attributes) {\r
@@ -547,16 +664,15 @@ string SSCache::insert(
             ") for (applicationId: " <<\r
                 application.getId() <<\r
             ") {";\r
-        for (vector<Attribute*>::const_iterator a=attributes->begin(); a!=attributes->end(); ++a)\r
-            xlog->log.infoStream() << "\t" << (*a)->getId() << " (" << (*a)->valueCount() << " values)";\r
+        for (multimap<string,Attribute*>::const_iterator a=attributes->begin(); a!=attributes->end(); ++a)\r
+            xlog->log.infoStream() << "\t" << a->second->getId() << " (" << a->second->valueCount() << " values)";\r
         xlog->log.info("}");\r
-        for_each(attributes->begin(), attributes->end(), xmltooling::cleanup<Attribute>());\r
     }\r
 \r
     return key.get();\r
 }\r
 \r
-Session* SSCache::find(const char* key, const Application& application, const char* client_addr, time_t timeout)\r
+Session* SSCache::find(const char* key, const Application& application, const char* client_addr, time_t* timeout)\r
 {\r
 #ifdef _DEBUG\r
     xmltooling::NDC ndc("find");\r
@@ -587,7 +703,7 @@ Session* SSCache::find(const char* key, const Application& application, const ch
             m_log.debug("comparing client address %s against %s", client_addr, obj["client_addr"].string());\r
         if (strcmp(obj["client_addr"].string(),client_addr)) {\r
             m_log.warn("client address mismatch");\r
-            remove(key, application, client_addr);\r
+            remove(key, application);\r
             RetryableProfileException ex(\r
                 "Your IP address ($1) does not match the address recorded at the time the session was established.",\r
                 params(1,client_addr)\r
@@ -605,9 +721,9 @@ Session* SSCache::find(const char* key, const Application& application, const ch
     lastAccess -= m_cacheTimeout;   // adjusts it back to the last time the record's timestamp was touched\r
     time_t now=time(NULL);\r
     \r
-    if (timeout > 0 && now - lastAccess >= timeout) {\r
+    if (timeout && *timeout > 0 && now - lastAccess >= *timeout) {\r
         m_log.info("session timed out (ID: %s)", key);\r
-        remove(key, application, client_addr);\r
+        remove(key, application);\r
         RetryableProfileException ex("Your session has expired, and you must re-authenticate.");\r
         string eid(obj["entity_id"].string());\r
         obj.destroy();\r
@@ -624,7 +740,7 @@ Session* SSCache::find(const char* key, const Application& application, const ch
         iso.parseDateTime();\r
         if (now > iso.getEpoch()) {\r
             m_log.info("session expired (ID: %s)", key);\r
-            remove(key, application, client_addr);\r
+            remove(key, application);\r
             RetryableProfileException ex("Your session has expired, and you must re-authenticate.");\r
             string eid(obj["entity_id"].string());\r
             obj.destroy();\r
@@ -636,12 +752,14 @@ Session* SSCache::find(const char* key, const Application& application, const ch
         }\r
     }\r
     \r
-    // Update storage expiration, if possible.\r
-    try {\r
-        m_storage->updateContext(key, now + m_cacheTimeout);\r
-    }\r
-    catch (exception& ex) {\r
-        m_log.error("failed to update session expiration: %s", ex.what());\r
+    if (timeout) {\r
+        // Update storage expiration, if possible.\r
+        try {\r
+            m_storage->updateContext(key, now + m_cacheTimeout);\r
+        }\r
+        catch (exception& ex) {\r
+            m_log.error("failed to update session expiration: %s", ex.what());\r
+        }\r
     }\r
 \r
     // Finally build the Session object.\r
@@ -654,60 +772,168 @@ Session* SSCache::find(const char* key, const Application& application, const ch
     }\r
 }\r
 \r
-void SSCache::remove(const char* key, const Application& application, const char* client_addr)\r
+void SSCache::remove(const char* key, const Application& application)\r
 {\r
 #ifdef _DEBUG\r
     xmltooling::NDC ndc("remove");\r
 #endif\r
 \r
-    m_log.debug("removing session (%s)", key);\r
-\r
     m_storage->deleteContext(key);\r
+    m_log.info("removed session (%s)", key);\r
 \r
-    TransactionLog* xlog = SPConfig::getConfig().getServiceProvider()->getTransactionLog();\r
+    TransactionLog* xlog = application.getServiceProvider().getTransactionLog();\r
     Locker locker(xlog);\r
     xlog->log.info("Destroyed session (applicationId: %s) (ID: %s)", application.getId(), key);\r
 }\r
 \r
-void SSCache::receive(DDF& in, ostream& out)\r
+void SSCache::remove(\r
+    const saml2md::EntityDescriptor* issuer,\r
+    const saml2::NameID& nameid,\r
+    const char* index,\r
+    const Application& application,\r
+    vector<string>& sessionsKilled\r
+    )\r
 {\r
 #ifdef _DEBUG\r
-    xmltooling::NDC ndc("receive");\r
+    xmltooling::NDC ndc("remove");\r
 #endif\r
 \r
-    if (!strcmp(in.name(),"insert::"REMOTED_SESSION_CACHE)) {\r
-        auto_ptr_char key(SAMLConfig::getConfig().generateIdentifier());\r
-        in.name(key.get());\r
+    auto_ptr_char entityID(issuer ? issuer->getEntityID() : NULL);\r
+    auto_ptr_char name(nameid.getName());\r
 \r
-        DDF token = in["token"].remove();\r
-        DDFJanitor tjan(token);\r
-        \r
-        m_log.debug("storing new session...");\r
-        ostringstream record;\r
-        record << in;\r
-        time_t now = time(NULL);\r
-        m_storage->createText(key.get(), "session", record.str().c_str(), now + m_cacheTimeout);\r
-        if (token.isstring()) {\r
-            try {\r
-                m_storage->createText(key.get(), in["assertions"].first().string(), token.string(), now + m_cacheTimeout);\r
-            }\r
-            catch (IOException& ex) {\r
-                m_log.error("error storing assertion along with session: %s", ex.what());\r
+    m_log.info(\r
+        "request to logout sessions from (%s) for (%s) for session index (%s)",\r
+        entityID.get() ? entityID.get() : "unknown", name.get(), index ? index : "all"\r
+        );\r
+\r
+    if (strlen(name.get()) > 255)\r
+        const_cast<char*>(name.get())[255] = 0;\r
+\r
+    // Read in potentially matching sessions.\r
+    string record;\r
+    int ver = m_storage->readText("NameID", name.get(), &record);\r
+    if (ver == 0) {\r
+        m_log.debug("no active sessions to remove for supplied issuer and name identifier");\r
+        return;\r
+    }\r
+\r
+    DDF obj;\r
+    DDFJanitor jobj(obj);\r
+    istringstream in(record);\r
+    in >> obj;\r
+\r
+    // The record contains child lists for each known session index.\r
+    DDF key;\r
+    DDF sessions = obj.first();\r
+    while (sessions.islist()) {\r
+        if (!index || !strcmp(sessions.name(), index)) {\r
+            key = sessions.first();\r
+            while (key.isstring()) {\r
+                // Fetch the session for comparison and possible removal.\r
+                Session* session = find(key.string(), application);\r
+                Locker locker(session);\r
+                if (session) {\r
+                    // Same issuer?\r
+                    if (XMLString::equals(session->getEntityID(), entityID.get())) {\r
+                        // Same NameID?\r
+                        if (stronglyMatches(issuer->getEntityID(), application.getXMLString("entityID").second, nameid, *session->getNameID())) {\r
+                            sessionsKilled.push_back(key.string());\r
+                            remove(key.string(), application);  // let this throw to detect errors in case the full logout fails?\r
+                            key.destroy();\r
+                        }\r
+                        else {\r
+                            m_log.debug("session (%s) contained a non-matching NameID, leaving it alone", key.string());\r
+                        }\r
+                    }\r
+                    else {\r
+                        m_log.debug("session (%s) established by different IdP, leaving it alone", key.string());\r
+                    }\r
+                }\r
+                else {\r
+                    // Session's gone, so...\r
+                    sessionsKilled.push_back(key.string());\r
+                    key.destroy();\r
+                }\r
+                key = sessions.next();\r
             }\r
+\r
+            // No sessions left for this index?\r
+            if (sessions.first().isnull())\r
+                sessions.destroy();\r
         }\r
-        const char* pid = in["entity_id"].string();\r
-        m_log.debug("new session created: SessionID (%s) IdP (%s) Address (%s)", key.get(), pid ? pid : "none", in["client_addr"].string());\r
+        sessions = obj.next();\r
+    }\r
     \r
-        DDF ret = DDF(NULL).structure();\r
-        DDFJanitor jan(ret);\r
-        ret.addmember("key").string(key.get());\r
-        out << ret;\r
+    if (obj.first().isnull())\r
+        obj.destroy();\r
+\r
+    // If possible, write back the mapping record (this isn't crucial).\r
+    try {\r
+        if (obj.isnull()) {\r
+            m_storage->deleteText("NameID", name.get());\r
+        }\r
+        else if (!sessionsKilled.empty()) {\r
+            ostringstream out;\r
+            out << obj;\r
+            if (m_storage->updateText("NameID", name.get(), out.str().c_str(), 0, ver) <= 0)\r
+                m_log.warn("logout mapping record changed behind us, leaving it alone");\r
+        }\r
     }\r
-    else if (!strcmp(in.name(),"find::"REMOTED_SESSION_CACHE)) {\r
+    catch (exception& ex) {\r
+        m_log.error("error updating logout mapping record: %s", ex.what());\r
+    }\r
+}\r
+\r
+bool SSCache::stronglyMatches(const XMLCh* idp, const XMLCh* sp, const saml2::NameID& n1, const saml2::NameID& n2) const\r
+{\r
+    if (!XMLString::equals(n1.getName(), n2.getName()))\r
+        return false;\r
+    \r
+    const XMLCh* s1 = n1.getFormat();\r
+    const XMLCh* s2 = n2.getFormat();\r
+    if (!s1 || !*s1)\r
+        s1 = saml2::NameID::UNSPECIFIED;\r
+    if (!s2 || !*s2)\r
+        s2 = saml2::NameID::UNSPECIFIED;\r
+    if (!XMLString::equals(s1,s2))\r
+        return false;\r
+    \r
+    s1 = n1.getNameQualifier();\r
+    s2 = n2.getNameQualifier();\r
+    if (!s1 || !*s1)\r
+        s1 = idp;\r
+    if (!s2 || !*s2)\r
+        s2 = idp;\r
+    if (!XMLString::equals(s1,s2))\r
+        return false;\r
+\r
+    s1 = n1.getSPNameQualifier();\r
+    s2 = n2.getSPNameQualifier();\r
+    if (!s1 || !*s1)\r
+        s1 = sp;\r
+    if (!s2 || !*s2)\r
+        s2 = sp;\r
+    if (!XMLString::equals(s1,s2))\r
+        return false;\r
+\r
+    return true;\r
+}\r
+\r
+void SSCache::receive(DDF& in, ostream& out)\r
+{\r
+#ifdef _DEBUG\r
+    xmltooling::NDC ndc("receive");\r
+#endif\r
+\r
+    if (!strcmp(in.name(),"find::"REMOTED_SESSION_CACHE"::SessionCache")) {\r
         const char* key=in["key"].string();\r
         if (!key)\r
             throw ListenerException("Required parameters missing for session removal.");\r
 \r
+        const Application* app = SPConfig::getConfig().getServiceProvider()->getApplication(in["application_id"].string());\r
+        if (!app)\r
+            throw ListenerException("Application not found, check configuration?");\r
+\r
         // Do an unversioned read.\r
         string record;\r
         time_t lastAccess;\r
@@ -723,32 +949,32 @@ void SSCache::receive(DDF& in, ostream& out)
         time_t now=time(NULL);\r
 \r
         // See if we need to check for a timeout.\r
-        time_t timeout = 0;\r
-        auto_ptr_XMLCh dt(in["timeout"].string());\r
-        if (dt.get()) {\r
+        if (in["timeout"].string()) {\r
+            time_t timeout = 0;\r
+            auto_ptr_XMLCh dt(in["timeout"].string());\r
             DateTime dtobj(dt.get());\r
             dtobj.parseDateTime();\r
             timeout = dtobj.getEpoch();\r
-        }\r
-                \r
-        if (timeout > 0 && now - lastAccess >= timeout) {\r
-            m_log.info("session timed out (ID: %s)", key);\r
-            remove(key,*(SPConfig::getConfig().getServiceProvider()->getApplication("default")),NULL);\r
-            throw RetryableProfileException("Your session has expired, and you must re-authenticate.");\r
-        } \r
-\r
-        // Update storage expiration, if possible.\r
-        try {\r
-            m_storage->updateContext(key, now + m_cacheTimeout);\r
-        }\r
-        catch (exception& ex) {\r
-            m_log.error("failed to update session expiration: %s", ex.what());\r
+                    \r
+            if (timeout > 0 && now - lastAccess >= timeout) {\r
+                m_log.info("session timed out (ID: %s)", key);\r
+                remove(key,*app);\r
+                throw RetryableProfileException("Your session has expired, and you must re-authenticate.");\r
+            } \r
+\r
+            // Update storage expiration, if possible.\r
+            try {\r
+                m_storage->updateContext(key, now + m_cacheTimeout);\r
+            }\r
+            catch (exception& ex) {\r
+                m_log.error("failed to update session expiration: %s", ex.what());\r
+            }\r
         }\r
             \r
         // Send the record back.\r
         out << record;\r
     }\r
-    else if (!strcmp(in.name(),"touch::"REMOTED_SESSION_CACHE)) {\r
+    else if (!strcmp(in.name(),"touch::"REMOTED_SESSION_CACHE"::SessionCache")) {\r
         const char* key=in["key"].string();\r
         if (!key)\r
             throw ListenerException("Required parameters missing for session check.");\r
@@ -799,17 +1025,21 @@ void SSCache::receive(DDF& in, ostream& out)
             out << ret;\r
         }\r
     }\r
-    else if (!strcmp(in.name(),"remove::"REMOTED_SESSION_CACHE)) {\r
+    else if (!strcmp(in.name(),"remove::"REMOTED_SESSION_CACHE"::SessionCache")) {\r
         const char* key=in["key"].string();\r
         if (!key)\r
             throw ListenerException("Required parameter missing for session removal.");\r
-        \r
-        remove(key,*(SPConfig::getConfig().getServiceProvider()->getApplication("default")),NULL);\r
+\r
+        const Application* app = SPConfig::getConfig().getServiceProvider()->getApplication(in["application_id"].string());\r
+        if (!app)\r
+            throw ListenerException("Application not found, check configuration?");\r
+\r
+        remove(key,*app);\r
         DDF ret(NULL);\r
         DDFJanitor jan(ret);\r
         out << ret;\r
     }\r
-    else if (!strcmp(in.name(),"getAssertion::"REMOTED_SESSION_CACHE)) {\r
+    else if (!strcmp(in.name(),"getAssertion::"REMOTED_SESSION_CACHE"::SessionCache")) {\r
         const char* key=in["key"].string();\r
         const char* id=in["id"].string();\r
         if (!key || !id)\r