<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<HTML>
<HEAD>
<TITLE> [9fans] Chords, ^, _, ^B and scroll with mouse wheel in p9p sam
</TITLE>
<LINK REL="Index" HREF="index.html" >
<LINK REL="made" HREF="mailto:9fans%409fans.net?Subject=Re%3A%20%5B9fans%5D%20Chords%2C%20%5E%2C%20_%2C%20%5EB%20and%20scroll%20with%20mouse%20wheel%20in%20p9p%20sam&In-Reply-To=%3CCAK-yzPO5CikBL5vSw3OX04xZTcFHWCkasG1-PZ6COfczNP0W%3DA%40mail.gmail.com%3E">
<META NAME="robots" CONTENT="index,nofollow">
<style type="text/css">
pre {
white-space: pre-wrap; /* css-2.1, curent FF, Opera, Safari */
}
</style>
<META http-equiv="Content-Type" content="text/html; charset=us-ascii">
<LINK REL="Previous" HREF="035186.html">
<LINK REL="Next" HREF="035191.html">
</HEAD>
<BODY BGCOLOR="#ffffff">
<H1>[9fans] Chords, ^, _, ^B and scroll with mouse wheel in p9p sam</H1>
<B>Mark Lee Smith</B>
<A HREF="mailto:9fans%409fans.net?Subject=Re%3A%20%5B9fans%5D%20Chords%2C%20%5E%2C%20_%2C%20%5EB%20and%20scroll%20with%20mouse%20wheel%20in%20p9p%20sam&In-Reply-To=%3CCAK-yzPO5CikBL5vSw3OX04xZTcFHWCkasG1-PZ6COfczNP0W%3DA%40mail.gmail.com%3E"
TITLE="[9fans] Chords, ^, _, ^B and scroll with mouse wheel in p9p sam">netytan at gmail.com
</A><BR>
<I>Fri May 27 20:57:00 UTC 2016</I>
<P><UL>
<LI>Previous message: <A HREF="035186.html">[9fans] Chords, ^, _, ^B and scroll with mouse wheel in p9p sam
</A></li>
<LI>Next message: <A HREF="035191.html">[9fans] Chords, ^, _, ^B and scroll with mouse wheel in p9p sam
</A></li>
<LI> <B>Messages sorted by:</B>
<a href="date.html#35190">[ date ]</a>
<a href="thread.html#35190">[ thread ]</a>
<a href="subject.html#35190">[ subject ]</a>
<a href="author.html#35190">[ author ]</a>
</LI>
</UL>
<HR>
<!--beginarticle-->
<PRE>Thanks for sharing this! I'd already backported a few of the features, but
I hadn't yet got around to looking at the chording code etc. It's great to
have selection working! I'm not sure if I did something wrong (I've checked
the changes a few times) but scrolling only works "sometimes", mostly it
seems to get stuck when scrolling back up? Can anyone confirm? In my
experience sam's scrolling seems to be pretty broken (at least in the
plan9port version) so it might not have anything to do with these changes.
All the best,
P.S. where does Kcmd come from? I've grepped the plan9port tree but I don't
see a definition?
On Fri, 27 May 2016 at 00:05 <<A HREF="http://mail.9fans.net/listinfo/9fans">trebol55555 at yandex.ru</A>> wrote:
><i> The 9front sam in
</I>><i>
</I>><i> <A HREF="https://bitbucket.org/kremlin_/front9port">https://bitbucket.org/kremlin_/front9port</A>
</I>><i> <A HREF="https://bitbucket.org/iru/sam9f-unix">https://bitbucket.org/iru/sam9f-unix</A>
</I>><i>
</I>><i> doesn't exchange the snarf buffer with X, and the pipe in /srv doesn't
</I>><i> work.
</I>><i>
</I>><i> This diff will makes the minimal changes to have those features of 9front
</I>><i> sam in the last p9p. The code fell off from the front.
</I>><i>
</I>><i> trebol.
</I>><i>
</I>><i>
</I>><i> diff -rpuN src/cmd/sam/cmd.c sam/cmd.c
</I>><i> --- src/cmd/sam/cmd.c 2016-04-18 19:07:22.000000000 +0100
</I>><i> +++ sam/cmd.c 2016-05-25 23:56:34.040909362 +0100
</I>><i> @@ -35,6 +35,8 @@ struct cmdtab cmdtab[]={
</I>><i> '>', 0, 0, 0, 0, aDot, 0, linex,
</I>><i> plan9_cmd,
</I>><i> '<', 0, 0, 0, 0, aDot, 0, linex,
</I>><i> plan9_cmd,
</I>><i> '|', 0, 0, 0, 0, aDot, 0, linex,
</I>><i> plan9_cmd,
</I>><i> + '^', 0, 0, 0, 0, aDot, 0, linex,
</I>><i> plan9_cmd,
</I>><i> + '_', 0, 0, 0, 0, aDot, 0, linex,
</I>><i> plan9_cmd,
</I>><i> '=', 0, 0, 0, 0, aDot, 0, linex,
</I>><i> eq_cmd,
</I>><i> 'c'|0x100,0, 0, 0, 0, aNo, 0, wordx,
</I>><i> cd_cmd,
</I>><i> 0, 0, 0, 0, 0, 0, 0, 0
</I>><i> @@ -76,7 +78,13 @@ inputc(void)
</I>><i>
</I>><i> Again:
</I>><i> nbuf = 0;
</I>><i> - if(downloaded){
</I>><i> + if(cmdbufpos > cmdbuf.nc && cmdbuf.nc > 0){
</I>><i> + cmdbufpos = 0;
</I>><i> + bufreset(&cmdbuf);
</I>><i> + }
</I>><i> + if(cmdbufpos < cmdbuf.nc && cmdbuf.nc > 0)
</I>><i> + bufread(&cmdbuf, cmdbufpos++, &r, 1);
</I>><i> + else if(downloaded){
</I>><i> while(termoutp == terminp){
</I>><i> cmdupdate();
</I>><i> if(patset)
</I>><i> diff -rpuN src/cmd/sam/sam.h sam/sam.h
</I>><i> --- src/cmd/sam/sam.h 2016-04-18 19:07:22.000000000 +0100
</I>><i> +++ sam/sam.h 2016-05-25 23:45:05.652931784 +0100
</I>><i> @@ -369,6 +369,8 @@ extern int quitok;
</I>><i> extern Address addr;
</I>><i> extern Buffer snarfbuf;
</I>><i> extern Buffer plan9buf;
</I>><i> +extern Buffer cmdbuf;
</I>><i> +extern int cmdbufpos;
</I>><i> extern List file;
</I>><i> extern List tempfile;
</I>><i> extern File *cmd;
</I>><i> diff -rpuN src/cmd/sam/shell.c sam/shell.c
</I>><i> --- src/cmd/sam/shell.c 2016-04-18 19:07:22.000000000 +0100
</I>><i> +++ sam/shell.c 2016-05-25 23:46:25.262692361 +0100
</I>><i> @@ -6,6 +6,8 @@ extern jmp_buf mainloop;
</I>><i> char errfile[64];
</I>><i> String plan9cmd; /* null terminated */
</I>><i> Buffer plan9buf;
</I>><i> +Buffer cmdbuf;
</I>><i> +int cmdbufpos;
</I>><i> void checkerrs(void);
</I>><i>
</I>><i> void
</I>><i> @@ -40,7 +42,7 @@ plan9(File *f, int type, String *s, int
</I>><i> }
</I>><i> if(type!='!' && pipe(pipe1)==-1)
</I>><i> error(Epipe);
</I>><i> - if(type=='|')
</I>><i> + if(type=='|' || type=='_')
</I>><i> snarf(f, addr.r.p1, addr.r.p2, &plan9buf, 1);
</I>><i> if((pid=fork()) == 0){
</I>><i> setname(f);
</I>><i> @@ -61,14 +63,14 @@ plan9(File *f, int type, String *s, int
</I>><i> }
</I>><i> }
</I>><i> if(type != '!') {
</I>><i> - if(type=='<' || type=='|')
</I>><i> - dup(pipe1[1], 1);
</I>><i> - else if(type == '>')
</I>><i> + if(type == '>')
</I>><i> dup(pipe1[0], 0);
</I>><i> + else
</I>><i> + dup(pipe1[1], 1);
</I>><i> close(pipe1[0]);
</I>><i> close(pipe1[1]);
</I>><i> }
</I>><i> - if(type == '|'){
</I>><i> + if(type == '|' || type == '_'){
</I>><i> if(pipe(pipe2) == -1)
</I>><i> exits("pipe");
</I>><i> if((pid = fork())==0){
</I>><i> @@ -100,7 +102,7 @@ plan9(File *f, int type, String *s, int
</I>><i> close(pipe2[0]);
</I>><i> close(pipe2[1]);
</I>><i> }
</I>><i> - if(type=='<'){
</I>><i> + if(type=='<' || type=='^'){
</I>><i> close(0); /* so it won't read from terminal
</I>><i> */
</I>><i> open("/dev/null", 0);
</I>><i> }
</I>><i> @@ -128,9 +130,14 @@ plan9(File *f, int type, String *s, int
</I>><i> writeio(f);
</I>><i> bpipeok = 0;
</I>><i> closeio((Posn)-1);
</I>><i> + }else if(type == '^' || type == '_'){
</I>><i> + int nulls;
</I>><i> + close(pipe1[1]);
</I>><i> + bufload(&cmdbuf, cmdbufpos, pipe1[0], &nulls);
</I>><i> + close(pipe1[0]);
</I>><i> }
</I>><i> retcode = waitfor(pid);
</I>><i> - if(type=='|' || type=='<')
</I>><i> + if(type=='|' || type=='<' || type=='_' || type=='^')
</I>><i> if(retcode!=0)
</I>><i> warn(Wbadstatus);
</I>><i> if(downloaded)
</I>><i> diff -rpuN src/cmd/samterm/main.c samterm/main.c
</I>><i> --- src/cmd/samterm/main.c 2016-04-18 19:07:22.000000000 +0100
</I>><i> +++ samterm/main.c 2016-05-26 16:12:12.452556184 +0100
</I>><i> @@ -23,11 +23,8 @@ long modified = 0; /* strange lookahead
</I>><i> char hostlock = 1;
</I>><i> char hasunlocked = 0;
</I>><i> int maxtab = 8;
</I>><i> -int chord;
</I>><i> int autoindent;
</I>><i>
</I>><i> -#define chording 0 /* code here for reference but it causes deadlocks
</I>><i> */
</I>><i> -
</I>><i> void
</I>><i> notifyf(void *a, char *msg)
</I>><i> {
</I>><i> @@ -39,7 +36,7 @@ notifyf(void *a, char *msg)
</I>><i> void
</I>><i> threadmain(int argc, char *argv[])
</I>><i> {
</I>><i> - int i, got, scr, w;
</I>><i> + int i, got, scr, chord, w;
</I>><i> Text *t;
</I>><i> Rectangle r;
</I>><i> Flayer *nwhich;
</I>><i> @@ -85,6 +82,7 @@ threadmain(int argc, char *argv[])
</I>><i>
</I>><i> got = 0;
</I>><i> if(protodebug) print("loop\n");
</I>><i> + chord = 0;
</I>><i> for(;;got = waitforio()){
</I>><i> if(hasunlocked && RESIZED())
</I>><i> resize();
</I>><i> @@ -108,19 +106,32 @@ threadmain(int argc, char *argv[])
</I>><i> continue;
</I>><i> }
</I>><i> nwhich = flwhich(mousep->xy);
</I>><i> - scr = which && ptinrect(mousep->xy, which->scroll);
</I>><i> + scr = which && (ptinrect(mousep->xy,
</I>><i> which->scroll) ||
</I>><i> + mousep->buttons&(8|16));
</I>><i> if(mousep->buttons)
</I>><i> flushtyping(1);
</I>><i> - if(chording && chord==1 && !mousep->buttons)
</I>><i> + if((mousep->buttons&1)==0)
</I>><i> chord = 0;
</I>><i> - if(chording && chord)
</I>><i> + if(chord && which && which==nwhich){
</I>><i> chord |= mousep->buttons;
</I>><i> - else if(mousep->buttons&1){
</I>><i> + t = (Text *)which->user1;
</I>><i> + if(!t->lock){
</I>><i> + w = which-t->l;
</I>><i> + if(chord&2){
</I>><i> + cut(t, w, 1, 1);
</I>><i> + chord &= ~2;
</I>><i> + }
</I>><i> + if(chord&4){
</I>><i> + paste(t, w);
</I>><i> + chord &= ~4;
</I>><i> + }
</I>><i> + }
</I>><i> + }else if(mousep->buttons&(1|8)){
</I>><i> if(nwhich){
</I>><i> if(nwhich!=which)
</I>><i> current(nwhich);
</I>><i> else if(scr)
</I>><i> - scroll(which, 1);
</I>><i> + scroll(which,
</I>><i> (mousep->buttons&8) ? 4 : 1);
</I>><i> else{
</I>><i> t=(Text *)which->user1;
</I>><i> if(flselect(which)){
</I>><i> @@ -137,27 +148,14 @@ threadmain(int argc, char *argv[])
</I>><i> scroll(which, 2);
</I>><i> else
</I>><i> menu2hit();
</I>><i> - }else if((mousep->buttons&4)){
</I>><i> + }else if(mousep->buttons&(4|16)){
</I>><i> if(scr)
</I>><i> - scroll(which, 3);
</I>><i> + scroll(which, (mousep->buttons&16)
</I>><i> ? 5 : 3);
</I>><i> else
</I>><i> menu3hit();
</I>><i> }
</I>><i> mouseunblock();
</I>><i> }
</I>><i> - if(chording && chord){
</I>><i> - t = (Text*)which->user1;
</I>><i> - if(!t->lock && !hostlock){
</I>><i> - w = which-t->l;
</I>><i> - if(chord&2){
</I>><i> - cut(t, w, 1, 1);
</I>><i> - chord &= ~2;
</I>><i> - }else if(chord&4){
</I>><i> - paste(t, w);
</I>><i> - chord &= ~4;
</I>><i> - }
</I>><i> - }
</I>><i> - }
</I>><i> }
</I>><i> }
</I>><i>
</I>><i> @@ -497,6 +495,7 @@ flushtyping(int clearesc)
</I>><i> #define CUT (Kcmd+'x')
</I>><i> #define COPY (Kcmd+'c')
</I>><i> #define PASTE (Kcmd+'v')
</I>><i> +#define Kstx 0x02
</I>><i>
</I>><i> int
</I>><i> nontypingkey(int c)
</I>><i> @@ -512,6 +511,7 @@ nontypingkey(int c)
</I>><i> case PAGEUP:
</I>><i> case RIGHTARROW:
</I>><i> case SCROLLKEY:
</I>><i> + case Kstx:
</I>><i> return 1;
</I>><i> }
</I>><i> if(c >= Kcmd)
</I>><i> @@ -669,6 +669,15 @@ type(Flayer *l, int res) /* what a blood
</I>><i> }
</I>><i> }
</I>><i> }
</I>><i> + }else if(c == Kstx){
</I>><i> + t = &cmd;
</I>><i> + for(l=t->l; l->textfn==0; l++)
</I>><i> + ;
</I>><i> + current(l);
</I>><i> + flushtyping(0);
</I>><i> + a = t->rasp.nrunes;
</I>><i> + flsetselect(l, a, a);
</I>><i> + center(l, a);
</I>><i> }else{
</I>><i> if(c==ESC && typeesc>=0){
</I>><i> l->p0 = typeesc;
</I>><i> diff -rpuN src/cmd/samterm/scroll.c samterm/scroll.c
</I>><i> --- src/cmd/samterm/scroll.c 2016-04-18 19:07:22.000000000 +0100
</I>><i> +++ samterm/scroll.c 2016-05-26 02:07:31.922977720 +0100
</I>><i> @@ -115,7 +115,7 @@ scroll(Flayer *l, int but)
</I>><i> draw(scrback, Rect(0,0,Dx(l->scroll), Dy(l->scroll)), l->f.b, nil,
</I>><i> l->scroll.min);
</I>><i> do{
</I>><i> oin = in;
</I>><i> - in = abs(x-mousep->xy.x)<=FLSCROLLWID(l)/2;
</I>><i> + in = (but > 3) || (but == 2) ||
</I>><i> abs(x-mousep->xy.x)<=FLSCROLLWID(l)/2;
</I>><i> if(oin && !in)
</I>><i> scrunmark(l, r);
</I>><i> if(in){
</I>><i> @@ -126,9 +126,7 @@ scroll(Flayer *l, int but)
</I>><i> my = s.min.y;
</I>><i> if(my >= s.max.y)
</I>><i> my = s.max.y;
</I>><i> - if(!eqpt(mousep->xy, Pt(x, my)))
</I>><i> - moveto(mousectl, Pt(x, my));
</I>><i> - if(but == 1){
</I>><i> + if(but == 1 || but == 4){
</I>><i> p0 = l->origin-frcharofpt(&l->f,
</I>><i> Pt(s.max.x, my));
</I>><i> rt = scrpos(l->scroll, p0, p0+l->f.nchars,
</I>><i> tot);
</I>><i> y = rt.min.y;
</I>><i> @@ -136,7 +134,7 @@ scroll(Flayer *l, int but)
</I>><i> y = my;
</I>><i> if(y > s.max.y-2)
</I>><i> y = s.max.y-2;
</I>><i> - }else if(but == 3){
</I>><i> + }else if(but == 3 || but == 5){
</I>><i> p0 = l->origin+frcharofpt(&l->f,
</I>><i> Pt(s.max.x, my));
</I>><i> rt = scrpos(l->scroll, p0, p0+l->f.nchars,
</I>><i> tot);
</I>><i> y = rt.min.y;
</I>><i> @@ -147,19 +145,21 @@ scroll(Flayer *l, int but)
</I>><i> scrmark(l, r);
</I>><i> }
</I>><i> }
</I>><i> - }while(button(but));
</I>><i> + }while(but <= 3 && button(but));
</I>><i> if(in){
</I>><i> h = s.max.y-s.min.y;
</I>><i> scrunmark(l, r);
</I>><i> p0 = 0;
</I>><i> - if(but == 1)
</I>><i> + if(but == 1 || but == 4){
</I>><i> + but = 1;
</I>><i> p0 = (long)(my-s.min.y)/l->f.font->height+1;
</I>><i> - else if(but == 2){
</I>><i> + }else if(but == 2){
</I>><i> if(tot > 1024L*1024L)
</I>><i> p0 = ((tot>>10)*(y-s.min.y)/h)<<10;
</I>><i> else
</I>><i> p0 = tot*(y-s.min.y)/h;
</I>><i> - }else if(but == 3){
</I>><i> + }else if(but == 3 || but == 5){
</I>><i> + but = 3;
</I>><i> p0 = l->origin+frcharofpt(&l->f, Pt(s.max.x, my));
</I>><i> if(p0 > tot)
</I>><i> p0 = tot;
</I>><i>
</I>><i>
</I>><i>
</I>-------------- next part --------------
An HTML attachment was scrubbed...
URL: <<A HREF="http://mail.9fans.net/private/9fans/attachments/20160527/75f53342/attachment-0001.html">http://mail.9fans.net/private/9fans/attachments/20160527/75f53342/attachment-0001.html</A>>
</PRE>
<!--endarticle-->
<HR>
<P><UL>
<!--threads-->
<LI>Previous message: <A HREF="035186.html">[9fans] Chords, ^, _, ^B and scroll with mouse wheel in p9p sam
</A></li>
<LI>Next message: <A HREF="035191.html">[9fans] Chords, ^, _, ^B and scroll with mouse wheel in p9p sam
</A></li>
<LI> <B>Messages sorted by:</B>
<a href="date.html#35190">[ date ]</a>
<a href="thread.html#35190">[ thread ]</a>
<a href="subject.html#35190">[ subject ]</a>
<a href="author.html#35190">[ author ]</a>
</LI>
</UL>
<hr>
<a href="http://mail.9fans.net/listinfo/9fans">More information about the 9fans
mailing list</a><br>
</body></html>
|
