various forgotten files

src/libthread/asm-Linux-power.s

@@ -0,0 +1,80 @@
+/* get FPR and VR use flags with sc 0x7FF3 */
+/* get vsave with mfspr reg, 256 */
+
+.text
+.align 2
+
+.globl	_setlabel
+
+_setlabel:				/* xxx: instruction scheduling */
+	mflr	0
+	mfcr	5
+	mfctr	6
+	mfxer	7
+	stw	0, 0*4(3)
+	stw	5, 1*4(3)
+	stw	6, 2*4(3)
+	stw	7, 3*4(3)
+
+	stw	1, 4*4(3)
+	stw	2, 5*4(3)
+
+	stw	13, (0+6)*4(3)	/* callee-save GPRs */
+	stw	14, (1+6)*4(3)	/* xxx: block move */
+	stw	15, (2+6)*4(3)
+	stw	16, (3+6)*4(3)
+	stw	17, (4+6)*4(3)
+	stw	18, (5+6)*4(3)
+	stw	19, (6+6)*4(3)
+	stw	20, (7+6)*4(3)
+	stw	21, (8+6)*4(3)
+	stw	22, (9+6)*4(3)
+	stw	23, (10+6)*4(3)
+	stw	24, (11+6)*4(3)
+	stw	25, (12+6)*4(3)
+	stw	26, (13+6)*4(3)
+	stw	27, (14+6)*4(3)
+	stw	28, (15+6)*4(3)
+	stw	29, (16+6)*4(3)
+	stw	30, (17+6)*4(3)
+	stw	31, (18+6)*4(3)
+
+	li	3, 0			/* return */
+	blr
+
+.globl	_gotolabel
+
+_gotolabel:
+	lwz	13, (0+6)*4(3)	/* callee-save GPRs */
+	lwz	14, (1+6)*4(3)	/* xxx: block move */
+	lwz	15, (2+6)*4(3)
+	lwz	16, (3+6)*4(3)
+	lwz	17, (4+6)*4(3)
+	lwz	18, (5+6)*4(3)
+	lwz	19, (6+6)*4(3)
+	lwz	20, (7+6)*4(3)
+	lwz	21, (8+6)*4(3)
+	lwz	22, (9+6)*4(3)
+	lwz	23, (10+6)*4(3)
+	lwz	24, (11+6)*4(3)
+	lwz	25, (12+6)*4(3)
+	lwz	26, (13+6)*4(3)
+	lwz	27, (14+6)*4(3)
+	lwz	28, (15+6)*4(3)
+	lwz	29, (16+6)*4(3)
+	lwz	30, (17+6)*4(3)
+	lwz	31, (18+6)*4(3)
+
+	lwz	1, 4*4(3)
+	lwz	2, 5*4(3)
+
+	lwz	0, 0*4(3)
+	mtlr	0
+	lwz	0, 1*4(3)
+	mtcr	0			/* mtcrf 0xFF, r0 */
+	lwz	0, 2*4(3)
+	mtctr	0
+	lwz	0, 3*4(3)
+	mtxer	0
+	li	3, 1
+	blr

src/libthread/power.c

@@ -0,0 +1,40 @@
+#include "threadimpl.h"
+
+static void
+launcherpower(int a0, int a1, int a2, int a3, int a4, int a5, int a6, int a7,
+	void (*f)(void *arg), void *arg)
+{
+	(*f)(arg);
+	threadexits(nil);
+}
+
+void
+_threadinitstack(Thread *t, void (*f)(void*), void *arg)
+{
+	ulong *tos, *stk;
+
+	tos = (ulong*)&t->stk[t->stksize&~7];
+	stk = tos;
+	--stk;
+	--stk;
+	--stk;
+	--stk;
+	*--stk = (ulong)arg;
+	*--stk = (ulong)f;
+	t->sched.pc = (ulong)launcherpower+LABELDPC;
+	t->sched.sp = ((ulong)stk)-8;
+	*((ulong *)t->sched.sp) = 0;
+}
+
+void
+_threadinswitch(int enter)
+{
+	USED(enter);
+}
+
+void
+_threadstacklimit(void *addr, void *addr2)
+{
+	USED(addr);
+}
+

src/libthread/sched.c

@@ -26,7 +26,6 @@ _schedinit(void *arg)
 	Proc *p;
 	Thread *t;
 	extern void ignusr1(int), _threaddie(int);
-	ignusr1(1);
 	signal(SIGTERM, _threaddie);
   
 	p = arg;

src/libthread/tfork.c

@@ -0,0 +1,23 @@
+#include <u.h>
+#include <libc.h>
+#include <thread.h>
+
+Channel *c;
+
+void
+f(void *v)
+{
+	recvp(c);
+}
+
+void
+threadmain(int argc, char **argv)
+{
+	int i;
+
+	c = chancreate(sizeof(ulong), 0);
+	for(i=0;; i++){
+		print("%d\n", i);
+		proccreate(f, nil, 8192);
+	}
+}