1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
/*
* Copyright 2010,2011 Reality Jockey, Ltd.
* info@rjdj.me
* http://rjdj.me/
*
* This file is part of ZenGarden.
*
* ZenGarden is free software: you can redistribute it and/or modify
* it under the terms of the GNU Lesser General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* ZenGarden is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public License
* along with ZenGarden. If not, see <http://www.gnu.org/licenses/>.
*
*/
#include <string.h>
#include "MessageListSplit.h"
MessageListSplit::MessageListSplit(pd::Message *init_message, PdGraph *graph) : message::Object(2, 3, graph) {
splitIndex = init_message->is_float(0) ? (int) init_message->get_float(0) : 0;
}
MessageListSplit::~MessageListSplit() {
// nothing to do
}
void MessageListSplit::process_message(int inlet_index, pd::Message *message) {
switch (inlet_index) {
case 0: {
int numElements = message->get_num_elements();
if (numElements <= splitIndex) {
// if there aren't enough elements to split on, forward the message on the third outlet
send_message(2, message);
} else {
int numElems = numElements-splitIndex;
pd::Message *outgoing_message = PD_MESSAGE_ON_STACK(numElems);
outgoing_message->from_timestamp(message->get_timestamp(), numElems);
memcpy(outgoing_message->get_element(0), message->get_element(splitIndex), numElems * sizeof(pd::message::Atom));
send_message(1, outgoing_message);
outgoing_message = PD_MESSAGE_ON_STACK(splitIndex);
outgoing_message->from_timestamp(message->get_timestamp(), splitIndex);
memcpy(outgoing_message->get_element(0), message->get_element(0), splitIndex * sizeof(pd::message::Atom));
send_message(0, outgoing_message);
}
break;
}
case 1: {
if (message->is_float(0)) {
// split index may not be negative
splitIndex = (message->get_float(0) < 0.0f) ? 0 : (int) message->get_float(0);
}
break;
}
default: {
break;
}
}
}