---

yaml
---
r: 29956
b: refs/heads/incoming
c: 3f1f6bf
h: refs/heads/master
v: v3

Author: Daniel Patterson

[refs]

@@ -6,7 +6,7 @@ refs/heads/try: d324a424d8f84b1eb049b12cf34182bda91b0024
 refs/tags/release-0.1: 1f5c5126e96c79d22cb7862f75304136e204f105
 refs/heads/ndm: f3868061cd7988080c30d6d5bf352a5a5fe2460b
 refs/heads/try2: d0c6ce338884ee21843f4b40bf6bf18d222ce5df
-refs/heads/incoming: 47cca22d5455d2d60226ead907fd627784701ef5
+refs/heads/incoming: 3f1f6bf9e3fc7d07adedef225e33156425a0608f
 refs/heads/dist-snap: 2f32a1581f522e524009138b33b1c7049ced668d
 refs/tags/release-0.2: c870d2dffb391e14efb05aa27898f1f6333a9596
 refs/tags/release-0.3: b5f0d0f648d9a6153664837026ba1be43d3e2503

branches/incoming/src/libcore/os.rs

@@ -30,7 +30,7 @@ export close, fclose, fsync_fd, waitpid;
 export env, getenv, setenv, fdopen, pipe;
 export getcwd, dll_filename, self_exe_path;
 export exe_suffix, dll_suffix, sysname, arch, family;
-export homedir, list_dir, list_dir_path, path_is_dir, path_exists,
+export homedir, tmpdir, list_dir, list_dir_path, path_is_dir, path_exists,
        make_absolute, make_dir, remove_dir, change_dir, remove_file,
        copy_file;
 export last_os_error;
@@ -464,6 +464,43 @@ fn homedir() -> option<Path> {
     }
 }
 
+/**
+ * Returns the path to a temporary directory, if known.
+ *
+ * On Unix, returns the value of the 'TMPDIR' environment variable if it is
+ * set and non-empty and '/tmp' otherwise.
+ *
+ * On Windows, returns the value of, in order, the 'TMP', 'TEMP',
+ * 'USERPROFILE' environment variable if any are set and not the empty
+ * string. Otherwise, tmpdir returns option::none.
+ */
+fn tmpdir() -> option<Path> {
+    return lookup();
+
+    fn getenv_nonempty(v: Path) -> option<Path> {
+        match getenv(v) {
+            some(x) =>
+                if str::is_empty(x) {
+                    none
+                } else {
+                    some(x)
+                },
+            _ => none
+        }
+    }
+
+    #[cfg(unix)]
+    fn lookup() -> option<Path> {
+        option::or(getenv_nonempty(~"TMPDIR"), some(~"/tmp"))
+    }
+
+    #[cfg(windows)]
+    fn lookup() -> option<Path> {
+        option::or(getenv_nonempty(~"TMP"),
+        option::or(getenv_nonempty(~"TEMP"),
+                   getenv_nonempty(~"USERPROFILE")))
+    }
+}
 /// Recursively walk a directory structure
 fn walk_dir(p: Path, f: fn(Path) -> bool) {