chris
/
nymph
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Compare commits

base: chris:9b33bf10bf254c52cef8918a495fc3e8aa7901f3
Branches Tags
chris:master
chris:feat/dynsmoothing
..
compare: chris:0a7c8c1730734bee7f1594150552fc502815112d
Branches Tags
chris:master
chris:feat/dynsmoothing

No commits in common. "9b33bf10bf254c52cef8918a495fc3e8aa7901f3" and "0a7c8c1730734bee7f1594150552fc502815112d" have entirely different histories.
9b33bf10bf ... 0a7c8c1730

5 changed files with 58 additions and 281 deletions
Show Stats Expand all files Collapse all files

2
README.md
View File

@ -84,7 +84,7 @@ below.
See the definition of the `build_ex` task in the See the definition of the `build_ex` task in the
[nymph.nimble](./nymph.nimble#L67) file on how to create a nimble task [nymph.nimble](./nymph.nimble#L67) file on how to create a nimble task
to simplify compilation and additional compiler args you might want to use. to simplify compilation.
## Dependencies ## Dependencies

200
examples/faustlpf.h
View File

@ -1,200 +0,0 @@
#ifndef __faustlpf_H__
#define __faustlpf_H__
#ifndef FAUSTFLOAT
#define FAUSTFLOAT float
#endif
#ifndef FAUSTCLASS
#define FAUSTCLASS faustlpf
#endif
#if defined(_WIN32)
#define RESTRICT __restrict
#else
#define RESTRICT __restrict__
#endif
#include <stdbool.h>
#include <stdint.h>
#include "faust/gui/CInterface.h"
typedef struct {
int fSampleRate;
float fConst0;
float fConst1;
float fConst2;
FAUSTFLOAT fHslider0;
float fRec1_perm[4];
float fConst3;
float fRec0_perm[4];
} faustlpf;
faustlpf* newfaustlpf();
void deletefaustlpf(faustlpf* dsp);
void metadatafaustlpf(MetaGlue* m);
int getSampleRatefaustlpf(faustlpf* RESTRICT dsp);
int getNumInputsfaustlpf(faustlpf* RESTRICT dsp);
int getNumOutputsfaustlpf(faustlpf* RESTRICT dsp);
void classInitfaustlpf(int sample_rate);
void instanceResetUserInterfacefaustlpf(faustlpf* dsp);
void instanceClearfaustlpf(faustlpf* dsp);
void instanceConstantsfaustlpf(faustlpf* dsp, int sample_rate);
void instanceInitfaustlpf(faustlpf* dsp, int sample_rate);
void initfaustlpf(faustlpf* dsp, int sample_rate);
void buildUserInterfacefaustlpf(faustlpf* dsp, UIGlue* ui_interface);
void computefaustlpf(faustlpf* dsp, int count, FAUSTFLOAT** RESTRICT inputs, FAUSTFLOAT** RESTRICT outputs);
int parameter_group(unsigned index) {
switch (index) {
case 0:
return 0;
default:
return -1;
}
}
const char *parameter_label(unsigned index) {
switch (index) {
case 0:
return "Cutoff";
default:
return 0;
}
}
const char *parameter_short_label(unsigned index) {
switch (index) {
case 0:
return "Cutoff";
default:
return 0;
}
}
const char *parameter_style(unsigned index) {
switch (index) {
case 0: {
return "knob";
}
default:
return "";
}
}
const char *parameter_symbol(unsigned index) {
switch (index) {
case 0:
return "cutoff";
default:
return "";
}
}
const char *parameter_unit(unsigned index) {
switch (index) {
case 0:
return "Hz";
default:
return 0;
}
}
bool parameter_is_trigger(unsigned index) {
switch (index) {
default:
return false;
}
}
bool parameter_is_boolean(unsigned index) {
switch (index) {
default:
return false;
}
}
bool parameter_is_enum(unsigned index) {
switch (index) {
default:
return false;
}
}
bool parameter_is_integer(unsigned index) {
switch (index) {
default:
return false;
}
}
bool parameter_is_logarithmic(unsigned index) {
switch (index) {
case 0:
return true;
default:
return false;
}
}
float get_parameter(faustlpf* dsp, unsigned index) {
switch (index) {
case 0:
return dsp->fHslider0;
default:
(void)dsp;
return 0.0;
}
}
void set_parameter(faustlpf* dsp, unsigned index, float value) {
switch (index) {
case 0:
dsp->fHslider0 = value;
break;
default:
(void)dsp;
(void)value;
break;
}
}
float get_cutoff(faustlpf* dsp) {
return dsp->fHslider0;
}
void set_cutoff(faustlpf* dsp, float value) {
dsp->fHslider0 = value;
}
#endif /* __faustlpf_H__ */

33
examples/faustlpf.nim
View File

@ -1,33 +0,0 @@
{.compile: "faustlpf.c".}
type
faustlpf* = object
SampleBuffer* = UncheckedArray[cfloat]
proc newfaustlpf*(): ptr faustlpf {.importc.}
proc deletefaustlpf*(dsp: ptr faustlpf) {.importc.}
proc initfaustlpf*(dsp: ptr faustlpf, sample_rate: cint) {.importc.}
proc instanceClearfaustlpf*(dsp: ptr faustlpf) {.importc.}
proc computefaustlpf*(dsp: ptr faustlpf, count: cint, inputs, outputs: ptr ptr SampleBuffer) {.importc.}
proc parameter_group*(index: cuint): cint {.importc}
proc parameter_is_boolean*(index: cuint): bool {.importc}
proc parameter_is_enum*(index: cuint): bool {.importc}
proc parameter_is_integer*(index: cuint): bool {.importc}
proc parameter_is_logarithmic*(index: cuint): bool {.importc}
proc parameter_is_trigger*(index: cuint): bool {.importc}
proc parameter_label*(index: cuint): cstring {.importc}
proc parameter_short_label*(index: cuint): cstring {.importc}
proc parameter_style*(index: cuint): cstring {.importc}
proc parameter_symbol*(index: cuint): cstring {.importc}
proc parameter_unit*(index: cuint): cstring {.importc}
proc get_parameter*(dsp: ptr faustlpf, index: cuint): cfloat {.importc}
proc set_parameter*(dsp: ptr faustlpf, index: cuint, value: cfloat) {.importc}
proc get_cutoff*(dsp: ptr faustlpf): cfloat {.importc}
proc set_cutoff*(dsp: ptr faustlpf, value: cfloat) {.importc}

20
examples/faustlpf_plugin.nim
View File

@ -1,21 +1,37 @@
## A FAUST standard library 2-pole lowpass filter LV2 plugin ## A FAUST standard library 2-pole lowpass filter LV2 plugin
import nymph import nymph
import faustlpf
{.emit: """#include "lpf.h"""".}
const const
PluginUri = "urn:nymph:examples:faustlpf" PluginUri = "urn:nymph:examples:faustlpf"
type type
faustlpf {.importc, header: "lpf.h".} = object
# struct field representing the value of the FAUST UI element,
# which controls the filter cutoff frequency
fHslider0: cfloat
PluginPort {.pure.} = enum PluginPort {.pure.} = enum
Input, Output, Frequency Input, Output, Frequency
SampleBuffer = UncheckedArray[cfloat]
FaustLPFPlugin = object FaustLPFPlugin = object
input: ptr SampleBuffer input: ptr SampleBuffer
output: ptr SampleBuffer output: ptr SampleBuffer
freq: ptr cfloat freq: ptr cfloat
flt: ptr faustlpf flt: ptr faustlpf
# wrap only those functions from the C code, which we actually need
proc newfaustlpf(): ptr faustlpf {.importc.}
proc deletefaustlpf(dsp: ptr faustlpf) {.importc.}
proc initfaustlpf(dsp: ptr faustlpf, sample_rate: cint) {.importc.}
proc instanceClearfaustlpf(dsp: ptr faustlpf) {.importc.}
proc computefaustlpf(dsp: ptr faustlpf, count: cint, inputs, outputs: ptr ptr SampleBuffer) {.importc.}
proc NimMain() {.cdecl, importc.} proc NimMain() {.cdecl, importc.}
@ -50,7 +66,7 @@ proc activate(instance: Lv2Handle) {.cdecl.} =
proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} = proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
let plug = cast[ptr FaustLPFPlugin](instance) let plug = cast[ptr FaustLPFPlugin](instance)
set_cutoff(plug.flt, plug.freq[]) plug.flt.fHslider0 = plug.freq[]
computefaustlpf(plug.flt, nSamples.cint, addr plug.input, addr plug.output) computefaustlpf(plug.flt, nSamples.cint, addr plug.input, addr plug.output)

80
examples/faustlpf.c → examples/lpf.h
View File

@ -1,38 +1,31 @@
/* ------------------------------------------------------------
author: "Christopher Arndt"
copyright: "Christopher Arndt, 2024"
license: "MIT"
name: "FaustLPF"
version: "0.1.0"
Code generated with Faust 2.74.6 (https://faust.grame.fr)
Compilation options: -a ./examples/minarch.h -lang c -rui -ct 1 -fm def -cn faustlpf -es 1 -mcd 16 -mdd 1024 -mdy 33 -single -ftz 0 -vec -lv 0 -vs 32
------------------------------------------------------------ */
//------------------------------------------------------------------------------ #ifndef __faustlpf_H__
// This file was generated using the Faust compiler (https://faust.grame.fr), #define __faustlpf_H__
// and the Faust post-processor (https://github.com/SpotlightKid/faustpp).
// /******************* BEGIN minarch.h ****************/
// Source: lpf.dsp
// Name: FaustLPF /************************************************************************
// Author: Christopher Arndt FAUST Architecture File for generating a very minimal C interface
// Copyright: Christopher Arndt, 2024 ************************************************************************/
// License: MIT
// Version: 0.1.0 #include "faust/gui/CInterface.h"
// FAUST version: 2.75.10
// FAUST compilation options: -a /home/chris/tmp/tmp9v2ck7tz.c -lang c -rui -ct 1 -fm def -cn faustlpf -es 1 -mcd 16 -mdd 1024 -mdy 33 -single -ftz 0 -vec -lv 0 -vs 32 /******************************************************************************
//------------------------------------------------------------------------------ VECTOR INTRINSICS
*******************************************************************************/
/**************************BEGIN USER SECTION **************************/
#include "faustlpf.h"
//------------------------------------------------------------------------------
// Begin the Faust code section
#if defined(__GNUC__)
# pragma GCC diagnostic push
# pragma GCC diagnostic ignored "-Wunused-parameter"
#endif
// START INTRINSICS
// END INTRINSICS
// START CLASS CODE
#ifndef FAUSTFLOAT #ifndef FAUSTFLOAT
#define FAUSTFLOAT float #define FAUSTFLOAT float
#endif #endif
@ -66,7 +59,16 @@ static float faustlpf_faustpower2_f(float value) {
#define exp10 __exp10 #define exp10 __exp10
#endif #endif
typedef struct {
int fSampleRate;
float fConst0;
float fConst1;
float fConst2;
FAUSTFLOAT fHslider0;
float fRec1_perm[4];
float fConst3;
float fRec0_perm[4];
} faustlpf;
faustlpf* newfaustlpf() { faustlpf* newfaustlpf() {
faustlpf* dsp = (faustlpf*)calloc(1, sizeof(faustlpf)); faustlpf* dsp = (faustlpf*)calloc(1, sizeof(faustlpf));
@ -79,7 +81,7 @@ void deletefaustlpf(faustlpf* dsp) {
void metadatafaustlpf(MetaGlue* m) { void metadatafaustlpf(MetaGlue* m) {
m->declare(m->metaInterface, "author", "Christopher Arndt"); m->declare(m->metaInterface, "author", "Christopher Arndt");
m->declare(m->metaInterface, "compile_options", "-a /home/chris/tmp/tmp9v2ck7tz.c -lang c -rui -ct 1 -fm def -cn faustlpf -es 1 -mcd 16 -mdd 1024 -mdy 33 -single -ftz 0 -vec -lv 0 -vs 32"); m->declare(m->metaInterface, "compile_options", "-a ./examples/minarch.h -lang c -rui -ct 1 -fm def -cn faustlpf -es 1 -mcd 16 -mdd 1024 -mdy 33 -single -ftz 0 -vec -lv 0 -vs 32");
m->declare(m->metaInterface, "copyright", "Christopher Arndt, 2024"); m->declare(m->metaInterface, "copyright", "Christopher Arndt, 2024");
m->declare(m->metaInterface, "filename", "lpf.dsp"); m->declare(m->metaInterface, "filename", "lpf.dsp");
m->declare(m->metaInterface, "filters.lib/fir:author", "Julius O. Smith III"); m->declare(m->metaInterface, "filters.lib/fir:author", "Julius O. Smith III");
@ -111,7 +113,7 @@ void metadatafaustlpf(MetaGlue* m) {
m->declare(m->metaInterface, "platform.lib/name", "Generic Platform Library"); m->declare(m->metaInterface, "platform.lib/name", "Generic Platform Library");
m->declare(m->metaInterface, "platform.lib/version", "1.3.0"); m->declare(m->metaInterface, "platform.lib/version", "1.3.0");
m->declare(m->metaInterface, "signals.lib/name", "Faust Signal Routing Library"); m->declare(m->metaInterface, "signals.lib/name", "Faust Signal Routing Library");
m->declare(m->metaInterface, "signals.lib/version", "1.6.0"); m->declare(m->metaInterface, "signals.lib/version", "1.5.0");
m->declare(m->metaInterface, "version", "0.1.0"); m->declare(m->metaInterface, "version", "0.1.0");
} }
@ -382,15 +384,7 @@ void computefaustlpf(faustlpf* dsp, int count, FAUSTFLOAT** RESTRICT inputs, FAU
#ifdef __cplusplus #ifdef __cplusplus
} }
#endif #endif
// END CLASS CODE
/***************************END USER SECTION ***************************/
#if defined(__GNUC__)
# pragma GCC diagnostic pop
#endif #endif
//------------------------------------------------------------------------------
// End the Faust code section