Merge pull request #184 from tremblap/feature/add-kr-to-dataset-and-datasetquery

first iteration of datasetread

Author: tremblap

release-packaging/Classes/FluidDataSet.sc

@@ -101,7 +101,7 @@ FluidDataSet : FluidDataObject
 		actions[\getIds] = [nil,action];
 		this.prSendMsg(this.getIdsMsg(labelSet));
 	}
-	
+
 	kNearestMsg{|buffer,k|
 	^this.prMakeMsg(\kNearest,id, this.prEncodeBuffer(buffer),k);
 	}
@@ -119,4 +119,23 @@ FluidDataSet : FluidDataObject
 		actions[\kNearestDist] = [numbers(FluidMessageResponse,_,nil,_),action];
 		this.prSendMsg(this.kNearestDistMsg(buffer,k));
 	}
+
+	kr{|trig, inputBuffer, outputBuffer, numNeighbours, lookupDataSet|
+		^FluidDataSetRead.kr(trig,
+			this, numNeighbours??{this.numNeighbours}, lookupDataSet.asUGenInput,
+			inputBuffer,outputBuffer);
+	}
+}
+
+FluidDataSetRead : FluidRTMultiOutUGen
+{
+	*kr{ |trig, ds, numNeighbours, lookupDataSet, inputBuffer, outputBuffer |
+		^this.multiNew('control', trig, ds.asUGenInput, numNeighbours, lookupDataSet!?(_.asUGenInput)??{-1}, inputBuffer.asUGenInput, outputBuffer.asUGenInput)
+	}
+
+	init { arg ... theInputs;
+		inputs = theInputs;
+		^this.initOutputs(1, rate);
+	}
+
 }

scripts/settings/FluidManipulation.cpp.in

@@ -1,3 +1,4 @@
+  makeSCWrapper<RTDataSetReadClient>("FluidDataSetRead",inTable);
   makeSCWrapper<RTKDTreeQueryClient>("FluidKDTreeQuery",inTable);
   makeSCWrapper<RTKMeansQueryClient>("FluidKMeansQuery",inTable);
   makeSCWrapper<RTSKMeansQueryClient>("FluidSKMeansQuery",inTable);