Update all new Tasks

Task/Make-directory-path/00DESCRIPTION

@@ -0,0 +1,9 @@
+Create a directory and any missing parents.
+
+This task is named after the posix <code>[http://www.unix.com/man-page/POSIX/0/mkdir/ mkdir -p]</code> command, and several libraries which implement the same behavior.
+
+Please implement a function of a single path string (for example <code>./path/to/dir</code>) which has the above side-effect.
+If the directory already exists, return successfully.
+Ideally implementations will work equally well cross-platform (on windows, linux, and OS X).
+
+It's likely that your language implements such a function as part of its standard library. If so, please also show how such a function would be implemented.

Task/Make-directory-path/00META.yaml

@@ -0,0 +1,2 @@
+---
+note: File System Operations

Task/Make-directory-path/Clojure/make-directory-path.clj

@@ -0,0 +1,5 @@
+(defn mkdirp [path]
+  (let [dir (java.io.File. path)]
+    (if (.exists dir)
+      true
+      (.mkdirs dir))))

Task/Make-directory-path/Go/make-directory-path.go

@@ -0,0 +1 @@
+	os.MkdirAll("/tmp/some/path/to/dir", 0770)

Task/Make-directory-path/Java/make-directory-path.java

@@ -0,0 +1,14 @@
+import java.io.File;
+
+public interface Test {
+
+    public static void main(String[] args) {
+        try {
+            File f = new File("C:/parent/test");
+            if (f.mkdirs())
+                System.out.println("path successfully created");
+        } catch (Exception e) {
+            e.printStackTrace();
+        }
+    }
+}

Task/Make-directory-path/JavaScript/make-directory-path.js

@@ -0,0 +1,27 @@
+var path = require('path');
+var fs = require('fs');
+
+function mkdirp (p, cb) {
+    cb = cb || function () {};
+    p = path.resolve(p);
+
+    fs.mkdir(p, function (er) {
+        if (!er) {
+            return cb(null);
+        }
+        switch (er.code) {
+            case 'ENOENT':
+                // The directory doesn't exist. Make its parent and try again.
+                mkdirp(path.dirname(p), function (er) {
+                    if (er) cb(er);
+                    else mkdirp(p, cb);
+                });
+                break;
+
+                // In the case of any other error, something is borked.
+            default:
+                cb(er);
+                break;
+        }
+    });
+}

Task/Make-directory-path/Mathematica/make-directory-path.math

@@ -0,0 +1 @@
+mkdirp[path_] := Quiet[CreateDirectory[path,{CreateIntermediateDirectories->True}],{CreateDirectory::filex}]

Task/Make-directory-path/Perl-6/make-directory-path.pl6

@@ -0,0 +1 @@
+mkdir 'path/to/dir'

Task/Make-directory-path/Python/make-directory-path-1.py

@@ -0,0 +1,23 @@
+from errno import EEXIST
+from os import mkdir, curdir
+from os.path import split, exists
+
+def mkdirp(path, mode=0777):
+    head, tail = split(path)
+    if not tail:
+        head, tail = split(head)
+    if head and tail and not exists(head):
+        try:
+            mkdirp(head, mode)
+        except OSError as e:
+            # be happy if someone already created the path
+            if e.errno != EEXIST:
+                raise
+        if tail == curdir:  # xxx/newdir/. exists if xxx/newdir exists
+            return
+    try:
+        mkdir(path, mode)
+    except OSError as e:
+        # be happy if someone already created the path
+        if e.errno != EEXIST:
+            raise

Task/Make-directory-path/Python/make-directory-path-2.py

@@ -0,0 +1,7 @@
+def mkdirp(path):
+    try:
+        os.makedirs(path)
+    except OSError as exc: # Python >2.5
+        if exc.errno == errno.EEXIST and os.path.isdir(path):
+            pass
+        else: raise

Task/Make-directory-path/Python/make-directory-path-3.py

@@ -0,0 +1,2 @@
+def mkdirp(path):
+    os.makedirs(path, exist_ok=True)

Task/Make-directory-path/README

@@ -0,0 +1 @@
+Data source: http://rosettacode.org/wiki/Make_directory_path

Task/Make-directory-path/REXX/make-directory-path.rexx

@@ -0,0 +1,5 @@
+/*REXX program creates a directory and all its parent paths as necessary*/
+trace off                              /*suppress possible warning msgs.*/
+dPath = 'path\to\dir'
+'MKDIR'  dPath  "2>nul"                /*alias could be used:  MD Dpath */
+                                       /*stick a fork in it, we're done.*/

Task/Make-directory-path/Racket/make-directory-path.rkt

@@ -0,0 +1,22 @@
+#lang racket
+(define path-str "/tmp/woo/yay")
+(define path/..-str "/tmp/woo")
+
+;; clean up from a previous run
+(when (directory-exists? path-str)
+  (delete-directory path-str)
+  (delete-directory path/..-str))
+;; delete-directory/files could also be used -- but that requires goggles and rubber
+;; gloves to handle safely!
+
+(define (report-path-exists)
+  (printf "~s exists (as a directory?):~a~%~s exists (as a directory?):~a~%~%"
+          path/..-str (directory-exists? path/..-str)
+          path-str (directory-exists? path-str)))
+
+(report-path-exists)
+
+;; Really ... this is the only bit that matters!
+(make-directory* path-str)
+
+(report-path-exists)

Task/Make-directory-path/Ruby/make-directory-path.rb

@@ -0,0 +1,2 @@
+require 'fileutils'
+FileUtils.mkdir_p("path/to/dir")

Task/Make-directory-path/Scala/make-directory-path-1.scala

@@ -0,0 +1 @@
+new java.io.File("/path/to/dir").mkdirs

Task/Make-directory-path/Scala/make-directory-path-2.scala

@@ -0,0 +1,6 @@
+import java.io.File
+
+def mkdirs(path: List[String]) = // return true if path was created
+    path.tail.foldLeft(new File(path.head)){(a,b) => a.mkdir; new File(a,b)}.mkdir
+
+mkdirs(List("/path", "to", "dir"))

Task/Make-directory-path/Tcl/make-directory-path.tcl

@@ -0,0 +1 @@
+file mkdir ./path/to/dir

Task/Make-directory-path/UNIX-Shell/make-directory-path.sh

@@ -0,0 +1 @@
+function mkdirp() { mkdir -p "$1"; }