[prev in list] [next in list] [prev in thread] [next in thread] 

List:       exmh-workers
Subject:    missing sequence updates from background process
From:       Harvey Eneman <Harvey.Eneman () oracle ! com>
Date:       2004-09-07 21:57:24
Message-ID: 200409072157.i87LvPBr019843 () lake ! us ! oracle ! com
[Download RAW message or body]

[Attachment #2 (multipart/signed)]

[Attachment #4 (multipart/mixed)]

[Providing a "Subject" for the attached post...]


------- =_aaaaaaaaaa0
Content-Type: message/rfc822
Content-ID: <19829.1094594237.2@oracle.com>
Content-Description: original message

Return-Path: <exmh-workers-bounces@redhat.com>
Received: from localhost (localhost [127.0.0.1])
	by lake.us.oracle.com (8.12.10+Sun/8.12.2) with ESMTP id i87772Br003735
	for <heneman@lake>; Tue, 7 Sep 2004 00:07:03 -0700 (PDT)
Received: from bigip-amerimap.oraclecorp.com [138.1.161.115]
	by localhost with IMAP (fetchmail-6.2.5)
	for heneman@lake (single-drop); Tue, 07 Sep 2004 00:07:03 -0700 (PDT)
Received: from rgmum107.us.oracle.com by rgmum103.us.oracle.com
	with ESMTP id 4193141521094540799; Tue, 07 Sep 2004 01:06:39 -0600
Received: from rgmgw2.us.oracle.com by rgmum107.us.oracle.com
	with ESMTP id 1830504051094540782; Tue, 07 Sep 2004 01:06:22 -0600
Received: from agminet03.oracle.com (agminet03.oracle.com [141.146.126.230])
	by rgmgw2.us.oracle.com (Switch-3.1.4/Switch-3.1.0) with ESMTP id
	i8776MgM013858
	for <Harvey.Eneman@oracle.com>; Tue, 7 Sep 2004 01:06:22 -0600
Received: from agminet03.oracle.com (localhost [127.0.0.1])
	by agminet03.oracle.com (Switch-3.1.4/Switch-3.1.0) with ESMTP id
	i8776LnK019351
	for <Harvey.Eneman@oracle.com>; Tue, 7 Sep 2004 00:06:21 -0700
Received: from hormel.redhat.com (hormel.redhat.com [209.132.177.30])
	by agminet03.oracle.com (Switch-3.1.4/Switch-3.1.0) with ESMTP id
	i8776JAx019338
	for <Harvey.Eneman@oracle.com>; Tue, 7 Sep 2004 00:06:20 -0700
Received: from listman.util.phx.redhat.com (listman.util.phx.redhat.com
	[10.8.4.110]) by hormel.redhat.com (Postfix) with ESMTP
	id 1C621747CB; Tue,  7 Sep 2004 03:06:19 -0400 (EDT)
Received: from int-mx1.corp.redhat.com (int-mx1.corp.redhat.com
	[172.16.52.254])
	by listman.util.phx.redhat.com (8.12.11/8.12.10) with ESMTP id
	i8776Hgn024533 for <exmh-workers@listman.util.phx.redhat.com>;
	Tue, 7 Sep 2004 03:06:17 -0400
Received: (from mail@localhost)
	by int-mx1.corp.redhat.com (8.11.6/8.11.6) id i8776Hq08916
	for exmh-workers@listman.util.phx.redhat.com;
	Tue, 7 Sep 2004 03:06:17 -0400
Received: from mx1.redhat.com (mx1.redhat.com [172.16.48.31])
	by int-mx1.corp.redhat.com (8.11.6/8.11.6) with ESMTP id i8776H308912
	for <exmh-workers@redhat.com>; Tue, 7 Sep 2004 03:06:17 -0400
Received: from agminet02.oracle.com (agminet02.oracle.com [141.146.126.229])
	by mx1.redhat.com (8.12.10/8.12.10) with ESMTP id i87769S0011711
	for <exmh-workers@redhat.com>; Tue, 7 Sep 2004 03:06:10 -0400
Received: from rgmgw1.us.oracle.com (rgmgw1.us.oracle.com [138.1.191.10])
	by agminet02.oracle.com (Switch-3.1.4/Switch-3.1.0) with ESMTP id
	i8775wiT011281
	for <exmh-workers@redhat.com>; Tue, 7 Sep 2004 00:05:58 -0700
Received: from rgmgw1.us.oracle.com (localhost [127.0.0.1])
	by rgmgw1.us.oracle.com (Switch-3.1.4/Switch-3.1.0) with ESMTP id
	i8775wUQ021979
	for <exmh-workers@redhat.com>; Tue, 7 Sep 2004 01:05:58 -0600
Received: from lake.us.oracle.com (lake.us.oracle.com [130.35.45.122])
	by rgmgw1.us.oracle.com (Switch-3.1.4/Switch-3.1.0) with ESMTP id
	i8775vrM021967
	for <exmh-workers@redhat.com>; Tue, 7 Sep 2004 01:05:58 -0600
Received: from oracle.com (lake [130.35.45.122])
	by lake.us.oracle.com (8.12.10+Sun/8.12.2) with ESMTP id i8775uBr003315
	for <exmh-workers@redhat.com>; Tue, 7 Sep 2004 00:05:57 -0700 (PDT)
Message-Id: <200409070705.i8775uBr003315@lake.us.oracle.com>
X-Mailer: exmh version 2.7.0 06/18/2004 with nmh-1.1
To: exmh-workers@redhat.com
Mime-Version: 1.0
Date: Tue, 07 Sep 2004 00:05:56 -0700
From: Harvey Eneman <Harvey.Eneman@oracle.com>
X-RedHat-Spam-Score: 0 
X-Loop: exmh-workers@redhat.com
Subject: (no subject)
X-BeenThere: exmh-workers@redhat.com
X-Mailman-Version: 2.1.5
Precedence: junk
List-Id: Discussion list for EXMH developers <exmh-workers.redhat.com>
List-Unsubscribe: <https://www.redhat.com/mailman/listinfo/exmh-workers>,
	<mailto:exmh-workers-request@redhat.com?subject=unsubscribe>
List-Archive: <https://www.redhat.com/mailman/private/exmh-workers>
List-Post: <mailto:exmh-workers@redhat.com>
List-Help: <mailto:exmh-workers-request@redhat.com?subject=help>
List-Subscribe: <https://www.redhat.com/mailman/listinfo/exmh-workers>,
	<mailto:exmh-workers-request@redhat.com?subject=subscribe>
Content-Type: multipart/mixed; boundary="===============1596448531=="
Sender: exmh-workers-bounces@redhat.com
Errors-To: exmh-workers-bounces@redhat.com
X-jf: 20020519, 1:1,2:1,3:1,4:0,ad:1,bo:1,di:1,do:1,he:1,ip:1,us:0
X-filter: ifile 1.3.4 => Tools/exmh

[Attachment #6 (multipart/signed)]

[Attachment #8 (multipart/mixed)]
This is a multipart MIME message.


I've noticed for sometime that using the separate background process, the 
foreground process occasionally failed to report unseen messages.  I believe 
this is the same issue that was raised by Jongki Suwandi in a note to 
exmh-users on Mar 31.  As Jongki Suwandi indicated, if the background process 
thinks that it has already reported the current sequence to the foreground 
process, it does not send it again.  My initial resolution to the problem was 
to simply not cache the unseen sequence (see the attached flist.tcl patch).  I 
then noticed a subsequent issue:  Mh_Sequences does not clear a folder's 
sequences when the sequence file no longer exists.  I have provided a solution 
to this issue in the attached mh.tcl patch.

Regards,

Harv

["flist.tcl.patch" (application/x-patch)]

*** flist.tcl.orig	Thu Apr  3 15:39:55 2003
--- flist.tcl	Mon Sep  6 14:32:39 2004
***************
*** 303,309 ****
  }
  
  proc FlistFindSeqsInner {} {
!     global flist seqwin flistcache
      if {[catch {
      FlistGetContext
      foreach folder $flist(unseenfolders) {
--- 303,309 ----
  }
  
  proc FlistFindSeqsInner {} {
!     global flist seqwin flistcache mhProfile
      if {[catch {
      FlistGetContext
      foreach folder $flist(unseenfolders) {
***************
*** 316,322 ****
                    # Cache added 2/11/03
                    # Sequence is different than last time we checked
  
!                   set flistcache($folder,$seq) $seqlist
                    BgRPC Seq_Set $folder $seq $seqlist
                  }
              }
--- 316,324 ----
                    # Cache added 2/11/03
                    # Sequence is different than last time we checked
  
! 	          if {$seq != $mhProfile(unseen-sequence)} {
!                     set flistcache($folder,$seq) $seqlist
! 	          }
                    BgRPC Seq_Set $folder $seq $seqlist
                  }
              }

["mh.tcl.patch" (application/x-patch)]

*** mh.tcl.orig	Mon Jan 12 18:28:58 2004
--- mh.tcl	Mon Sep  6 14:33:41 2004
***************
*** 425,432 ****
      # First read the private sequence
      set mhPriv(changed,private) 0
      set filename $mhProfile(context)
!     if [file exists $filename] {
! 	set mtime [file mtime $filename]
  	if {![info exists mhPriv(privmtime)] || ($mtime != $mhPriv(privmtime))} {
  	    foreach elem [array names mhPriv] {
  		set indices [split $elem ,]
--- 425,431 ----
      # First read the private sequence
      set mhPriv(changed,private) 0
      set filename $mhProfile(context)
!     if {![catch {set mtime [file mtime $filename]}]} {
  	if {![info exists mhPriv(privmtime)] || ($mtime != $mhPriv(privmtime))} {
  	    foreach elem [array names mhPriv] {
  		set indices [split $elem ,]
***************
*** 458,463 ****
--- 457,472 ----
  		set mhPriv(privmtime) $mtime
  	    }
  	}
+     } elseif {[info exists mhPriv(privmtime)]} {
+ 	unset mhPriv(privmtime)
+ 	foreach elem [array names mhPriv] {
+ 	    set indices [split $elem ,]
+ 	    if {[lindex $indices 0] == {privseq}} {
+ 	        if {[lindex $indices 1] == $folder} {
+ 		    unset mhPriv($elem)
+ 		}
+ 	    }
+ 	}
      }
      foreach elem [array names mhPriv] {
  	set indices [split $elem ,]
***************
*** 470,477 ****
      # Then read the public sequence
      set mhPriv(changed,public) 0
      set filename "$mhProfile(path)/$folder/$mhProfile(mh-sequences)"
!     if [file exists $filename] {
! 	set mtime [file mtime $filename]
  	if {![info exists mhPriv(seqmtime,$folder)] || ($mtime != $mhPriv(seqmtime,$folder))} {
  	    foreach elem [array names mhPriv] {
  		set indices [split $elem ,]
--- 479,485 ----
      # Then read the public sequence
      set mhPriv(changed,public) 0
      set filename "$mhProfile(path)/$folder/$mhProfile(mh-sequences)"
!     if {![catch {set mtime [file mtime $filename]}]} {
  	if {![info exists mhPriv(seqmtime,$folder)] || ($mtime != $mhPriv(seqmtime,$folder))} {
  	    foreach elem [array names mhPriv] {
  		set indices [split $elem ,]
***************
*** 505,510 ****
--- 513,528 ----
  		set mhPriv(seqmtime,$folder) $mtime
  	    }
  	}
+     } elseif {[info exists mhPriv(seqmtime,$folder)]} {
+ 	unset mhPriv(seqmtime,$folder)
+ 	foreach elem [array names mhPriv] {
+ 	    set indices [split $elem ,]
+ 	    if {[lindex $indices 0] == {pubseq}} {
+ 	        if {[lindex $indices 1] == $folder} {
+ 		    unset mhPriv($elem)
+ 		}
+ 	    }
+         }
      }
      foreach elem [array names mhPriv] {
  	set indices [split $elem ,]


[Attachment #13 (application/pgp-signature)]

_______________________________________________
Exmh-workers mailing list
Exmh-workers@redhat.com
https://www.redhat.com/mailman/listinfo/exmh-workers

------- =_aaaaaaaaaa0--

[Attachment #16 (application/pgp-signature)]

_______________________________________________
Exmh-workers mailing list
Exmh-workers@redhat.com
https://www.redhat.com/mailman/listinfo/exmh-workers


[prev in list] [next in list] [prev in thread] [next in thread] 

Configure | About | News | Add a list | Sponsored by KoreLogic