You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
103 lines
2.0 KiB
Python
103 lines
2.0 KiB
Python
FluidLabelSetExistsError : Exception{
|
|
}
|
|
|
|
FluidLabelSet : FluidManipulationClient {
|
|
|
|
var <id;
|
|
classvar serverCaches;
|
|
|
|
*initClass {
|
|
serverCaches = FluidServerCache.new;
|
|
}
|
|
|
|
*at{ |server, id|
|
|
^serverCaches.tryPerform(\at, server,id)
|
|
}
|
|
|
|
*new { |server,name|
|
|
serverCaches.at(server,name) !? {
|
|
FluidLabelSetExistsError("A FluidLabelSet called % already exists.".format(name)).throw;
|
|
};
|
|
^super.new(server,*FluidManipulationClient.prServerString(name))!?{|inst|inst.init(name);inst}
|
|
}
|
|
|
|
init { |name|
|
|
id = name;
|
|
this.cache;
|
|
}
|
|
|
|
cache {
|
|
serverCaches.initCache(server);
|
|
serverCaches.put(server,id,this);
|
|
}
|
|
|
|
asString {
|
|
^"FluidLabelSet(%)".format(id).asString;
|
|
}
|
|
|
|
asSymbol {
|
|
^id
|
|
}
|
|
|
|
|
|
|
|
*asUGenInput { |input|
|
|
var ascii = input.asString.ascii;
|
|
^[ascii.size].addAll(ascii)
|
|
}
|
|
|
|
addLabel{|id, label, action|
|
|
this.prSendMsg(\addLabel,[id.asString, label.asString],action);
|
|
}
|
|
|
|
updateLabel{|id, label, action|
|
|
this.prSendMsg(\updateLabel,[id.asString, label.asString],action);
|
|
}
|
|
|
|
|
|
getLabel{|id, action|
|
|
this.prSendMsg(\getLabel,[id.asString],action,[string(FluidMessageResponse,_,_)]);
|
|
}
|
|
|
|
deleteLabel{|id, action|
|
|
this.prSendMsg(\deleteLabel,[id.asString],action);
|
|
}
|
|
|
|
cols {|action|
|
|
action ?? {action = postit};
|
|
this.prSendMsg(\cols,[],action,[number(FluidMessageResponse,_,_)]);
|
|
}
|
|
|
|
read{|filename,action|
|
|
this.prSendMsg(\read,[filename.asString],action);
|
|
}
|
|
|
|
write{|filename,action|
|
|
this.prSendMsg(\write,[filename.asString],action);
|
|
}
|
|
|
|
size { |action|
|
|
action ?? {action = postit};
|
|
this.prSendMsg(\size,[],action,[number(FluidMessageResponse,_,_)]);
|
|
}
|
|
|
|
clear { |action|
|
|
this.prSendMsg(\clear,[],action);
|
|
}
|
|
|
|
free { |action|
|
|
serverCaches.remove(server,id);
|
|
super.free;
|
|
}
|
|
|
|
*freeAll { |server|
|
|
serverCaches.do(server,{|x|x.free;});
|
|
}
|
|
|
|
print { |action|
|
|
action ?? {action = postit};
|
|
this.prSendMsg(\print,[],action,[string(FluidMessageResponse,_,_)]);
|
|
}
|
|
|
|
}
|