view projects/heavy/hello-world/ControlRandom.c @ 160:5bcf04234f80 heavy-updated

- added -std=c99 to Makefile for user-supplied C files (required for heavy files) - changed heavy core render.cpp file to use latest API and removed all redundant functions (e.g. foleyDesigner/touchkey stuff) - use build_pd.sh to compile and run pd files (-h for usage instructions)
author chnrx <chris.heinrichs@gmail.com>
date Thu, 05 Nov 2015 18:58:26 +0000
parents
children
line wrap: on
line source
/**
 * Copyright (c) 2014, 2015, Enzien Audio Ltd.
 *
 * Permission to use, copy, modify, and/or distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES WITH
 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
 * AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT,
 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
 * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
 * PERFORMANCE OF THIS SOFTWARE.
 */

#include "ControlRandom.h"
#include "HvBase.h"

// http://www.firstpr.com.au/dsp/rand31
// http://en.wikipedia.org/wiki/Lehmer_random_number_generator

hv_size_t cRandom_init(ControlRandom *o, int seed) {
  o->state = (seed != 0) ? seed : 1;
  return 0;
}

void cRandom_onMessage(HvBase *_c, ControlRandom *o, int inletIndex, const HvMessage *m,
    void (*sendMessage)(HvBase *, int, const HvMessage *)) {
  switch (inletIndex) {
    case 0: {
      HvMessage *n = HV_MESSAGE_ON_STACK(1);
      o->state = (int) ((((unsigned long long) o->state) * 279470273UL) % 4294967291UL);
      float f = ((float) (o->state >> 9)) * 0.00000011920929f;
      msg_initWithFloat(n, msg_getTimestamp(m), f);
      sendMessage(_c, 0, n);
      break;
    }
    case 1: {
      if (msg_isFloat(m,0)) {
        o->state = (int) msg_getFloat(m,0);
      }
      break;
    }
    default: break;
  }
}