[MacPorts] #22513: xemacs hangs when performing a package-get-update-base on Snow Leopard

[MacPorts]

#22513: xemacs hangs when performing a package-get-update-base on Snow Leopard
----------------------------+-----------------------------------------------
 Reporter:  dib@…           |       Owner:  mww@…           
     Type:  defect          |      Status:  new             
 Priority:  Normal          |   Milestone:                  
Component:  ports           |     Version:  1.8.1           
 Keywords:                  |        Port:  xemacs          
----------------------------+-----------------------------------------------
Changes (by blb@…):

  * keywords:  xemacs =>
  * owner:  macports-tickets@… => mww@…
  * port:  => xemacs


Old description:

> Actually, starting any process from xemacs hangs, requiring a SIGTERM,
> including gnuserv-start.  This is with a fresh install of ports, and no
> other packages added.
>
>  I get the following backtrace on sigterm:
>
> Lisp backtrace follows:
>
>   # (unwind-protect ...)
>   sit-for(0)
>   # bind (threshold proc)
>   efs-pty-check(#<process "*ftp anonymous at ftp.xemacs.org*" pid 25970
> state:run> 1000)
>   # bind (proc opaque-p process-environment process-connection-type
> buffer use-gateway name user host)
>   efs-start-process("ftp.xemacs.org" "anonymous" "*ftp
> anonymous at ftp.xemacs.org*")
>   # bind (name proc user host)
>   efs-get-process("ftp.xemacs.org" "anonymous")
>   # bind (host type user host)
>   efs-host-type("ftp.xemacs.org" "anonymous")
>   # bind (start string backskip regexp lbackskip lregexp parsed host-type
> host user)
>   # (unwind-protect ...)
>   # bind (match-data buff cfs s-c-res path host user host-type default
> name)
>   efs-expand-file-
> name("/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages
> /package-index.LATEST.gpg" nil)
>   apply(efs-expand-file-name
> ("/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages
> /package-index.LATEST.gpg" nil))
>   # bind (handler args operation)
>   efs-file-handler-function(expand-file-name
> "/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages/package-
> index.LATEST.gpg" nil)
>   apply(efs-file-handler-function expand-file-name
> ("/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages
> /package-index.LATEST.gpg" nil))
>   # bind (args operation)
>   remote-path-file-handler-function(expand-file-name
> "/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages/package-
> index.LATEST.gpg" nil)
>   file-
> exists-p("/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages
> /package-index.LATEST.gpg")
>   # bind (expn site expanded no-remote nil-if-not-found file)
>   package-get-locate-file("package-index.LATEST.gpg" t nil)
>   # bind (no-remote)
>   package-get-locate-index-file(nil)
>   (let ((dflt ...)) (list (read-file-name "Load package-get database: "
> ... dflt t ...)))
>   call-interactively(package-get-update-base)
>   # (condition-case ... . error)
>   # (catch top-level ...)

New description:

 Actually, starting any process from xemacs hangs, requiring a SIGTERM,
 including gnuserv-start.  This is with a fresh install of ports, and no
 other packages added.

  I get the following backtrace on sigterm:
 {{{
 Lisp backtrace follows:

   # (unwind-protect ...)
   sit-for(0)
   # bind (threshold proc)
   efs-pty-check(#<process "*ftp anonymous at ftp.xemacs.org*" pid 25970
 state:run> 1000)
   # bind (proc opaque-p process-environment process-connection-type buffer
 use-gateway name user host)
   efs-start-process("ftp.xemacs.org" "anonymous" "*ftp
 anonymous at ftp.xemacs.org*")
   # bind (name proc user host)
   efs-get-process("ftp.xemacs.org" "anonymous")
   # bind (host type user host)
   efs-host-type("ftp.xemacs.org" "anonymous")
   # bind (start string backskip regexp lbackskip lregexp parsed host-type
 host user)
   # (unwind-protect ...)
   # bind (match-data buff cfs s-c-res path host user host-type default
 name)
   efs-expand-file-
 name("/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages
 /package-index.LATEST.gpg" nil)
   apply(efs-expand-file-name
 ("/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages/package-
 index.LATEST.gpg" nil))
   # bind (handler args operation)
   efs-file-handler-function(expand-file-name
 "/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages/package-
 index.LATEST.gpg" nil)
   apply(efs-file-handler-function expand-file-name
 ("/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages/package-
 index.LATEST.gpg" nil))
   # bind (args operation)
   remote-path-file-handler-function(expand-file-name
 "/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages/package-
 index.LATEST.gpg" nil)
   file-
 exists-p("/anonymous at ftp.xemacs.org:pub/xemacs/beta/experimental/packages
 /package-index.LATEST.gpg")
   # bind (expn site expanded no-remote nil-if-not-found file)
   package-get-locate-file("package-index.LATEST.gpg" t nil)
   # bind (no-remote)
   package-get-locate-index-file(nil)
   (let ((dflt ...)) (list (read-file-name "Load package-get database: "
 ... dflt t ...)))
   call-interactively(package-get-update-base)
   # (condition-case ... . error)
   # (catch top-level ...)
 }}}

--

-- 
Ticket URL: <http://trac.macports.org/ticket/22513#comment:2>
MacPorts <http://www.macports.org/>
Ports system for Mac OS