Compare commits
4 Commits
29c20cb8fc
...
5987482643
| Author | SHA1 | Date | |
|---|---|---|---|
| 5987482643 | |||
| 91288c06e6 | |||
| 2c0b1f708d | |||
| 3f14ec790c |
@ -93,6 +93,8 @@ Required:
|
|||||||
|
|
||||||
* [Nim] >= 2.0
|
* [Nim] >= 2.0
|
||||||
|
|
||||||
|
Note: [LV2] C headers *need not* to be present to build nymph plugins.
|
||||||
|
|
||||||
Optional:
|
Optional:
|
||||||
|
|
||||||
* [lv2bm] - For benchmarking and stress-testing plugins
|
* [lv2bm] - For benchmarking and stress-testing plugins
|
||||||
|
|||||||
@ -67,17 +67,21 @@ proc extensionData(uri: cstring): pointer {.cdecl.} =
|
|||||||
proc NimMain() {.cdecl, importc.}
|
proc NimMain() {.cdecl, importc.}
|
||||||
|
|
||||||
|
|
||||||
|
let descriptor = Lv2Descriptor(
|
||||||
|
uri: cstring(PluginUri),
|
||||||
|
instantiate: instantiate,
|
||||||
|
connectPort: connectPort,
|
||||||
|
activate: activate,
|
||||||
|
run: run,
|
||||||
|
deactivate: deactivate,
|
||||||
|
cleanup: cleanup,
|
||||||
|
extensionData: extensionData,
|
||||||
|
)
|
||||||
|
|
||||||
proc lv2Descriptor(index: cuint): ptr Lv2Descriptor {.
|
proc lv2Descriptor(index: cuint): ptr Lv2Descriptor {.
|
||||||
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
|
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
|
||||||
NimMain()
|
|
||||||
|
|
||||||
if index == 0:
|
if index == 0:
|
||||||
result = createShared(Lv2Descriptor)
|
NimMain()
|
||||||
result.uri = cstring(PluginUri)
|
return addr(descriptor)
|
||||||
result.instantiate = instantiate
|
|
||||||
result.connectPort = connectPort
|
return nil
|
||||||
result.activate = activate
|
|
||||||
result.run = run
|
|
||||||
result.deactivate = deactivate
|
|
||||||
result.cleanup = cleanup
|
|
||||||
result.extensionData = extensionData
|
|
||||||
|
|||||||
@ -16,8 +16,6 @@ type
|
|||||||
freq: ptr cfloat
|
freq: ptr cfloat
|
||||||
flt: ptr faustlpf
|
flt: ptr faustlpf
|
||||||
|
|
||||||
proc NimMain() {.cdecl, importc.}
|
|
||||||
|
|
||||||
|
|
||||||
proc instantiate(descriptor: ptr Lv2Descriptor; sampleRate: cdouble;
|
proc instantiate(descriptor: ptr Lv2Descriptor; sampleRate: cdouble;
|
||||||
bundlePath: cstring; features: ptr UncheckedArray[ptr Lv2Feature]):
|
bundlePath: cstring; features: ptr UncheckedArray[ptr Lv2Feature]):
|
||||||
@ -54,31 +52,30 @@ proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
|
|||||||
computefaustlpf(plug.flt, nSamples.cint, addr plug.input, addr plug.output)
|
computefaustlpf(plug.flt, nSamples.cint, addr plug.input, addr plug.output)
|
||||||
|
|
||||||
|
|
||||||
proc deactivate(instance: Lv2Handle) {.cdecl.} =
|
|
||||||
discard
|
|
||||||
|
|
||||||
|
|
||||||
proc cleanup(instance: Lv2Handle) {.cdecl.} =
|
proc cleanup(instance: Lv2Handle) {.cdecl.} =
|
||||||
let plug = cast[ptr FaustLPFPlugin](instance)
|
let plug = cast[ptr FaustLPFPlugin](instance)
|
||||||
deletefaustlpf(plug.flt)
|
deletefaustlpf(plug.flt)
|
||||||
freeShared(plug)
|
freeShared(plug)
|
||||||
|
|
||||||
|
|
||||||
proc extensionData(uri: cstring): pointer {.cdecl.} =
|
proc NimMain() {.cdecl, importc.}
|
||||||
return nil
|
|
||||||
|
|
||||||
|
|
||||||
|
let descriptor = Lv2Descriptor(
|
||||||
|
uri: cstring(PluginUri),
|
||||||
|
instantiate: instantiate,
|
||||||
|
connectPort: connectPort,
|
||||||
|
activate: activate,
|
||||||
|
run: run,
|
||||||
|
deactivate: nil,
|
||||||
|
cleanup: cleanup,
|
||||||
|
extensionData: nil,
|
||||||
|
)
|
||||||
|
|
||||||
proc lv2Descriptor(index: cuint): ptr Lv2Descriptor {.
|
proc lv2Descriptor(index: cuint): ptr Lv2Descriptor {.
|
||||||
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
|
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
|
||||||
NimMain()
|
|
||||||
|
|
||||||
if index == 0:
|
if index == 0:
|
||||||
result = createShared(Lv2Descriptor)
|
NimMain()
|
||||||
result.uri = cstring(PluginUri)
|
return addr(descriptor)
|
||||||
result.instantiate = instantiate
|
|
||||||
result.connectPort = connectPort
|
return nil
|
||||||
result.activate = activate
|
|
||||||
result.run = run
|
|
||||||
result.deactivate = deactivate
|
|
||||||
result.cleanup = cleanup
|
|
||||||
result.extensionData = extensionData
|
|
||||||
|
|||||||
@ -6,7 +6,6 @@
|
|||||||
@prefix midi: <http://lv2plug.in/ns/ext/midi#> .
|
@prefix midi: <http://lv2plug.in/ns/ext/midi#> .
|
||||||
@prefix opts: <http://lv2plug.in/ns/ext/options#> .
|
@prefix opts: <http://lv2plug.in/ns/ext/options#> .
|
||||||
@prefix params: <http://lv2plug.in/ns/ext/parameters#> .
|
@prefix params: <http://lv2plug.in/ns/ext/parameters#> .
|
||||||
@prefix props: <http://lv2plug.in/ns/ext/port-props#> .
|
|
||||||
@prefix rdfs: <http://www.w3.org/2000/01/rdf-schema#> .
|
@prefix rdfs: <http://www.w3.org/2000/01/rdf-schema#> .
|
||||||
@prefix units: <http://lv2plug.in/ns/extensions/units#> .
|
@prefix units: <http://lv2plug.in/ns/extensions/units#> .
|
||||||
@prefix urid: <http://lv2plug.in/ns/ext/urid#> .
|
@prefix urid: <http://lv2plug.in/ns/ext/urid#> .
|
||||||
@ -49,7 +48,7 @@
|
|||||||
lv2:minimum -12 ;
|
lv2:minimum -12 ;
|
||||||
lv2:maximum 12 ;
|
lv2:maximum 12 ;
|
||||||
units:unit units:semitone12TET
|
units:unit units:semitone12TET
|
||||||
] ;
|
] ;
|
||||||
|
|
||||||
rdfs:comment "A simple MIDI transposition LV2 plugin." ;
|
rdfs:comment "A simple MIDI transposition LV2 plugin." ;
|
||||||
|
|
||||||
|
|||||||
@ -28,46 +28,42 @@ type
|
|||||||
proc instantiate(descriptor: ptr Lv2Descriptor; sampleRate: cdouble;
|
proc instantiate(descriptor: ptr Lv2Descriptor; sampleRate: cdouble;
|
||||||
bundlePath: cstring; features: ptr UncheckedArray[ptr Lv2Feature]):
|
bundlePath: cstring; features: ptr UncheckedArray[ptr Lv2Feature]):
|
||||||
Lv2Handle {.cdecl.} =
|
Lv2Handle {.cdecl.} =
|
||||||
let amp: ptr MidiTransposePlugin = createShared(MidiTransposePlugin)
|
let plug: ptr MidiTransposePlugin = createShared(MidiTransposePlugin)
|
||||||
amp.map = cast[ptr UridMap](lv2FeaturesData(features, lv2UridMap))
|
plug.map = cast[ptr UridMap](lv2FeaturesData(features, lv2UridMap))
|
||||||
|
|
||||||
if amp.map.isNil:
|
if plug.map.isNil:
|
||||||
freeShared(amp)
|
freeShared(plug)
|
||||||
return nil
|
return nil
|
||||||
|
|
||||||
amp.midi_urid = amp.map.map(amp.map.handle, lv2MidiMidiEvent)
|
plug.midi_urid = plug.map.map(plug.map.handle, lv2MidiMidiEvent)
|
||||||
|
|
||||||
return cast[Lv2Handle](amp)
|
return cast[Lv2Handle](plug)
|
||||||
|
|
||||||
|
|
||||||
proc connectPort(instance: Lv2Handle; port: cuint;
|
proc connectPort(instance: Lv2Handle; port: cuint;
|
||||||
dataLocation: pointer) {.cdecl.} =
|
dataLocation: pointer) {.cdecl.} =
|
||||||
let amp = cast[ptr MidiTransposePlugin](instance)
|
let plug = cast[ptr MidiTransposePlugin](instance)
|
||||||
case cast[PluginPort](port)
|
case cast[PluginPort](port)
|
||||||
of PluginPort.Input:
|
of PluginPort.Input:
|
||||||
amp.input = cast[ptr AtomSequence](dataLocation)
|
plug.input = cast[ptr AtomSequence](dataLocation)
|
||||||
of PluginPort.Output:
|
of PluginPort.Output:
|
||||||
amp.output = cast[ptr AtomSequence](dataLocation)
|
plug.output = cast[ptr AtomSequence](dataLocation)
|
||||||
of PluginPort.Transposition:
|
of PluginPort.Transposition:
|
||||||
amp.transposition = cast[ptr cfloat](dataLocation)
|
plug.transposition = cast[ptr cfloat](dataLocation)
|
||||||
|
|
||||||
|
|
||||||
proc activate(instance: Lv2Handle) {.cdecl.} =
|
|
||||||
discard
|
|
||||||
|
|
||||||
|
|
||||||
proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
|
proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
|
||||||
let amp = cast[ptr MidiTransposePlugin](instance)
|
let plug = cast[ptr MidiTransposePlugin](instance)
|
||||||
let outCapacity = amp.output.atom.size
|
let outCapacity = plug.output.atom.size
|
||||||
atomSequenceClear(amp.output)
|
atomSequenceClear(plug.output)
|
||||||
amp.output.atom.type = amp.input.atom.type
|
plug.output.atom.type = plug.input.atom.type
|
||||||
|
|
||||||
if not atomSequenceIsEmpty(amp.input):
|
if not atomSequenceIsEmpty(plug.input):
|
||||||
#echo &"Event sequence size: {amp.input.atom.size}"
|
#echo &"Event sequence size: {plug.input.atom.size}"
|
||||||
let noteOffset = clamp(floor(amp.transposition[] + 0.5), -12, 12).uint8
|
let noteOffset = clamp(floor(plug.transposition[] + 0.5), -12, 12).uint8
|
||||||
|
|
||||||
for ev in amp.input:
|
for ev in plug.input:
|
||||||
if ev.body.`type` == amp.midi_urid:
|
if ev.body.`type` == plug.midi_urid:
|
||||||
var msg = cast[ptr UncheckedArray[uint8]](atomContents(AtomEvent, ev))
|
var msg = cast[ptr UncheckedArray[uint8]](atomContents(AtomEvent, ev))
|
||||||
#echo &"0x{toHex(msg[0], 2)} 0x{toHex(msg[1], 2)} 0x{toHex(msg[2], 2)}"
|
#echo &"0x{toHex(msg[0], 2)} 0x{toHex(msg[1], 2)} 0x{toHex(msg[2], 2)}"
|
||||||
|
|
||||||
@ -77,35 +73,31 @@ proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
|
|||||||
else:
|
else:
|
||||||
discard
|
discard
|
||||||
|
|
||||||
discard atomSequenceAppendEvent(amp.output, outCapacity, ev)
|
discard atomSequenceAppendEvent(plug.output, outCapacity, ev)
|
||||||
|
|
||||||
|
|
||||||
proc deactivate(instance: Lv2Handle) {.cdecl.} =
|
|
||||||
discard
|
|
||||||
|
|
||||||
|
|
||||||
proc cleanup(instance: Lv2Handle) {.cdecl.} =
|
proc cleanup(instance: Lv2Handle) {.cdecl.} =
|
||||||
freeShared(cast[ptr MidiTransposePlugin](instance))
|
freeShared(cast[ptr MidiTransposePlugin](instance))
|
||||||
|
|
||||||
|
|
||||||
proc extensionData(uri: cstring): pointer {.cdecl.} =
|
|
||||||
return nil
|
|
||||||
|
|
||||||
|
|
||||||
proc NimMain() {.cdecl, importc.}
|
proc NimMain() {.cdecl, importc.}
|
||||||
|
|
||||||
|
|
||||||
|
let descriptor = Lv2Descriptor(
|
||||||
|
uri: cstring(PluginUri),
|
||||||
|
instantiate: instantiate,
|
||||||
|
connectPort: connectPort,
|
||||||
|
activate: nil,
|
||||||
|
run: run,
|
||||||
|
deactivate: nil,
|
||||||
|
cleanup: cleanup,
|
||||||
|
extensionData: nil,
|
||||||
|
)
|
||||||
|
|
||||||
proc lv2Descriptor(index: cuint): ptr Lv2Descriptor {.
|
proc lv2Descriptor(index: cuint): ptr Lv2Descriptor {.
|
||||||
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
|
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
|
||||||
NimMain()
|
|
||||||
|
|
||||||
if index == 0:
|
if index == 0:
|
||||||
result = createShared(Lv2Descriptor)
|
NimMain()
|
||||||
result.uri = cstring(PluginUri)
|
return addr(descriptor)
|
||||||
result.instantiate = instantiate
|
|
||||||
result.connectPort = connectPort
|
return nil
|
||||||
result.activate = activate
|
|
||||||
result.run = run
|
|
||||||
result.deactivate = deactivate
|
|
||||||
result.cleanup = cleanup
|
|
||||||
result.extensionData = extensionData
|
|
||||||
|
|||||||
@ -72,33 +72,29 @@ proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
|
|||||||
plug.output[pos] = plug.svf.process(plug.input[pos])
|
plug.output[pos] = plug.svf.process(plug.input[pos])
|
||||||
|
|
||||||
|
|
||||||
proc deactivate(instance: Lv2Handle) {.cdecl.} =
|
|
||||||
discard
|
|
||||||
|
|
||||||
|
|
||||||
proc cleanup(instance: Lv2Handle) {.cdecl.} =
|
proc cleanup(instance: Lv2Handle) {.cdecl.} =
|
||||||
freeShared(cast[ptr SVFPlugin](instance))
|
freeShared(cast[ptr SVFPlugin](instance))
|
||||||
|
|
||||||
|
|
||||||
proc extensionData(uri: cstring): pointer {.cdecl.} =
|
|
||||||
return nil
|
|
||||||
|
|
||||||
|
|
||||||
proc NimMain() {.cdecl, importc.}
|
proc NimMain() {.cdecl, importc.}
|
||||||
|
|
||||||
|
|
||||||
|
let descriptor = Lv2Descriptor(
|
||||||
|
uri: cstring(PluginUri),
|
||||||
|
instantiate: instantiate,
|
||||||
|
connectPort: connectPort,
|
||||||
|
activate: activate,
|
||||||
|
run: run,
|
||||||
|
deactivate: nil,
|
||||||
|
cleanup: cleanup,
|
||||||
|
extensionData: nil,
|
||||||
|
)
|
||||||
|
|
||||||
proc lv2Descriptor(index: cuint): ptr Lv2Descriptor {.
|
proc lv2Descriptor(index: cuint): ptr Lv2Descriptor {.
|
||||||
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
|
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
|
||||||
NimMain()
|
|
||||||
|
|
||||||
if index == 0:
|
if index == 0:
|
||||||
result = createShared(Lv2Descriptor)
|
NimMain()
|
||||||
result.uri = cstring(PluginUri)
|
return addr(descriptor)
|
||||||
result.instantiate = instantiate
|
|
||||||
result.connectPort = connectPort
|
return nil
|
||||||
result.activate = activate
|
|
||||||
result.run = run
|
|
||||||
result.deactivate = deactivate
|
|
||||||
result.cleanup = cleanup
|
|
||||||
result.extensionData = extensionData
|
|
||||||
|
|
||||||
|
|||||||
@ -72,33 +72,28 @@ proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
|
|||||||
plug.output[pos] = plug.flt.process(plug.input[pos])
|
plug.output[pos] = plug.flt.process(plug.input[pos])
|
||||||
|
|
||||||
|
|
||||||
proc deactivate(instance: Lv2Handle) {.cdecl.} =
|
|
||||||
discard
|
|
||||||
|
|
||||||
|
|
||||||
proc cleanup(instance: Lv2Handle) {.cdecl.} =
|
proc cleanup(instance: Lv2Handle) {.cdecl.} =
|
||||||
freeShared(cast[ptr TiltFilterPlugin](instance))
|
freeShared(cast[ptr TiltFilterPlugin](instance))
|
||||||
|
|
||||||
|
|
||||||
proc extensionData(uri: cstring): pointer {.cdecl.} =
|
|
||||||
return nil
|
|
||||||
|
|
||||||
|
|
||||||
proc NimMain() {.cdecl, importc.}
|
proc NimMain() {.cdecl, importc.}
|
||||||
|
|
||||||
|
|
||||||
|
let descriptor = Lv2Descriptor(
|
||||||
|
uri: cstring(PluginUri),
|
||||||
|
instantiate: instantiate,
|
||||||
|
connectPort: connectPort,
|
||||||
|
activate: activate,
|
||||||
|
run: run,
|
||||||
|
deactivate: nil,
|
||||||
|
cleanup: cleanup,
|
||||||
|
extensionData: nil,
|
||||||
|
)
|
||||||
|
|
||||||
proc lv2Descriptor(index: cuint): ptr Lv2Descriptor {.
|
proc lv2Descriptor(index: cuint): ptr Lv2Descriptor {.
|
||||||
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
|
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
|
||||||
NimMain()
|
|
||||||
|
|
||||||
if index == 0:
|
if index == 0:
|
||||||
result = createShared(Lv2Descriptor)
|
NimMain()
|
||||||
result.uri = cstring(PluginUri)
|
return addr(descriptor)
|
||||||
result.instantiate = instantiate
|
|
||||||
result.connectPort = connectPort
|
|
||||||
result.activate = activate
|
|
||||||
result.run = run
|
|
||||||
result.deactivate = deactivate
|
|
||||||
result.cleanup = cleanup
|
|
||||||
result.extensionData = extensionData
|
|
||||||
|
|
||||||
|
return nil
|
||||||
|
|||||||
@ -1,8 +0,0 @@
|
|||||||
plugin:
|
|
||||||
urid: urn:foobar#v1
|
|
||||||
port_group:
|
|
||||||
name: "stereo"
|
|
||||||
audio_input:
|
|
||||||
"in_l"
|
|
||||||
audio_input:
|
|
||||||
"in_r"
|
|
||||||
Loading…
x
Reference in New Issue
Block a user