Bugs item #1412021, was opened at 2006-01-22 15:51
Message generated for change (Comment added) made by teopetuk
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=112883&aid=1412021&group_id=12883

Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: sasl
Group: None
Status: Open
Resolution: None
Priority: 5
Submitted By: Nobody/Anonymous (nobody)
Assigned to: Pat Thoyts (patthoyts)
Summary: Ignoring -service option in DIGEST-MD5

Initial Comment:
Option -service is ignored in DIGEST-MD5 SASL auth
method. digest-uri is always set to smtp/$realm.

Possible fix is to replace smtp for $ctx(service).

----------------------------------------------------------------------

Comment By: Sergei Golovan (teopetuk)
Date: 2006-03-18 22:18

Message:
Logged In: YES 
user_id=410366

Here is the patch which seems to fix the bug:

--- /usr/lib/tcllib1.8/sasl/sasl.tcl    2005-09-19
16:12:39.000000000 +0400
+++ /usr/local/lib/sasl1.0.0/sasl.tcl   2006-03-18
21:24:10.736909032 +0300
@@ -76,7 +76,7 @@
     set context [namespace current]::[uid]
     variable $context
     upvar #0 $context ctx
-    array set ctx [list mech {} callback {} proc {} service
{} server {} +    array set ctx [list mech {} callback {} proc {} service
smtp server {}                         step 0 response "" valid false type
client]
     eval [linsert $args 0 [namespace origin configure]
$context]
     return $context
@@ -401,7 +401,7 @@
                 set realm [eval $ctx(callback) [list
$context realm]]
             }

-            set uri "smtp/$realm"
+            set uri "$ctx(service)/$realm"

             set A1 [md5_bin "$username:$realm:$password"]
             set A2 "AUTHENTICATE:$uri"


----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=112883&aid=1412021&group_id=12883


-------------------------------------------------------
This SF.Net email is sponsored by xPML, a groundbreaking scripting language
that extends applications into web and mobile media. Attend the live webcast
and join the prime developer group breaking into this new coding territory!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=110944&bid=241720&dat=121642
_______________________________________________
Tcllib-bugs mailing list
Tcllib-bugs@[...].net
https://lists.sourceforge.net/lists/listinfo/tcllib-bugs