J'ai réussis à avancer un peut et à supprimer les erreur en modifiant le fichier RW_LibCurl.Inc.pb.
J'ai déjà modifié le CompilerCase pour le mettre à MacOS et devant chaque "SymbolName' j'ai rajouté un "_".
Code : Tout sélectionner
XIncludeFile "RW_LibCurl_Res.pb"
Macro DQuote
"
EndMacro
CompilerSelect #PB_Compiler_OS
CompilerCase #PB_OS_MacOS
Macro SymbolName(Val)
DQuote#Val#DQuote
EndMacro
#LibCurl_ImportLib = "/usr/lib/libcurl.3.dylib"
#LibCurl_SeparatorDir = "/"
CompilerCase #PB_OS_Windows
Macro SymbolName(Val)
DQuote _#Val#DQuote
EndMacro
#LibCurl_ImportLib = "LibCurl.lib"
#LibCurl_SeparatorDir = "\"
CompilerEndSelect
;- Imports
ImportC #LibCurl_ImportLib
curl_easy_cleanup(handle.l) As SymbolName(_curl_easy_cleanup)
curl_easy_duphandle(handle.l) As SymbolName(_curl_easy_duphandle)
curl_easy_getinfo(curl.l, info_type.l, info.l) As SymbolName(_curl_easy_getinfo)
curl_easy_init() As SymbolName(_curl_easy_init)
curl_easy_perform(handle.l) As SymbolName(_curl_easy_perform)
curl_easy_recv(*curl, *buffer, buflen.l,*n) As SymbolName(_curl_easy_recv)
curl_easy_reset(handle.l) As SymbolName(_curl_easy_reset)
curl_easy_send(*curl, *buffer, buflen.l, *n) As SymbolName(_curl_easy_send)
curl_easy_setopt(handle.l, option.l, parameter.l) As SymbolName(_curl_easy_setopt)
curl_easy_strerror(errornum.l) As SymbolName(_curl_easy_strerror)
curl_escape(url.l, length.l) As SymbolName(_curl_escape)
curl_formadd(firstitem.l, lastitem.l) As SymbolName(_curl_formadd)
curl_formfree(form.l) As SymbolName(_curl_formfree)
curl_formget(*form.curl_httppost, *arg, append) As SymbolName(_curl_formget)
curl_free(ptr.l) As SymbolName(_curl_free)
curl_getdate(datestring.l, now.l) As SymbolName(_curl_getdate)
curl_getenv(name.l) As SymbolName(_curl_getenv)
curl_global_cleanup() As SymbolName(_curl_global_cleanup)
curl_global_init(flags.l) As SymbolName(_curl_global_init)
curl_global_init_mem(flags.l, m.l, f.l, r.l, s.l, c.l) As SymbolName(_curl_global_init_mem)
curl_mprintf(format.l) As SymbolName(_curl_mprintf)
curl_mfprintf(fd.l, format.l) As SymbolName(_curl_mfprintf)
curl_msprintf(buffer.l, format.l) As SymbolName(_curl_msprintf)
curl_msnprintf(buffer.l, maxlength.l, format.l) As SymbolName(_curl_msnprintf)
curl_mvprintf(format.l, args.l) As SymbolName(_curl_mvprintf)
curl_mvfprintf(fd.l, format.l, args.l) As SymbolName(_curl_mvfprintf)
curl_mvsprintf(buffer.l, format.l, args.l) As SymbolName(_curl_mvsprintf)
curl_mvsnprintf(buffer.l, maxlength.l, format.l, args.l) As SymbolName(_curl_mvsnprintf)
curl_maprintf(format.l) As SymbolName(_curl_maprintf)
curl_mvaprintf(format.l, args.l) As SymbolName(_curl_mvaprintf)
curl_multi_add_handle(multi_handle.l, easy_handle.l) As SymbolName(_curl_multi_add_handle)
curl_multi_assign(*multi_handle, sockfd.l, *sockp) As SymbolName(_curl_multi_assign)
curl_multi_cleanup(multi_handle.l) As SymbolName(_curl_multi_cleanup)
curl_multi_fdset(multi_handle.l, read_fd_set.l, write_fd_set.l, exc_fd_set.l, max_fd.l) As SymbolName(_curl_multi_fdset)
curl_multi_info_read(multi_handle.l, msgs_in_queue.l) As SymbolName(_curl_multi_info_read)
curl_multi_init() As SymbolName(_curl_multi_init)
curl_multi_perform(multi_handle.l, running_handles.l) As SymbolName(_curl_multi_perform)
curl_multi_remove_handle(multi_handle.l, easy_handle.l) As SymbolName(_curl_multi_remove_handle)
curl_multi_strerror(errornum.l) As SymbolName(_curl_multi_strerror)
curl_multi_socket(*multi_handle, s.l, *running_handles) As SymbolName(_curl_multi_socket)
curl_multi_socket_action(*multi_handle, s.l, ev_bitmask.l, *running_handles) As SymbolName(_curl_multi_socket_action)
curl_multi_socket_all(*multi_handle, *running_handles) As SymbolName(_curl_multi_socket_all)
curl_share_cleanup(share_handle.l) As SymbolName(_curl_share_cleanup)
curl_share_init() As SymbolName(_curl_share_init)
curl_share_setopt(share.l, option.l, parameter.l) As SymbolName(_curl_share_setopt)
curl_share_strerror(errornum.l) As SymbolName(_curl_share_strerror)
curl_slist_append(slist.l, string.p-utf8) As SymbolName(_curl_slist_append)
curl_slist_free_all(slist.l) As SymbolName(_curl_slist_free_all)
curl_strequal(str1.l, str2.l) As SymbolName(_curl_strequal)
curl_strnequal(str1.l, str2.l, len.l) As SymbolName(_curl_strnequal)
curl_unescape(url.l, length.l) As SymbolName(_curl_unescape)
curl_version() As SymbolName(_curl_version)
curl_version_info(type.l) As SymbolName(_curl_version_info)
EndImport;}
Procedure RW_LibCurl_InitString()
Shared ReceivedData.s
If ReceivedData > ""
ReceivedData = ""
EndIf
EndProcedure
Procedure RW_LibCurl_InitData()
Shared *LibCurl_SharedMem
If *LibCurl_SharedMem
FreeMemory(*LibCurl_SharedMem)
*LibCurl_SharedMem = 0
EndIf
EndProcedure
ProcedureC RW_LibCurl_WriteStrFunction(*ptr, Size, NMemB, *Stream)
;retreives utf-8/ascii encoded data
Protected SizeProper.l = Size & 255
Protected NMemBProper.l = NMemB
Protected MyDataS.s
Shared ReceivedData.s
MyDataS = PeekS(*ptr, SizeProper * NMemBProper)
ReceivedData + MyDataS
;Debug "> " + MyDataS
;Debug "# " + Str(Len(MyDataS))
;Debug "@ " + Str(Len(ReceivedData))
ProcedureReturn SizeProper * NMemBProper
EndProcedure
Procedure.s RW_LibCurl_GetString()
Shared ReceivedData.s
ProcedureReturn ReceivedData
EndProcedure
ProcedureC RW_LibCurl_WriteDataFunction(*ptr, Size, NMemB, *Stream)
Protected plSize.l = Size & 255
Protected plNmemB.l = NMemB
Protected plMemorySize.l = plSize * plNmemB
Protected plLibCurl_SharedMemSize.l
Protected *LibCurl_TempMemory
Protected *LibCurl_TempSharedMem
Shared *LibCurl_SharedMem
; allocates memory for receiving data
*LibCurl_TempMemory = AllocateMemory(plMemorySize)
CopyMemory(*ptr, *LibCurl_TempMemory, plMemorySize)
; if memory doesn't exists
If *LibCurl_SharedMem = 0
*LibCurl_SharedMem = AllocateMemory(plMemorySize)
CopyMemory(*LibCurl_TempMemory, *LibCurl_SharedMem, plMemorySize)
Else
; we allocate a temporary memory zone for storing previous *LibCurl_SharedMem
plLibCurl_SharedMemSize = MemorySize(*LibCurl_SharedMem)
*LibCurl_TempSharedMem = AllocateMemory(plLibCurl_SharedMemSize)
CopyMemory(*LibCurl_SharedMem, *LibCurl_TempSharedMem, plLibCurl_SharedMemSize)
; we free *LibCurl_SharedMem
FreeMemory(*LibCurl_SharedMem)
; we allocate *LibCurl_SharedMem wtih size of previous *LibCurl_SharedMem + new data
*LibCurl_SharedMem = AllocateMemory(plLibCurl_SharedMemSize + plMemorySize)
CopyMemory(*LibCurl_TempSharedMem, *LibCurl_SharedMem, plLibCurl_SharedMemSize)
CopyMemory(*LibCurl_TempMemory, *LibCurl_SharedMem+plLibCurl_SharedMemSize, plMemorySize)
; we free memory
FreeMemory(*LibCurl_TempMemory)
FreeMemory(*LibCurl_TempSharedMem)
EndIf
ProcedureReturn plMemorySize
EndProcedure
Procedure RW_LibCurl_GetData()
Shared *LibCurl_SharedMem
Protected *LibCurl_NewMemory
*LibCurl_NewMemory = AllocateMemory(MemorySize(*LibCurl_SharedMem))
CopyMemory(*LibCurl_SharedMem, *LibCurl_NewMemory, MemorySize(*LibCurl_SharedMem))
ProcedureReturn *LibCurl_NewMemory
EndProcedure
Maintenant à la compilation j'ai une erreur sur le chargement de la base de données sql lignes 249 sur cette commande:
Message du compilateur: Le #Database spécifié n'est pas initialisé.