core: added cafile and cadir to the tls options.

diff --git a/core.tcl b/core.tcl
index 199c714659fa453387ea0f66f77fc1a7cd79f7d4..6f015f8ea5447307e3f97ebdbdcc78452ad25661 100644 (file)
--- a/core.tcl
+++ b/core.tcl
@@ -26,6 +26,8 @@ namespace eval ::xmppd {
             domain    {}
             certfile  {}
             keyfile   {}
+            cadir     {}
+            cafile    {}
             modules   {}
             features  {}
             endpoints {}
@@ -48,6 +50,9 @@ namespace eval ::xmppd {
             stanzas  urn:ietf:params:xml:ns:xmpp-stanzas
             session  urn:ietf:params:xml:ns:xmpp-session
             xml      http://www.w3.org/XML/1998/namespace
+            ping     urn:xmpp:ping
+            privacy  jabber:iq:privacy
+            roster   jabber:iq:roster
         }
     }
 
@@ -141,6 +146,20 @@ proc ::xmppd::configure {args} {
                     set options(keyfile) [Pop args 1]
                 }
             }
+            -cafile {
+                if {$cget} {
+                    return $options(cafile)
+                } else {
+                    set options(cafile) [Pop args 1]
+                }
+            }
+            -cadir {
+                if {$cget} {
+                    return $options(cadir)
+                } else {
+                    set options(cadir) [Pop args 1]
+                }
+            }
             -features {
                 if {$cget} { return $options(features) }
             }