From: Keir Fraser <keir.fraser@citrix.com>
Date: Tue, 19 May 2009 13:15:43 +0000 (+0100)
Subject: minios: Implement some extra lib functions for ocaml xenstored stubdom
X-Git-Tag: xen-4.0.0-rc1~30
X-Git-Url: http://xenbits.xensource.com/gitweb?a=commitdiff_plain;h=26d31d47592d157464cf896871cc5a815037ffc0;p=people%2Fliuw%2Fmini-os.git

minios: Implement some extra lib functions for ocaml xenstored stubdom

We could stub them out as unsupported, but we may as well implement
them as they are very simple.

Signed-off-by: Alex Zeffertt <alex.zeffertt@eu.citrix.com>
---

diff --git a/include/posix/unistd.h b/include/posix/unistd.h
index 5104782..e85592f 100644
--- a/include/posix/unistd.h
+++ b/include/posix/unistd.h
@@ -3,8 +3,14 @@
 
 #include_next <unistd.h>
 
+uid_t getuid(void);
+uid_t geteuid(void);
+gid_t getgid(void);
+gid_t getegid(void);
+int gethostname(char *name, size_t namelen);
 size_t getpagesize(void);
 int ftruncate(int fd, off_t length);
 int lockf(int fd, int cmd, off_t len);
+int nice(int inc);
 
 #endif /* _POSIX_UNISTD_H */
diff --git a/lib/sys.c b/lib/sys.c
index 876443c..d0bc76a 100644
--- a/lib/sys.c
+++ b/lib/sys.c
@@ -1185,6 +1185,32 @@ int clock_gettime(clockid_t clk_id, struct timespec *tp)
     return 0;
 }
 
+uid_t getuid(void)
+{
+	return 0;
+}
+
+uid_t geteuid(void)
+{
+	return 0;
+}
+
+gid_t getgid(void)
+{
+	return 0;
+}
+
+gid_t getegid(void)
+{
+	return 0;
+}
+
+int gethostname(char *name, size_t namelen)
+{
+	strncpy(name, "mini-os", namelen);
+	return 0;
+}
+
 size_t getpagesize(void)
 {
     return PAGE_SIZE;
@@ -1255,6 +1281,12 @@ void sparse(unsigned long data, size_t size)
     do_map_zero(data, n);
 }
 
+int nice(int inc)
+{
+    printk("nice() stub called with inc=%d\n", inc);
+    return 0;
+}
+
 
 /* Not supported by FS yet.  */
 unsupported_function_crash(link);