PureBasic Forums - English

idle wrote: Thu Oct 10, 2024 10:06 am Try this and save is as .so
viewtopic.php?p=628837#p628837

Search github for miniaudio and then try to compile it as shared object.

nicolas@Rocky:~/programme/PureBasic_6.12_LTS/purelibraries/linux/libraries$ ar  t libpbminiaudio.a 
miniaudio.o
nicolas@Rocky:~/programme/PureBasic_6.12_LTS/purelibraries/linux/libraries$ ar x libpbminiaudio.a
nicolas@Rocky:~/programme/PureBasic_6.12_LTS/purelibraries/linux/libraries$ file miniaudio.o 
miniaudio.o: ELF 64-bit LSB relocatable, x86-64, version 1 (SYSV), not stripped

ImportC  "/home/nicolas/programme/PureBasic_6.12_LTS/purelibraries/linux/libraries/miniaudio.o"

PWÖ

idle wrote: Tue Feb 27, 2024 2:09 am

Code: Select all

  ;-test device enumeration 
  Global  context.ma_context;
  Global  *pPlaybackDeviceInfos.ma_device_info_Array;
  Global  playbackDeviceCount.ma_uint32;
  Global  *pCaptureDeviceInfos.ma_device_info_Array;
  Global  captureDeviceCount.ma_uint32;
  Global  iDevice.ma_uint32;
  
  If ma_context_init(#Null, 0, #Null, @context) <> #MA_SUCCESS
    PrintN("Failed to initialize context");
    End -2                                ;
  EndIf 
  
  result = ma_context_get_devices(@context, @*pPlaybackDeviceInfos, @playbackDeviceCount, @*pCaptureDeviceInfos, @captureDeviceCount);
  If result <> #MA_SUCCESS
    PrintN("Failed to retrieve device information");
    End -3                                         ;
  EndIf 
  
  PrintN("Playback Devices");
  For iDevice = 0 To  playbackDeviceCount-1
    PrintN("device " + Str(iDevice) + " " + PeekS(@*pPlaybackDeviceInfos\e[iDevice]\name,-1,#PB_Ascii))
  Next   
  
  PrintN("")
  
  PrintN("Capture Devices");
  For iDevice = 0 To captureDeviceCount-1 
    PrintN("device " + Str(iDevice) + " " + PeekS(@*pCaptureDeviceInfos\e[iDevice]\name,-1,#PB_Ascii))
  Next 
  
  ma_context_uninit(@context)
  
  Input();
  
CompilerEndIf 

User_Russian wrote: Sun Sep 07, 2025 5:00 pm

idle wrote: Tue Feb 27, 2024 2:09 am

Code: Select all

  ;-test device enumeration 
  Global  context.ma_context;
  Global  *pPlaybackDeviceInfos.ma_device_info_Array;
  Global  playbackDeviceCount.ma_uint32;
  Global  *pCaptureDeviceInfos.ma_device_info_Array;
  Global  captureDeviceCount.ma_uint32;
  Global  iDevice.ma_uint32;
  
  If ma_context_init(#Null, 0, #Null, @context) <> #MA_SUCCESS
    PrintN("Failed to initialize context");
    End -2                                ;
  EndIf 
  
  result = ma_context_get_devices(@context, @*pPlaybackDeviceInfos, @playbackDeviceCount, @*pCaptureDeviceInfos, @captureDeviceCount);
  If result <> #MA_SUCCESS
    PrintN("Failed to retrieve device information");
    End -3                                         ;
  EndIf 
  
  PrintN("Playback Devices");
  For iDevice = 0 To  playbackDeviceCount-1
    PrintN("device " + Str(iDevice) + " " + PeekS(@*pPlaybackDeviceInfos\e[iDevice]\name,-1,#PB_Ascii))
  Next   
  
  PrintN("")
  
  PrintN("Capture Devices");
  For iDevice = 0 To captureDeviceCount-1 
    PrintN("device " + Str(iDevice) + " " + PeekS(@*pCaptureDeviceInfos\e[iDevice]\name,-1,#PB_Ascii))
  Next 
  
  ma_context_uninit(@context)
  
  Input();
  
CompilerEndIf 

Need replace #PB_Ascii to #PB_UTF8 because the device name is not displayed correctly.

User_Russian wrote: Sun Sep 07, 2025 10:38 pm Tested the code on Linux and MacOS.
To do this, I changed the import code.

Code: Select all

;-Imports 
CompilerIf #PB_Compiler_OS = #PB_OS_Windows
  ImportC  "miniaudio.lib" 
CompilerElseIf #PB_Compiler_OS = #PB_OS_Linux
  ImportC  #PB_Compiler_Home+"/purelibraries/linux/libraries/libpbminiaudio.a"
CompilerElseIf #PB_Compiler_OS = #PB_OS_MacOS
  ImportC  #PB_Compiler_Home+"/purelibraries/macos/libraries/libpbminiaudio.a"
CompilerElse
  CompilerError  ""
CompilerEndIf
  ;ma_device_config_init(deviceType)
  ma_device_init(*pContext,*config,*Device)
  ma_device_start(*Device);
  ma_device_uninit(*Device);
  ma_get_bytes_per_sample(format.ma_format)
  ma_context_init(*ma_backend,backendCount.ma_uint32,*config,*context.ma_context)
  ma_context_get_devices(*context, *pPlaybackDeviceInfos, *playbackDeviceCount, *pCaptureDeviceInfos, *captureDeviceCount)
  ma_context_uninit(*context);
EndImport 

On Linux, the program exits with the message "invalid memory access" at this line in procedure data_callback().

Code: Select all

amount = framecount * (ma_get_bytes_per_sample(*Device\capture\format) * *Device\capture\channels)

In MacOS x64 the application fails to build due to a linker error.



In MacOS miniaudio library does not contain all functions or what is the reason for the error?

idle wrote: Mon Sep 08, 2025 12:01 amThe main issue with Miniaudio is that it returns structures and some functions use structures as parameters, which means you either need to wrap those functions in c so you can import then into PB or use miniaudio directly with inline c in the header section. you will still need a compatible c install though for system headers and there will likely be a couple of type conflicts between PB's c typedefs though they can perhaps be fixed with pragmas.

kenmo wrote: Tue Sep 09, 2025 4:19 amissue interfacing with SDL3

kenmo wrote: Tue Sep 09, 2025 4:19 am

idle wrote: Mon Sep 08, 2025 12:01 amThe main issue with Miniaudio is that it returns structures and some functions use structures as parameters, which means you either need to wrap those functions in c so you can import then into PB or use miniaudio directly with inline c in the header section. you will still need a compatible c install though for system headers and there will likely be a couple of type conflicts between PB's c typedefs though they can perhaps be fixed with pragmas.

I have nothing to contribute about MiniAudio, but I'm having this exact same issue interfacing with SDL3... For GUID functions, they pass and return the entire GUID (16-byte struct) and I haven't figured out how to handle it in PB! It's frustrating because everything else in the SDL API seems to use byref pointer-to-a-structure instead. I assumed I needed some fancy push-pop stack Assembly code, but perhaps now I can write C wrapper functions inside a HeaderSection...? To be explored...

HeaderSection 

!integer sdl_getguid(){ 
!
!  SDL_GUID guid = SDL_FunctionThatReturnsGUID(); 
!  char *pzguid = PB_AllocateMemory(33);
!  SDL_GUIDToString(guid,*pzguid,33);
!  return *pzguid; 
!};  

EndHeaderSection  

PrototypeC SDL_GetGUID() 
Global SDL_GetGUID.SDL_GetGUID 
!g_sdl_getguid = &sdl_getguid; 

Debug PeekS(SDL_GetGUID(),16,#PB_Ascii)