Initial commit

tasks/libl4/include/l4lib/arch-arm/asm.h

@@ -0,0 +1,15 @@
+#ifndef __ARM_ASM_H__
+#define __ARM_ASM_H__
+
+#define BEGIN_PROC(name)			\
+    .global name; 				\
+    .type   name,function;			\
+    .align;					\
+name:
+
+#define END_PROC(name)				\
+.fend_##name:					\
+    .size   name,.fend_##name - name;
+
+#endif /* __ARM_ASM_H__ */
+

tasks/libl4/include/l4lib/arch-arm/message.h

@@ -0,0 +1,26 @@
+#ifndef __ARM_MESSAGE_H__
+#define __ARM_MESSAGE_H__
+
+#include <l4lib/types.h>
+#include <l4lib/arch/utcb.h>
+
+/* Functions to read/write utcb registers */
+static inline unsigned int read_mr(int offset)
+{
+	return __L4_ARM_Utcb()->mr[offset];
+}
+
+static inline void write_mr(unsigned int val, unsigned int offset)
+{
+	__L4_ARM_Utcb()->mr[offset] = val;
+}
+
+/* Tag definitions */
+#define L4_TAG_PFLAG	(1 << 12)	/* Propagation */
+#define L4_TAG_NFLAG	(1 << 13)	/* Notify */
+#define L4_TAG_RFLAG	(1 << 14)	/* Block-on-receive */
+#define L4_TAG_SFLAG	(1 << 15)	/* Block-on-send */
+#define L4_TAG_XFLAG	(1 << 14)	/* Crosscall (inter-cpu ipc) */
+#define L4_TAG_EFLAG	(1 << 15)	/* Error */
+
+#endif /* __ARM_MESSAGE_H__ */

tasks/libl4/include/l4lib/arch-arm/syscalls.h

@@ -0,0 +1,83 @@
+/*
+ * System call prototypes.
+ *
+ * Copyright (C) 2007 Bahadir Balban
+ */
+#ifndef __ARM_SYSCALLS_H__
+#define __ARM_SYSCALLS_H__
+
+#include <l4lib/arch/types.h>
+#include <l4lib/arch/vregs.h>
+#include <l4lib/arch/message.h>
+#include <l4/generic/space.h>
+#include <l4/api/space.h>
+#include <l4/api/kip.h>
+#include <l4/api/ipc.h>
+#include <l4/api/thread.h>
+
+static inline void *
+l4_kernel_interface(unsigned int *api_version, unsigned int *api_flags,
+		   unsigned int *kernel_id)
+{
+	return (void *)L4_KIP_ADDRESS;
+}
+
+typedef unsigned int (*__l4_thread_switch_t)(u32);
+extern __l4_thread_switch_t __l4_thread_switch;
+unsigned int l4_thread_switch (u32 dest);
+
+typedef int (*__l4_getid_t)(struct task_ids *ids);
+extern __l4_getid_t __l4_getpid;
+int l4_getid(struct task_ids *ids);
+
+typedef int (*__l4_ipc_t)(l4id_t to, l4id_t from, u32 tag);
+extern __l4_ipc_t __l4_ipc;
+int l4_ipc(l4id_t to, l4id_t from, u32 tag);
+
+typedef int (*__l4_kread_t)(u32 rd, void *addr);
+extern __l4_kread_t __l4_kread;
+int l4_kread(u32 rd, void *addr);
+
+typedef int (*__l4_map_t)(void *phys, void *virt,
+			  u32 npages, u32 flags, l4id_t tid);
+extern __l4_map_t __l4_map;
+int l4_map(void *p, void *v, u32 npages, u32 flags, l4id_t tid);
+
+typedef int (*__l4_unmap_t)(void *virt, unsigned long npages, l4id_t tid);
+extern __l4_unmap_t __l4_unmap;
+int l4_unmap(void *virtual, unsigned long numpages, l4id_t tid);
+
+typedef int (*__l4_thread_control_t)(unsigned int action, struct task_ids *ids);
+extern __l4_thread_control_t __l4_thread_control;
+int l4_thread_control(unsigned int action, struct task_ids *ids);
+
+typedef int (*__l4_space_control_t)(unsigned int action, void *kdata);
+extern __l4_space_control_t __l4_space_control;
+int l4_space_control(unsigned int action, void *kdata);
+
+typedef int (*__l4_ipc_control_t)(unsigned int action, l4id_t blocked_sender,
+				  u32 blocked_tag);
+extern __l4_ipc_control_t __l4_ipc_control;
+int l4_ipc_control(unsigned int, l4id_t blocked_sender, u32 blocked_tag);
+
+typedef int (*__l4_exchange_registers_t)(unsigned int pc, unsigned int sp,
+					 l4id_t pager, l4id_t tid);
+extern __l4_exchange_registers_t __l4_exchange_registers;
+int l4_exchange_registers(unsigned int pc, unsigned int sp, int pager, l4id_t tid);
+
+typedef int (*__l4_kmem_reclaim_t)(unsigned long *pfn, int *npages);
+extern __l4_kmem_reclaim_t __l4_kmem_reclaim;
+int l4_kmem_reclaim(unsigned long *pfn, int *npages);
+
+typedef int (*__l4_kmem_grant_t)(unsigned long pfn, int npages);
+extern __l4_kmem_grant_t __l4_kmem_grant;
+int l4_kmem_grant(unsigned long pfn, int npages);
+
+
+/* To be supplied by server tasks. */
+void *virt_to_phys(void *);
+void *phys_to_virt(void *);
+
+
+#endif /* __ARM_SYSCALLS_H__ */
+

tasks/libl4/include/l4lib/arch-arm/syslib.h

@@ -0,0 +1,179 @@
+/*
+ * Helper functions that wrap raw l4 syscalls.
+ *
+ * Copyright (C) 2007 Bahadir Balban
+ */
+
+#ifndef __L4LIB_SYSLIB_H__
+#define __L4LIB_SYSLIB_H__
+
+#include <stdio.h>
+#include <l4lib/arch/syscalls.h>
+#include <l4/macros.h>
+
+/*
+ * NOTE:
+ * Its best to use these wrappers because they generalise the way
+ * common ipc data like sender id, error, ipc tag are passed
+ * between ipc parties.
+ *
+ * The arguments to l4_ipc() are used by the microkernel to initiate
+ * the ipc. Any data passed in message registers may or may not be
+ * a duplicate of this data, but the distinction is that anything
+ * that is passed via the mrs are meant to be used by the other party
+ * participating in the ipc.
+ */
+
+/* For system call arguments */
+#define L4SYS_ARG0	(MR_UNUSED_START)
+#define	L4SYS_ARG1	(MR_UNUSED_START + 1)
+#define L4SYS_ARG2	(MR_UNUSED_START + 2)
+
+/*
+ * Servers get sender.
+ */
+static inline l4id_t l4_get_sender(void)
+{
+	return (l4id_t)read_mr(MR_SENDER);
+}
+
+static inline void l4_set_sender(l4id_t id)
+{
+	write_mr(MR_SENDER, (unsigned int)id);
+}
+
+static inline unsigned int l4_get_tag(void)
+{
+	return read_mr(MR_TAG);
+}
+
+static inline void l4_set_tag(unsigned int tag)
+{
+	write_mr(MR_TAG, tag);
+}
+
+static inline l4id_t self_tid(void)
+{
+	struct task_ids ids;
+
+	l4_getid(&ids);
+	return ids.tid;
+}
+
+static inline int l4_send(l4id_t to, unsigned int tag)
+{
+	l4_set_tag(tag);
+	l4_set_sender(self_tid());
+	return l4_ipc(to, L4_NILTHREAD, 0);
+}
+
+static inline int l4_sendrecv(l4id_t to, l4id_t from, unsigned int tag)
+{
+	BUG_ON(to == L4_NILTHREAD || from == L4_NILTHREAD);
+	l4_set_tag(tag);
+	l4_set_sender(self_tid());
+	return l4_ipc(to, from, 0);
+}
+
+static inline int l4_receive(l4id_t from)
+{
+	return l4_ipc(L4_NILTHREAD, from, 0);
+}
+
+/* Servers:
+ * Sets the message register for returning errors back to client task.
+ * These are usually posix error codes.
+ */
+static inline void l4_set_retval(int retval)
+{
+	write_mr(MR_RETURN, retval);
+}
+
+/* Clients:
+ * Learn result of request.
+ */ 
+static inline int l4_get_retval(void)
+{
+	return read_mr(MR_RETURN);
+}
+
+/* Servers:
+ * Return the ipc result back to requesting task. 
+ */
+static inline int l4_ipc_return(int retval)
+{
+	unsigned int tag = l4_get_tag();
+	l4id_t sender = l4_get_sender();
+
+	l4_set_retval(retval);
+	return l4_send(sender, tag);
+}
+
+/* A helper that translates and maps a physical address to virtual */
+static inline void *l4_map_helper(void *phys, int npages)
+{
+	struct task_ids ids;
+
+	l4_getid(&ids);
+	l4_map(phys, phys_to_virt(phys), npages, MAP_USR_RW_FLAGS, ids.tid);
+	return phys_to_virt(phys);
+}
+
+
+/* A helper that translates and maps a physical address to virtual */
+static inline void *l4_unmap_helper(void *virt, int npages)
+{
+	struct task_ids ids;
+
+	l4_getid(&ids);
+	l4_unmap(virt, npages, ids.tid);
+	return virt_to_phys(virt);
+}
+
+/*
+ * A helper to produce grant ipc between a pager and its client, or a
+ * synchronous syscall to the kernel in case the grant is to the kernel.
+ */
+static inline int l4_grant_pages(unsigned long pfn, int npages, l4id_t tid)
+{
+	/* Only a pager can grant pages to kernel. */
+	if (tid == KERNEL_TID) {
+		/* Granting physical pages via a system call in kernel case. */
+		return l4_kmem_grant(pfn, npages);
+	} else {
+		/*
+		 * FIXME: This should set up appropriate message registers and
+		 * call l4_ipc() on the target thread. Pages given are virtual.
+		 */
+		while(1);
+	}
+	return 0;
+}
+
+/*
+ * NOTE: This is just brainstroming yet.
+ * A helper to reclaim unused pages. A pager can reclaim pages from kernel or
+ * other tasks this way.
+ */
+static inline int l4_reclaim_pages(l4id_t tid)
+{
+	unsigned long pfn;
+	int npages;
+
+	if (tid == KERNEL_TID) {
+		/*
+		 * A single contiguous sequence of physical pages are returned
+		 * by kernel via a syscall. Simpler the better for now.
+		 */
+		l4_kmem_reclaim(&pfn, &npages);
+	} else {
+		/*
+		 * An ipc to a task where pfn and npages come in message regs.
+		 */
+		while(1);
+	}
+	return 0;
+}
+
+
+#endif /* __L4LIB_SYSLIB_H__ */

tasks/libl4/include/l4lib/arch-arm/types.h

@@ -0,0 +1,12 @@
+#ifndef __L4_ARCH_ARM__
+#define __L4_ARCH_ARM__
+
+#define TASK_ID_INVALID			-1
+struct task_ids {
+	int tid;
+	int spid;
+};
+
+#include <l4/arch/arm/types.h>
+
+#endif

tasks/libl4/include/l4lib/arch-arm/utcb.h

@@ -0,0 +1,43 @@
+#ifndef __ARM_UTCB_H__
+#define __ARM_UTCB_H__
+
+#include <l4lib/types.h>
+#include <l4lib/arch/vregs.h>
+
+/* FIXME: LICENSE/LICENCE */
+
+/*
+ * NOTE: In syslib.h the first few mrs are used by data frequently
+ * needed for all ipcs. Those mrs are defined here.
+ */
+
+/* MRs always used on receive by syslib */
+#define MR_RETURN		0	/* Contains the posix return value. */
+
+/* MRs always used on send by syslib */
+#define MR_TAG		0	/* Defines the message purpose */
+#define MR_SENDER	1	/* For anythread receivers to discover sender */
+
+/* These define the mr start - end range that aren't used by syslib */
+#define MR_UNUSED_START	2	/* The first mr that's not used by syslib.h */
+#define MR_TOTAL	6
+#define MR_UNUSED_TOTAL		(MR_TOTAL - MR_UNUSED_START)
+
+ /* Compact utcb for now! :-) */
+struct utcb {
+	u32 mr[MR_TOTAL];
+	u32 tid;		/* Thread id */
+
+	/*
+	 * This field is used by servers as the ptr to current tcb,
+	 * i.e. the task that this server is serving to.
+	 */
+	unsigned long usr_handle;
+};
+
+static inline struct utcb *__L4_ARM_Utcb()
+{
+	return (struct utcb *)(*(struct utcb **)USER_UTCB_REF);
+}
+
+#endif /* __ARM_UTCB_H__ */

tasks/libl4/include/l4lib/arch-arm/vregs.h

@@ -0,0 +1,13 @@
+/*
+ * Copyright (C) 2007 Bahadir Balban
+ */
+#ifndef __L4_ARM_VREGS_H__
+#define __L4_ARM_VREGS_H__
+
+/* FIXME: LICENSE/LICENCE */
+#define USER_UTCB_REF           0xFF000FF0
+#define L4_KIP_ADDRESS		0xFF000000
+#define UTCB_KIP_OFFSET		0xFF0
+
+#endif	/* __L4_ARM_VREGS_H__ */
+