From a838a871764394c765b0dd77ebc4d7e072fed686 Mon Sep 17 00:00:00 2001
From: Aneurin Barker Snook <a@aneur.in>
Date: Wed, 5 Jul 2017 20:40:20 +0100
Subject: [PATCH] initial commit of live tidal kit

the two php scripts sync sample banks and yas snippets from selected
projects on disk. the original paths are actually all over the place,
so for consistency i symlink them on each machine in an ez path
---
 .gitignore                              |  3 +
 README.md                               |  5 ++
 kit.scd                                 | 12 ++++
 samples.csv                             | 78 +++++++++++++++++++++++++
 samples/.gitkeep                        |  0
 snippets-override/haskell-mode/.gitkeep |  0
 snippets/haskell-mode/.gitkeep          |  0
 sync-samples.php                        | 20 +++++++
 sync-snippets.php                       | 36 ++++++++++++
 9 files changed, 154 insertions(+)
 create mode 100644 .gitignore
 create mode 100644 README.md
 create mode 100644 kit.scd
 create mode 100644 samples.csv
 create mode 100644 samples/.gitkeep
 create mode 100644 snippets-override/haskell-mode/.gitkeep
 create mode 100644 snippets/haskell-mode/.gitkeep
 create mode 100755 sync-samples.php
 create mode 100755 sync-snippets.php

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..1f63780
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,3 @@
+/samples/
+/snippets/
+/snippets-override/
diff --git a/README.md b/README.md
new file mode 100644
index 0000000..93d105e
--- /dev/null
+++ b/README.md
@@ -0,0 +1,5 @@
+Emacs configuration must load snippets and optionally overrides:
+
+```
+(setq yas-snippet-dirs (append yas-snippet-dirs '("~/Documents/Music/Live/kit/snippets" "~/Documents/Music/Live/kit/snippets-override")))
+```
\ No newline at end of file
diff --git a/kit.scd b/kit.scd
new file mode 100644
index 0000000..6f07ab2
--- /dev/null
+++ b/kit.scd
@@ -0,0 +1,12 @@
+/*
+Anny's standard live performance kit
+*/
+
+include("SuperDirt")
+
+Server.local.options.device = "Soundflower (2ch)"
+SuperDirt.start(2, s, 4)
+
+~dirt.loadSoundFiles("samples/*".resolveRelative)
+
+~dirt.stop
diff --git a/samples.csv b/samples.csv
new file mode 100644
index 0000000..121c3ed
--- /dev/null
+++ b/samples.csv
@@ -0,0 +1,78 @@
+"Project","Project Path","Original Bank","New Bank"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","arpy","arpy"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","bass","bass"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","bass3","bass3"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","hand","hand"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","jvbass","jvbass"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","peri","peri"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","psr","psr"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","rm","rm"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","tacscan","tacscan"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","tok","tok"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","trump","trump"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","uxay","uxay"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","warbler","warbler"
+"Battery 1,2,3","/Users/Anny/Documents/Music/ez/battery-123","wobble","wobble"
+"Cuadrillion (Demo)","/Users/Anny/Documents/Music/ez/cuadrillion-demo","acb","acb"
+"Cuadrillion (Demo)","/Users/Anny/Documents/Music/ez/cuadrillion-demo","acg","acg"
+"Cuadrillion (Demo)","/Users/Anny/Documents/Music/ez/cuadrillion-demo","arpb","arpb"
+"Cuadrillion (Demo)","/Users/Anny/Documents/Music/ez/cuadrillion-demo","bleep","bleep"
+"Cuadrillion (Demo)","/Users/Anny/Documents/Music/ez/cuadrillion-demo","drum","cudrum"
+"Cuadrillion (Demo)","/Users/Anny/Documents/Music/ez/cuadrillion-demo","drum2","cudrum2"
+"Cuadrillion (Demo)","/Users/Anny/Documents/Music/ez/cuadrillion-demo","dg","dg"
+"Cuadrillion (Demo)","/Users/Anny/Documents/Music/ez/cuadrillion-demo","drbass","drbass"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","dorr","dorr"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","duck","duck"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","duon","duon"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","bass","hbass"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","bass2","hbass2"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","drum","hdrum"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","sn","hsn"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","icarus","icarus"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","kit","kit"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","nimble","nimble"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","sine","sine"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","snoo","snoo"
+"Haddeo (Remix)","/Users/Anny/Documents/Music/ez/haddeo-remix","tubal","tubal"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","cy","cy"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","eg","eg"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","gt","gt"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","hh","jhh"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","k","jk"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","sn","jsn"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","pc","pc"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","pclow","pclow"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","udu","udu"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","vb","vb"
+"Juliese","/Users/Anny/Documents/Music/ez/juliese","wb","wb"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","armora","armora"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","baa","baa"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","bd","bd"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","casio","casio"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","ho","ho"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","house","house"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","jungbass","jungbass"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","monsterb","monsterb"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","bass","pigbass"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","hh","pighh"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","rm","pigrm"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","sn","pigsn"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","wobble","pigwobble"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","print","print"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","qlatibro","qlatibro"
+"Pig's Nose EP","/Users/Anny/Documents/Music/ez/pigs-nose-ep","qspace","qspace"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","ant","ant"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","bz","bz"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","bzl","bzl"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","cymb","cymb"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","dubb","dubb"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","ff","ff"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","fly","fly"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","gnome","gnome"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","hh","hh"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","ice","ice"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","k","k"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","plode","plode"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","sn","sn"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","wt","wt"
+"Piston LP","/Users/Anny/Documents/Music/ez/piston-lp","wtsn","wtsn"
diff --git a/samples/.gitkeep b/samples/.gitkeep
new file mode 100644
index 0000000..e69de29
diff --git a/snippets-override/haskell-mode/.gitkeep b/snippets-override/haskell-mode/.gitkeep
new file mode 100644
index 0000000..e69de29
diff --git a/snippets/haskell-mode/.gitkeep b/snippets/haskell-mode/.gitkeep
new file mode 100644
index 0000000..e69de29
diff --git a/sync-samples.php b/sync-samples.php
new file mode 100755
index 0000000..34429e9
--- /dev/null
+++ b/sync-samples.php
@@ -0,0 +1,20 @@
+#!/usr/bin/env php
+<?php
+$here = __DIR__;
+
+array_map("unlink", glob("$here/samples/*"));
+
+$csv = fopen("$here/samples.csv", "r");
+$headings = fgetcsv($csv);
+
+while ($data = fgetcsv($csv)) {
+    $row = array_combine($headings, $data);
+    $from = $row["Sample Path"] . "/samples/" . $row["Original Bank"];
+    $to = "$here/samples/" . $row["New Bank"];
+    if (is_link($to)) {
+        throw new Exception("$to exists");
+    }
+    symlink($from, $to);
+}
+
+fclose($csv);
diff --git a/sync-snippets.php b/sync-snippets.php
new file mode 100755
index 0000000..b2525c4
--- /dev/null
+++ b/sync-snippets.php
@@ -0,0 +1,36 @@
+#!/usr/bin/env php
+<?php
+$here = __DIR__;
+
+array_map("unlink", glob("$here/snippets/haskell-mode/*"));
+
+$csv = fopen("$here/samples.csv", "r");
+$headings = fgetcsv($csv);
+
+$projects = [];
+
+while ($data = fgetcsv($csv)) {
+    $row = array_combine($headings, $data);
+    $projects[] = $row["Project Path"];
+}
+
+fclose($csv);
+
+$projects = array_unique($projects);
+
+foreach ($projects as $project) {
+    $snippetsDir = "$project/snippets";
+    if (is_dir($snippetsDir)) {
+        $files = glob("$snippetsDir/*");
+        foreach ($files as $file) {
+            $to = "$here/snippets/haskell-mode/" . basename($file);
+            if (is_link($to)) {
+                throw new Exception("$to exists");
+            }
+            symlink($file, $to);
+        }
+    }
+    else {
+        printf("WARNING: Snippets path %s not found", $snippetsDir);
+    }
+}
\ No newline at end of file