Sampled Instrument Player with static and monolithic design. All instruments are built-in.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 

133 lines
4.3 KiB

/*
Calf Box, an open source musical instrument.
Copyright (C) 2010-2011 Krzysztof Foltman
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
This program 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 General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
#include "config.h"
#include "config-api.h"
#include "dspmath.h"
#include "module.h"
#include "onepole-float.h"
#include <glib.h>
#include <malloc.h>
#include <math.h>
#include <memory.h>
#include <sndfile.h>
#include <stdio.h>
#include <stdlib.h>
#define MODULE_PARAMS tone_control_params
struct tone_control_params
{
float lowpass, highpass;
};
struct tone_control_module
{
struct cbox_module module;
struct tone_control_params *params, *old_params;
struct cbox_onepolef_coeffs lowpass_coeffs, highpass_coeffs;
struct cbox_onepolef_state lowpass_state[2], highpass_state[2];
float tpdsr; // 2 pi / sr
};
gboolean tone_control_process_cmd(struct cbox_command_target *ct, struct cbox_command_target *fb, struct cbox_osc_command *cmd, GError **error)
{
struct tone_control_module *m = (struct tone_control_module *)ct->user_data;
EFFECT_PARAM("/lowpass", "f", lowpass, double, , 5, 20000) else
EFFECT_PARAM("/highpass", "f", highpass, double, , 5, 20000) else
if (!strcmp(cmd->command, "/status") && !strcmp(cmd->arg_types, ""))
{
if (!cbox_check_fb_channel(fb, cmd->command, error))
return FALSE;
return cbox_execute_on(fb, NULL, "/lowpass", "f", error, m->params->lowpass)
&& cbox_execute_on(fb, NULL, "/highpass", "f", error, m->params->highpass)
&& CBOX_OBJECT_DEFAULT_STATUS(&m->module, fb, error)
;
}
else
return cbox_object_default_process_cmd(ct, fb, cmd, error);
return TRUE;
}
void tone_control_process_event(struct cbox_module *module, const uint8_t *data, uint32_t len)
{
// struct tone_control_module *m = (struct tone_control_module *)module;
}
void tone_control_process_block(struct cbox_module *module, cbox_sample_t **inputs, cbox_sample_t **outputs)
{
struct tone_control_module *m = (struct tone_control_module *)module;
if (m->params != m->old_params)
{
cbox_onepolef_set_lowpass(&m->lowpass_coeffs, m->params->lowpass * m->tpdsr);
cbox_onepolef_set_highpass(&m->highpass_coeffs, m->params->highpass * m->tpdsr);
m->old_params = m->params;
}
cbox_onepolef_process_to(&m->lowpass_state[0], &m->lowpass_coeffs, inputs[0], outputs[0]);
cbox_onepolef_process_to(&m->lowpass_state[1], &m->lowpass_coeffs, inputs[1], outputs[1]);
cbox_onepolef_process(&m->highpass_state[0], &m->highpass_coeffs, outputs[0]);
cbox_onepolef_process(&m->highpass_state[1], &m->highpass_coeffs, outputs[1]);
}
MODULE_SIMPLE_DESTROY_FUNCTION(tone_control)
MODULE_CREATE_FUNCTION(tone_control)
{
static int inited = 0;
if (!inited)
{
inited = 1;
}
struct tone_control_module *m = malloc(sizeof(struct tone_control_module));
CALL_MODULE_INIT(m, 2, 2, tone_control);
m->module.process_event = tone_control_process_event;
m->module.process_block = tone_control_process_block;
m->tpdsr = 2 * M_PI * m->module.srate_inv;
m->old_params = NULL;
m->params = malloc(sizeof(struct tone_control_params));
m->params->lowpass = cbox_config_get_float(cfg_section, "lowpass", 8000.f);
m->params->highpass = cbox_config_get_float(cfg_section, "highpass", 75.f);
cbox_onepolef_reset(&m->lowpass_state[0]);
cbox_onepolef_reset(&m->lowpass_state[1]);
cbox_onepolef_reset(&m->highpass_state[0]);
cbox_onepolef_reset(&m->highpass_state[1]);
return &m->module;
}
struct cbox_module_keyrange_metadata tone_control_keyranges[] = {
};
struct cbox_module_livecontroller_metadata tone_control_controllers[] = {
};
DEFINE_MODULE(tone_control, 2, 2)