fix snarf

src/cmd/9term/9term.c

@@ -322,7 +322,7 @@ button2menu(Window *w)
 		break;
 
 	case Paste:
-	//XXX	getsnarf();
+		riogetsnarf();
 		wpaste(w);
 		wscrdraw(w);
 		break;
@@ -332,7 +332,7 @@ button2menu(Window *w)
 		break;
 
 	case Send:
-	//XXX	getsnarf();
+		riogetsnarf();
 		wsnarf(w);
 		if(nsnarf == 0)
 			break;
@@ -505,3 +505,31 @@ rcinputproc(void *arg)
 	}
 }
 
+void
+rioputsnarf(void)
+{
+	char *s;
+	
+	s = smprint("%.*S", nsnarf, snarf);
+	if(s){
+		putsnarf(s);
+		free(s);
+	}
+}
+
+void
+riogetsnarf(void)
+{
+	char *s;
+	int n, nb, nulls;
+
+fprint(2, "getsnarf\n");
+	s = getsnarf();
+	if(s == nil)
+		return;
+	n = strlen(s)+1;
+	free(snarf);
+	snarf = runemalloc(n);
+	cvttorunes(s, n, snarf, &nb, &nsnarf, &nulls);
+	free(s);
+}

src/cmd/9term/fns.h

@@ -35,3 +35,7 @@ void	winterrupt(Window*);
 #define	runemalloc(n)		malloc((n)*sizeof(Rune))
 #define	runerealloc(a, n)	realloc(a, (n)*sizeof(Rune))
 #define	runemove(a, b, n)	memmove(a, b, (n)*sizeof(Rune))
+
+void rioputsnarf(void);
+void riogetsnarf(void);
+

src/cmd/9term/wind.c

@@ -772,7 +772,7 @@ wsnarf(Window *w)
 	snarf = runerealloc(snarf, nsnarf);
 	snarfversion++;	/* maybe modified by parent */
 	runemove(snarf, w->r+w->q0, nsnarf);
-//XXX	putsnarf();
+	rioputsnarf();
 }
 
 void
@@ -1034,7 +1034,7 @@ wselect(Window *w)
 			}else{
 				if(first){
 					first = 0;
-					getsnarf();
+					riogetsnarf();
 				}
 				wpaste(w);
 			}