fix: make LV2 descriptor allocation static in examples

Signed-off-by: Christopher Arndt <chris@chrisarndt.de>
This commit is contained in:
Christopher Arndt 2026-01-06 07:55:59 +01:00
parent 91288c06e6
commit 5987482643
6 changed files with 76 additions and 93 deletions

View File

@ -67,17 +67,21 @@ proc extensionData(uri: cstring): pointer {.cdecl.} =
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 {.
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
NimMain()
if index == 0:
result = createShared(Lv2Descriptor)
result.uri = cstring(PluginUri)
result.instantiate = instantiate
result.connectPort = connectPort
result.activate = activate
result.run = run
result.deactivate = deactivate
result.cleanup = cleanup
result.extensionData = extensionData
NimMain()
return addr(descriptor)
return nil

View File

@ -16,8 +16,6 @@ type
freq: ptr cfloat
flt: ptr faustlpf
proc NimMain() {.cdecl, importc.}
proc instantiate(descriptor: ptr Lv2Descriptor; sampleRate: cdouble;
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)
proc deactivate(instance: Lv2Handle) {.cdecl.} =
discard
proc cleanup(instance: Lv2Handle) {.cdecl.} =
let plug = cast[ptr FaustLPFPlugin](instance)
deletefaustlpf(plug.flt)
freeShared(plug)
proc extensionData(uri: cstring): pointer {.cdecl.} =
return nil
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 {.
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
NimMain()
if index == 0:
result = createShared(Lv2Descriptor)
result.uri = cstring(PluginUri)
result.instantiate = instantiate
result.connectPort = connectPort
result.activate = activate
result.run = run
result.deactivate = deactivate
result.cleanup = cleanup
result.extensionData = extensionData
NimMain()
return addr(descriptor)
return nil

View File

@ -6,7 +6,6 @@
@prefix midi: <http://lv2plug.in/ns/ext/midi#> .
@prefix opts: <http://lv2plug.in/ns/ext/options#> .
@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 units: <http://lv2plug.in/ns/extensions/units#> .
@prefix urid: <http://lv2plug.in/ns/ext/urid#> .
@ -49,7 +48,7 @@
lv2:minimum -12 ;
lv2:maximum 12 ;
units:unit units:semitone12TET
] ;
] ;
rdfs:comment "A simple MIDI transposition LV2 plugin." ;

View File

@ -52,10 +52,6 @@ proc connectPort(instance: Lv2Handle; port: cuint;
plug.transposition = cast[ptr cfloat](dataLocation)
proc activate(instance: Lv2Handle) {.cdecl.} =
discard
proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
let plug = cast[ptr MidiTransposePlugin](instance)
let outCapacity = plug.output.atom.size
@ -80,32 +76,28 @@ proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
discard atomSequenceAppendEvent(plug.output, outCapacity, ev)
proc deactivate(instance: Lv2Handle) {.cdecl.} =
discard
proc cleanup(instance: Lv2Handle) {.cdecl.} =
freeShared(cast[ptr MidiTransposePlugin](instance))
proc extensionData(uri: cstring): pointer {.cdecl.} =
return nil
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 {.
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
NimMain()
if index == 0:
result = createShared(Lv2Descriptor)
result.uri = cstring(PluginUri)
result.instantiate = instantiate
result.connectPort = connectPort
result.activate = activate
result.run = run
result.deactivate = deactivate
result.cleanup = cleanup
result.extensionData = extensionData
NimMain()
return addr(descriptor)
return nil

View File

@ -72,33 +72,29 @@ proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
plug.output[pos] = plug.svf.process(plug.input[pos])
proc deactivate(instance: Lv2Handle) {.cdecl.} =
discard
proc cleanup(instance: Lv2Handle) {.cdecl.} =
freeShared(cast[ptr SVFPlugin](instance))
proc extensionData(uri: cstring): pointer {.cdecl.} =
return nil
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 {.
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
NimMain()
if index == 0:
result = createShared(Lv2Descriptor)
result.uri = cstring(PluginUri)
result.instantiate = instantiate
result.connectPort = connectPort
result.activate = activate
result.run = run
result.deactivate = deactivate
result.cleanup = cleanup
result.extensionData = extensionData
NimMain()
return addr(descriptor)
return nil

View File

@ -72,33 +72,28 @@ proc run(instance: Lv2Handle; nSamples: cuint) {.cdecl.} =
plug.output[pos] = plug.flt.process(plug.input[pos])
proc deactivate(instance: Lv2Handle) {.cdecl.} =
discard
proc cleanup(instance: Lv2Handle) {.cdecl.} =
freeShared(cast[ptr TiltFilterPlugin](instance))
proc extensionData(uri: cstring): pointer {.cdecl.} =
return nil
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 {.
cdecl, exportc, dynlib, extern: "lv2_descriptor".} =
NimMain()
if index == 0:
result = createShared(Lv2Descriptor)
result.uri = cstring(PluginUri)
result.instantiate = instantiate
result.connectPort = connectPort
result.activate = activate
result.run = run
result.deactivate = deactivate
result.cleanup = cleanup
result.extensionData = extensionData
NimMain()
return addr(descriptor)
return nil