screen in guile

screen in guile

[Thien-Thi Nguyen]

Hey, here's a summer (to start with) of code idea:

Rewrite GNU Screen in Guile Scheme.
Bonus points for adding "vertical split" a la tmux.

(I got this idea after reading some screen vs tmux posts,
 not ever having used tmux, personally, but somewhat irked
 anyway by the "aging code base" vibe...)

I suppose if nobody else picks this up, it will go on my queue
after {RPX, Guile-{WWW,SDL,PG}} in Guile 2, {RCS, Git} in Guile...
Do you all really want to wait that long?!

Re: screen in guile

[Andrew Gwozdziewycz]

[-- Attachment #1: Type: text/plain, Size: 714 bytes --]

On Thu, Mar 8, 2012 at 4:14 AM, Thien-Thi Nguyen <ttn@gnuvola.org> wrote:

> Hey, here's a summer (to start with) of code idea:
>
> Rewrite GNU Screen in Guile Scheme.
> Bonus points for adding "vertical split" a la tmux.
>

Maybe I'm missing something, but doesn't screen *have* vertical split a la
tmux?

http://i.imgur.com/IXdEF.png


(I got this idea after reading some screen vs tmux posts,
>  not ever having used tmux, personally, but somewhat irked
>  anyway by the "aging code base" vibe...)
>
> I suppose if nobody else picks this up, it will go on my queue
> after {RPX, Guile-{WWW,SDL,PG}} in Guile 2, {RCS, Git} in Guile...
> Do you all really want to wait that long?!
>
>


-- 
http://www.apgwoz.com

[-- Attachment #2: Type: text/html, Size: 1296 bytes --]

Re: screen in guile

[Ludovic Courtès]

Hello!

Thien-Thi Nguyen <ttn@gnuvola.org> skribis:

> Rewrite GNU Screen in Guile Scheme.
> Bonus points for adding "vertical split" a la tmux.

Good idea.  :-)

I presume GNU Guile-NCurses could be of help here?

Extra bonus point: getting the Scheme implementation of screen actually
become the new GNU Screen (may well be the hardest part.)

Cheers,
Ludo’.

Re: screen in guile

[Thien-Thi Nguyen]

() Andrew Gwozdziewycz <apgwoz@gmail.com>
() Thu, 8 Mar 2012 06:02:46 -0500

   Maybe I'm missing something, but doesn't screen
   *have* vertical split a la tmux?

   http://i.imgur.com/IXdEF.png

Certainly seems like it.  Well then, we will need
something else bonus-points worthy, i suppose.  The
only thing that strikes me as interesting (personally)
would be schemier ~/.screenrc syntax, but i assume that
any reasonable porting effort would address that issue
de rigueur.

[Hangs head in shame, peeking at ~/.rpxrc ...]

Re: screen in guile

[Andrew Gwozdziewycz]

[-- Attachment #1: Type: text/plain, Size: 860 bytes --]

On Thu, Mar 8, 2012 at 11:43 AM, Thien-Thi Nguyen <ttn@gnuvola.org> wrote:

> () Andrew Gwozdziewycz <apgwoz@gmail.com>
> () Thu, 8 Mar 2012 06:02:46 -0500
>
>   Maybe I'm missing something, but doesn't screen
>   *have* vertical split a la tmux?
>
>   http://i.imgur.com/IXdEF.png
>
> Certainly seems like it.  Well then, we will need
> something else bonus-points worthy, i suppose.  The
> only thing that strikes me as interesting (personally)
> would be schemier ~/.screenrc syntax, but i assume that
> any reasonable porting effort would address that issue
> de rigueur.
>
> [Hangs head in shame, peeking at ~/.rpxrc ...]
>

Not to strike you down twice, but I'm not sure how .screenrc's syntax would
be better served with s-expressions. To my knowledge it's completely line
oriented without any sort of section delimiting.





-- 
http://www.apgwoz.com

[-- Attachment #2: Type: text/html, Size: 1366 bytes --]

Re: screen in guile

[Thien-Thi Nguyen]

() Andrew Gwozdziewycz <apgwoz@gmail.com>
() Thu, 8 Mar 2012 11:57:48 -0500

   Not to strike you down twice,

No worries, the mud's fine.

   but I'm not sure how .screenrc's syntax would be better served
   with s-expressions.  To my knowledge it's completely line
   oriented without any sort of section delimiting.

Here's a fragment from my ~/.screenrc:

  # special xterm hardstatus: use the window title.
  termcap  xterm 'hs:ts=\E]2;:fs=\007:ds=\E]0;Screen\007'
  terminfo xterm 'hs:ts=\E]2;:fs=\007:ds=\E]0;Screen\007'

It shows a comment and two directives of the form:
  CATEGORY KEY VALUE

Since KEY and VALUE are identical, it would be nice to be able to
express that using some kind of ‘for-each’ or ‘map’ expression.
Furthermore, IWBN to compose the string from meaningful bits
instead of having to cart around (for 15 years, no less :-) such
grot...

(define (both-termcap-and-terminfo name value)
  ;; do ‘termcap NAME VALUE’
  ;; do ‘terminfo NAME VALUE’
  )

(both-termcap-and-terminfo
 'xterm (string-join (map format-attribute
                          '(hs
                            (ts escape "]2;")
                            (fs bell)
                            (ds escape "]0;Screen" bell)))
                     ":"))

or something like that.