chris@160: /**
chris@160:  * Copyright (c) 2014, 2015, Enzien Audio Ltd.
chris@160:  *
chris@160:  * Permission to use, copy, modify, and/or distribute this software for any
chris@160:  * purpose with or without fee is hereby granted, provided that the above
chris@160:  * copyright notice and this permission notice appear in all copies.
chris@160:  *
chris@160:  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES WITH
chris@160:  * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
chris@160:  * AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT,
chris@160:  * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
chris@160:  * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
chris@160:  * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
chris@160:  * PERFORMANCE OF THIS SOFTWARE.
chris@160:  */
chris@160: 
chris@160: #include "ControlVar.h"
chris@160: 
chris@160: hv_size_t cVar_init_f(ControlVar *o, float k) {
chris@160:   o->e.type = FLOAT;
chris@160:   o->e.data.f = k;
chris@160:   return 0;
chris@160: }
chris@160: 
chris@160: hv_size_t cVar_init_s(ControlVar *o, const char *s) {
chris@160:   o->e.type = HASH;
chris@160:   o->e.data.h = msg_symbolToHash(s);
chris@160:   return 0;
chris@160: }
chris@160: 
chris@160: void cVar_free(ControlVar *o) {
chris@160:   // nothing to do
chris@160: }
chris@160: 
chris@160: void cVar_onMessage(HvBase *_c, ControlVar *o, int letIn, const HvMessage *const m,
chris@160:     void (*sendMessage)(HvBase *, int, const HvMessage *const)) {
chris@160:   switch (letIn) {
chris@160:     case 0: {
chris@160:       switch (msg_getType(m,0)) {
chris@160:         case BANG: {
chris@160:           HvMessage *n = HV_MESSAGE_ON_STACK(1);
chris@160:           if (o->e.type == FLOAT) msg_initWithFloat(n, msg_getTimestamp(m), o->e.data.f);
chris@160:           else if (o->e.type == HASH) msg_initWithHash(n, msg_getTimestamp(m), o->e.data.h);
chris@160:           else return;
chris@160:           sendMessage(_c, 0, n);
chris@160:           break;
chris@160:         }
chris@160:         case FLOAT: {
chris@160:           o->e.type = FLOAT;
chris@160:           o->e.data.f = msg_getFloat(m,0);
chris@160:           sendMessage(_c, 0, m);
chris@160:           break;
chris@160:         }
chris@160:         case SYMBOL:
chris@160:         case HASH: {
chris@160:           o->e.type = HASH;
chris@160:           o->e.data.h = msg_getHash(m,0);
chris@160:           sendMessage(_c, 0, m);
chris@160:           break;
chris@160:         }
chris@160:         default: return;
chris@160:       }
chris@160:       break;
chris@160:     }
chris@160:     case 1: {
chris@160:       switch (msg_getType(m,0)) {
chris@160:         case FLOAT: {
chris@160:           o->e.type = FLOAT;
chris@160:           o->e.data.f = msg_getFloat(m,0);
chris@160:           break;
chris@160:         }
chris@160:         case SYMBOL:
chris@160:         case HASH: {
chris@160:           o->e.type = HASH;
chris@160:           o->e.data.h = msg_getHash(m,0);
chris@160:           break;
chris@160:         }
chris@160:         default: break;
chris@160:       }
chris@160:     }
chris@160:     default: return;
chris@160:   }
chris@160: }