Great Circle Associates Majordomo-Workers
(November 1995)
 

Indexed By Date: [Previous] [Next] Indexed By Thread: [Previous] [Next]

Subject: Re: Majordomo-1.94 Alpha 1 available for testing
From: Chan Wilson <cwilson @ slurp . neu . sgi . com>
Date: Fri, 03 Nov 1995 10:44:48 +0100
To: "Vincent D. Skahan" <vds7789 @ aw101 . iasl . ca . boeing . com>
Cc: majordomo-workers @ greatcircle . com
In-reply-to: Your message of "Thu, 02 Nov 1995 15:22:42 PST." <199511022322.AA15611@aw102.iasl.ca.boeing.com>

> With majordomo compiled in 'bsd' mode, asking for 'help'
> works, but asking for anything real like 'lists' results
> in:

Have you stepped through and figured out where the problem lies?  I
typically do a 
	% cd /usr/test/majordomo	(or wherever things live)
	% /wrapper perl5.001m -d majordomo -C ./majordomo.cf
	
	(perl5.001m is obviously sitting in /usr/test/majordomo)

then simply walk through and set breakpoints, etc, to track the
problem down.   In this case, set a breakpoint at do_lists and step
through to find out where its hanging.

A simple example, verifying that the $listdir is being properly read:

   : slurp-/usr/test/majordomo[420]; ./wrapper perl5.001m -d majordomo -C ./majordomo.cf
   
   Loading DB routines from $RCSfile: perl5db.pl,v $$Revision: 4.1 $$Date: 92/08/07 18:24:07 $
   Emacs support available.
   
   Enter h for help.
   
   main::(majordomo:25):   $main'program_name = 'mj_majordomo';#';
     DB<1> b do_lists
     DB<2> c
   reply-to: cwilson			# enter a fake messaage here
					# buncho blank lines to make sure
					# we're past the header
   
   
   lists				# the command to debug
   main::do_lists(majordomo:1040):     local($list);
     DB<2> n
   main::do_lists(majordomo:1041):     local($command_advert, $command_noadvert);
     DB<2> 
   main::do_lists(majordomo:1042):     local($reply_addr) = &ParseAddrs($reply_to);
     DB<2> 
   main::do_lists(majordomo:1043):     $reply_addr =~ s/(\W)/\\$1/g;
     DB<2> 
   main::do_lists(majordomo:1045):     select((select(REPLY), $| = 1)[0]);
     DB<2> 
   main::do_lists(majordomo:1047):     print REPLY "$whoami serves the following lists:\n\n";
     DB<2> 
   main::do_lists(majordomo:1049):     opendir(RD_DIR, $listdir) || &abort("opendir failed $!");
     DB<2> 
   main::do_lists(majordomo:1050):     @lists = readdir(RD_DIR);
     DB<2> 
   main::do_lists(majordomo:1051):     closedir(RD_DIR);
     DB<2> p @lists
   ...bblisa.configtest.configtestbounces.configbblisatest.old.configbblisa-announcebouncesbblisa-announce.configtest.infotest.passwd
     DB<3> c				# looks good, lets continue
   end					# tell mj that's the end
   : slurp-/usr/test/majordomo[421];	# shell prompt back, now check your email


Mind you, this isn't going to catch everything, but its sure a great
help.

--Chan


References:
Indexed By Date Previous: feature set?
From: Ray Terry <raymail@hpwsrt.cup.hp.com>
Next: silly little question...
From: Walter Torres <walter@buddha.nexchi.org>
Indexed By Thread Previous: Re: Majordomo-1.94 Alpha 1 available for testing
From: "Vincent D. Skahan" <vds7789@aw101.iasl.ca.boeing.com>
Next: feature set?
From: Ray Terry <raymail@hpwsrt.cup.hp.com>

Google
 
Search Internet Search www.greatcircle.com