chris@163
|
1 /**
|
chris@163
|
2 * Copyright (c) 2014, 2015, Enzien Audio Ltd.
|
chris@163
|
3 *
|
chris@163
|
4 * Permission to use, copy, modify, and/or distribute this software for any
|
chris@163
|
5 * purpose with or without fee is hereby granted, provided that the above
|
chris@163
|
6 * copyright notice and this permission notice appear in all copies.
|
chris@163
|
7 *
|
chris@163
|
8 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES WITH
|
chris@163
|
9 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
|
chris@163
|
10 * AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT,
|
chris@163
|
11 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
|
chris@163
|
12 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
|
chris@163
|
13 * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
|
chris@163
|
14 * PERFORMANCE OF THIS SOFTWARE.
|
chris@163
|
15 */
|
chris@163
|
16
|
chris@163
|
17 #include "SignalTabwrite.h"
|
chris@163
|
18
|
chris@163
|
19 hv_size_t sTabwrite_init(SignalTabwrite *o, HvTable *table) {
|
chris@163
|
20 o->table = table;
|
chris@163
|
21 o->head = 0;
|
chris@163
|
22 return 0;
|
chris@163
|
23 }
|
chris@163
|
24
|
chris@163
|
25 void sTabwrite_onMessage(HvBase *_c, SignalTabwrite *o, int letIn, const HvMessage *const m,
|
chris@163
|
26 void (*sendMessage)(HvBase *, int, const HvMessage *const)) {
|
chris@163
|
27 switch (letIn) {
|
chris@163
|
28 // inlet 0 is the signal inlet
|
chris@163
|
29 case 1: {
|
chris@163
|
30 switch (msg_getType(m,0)) {
|
chris@163
|
31 case BANG: o->head = 0; break;
|
chris@163
|
32 case FLOAT: {
|
chris@163
|
33 o->head = (msg_getFloat(m,0) >= 0.0f) ? (hv_uint32_t) msg_getFloat(m,0) : HV_TABWRITE_STOPPED;
|
chris@163
|
34 break;
|
chris@163
|
35 }
|
chris@163
|
36 case SYMBOL: {
|
chris@163
|
37 if (msg_compareSymbol(m, 0, "stop")) {
|
chris@163
|
38 o->head = HV_TABWRITE_STOPPED;
|
chris@163
|
39 }
|
chris@163
|
40 break;
|
chris@163
|
41 }
|
chris@163
|
42 default: break;
|
chris@163
|
43 }
|
chris@163
|
44 break;
|
chris@163
|
45 }
|
chris@163
|
46 case 2: {
|
chris@163
|
47 if (msg_isHashLike(m,0)) {
|
chris@163
|
48 o->table = ctx_getTableForHash(_c, msg_getHash(m,0));
|
chris@163
|
49 }
|
chris@163
|
50 break;
|
chris@163
|
51 }
|
chris@163
|
52 default: break;
|
chris@163
|
53 }
|
chris@163
|
54 }
|