Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

make .plotTree a single instance window and add ServerTreeView #6294

Open
wants to merge 11 commits into
base: develop
Choose a base branch
from
+308 −188
Open

make .plotTree a single instance window and add ServerTreeView #6294

Changes from 1 commit
Commits
Show all changes
11 commits
Select commit Hold shift + click to select a range
d1ff5b0
make `.plotTree' a single instance window
prko May 5, 2024
b2d0250
add new class ServerTreeView and SCDoc
prko May 5, 2024
cdce95f
Update ServerTreeView.schelp
prko May 6, 2024
1bc7706
some fix
prko May 6, 2024
fd87c6a
Update ServerPlusGUI.sc
prko May 7, 2024
0325b39
Update ServerPlusGUI.sc
prko May 8, 2024
6193918
s.plotTree behaviour change
prko May 9, 2024
0c4c516
Update ServerPlusGUI.sc
prko May 19, 2024
2342bb2
Update ServerPlusGUI.sc
prko May 20, 2024
7fd8e86
Update ServerPlusGUI.sc
prko May 20, 2024
44941da
Update ServerPlusGUI.sc
prko May 20, 2024
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Jump to
Jump to file
Failed to load files.
Diff view
Diff view
324 changes: 159 additions & 165 deletions SCClassLibrary/Common/GUI/PlusGUI/Control/ServerPlusGUI.sc
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,17 +1,165 @@
ServerTreeView {
prko marked this conversation as resolved.
Show resolved Hide resolved
var <window;
*new { |aServer, bounds=(Rect(128, 64, 400, 400)), interval=0.5|
var onClose, window;
var aServerTreeView, window;
window = Window.new(name.asString, bounds, scroll:true).front;
onClose = aServer.plotTreeView(interval, window.view, { defer {window.close}; });
window.onClose = {
onClose.value;
};
aServerTreeView = ServerTreeView.plotTreeView(aServer, interval, window, { defer { window.close } });
prko marked this conversation as resolved.
Show resolved Hide resolved
window.view.hasHorizontalScroller_(false).background_(Color.grey(0.9));
^super.newCopyArgs(window, onClose)
^super.newCopyArgs(window, aServerTreeView)
}

close { window.close }

*plotTreeView { |aServer, interval=0.5, parent, actionIfFail|
var resp, done = false;
var collectChildren, levels, countSize;
var view, bounds;
var updater, updateFunc;
var tabSize = 25;
var pen, font;

pen = GUI.current.pen;
font = Font.sansSerif(10);

view = UserView.new(parent, Rect(0,0,400,400));

view.drawFunc = {
var xtabs = 0, ytabs = 0, drawFunc;

drawFunc = {|group|
prko marked this conversation as resolved.
Show resolved Hide resolved
var thisSize, rect, endYTabs;
xtabs = xtabs + 1;
ytabs = ytabs + 1;
pen.font = font;
group.do({|node|
if(node.value.isArray, {
thisSize = countSize.value(node);
endYTabs = ytabs + thisSize + 0.2;
rect = Rect(xtabs * tabSize + 0.5,
ytabs * tabSize + 0.5,
parent.bounds.width - (xtabs * tabSize * 2),
thisSize * tabSize;
);
pen.fillColor = Color.grey(0.8);
pen.fillRect(rect);
pen.strokeRect(rect);
pen.color = Color.black;
pen.stringInRect(
" Group" + node.key.asString +
(node.key == 1).if("- default group", ""),
rect
);
drawFunc.value(node.value);
ytabs = endYTabs;
},{
rect = Rect(xtabs * tabSize + 0.5,
ytabs * tabSize + 0.5,
7 * tabSize,
0.8 * tabSize
);
pen.fillColor = Color.white;
pen.fillRect(rect);
pen.strokeRect(rect);
pen.color = Color.black;
pen.stringInRect(
" " ++ node.key.asString + node.value.asString,
rect
);
ytabs = ytabs + 1;
});
});
xtabs = xtabs - 1;
};
drawFunc.value(levels);
};

// msg[1] controls included
// msg[2] nodeID of queried group
// initial number of children
resp = OSCFunc({ arg msg;
var finalEvent;
var i = 2, j, controls, printControls = false, dumpFunc;
if(msg[1] != 0, {printControls = true});
dumpFunc = {|numChildren|
var event, children;
event = ().group;
event.id = msg[i];
event.instrument = nil; // need to know it's a group
i = i + 2;
children = Array.fill(numChildren, {
var id, child;
// i = id
// i + 1 = numChildren
// i + 2 = def (if synth)
id = msg[i];
if(msg[i+1] >=0, {
child = dumpFunc.value(msg[i+1]);
}, {
j = 4;
child = ().synth.instrument_(msg[i+2]);
if(printControls, {
controls = ();
msg[i+3].do({
controls[msg[i + j]] = msg[i + j + 1];
j = j + 2;
});
child.controls = controls;
i = i + 4 + (2 * controls.size);
}, {i = i + 3 });
});
child.id = id;
});
event.children = children;
event;
};
finalEvent = dumpFunc.value(msg[3]);
done = true;
collectChildren = {|group|
group.children.collect({|child|
if(child.children.notNil,{
child.id -> collectChildren.value(child);
}, {
child.id -> child.instrument;
});
});
};
levels = collectChildren.value(finalEvent);
countSize = {|array|
var size = 0;
array.do({|elem|
if(elem.value.isArray, { size = size + countSize.value(elem.value) + 2}, {size = size + 1;});
});
size
};
defer {
view.bounds = Rect(0, 0, 400, max(400, tabSize * (countSize.value(levels) + 2)));
view.refresh;
}
}, '/g_queryTree.reply', aServer.addr).fix;

updateFunc = {
updater = fork {
loop {
aServer.sendMsg("/g_queryTree", 0, 0);
interval.wait;
}
}
};
updateFunc.value;
CmdPeriod.add(updateFunc);
SystemClock.sched(3, {
if(done.not, {
actionIfFail.value();
"Server failed to respond to Group:queryTree!".warn;
});
});
//action to be executed when enclosing window closes
^{
updater.stop;
CmdPeriod.remove(updateFunc);
resp.free;
}
}
}

+ Server {
Expand Down Expand Up @@ -377,171 +525,17 @@ ServerTreeView {
}

plotTree { |interval=0.5|
var onClose;
if(plotTreeWindow.isNil) {
plotTreeWindow = Window.new(name.asString + "Node Tree",
Rect(128, 64, 400, 400),
scroll:true
);
plotTreeWindow.view.hasHorizontalScroller_(false).background_(Color.grey(0.9)).front
plotTreeWindow = ServerTreeView.new(this)
prko marked this conversation as resolved.
Show resolved Hide resolved
} {
plotTreeWindow.front;
plotTreeWindow.window.front;
};
onClose = this.plotTreeView(interval, plotTreeWindow.view, { defer { plotTreeWindow.close } });
plotTreeWindow.onClose = {
onClose.value;
plotTreeWindow.window.onClose = {
plotTreeWindow = nil
};
}

plotTreeView {|interval=0.5, parent, actionIfFail|
var resp, done = false;
var collectChildren, levels, countSize;
var view, bounds;
var updater, updateFunc;
var tabSize = 25;
var pen, font;

pen = GUI.current.pen;
font = Font.sansSerif(10);

view = UserView.new(parent, Rect(0,0,400,400));

view.drawFunc = {
var xtabs = 0, ytabs = 0, drawFunc;

drawFunc = {|group|
var thisSize, rect, endYTabs;
xtabs = xtabs + 1;
ytabs = ytabs + 1;
pen.font = font;
group.do({|node|
if(node.value.isArray, {
thisSize = countSize.value(node);
endYTabs = ytabs + thisSize + 0.2;
rect = Rect(xtabs * tabSize + 0.5,
ytabs * tabSize + 0.5,
parent.bounds.width - (xtabs * tabSize * 2),
thisSize * tabSize;
);
pen.fillColor = Color.grey(0.8);
pen.fillRect(rect);
pen.strokeRect(rect);
pen.color = Color.black;
pen.stringInRect(
" Group" + node.key.asString +
(node.key == 1).if("- default group", ""),
rect
);
drawFunc.value(node.value);
ytabs = endYTabs;
},{
rect = Rect(xtabs * tabSize + 0.5,
ytabs * tabSize + 0.5,
7 * tabSize,
0.8 * tabSize
);
pen.fillColor = Color.white;
pen.fillRect(rect);
pen.strokeRect(rect);
pen.color = Color.black;
pen.stringInRect(
" " ++ node.key.asString + node.value.asString,
rect
);
ytabs = ytabs + 1;
});
});
xtabs = xtabs - 1;
};
drawFunc.value(levels);
};

// msg[1] controls included
// msg[2] nodeID of queried group
// initial number of children
resp = OSCFunc({ arg msg;
var finalEvent;
var i = 2, j, controls, printControls = false, dumpFunc;
if(msg[1] != 0, {printControls = true});
dumpFunc = {|numChildren|
var event, children;
event = ().group;
event.id = msg[i];
event.instrument = nil; // need to know it's a group
i = i + 2;
children = Array.fill(numChildren, {
var id, child;
// i = id
// i + 1 = numChildren
// i + 2 = def (if synth)
id = msg[i];
if(msg[i+1] >=0, {
child = dumpFunc.value(msg[i+1]);
}, {
j = 4;
child = ().synth.instrument_(msg[i+2]);
if(printControls, {
controls = ();
msg[i+3].do({
controls[msg[i + j]] = msg[i + j + 1];
j = j + 2;
});
child.controls = controls;
i = i + 4 + (2 * controls.size);
}, {i = i + 3 });
});
child.id = id;
});
event.children = children;
event;
};
finalEvent = dumpFunc.value(msg[3]);
done = true;
collectChildren = {|group|
group.children.collect({|child|
if(child.children.notNil,{
child.id -> collectChildren.value(child);
}, {
child.id -> child.instrument;
});
});
};
levels = collectChildren.value(finalEvent);
countSize = {|array|
var size = 0;
array.do({|elem|
if(elem.value.isArray, { size = size + countSize.value(elem.value) + 2}, {size = size + 1;});
});
size
};
defer {
view.bounds = Rect(0, 0, 400, max(400, tabSize * (countSize.value(levels) + 2)));
view.refresh;
}
}, '/g_queryTree.reply', addr).fix;

updateFunc = {
updater = fork {
loop {
this.sendMsg("/g_queryTree", 0, 0);
interval.wait;
}
}
};
updateFunc.value;
CmdPeriod.add(updateFunc);
SystemClock.sched(3, {
if(done.not, {
actionIfFail.value();
"Server failed to respond to Group:queryTree!".warn;
});
});
//action to be executed when enclosing window closes
^{
updater.stop;
CmdPeriod.remove(updateFunc);
resp.free;
}
ServerTreeView.plotTreeView(this, interval, parent, actionIfFail);
}
}
}