Send Netdot-devel mailing list submissions to
        [email protected]

To subscribe or unsubscribe via the World Wide Web, visit
        https://osl.uoregon.edu/mailman/listinfo/netdot-devel
or, via email, send a message with subject or body 'help' to
        [email protected]

You can reach the person managing the list at
        [email protected]

When replying, please edit your Subject line so it is more specific
than "Re: Contents of Netdot-devel digest..."


Today's Topics:

   1. [Netdot - Bug #1648] Error when adding backbone   cable strand
      ([email protected])
   2. [Netdot - Feature #1652] (New) Add support for LDAP       over TLS
      ([email protected])


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

Message: 1
Date: Mon, 2 Jul 2012 19:24:08 -0700
From: [email protected]
Subject: [Netdot-devel] [Netdot - Bug #1648] Error when adding
        backbone        cable strand
To: [email protected], [email protected]
Message-ID: <[email protected]>
Content-Type: text/plain; charset=utf-8


Issue #1648 has been updated by Alastair Sheppard.


Like Dominik, I have a fresh install of 1.0.1RC2 and get the same error when 
trying to do about anything with cable strands. Creating a backbone cable with 
no strands is fine but manually adding a strand (or creating a new backbone 
cable when specifying the number of strands) errors like above. Great software, 
hopefully an easy fix.
----------------------------------------
Bug #1648: Error when adding backbone cable strand
https://osl.uoregon.edu/redmine/issues/1648

Author: Dominik Eismann
Status: New
Priority: Normal
Assignee: 
Category: CablePlant
Target version: 1.0.1-RC2
Resolution: 


In 1.0.1-RC1 or RC2, when adding a backbone cable with strands or trying to add 
strands to an already existing cable, I get the error quoted below. The problem 
occured on a fresh install of 1.0.1-RC1 on Ubuntu 12.04 an persisted after 
upgrading to RC2.

Nonetheless, thanks for sharing this great software with us!


<pre>
no value sent for required parameter 'id'

Trace begun at 
/usr/local/netdot/htdocs/masondata/obj/1249759374/cable_plant/display_sequence.mhtml.obj
 line 20
HTML::Mason::Commands::__ANON__('strands', 'ARRAY(0xbac4655c)') called at 
/usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xbaca0e9c)',
 'strands', 'ARRAY(0xbac4655c)') called at 
/usr/share/perl5/HTML/Mason/Request.pm line 1302
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, 'strands', 'ARRAY(0xbac4655c)') 
called at /usr/share/perl5/HTML/Mason/Request.pm line 1355
HTML::Mason::Request::scomp('HTML::Mason::Request::ApacheHandler=HASH(0xbabc12f0)',
 'display_sequence.mhtml', 'strands', 'ARRAY(0xbac4655c)') called at 
/usr/local/netdot/htdocs/cable_plant/cable_backbone.html line 596
HTML::Mason::Commands::__ANON__('BackboneCable__NEW__length', '', 
'BackboneCable__NEW__info', '', 'submit', 'save', 
'BackboneCable__NEW__numstrands', 20, 'BackboneCable__NEW__name', '001/001-3', 
'BackboneCable__NEW__owner', 28, 'BackboneCable__NEW__type', 5, 
'BackboneCable__NEW__end_closet', 1, '_action', 'UPDATE', 
'BackboneCable__NEW__start_closet', 2, 'BackboneCable__NEW__installdate', '', 
'showheader', 1) called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xbac667d4)',
 'BackboneCable__NEW__length', '', 'BackboneCable__NEW__info', '', 'submit', 
'save', 'BackboneCable__NEW__numstrands', 20, 'BackboneCable__NEW__name', 
'001/001-3', 'BackboneCable__NEW__owner', 28, 'BackboneCable__NEW__type', 5, 
'BackboneCable__NEW__end_closet', 1, '_action', 'UPDATE', 
'BackboneCable__NEW__start_closet', 2, 'BackboneCable__NEW__installdate', '', 
'showheader', 1) called at /usr/share/perl5/HTML/Mason/Request.pm line 1302
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, 'BackboneCable__NEW__length', 
'', 'BackboneCable__NEW__info', '', 'submit', 'save', 
'BackboneCable__NEW__numstrands', 20, 'BackboneCable__NEW__name', '001/001-3', 
'BackboneCable__NEW__owner', 28, 'BackboneCable__NEW__type', 5, 
'BackboneCable__NEW__end_closet', 1, '_action', 'UPDATE', 
'BackboneCable__NEW__start_closet', 2, 'BackboneCable__NEW__installdate', '', 
'showheader', 1) called at /usr/share/perl5/HTML/Mason/Request.pm line 955
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0xbabc12f0)')
 called at /usr/local/netdot/htdocs/cable_plant/autohandler line 353
HTML::Mason::Commands::__ANON__('BackboneCable__NEW__length', '', 
'BackboneCable__NEW__info', '', 'submit', 'save', 
'BackboneCable__NEW__numstrands', 20, 'BackboneCable__NEW__name', '001/001-3', 
'BackboneCable__NEW__owner', 28, 'BackboneCable__NEW__type', 5, 
'BackboneCable__NEW__end_closet', 1, '_action', 'UPDATE', 
'BackboneCable__NEW__start_closet', 2, 'BackboneCable__NEW__installdate', '', 
'showheader', 1) called at /usr/share/perl5/HTML/Mason/Component.pm line 157
HTML::Mason::Component::run_dynamic_sub('HTML::Mason::Component::FileBased=HASH(0xbab79590)',
 'main', 'BackboneCable__NEW__length', '', 'BackboneCable__NEW__info', '', 
'submit', 'save', 'BackboneCable__NEW__numstrands', 20, 
'BackboneCable__NEW__name', '001/001-3', 'BackboneCable__NEW__owner', 28, 
'BackboneCable__NEW__type', 5, 'BackboneCable__NEW__end_closet', 1, '_action', 
'UPDATE', 'BackboneCable__NEW__start_closet', 2, 
'BackboneCable__NEW__installdate', '', 'showheader', 1) called at 
/usr/share/perl5/HTML/Mason/Request.pm line 948
HTML::Mason::Request::call_dynamic('HTML::Mason::Request::ApacheHandler=HASH(0xbabc12f0)',
 'main', 'BackboneCable__NEW__length', '', 'BackboneCable__NEW__info', '', 
'submit', 'save', 'BackboneCable__NEW__numstrands', 20, 
'BackboneCable__NEW__name', '001/001-3', 'BackboneCable__NEW__owner', 28, 
'BackboneCable__NEW__type', 5, 'BackboneCable__NEW__end_closet', 1, '_action', 
'UPDATE', 'BackboneCable__NEW__start_closet', 2, 
'BackboneCable__NEW__installdate', '', 'showheader', 1) called at 
/usr/local/netdot/htdocs/masondata/obj/1249759374/cable_plant/autohandler.obj 
line 21
HTML::Mason::Commands::__ANON__('BackboneCable__NEW__length', '', 
'BackboneCable__NEW__info', '', 'submit', 'save', 
'BackboneCable__NEW__numstrands', 20, 'BackboneCable__NEW__name', '001/001-3', 
'BackboneCable__NEW__owner', 28, 'BackboneCable__NEW__type', 5, 
'BackboneCable__NEW__end_closet', 1, '_action', 'UPDATE', 
'BackboneCable__NEW__start_closet', 2, 'BackboneCable__NEW__installdate', '', 
'showheader', 1) called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xbab79590)',
 'BackboneCable__NEW__length', '', 'BackboneCable__NEW__info', '', 'submit', 
'save', 'BackboneCable__NEW__numstrands', 20, 'BackboneCable__NEW__name', 
'001/001-3', 'BackboneCable__NEW__owner', 28, 'BackboneCable__NEW__type', 5, 
'BackboneCable__NEW__end_closet', 1, '_action', 'UPDATE', 
'BackboneCable__NEW__start_closet', 2, 'BackboneCable__NEW__installdate', '', 
'showheader', 1) called at /usr/share/perl5/HTML/Mason/Request.pm line 1302
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, 'BackboneCable__NEW__length', 
'', 'BackboneCable__NEW__info', '', 'submit', 'save', 
'BackboneCable__NEW__numstrands', 20, 'BackboneCable__NEW__name', '001/001-3', 
'BackboneCable__NEW__owner', 28, 'BackboneCable__NEW__type', 5, 
'BackboneCable__NEW__end_closet', 1, '_action', 'UPDATE', 
'BackboneCable__NEW__start_closet', 2, 'BackboneCable__NEW__installdate', '', 
'showheader', 1) called at /usr/share/perl5/HTML/Mason/Request.pm line 955
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0xbabc12f0)',
 'showheader', 1) called at /usr/local/netdot/htdocs/autohandler line 76
HTML::Mason::Commands::__ANON__('BackboneCable__NEW__length', '', 
'BackboneCable__NEW__info', '', 'submit', 'save', 
'BackboneCable__NEW__numstrands', 20, 'BackboneCable__NEW__name', '001/001-3', 
'BackboneCable__NEW__owner', 28, 'BackboneCable__NEW__type', 5, 
'BackboneCable__NEW__end_closet', 1, '_action', 'UPDATE', 
'BackboneCable__NEW__start_closet', 2, 'BackboneCable__NEW__installdate', '') 
called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xbaae6238)',
 'BackboneCable__NEW__length', '', 'BackboneCable__NEW__info', '', 'submit', 
'save', 'BackboneCable__NEW__numstrands', 20, 'BackboneCable__NEW__name', 
'001/001-3', 'BackboneCable__NEW__owner', 28, 'BackboneCable__NEW__type', 5, 
'BackboneCable__NEW__end_closet', 1, '_action', 'UPDATE', 
'BackboneCable__NEW__start_closet', 2, 'BackboneCable__NEW__installdate', '') 
called at /usr/share/perl5/HTML/Mason/Request.pm line 1297
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, 'BackboneCable__NEW__length', 
'', 'BackboneCable__NEW__info', '', 'submit', 'save', 
'BackboneCable__NEW__numstrands', 20, 'BackboneCable__NEW__name', '001/001-3', 
'BackboneCable__NEW__owner', 28, 'BackboneCable__NEW__type', 5, 
'BackboneCable__NEW__end_closet', 1, '_action', 'UPDATE', 
'BackboneCable__NEW__start_closet', 2, 'BackboneCable__NEW__installdate', '') 
called at /usr/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 433
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0xbabc12f0)')
 called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xbabc12f0)')
 called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0xba85605c)',
 'Apache2::RequestRec=SCALAR(0xbab3bb28)') called at 
/usr/local/netdot/lib/Netdot/Mason.pm line 40
Netdot::Mason::handler('Apache2::RequestRec=SCALAR(0xbab3bb28)') called at -e 
line 0
eval {...} at -e line 0
</pre>


-- 
You have received this notification because you have either subscribed to it, 
or are involved in it.
To change your notification preferences, please click here: 
http://osl.uoregon.edu/redmine/my/account


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

Message: 2
Date: Tue, 3 Jul 2012 04:04:26 -0700
From: [email protected]
Subject: [Netdot-devel] [Netdot - Feature #1652] (New) Add support for
        LDAP    over TLS
To: [email protected], [email protected]
Message-ID: <[email protected]>
Content-Type: text/plain; charset=utf-8


Issue #1652 has been reported by Maciej Kazulak.

----------------------------------------
Feature #1652: Add support for LDAP over TLS
https://osl.uoregon.edu/redmine/issues/1652

Author: Maciej Kazulak
Status: New
Priority: High
Assignee: 
Category: 
Target version: 
Resolution: 


Add support for LDAP over TLS. If server advertises TLS support then try to 
start TLS but continue if it fails. Fail only when NetdotLDAPRequireTLS is set 
to "yes".

<pre>
--- lib/Netdot/LDAP.pm.orig     2012-07-03 11:07:16.000000000 +0200
+++ lib/Netdot/LDAP.pm  2012-07-03 12:00:07.000000000 +0200
@@ -2,6 +2,7 @@ package Netdot::LDAP;
 use strict;
 use warnings;
 use Net::LDAP;
+use Net::LDAP::Constant qw(LDAP_EXTENSION_START_TLS);
 use Netdot::AuthLocal;
 
 =head1 NAME
@@ -111,6 +112,23 @@ sub check_credentials {
        }
     }
 
+    # start TLS
+    my $scheme = $ldap->scheme();
+    my $dse = $ldap->root_dse();
+    my $does_support_tls = $dse->supported_extension(LDAP_EXTENSION_START_TLS);
+    my $require_tls = ($r->dir_config("NetdotLDAPRequireTLS") eq "yes")? 1 : 0;
+    if ( $scheme eq "ldap" && ( $require_tls || $does_support_tls ) ) {
+        my $tls = $ldap->start_tls();
+        if ( $tls->code ) {
+            if ( $require_tls ) {
+                $r->log_error("Netdot::LDAP::check_credentials: Failed to 
start TLS, config requires TLS, cannot continue: " . $tls->error);
+                return 0;
+            } elsif ( $does_support_tls ) {
+                $r->log_warning("Netdot::LDAP::check_credentials: Failed to 
start TLS although server advertises TLS support: " . $tls->error);
+            }
+        }
+    }
+
     my $auth = $ldap->bind($user_dn, password=>$password);
     if ( $auth->code ) {
        $r->log_error("Netdot::LDAP::check_credentials: User $username failed 
LDAP authentication: " . $auth->error);
</pre>


-- 
You have received this notification because you have either subscribed to it, 
or are involved in it.
To change your notification preferences, please click here: 
http://osl.uoregon.edu/redmine/my/account


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

_______________________________________________
Netdot-devel mailing list
[email protected]
https://osl.uoregon.edu/mailman/listinfo/netdot-devel


End of Netdot-devel Digest, Vol 64, Issue 2
*******************************************

Reply via email to