From: rick%qucdnee.bitnet@ymir.claremont.edu (Rick Pim)
Newsgroups: vmsnet.mail.pmdf
Subject: RE: stuck message in bit_gateway channel
Date: 22 Jul 92 06:08:00 GMT
Organization: The Internet
Resent-Date: 22 Jul 1992 01:08 -0500 (EST)
Resent-From: epmdf@YMIR.CLAREMONT.EDU
Cc: IPMDF@YMIR.CLAREMONT.EDU
Errors-To: epmdf@YMIR.CLAREMONT.EDU
Resent-Message-Id: <01GMNMRIH09U9GV8YO@YMIR.CLAREMONT.EDU>
X-Vms-To: IN%"NED@INNOSOFT.COM"
X-Vms-Cc: IN%"IPMDF@YMIR.BITNET"
Content-Type: TEXT/PLAIN; CHARSET=US-ASCII
Content-Transfer-Encoding: 7BIT

i mentioned a problem with a message stuck in the bitnet_gateway channel:
 
>I cannot even guess what the problem is without some sort of log showing
>what happens when delivery is attempted.
    i did send a log before, it got truncated before making it to the
list. :-( briefly, bn_gateway.exe is dying with an access violation.
 
appended here are a copy of bit_gateway_master.log, the message i
eventually get sent, and, again, the spool file that's causing the
trouble. is this an isolated problem with a damaged mail message, a (no
doubt) stupid blunder in my configuration, or something else?
 
rp
 
bit_gateway_master.log:
 
$ ! MASTER.COM - Initiate delivery of messages queued on a channel
$ !
$ ! Modification history and parameter definitions are at the end of this file.
$ !
$ set noon
$ if f$logical("PMDF_ROOT") .eqs. "" then exit
$ !
$ ! Clean up and set up channel name, if on hold just exit
$ !
$ channel_name = f$edit(p1, "COLLAPSE,LOWERCASE")
$ hold_list = "," + f$edit(f$logical("PMDF_HOLD"), "COLLAPSE,LOWERCASE") + ","
$ if f$locate("," + channel_name + ",", hold_list) .lt. -
     f$length(hold_list) then exit
$ define/process pmdf_channel "bit_gateway"
$ !
$ ! Save state information, set up environment properly
$ !
$ save_process_name = f$getjpi(0,"PRCNAM")
$ process_name = "PMDF " + f$extract(0,10,channel_name)
$ set process/name="PMDF bit_gatewa"
$ save_directory = f$environment("DEFAULT")
$ set default pmdf_root:[queue]
$ save_protection = f$environment("PROTECTION")
$ set protection=(s:rwed,o:rwed,g,w)/default
$ save_privileges = f$setprv("NOSHARE")
$ !
$ if f$logical("PMDF_DEBUG") .eqs. "" then on control_y then goto out
$ !
$ version_limit = f$logical("PMDF_" + channel_name + "_VERSION_LIMIT")
$ if version_limit .le. 0 then version_limit = f$logical("PMDF_VERSION_LIMIT")
$ if version_limit .le. 0 then version_limit = 5
$ outer_limit = version_limit + version_limit/2
$ if (f$environment("DEPTH") .gt. 0) .or. -
     (f$mode() .nes. "BATCH") then goto no_purge
$ log_file = f$getqui("DISPLAY_JOB","LOG_SPECIFICATION",,"THIS_JOB") - ";"
$ if log_file .eqs. "" then goto no_purge
$ if f$search(log_file + ";-" + outer_limit) .nes. "" then -
    purge/keep=5 PMDF_ROOT:[LOG]BIT_GATEWAY_MASTER.LOG
$ no_purge:
$ !
$ ! Create listing of messages queued on this channel.
$ !
$ if p3 .eqs. "" then p3 = "1-JAN-1970"
$ dirlst_file = "pmdf_root:[log]" + channel_name + "_master_dirlst_" + -
  f$getjpi("", "PID") + ".tmp"
$ define/process outbound pmdf_root:[log]bit_gateway_master_dirlst_240019C0.tmp
$ directory/noheader/notrailer/column=1/since="1-JAN-1970             "/output=p
   mdf_root:[log]bit_gateway_master_dirlst_240019C0.tmp -
  pmdf_root:[queue.bit_gateway]*.%%;*
$ !
$ ! Determine whether or not connection should really be made
$ !
$ if p2 .nes. "POLL" .and. -
     f$file_attributes(dirlst_file, "ALQ") .eq. 0 then goto out1
$ !
$ ! Handle various channels specially
$ !
$ if channel_name .eqs. "d"          then goto DECnet_compatibility_channel
$ if channel_name .eqs. "directory"  then goto dir_channel
$ if channel_name .eqs. "l"          then goto local_channel
$ if channel_name .eqs. "mailserv"   then goto mailserv_channel
$ if channel_name .eqs. "mint"       then goto mint_channel
$ if channel_name .eqs. "reprocess"  then goto reprocess_channel
$ if channel_name .eqs. "text_to_ps" then goto TEXT_TO_PS_channel
$ if channel_name .eqs. "bitbucket"  then goto bitbucket_channel
$ if f$extract(0,5,channel_name) .eqs. "anje_"      then goto BITNET_channel
$ if f$extract(0,4,channel_name) .eqs. "bit_"       then goto BITNET_channel
$ BITNET_channel:
$ !
$ if channel_name .eqs. "bit_gateway" then goto BITNET_gateway
$ BITNET_gateway:
$ !
$ define/user option_file        pmdf_root:[table]bit_gateway_option.
$ !
$ run pmdf_root:[exe]bn_gateway
%SYSTEM-F-ACCVIO, access violation, reason mask=01, virtual address=001C6004, PC
   =0007FCE3, PSL=03C00000
%TRACE-F-TRACEBACK, symbolic stack dump follows
module name     routine name                     line       rel PC    abs PC
 
                                                           0007FCE3  0007FCE3
                                                           00083CC3  00083CC3
                                                           00099EC5  00099EC5
                                                           00096B57  00096B57
BN_GATEWAY      DOSUBMIT                         3068      000000E8  00001674
BN_GATEWAY      BN_GATEWAY                       3084      0000000C  00001998
$ goto out1
$ out1:
$ delete pmdf_root:[log]bit_gateway_master_dirlst_240019C0.tmp;*
$ !
$ ! Common exit point - clean up things first
$ !
$ out:
$ if f$logical("OUTBOUND") .nes. "" then deassign/process outbound
$ if f$logical("PMDF_CHANNEL") .nes. "" then deassign/process pmdf_channel
$ if f$logical("PMDF_DATA") .nes. "" then close pmdf_data
$ if f$logical("PMDF_DEVICE") .eqs. "" then goto restore
$ restore:
$ !
$ ! Restore saved stuff
$ !
$ set protection=(SYSTEM=RWED, OWNER=RWED, GROUP=RE, WORLD)/default
$ set default SYS$SYSROOT:[SYSMGR]
$ set process/priv=(SHARE)
$ set process/name="BATCH_143"
$ !
$ exit
  SYSTEM       job terminated at 21-JUL-1992 20:06:16.52
 
  Accounting information:
  Buffered I/O count:             102         Peak working set size:    1054
  Direct I/O count:                97         Peak page file size:      4003
  Page faults:                   1895         Mounted volumes:             0
  Charged CPU time:           0 00:00:04.64   Elapsed time:     0 00:00:12.12
 
 
the message i eventually get sent:
 
From:   IN%"MAILER@qucdnee.ee.queensu.ca" 21-JUL-1992 23:18:09.46
To:     IN%"RICK@qucdnee.ee.queensu.ca"
CC:
Subj:
 
Return-path: <MAILER@qucdnee.ee.queensu.ca>
Received: from JNET-DAEMON by qucdnee.ee.QueensU.CA (PMDF #12466) id
 <01GMNP1PBMBG9ZLDWK@qucdnee.ee.QueensU.CA>; Tue, 21 Jul 1992 23:17 EST
Received: From QUCDNEE(MAILER) by QUCDNEE with Jnet id 2252 for RICK@QUCDNEE;
 Tue, 21 Jul 1992 23:17 EST
Date: Tue, 21 Jul 1992 23:17 EST
From: MAILER@qucdnee.ee.queensu.ca
To: RICK@QUCDNEE.EE.QUEENSU.CA
Message-id: <01GMNP1PBMBG9ZLDWK@qucdnee.ee.QueensU.CA>
X-Envelope-to: RICK
Date-warning: Date header was inserted by qucdnee.ee.QueensU.CA
PMDF-Warning: To line inserted; none found in original message header.
****** MESSAGE DAMAGED IN TRANSIT ******
 
the spool file that's causing the trouble:
 
m;EPMDF@YMIR.BITNET
smtpuser@bitnet-gateway
 
Received: from JNET-DAEMON by qucdnee.ee.QueensU.CA (PMDF #12466) id
 <01GMC8K32TL09ZLDWK@qucdnee.ee.QueensU.CA>; Mon, 13 Jul 1992 18:26 EST
Received: From YMIR(EPMDF) by QUCDNEE with Jnet id 1796 for SMTPUSER@QUCDNEE;
 Mon, 13 Jul 1992 18:26 EST
Date: Mon, 13 Jul 1992 18:26 EST
Date-warning: Date header was inserted by qucdnee.ee.QueensU.CA
From: EPMDF@YMIR.BITNET
To: SMTPUSER@QUCDNEE.EE.QUEENSU.CA
Message-id: <01GMC8K32TL09ZLDWK@qucdnee.ee.QueensU.CA>
X-Envelope-to: smtpuser@bitnet-gateway
PMDF-Warning: To line inserted; none found in original message header.
 
HELO YMIR.BITNET
TICK 0001
MAIL FROM:<epmdf@YMIR.BITNET>
RCPT TO:<RICK@QUCDNEE.BITNET>
DATA
Received: from YMIR.CLAREMONT.EDU by YMIR.CLAREMONT.EDU (PMDF #2326 ) id
 <01GMBY2G8YV0984O20@YMIR.CLAREMONT.EDU>; Mon, 13 Jul 1992 13:27:33 PDT
Received: from THOR.INNOSOFT.COM by YMIR.CLAREMONT.EDU (PMDF #2326 ) id
 <01GMBWE38SMO984N5C@YMIR.CLAREMONT.EDU>; Mon, 13 Jul 1992 12:38:29 PDT
Received: from INNOSOFT.COM by INNOSOFT.COM (PMDF #1336 ) id
 <01GMBWD8T6LC8WW3AJ@INNOSOFT.COM>; Mon, 13 Jul 1992 12:37:41 PDT
Date: 13 Jul 1992 12:37:41 -0700 (PDT)
From: "Daniel C. Newman" <DAN@INNOSOFT.COM>
Subject: RE: Internet mail through DECnet routing
To: OZMINSKI@MSUKBS.BITNET, IPMDF@YMIR.BITNET
Errors-to: epmdf@YMIR.BITNET
Resent-message-id: <01GMBY2GPD4U984O20@YMIR.CLAREMONT.EDU>
Message-id: <01GMBWD8TG8I8WW3AJ@INNOSOFT.COM>
X-Envelope-to: RICK@QUCDNEE.BITNET
X-VMS-To: IN%"OZMINSKI%MSUKBS.BITNET@ymir.claremont.edu"
X-VMS-Cc: IPMDF
MIME-version: 1.0
Content-type: TEXT/PLAIN; CHARSET=US-ASCII
Content-transfer-encoding: 7BIT
Fruit-of-the-day: appl
Fruit-of-the-day-warning: Fruit is not valid
 
(bunch of stuff deleted)
 .
QUIT