Re: Interface with C codes

[Anh Vo <anhvofrcaus@gmail.com>]

On Friday, October 17, 2014 5:04:17 PM UTC-7, Anh Vo wrote:
> On Friday, October 17, 2014 4:49:04 PM UTC-7, Adam Beneschan wrote:
> 
> > On Friday, October 17, 2014 4:22:15 PM UTC-7, Anh Vo wrote:
> > 
> > > What Ada spec should be for the following C prototype where BOOT_PARAMS is a struct and responding Ada type is
> 
> > > type Boot_Parameter_Type is
> > >    record
> > >       Boot_Dev : Interfaces.C.Strings.Chars_Ptr;
> > >       -- ...
> > >    end record;
> > > pragma Convention (C, Boot_Parameter_Type);
> > 
> > > type Boot_Parameter_Type_Access is access Boot_Parameter_Type;
> > > pragma Convention (C, Boot_Parameter_Type_Access);
> > 
> > > typedef struct           /* BOOT_PARAMS */
> > >     {
> > >     char bootDev [20];  /* boot device code */
> > >     * ... *
> > >     } BOOT_PARAMS;
> > 
> > > Note that I can not use Ada 2012 yet.
> > 
> > > char *  bootStringToStruct (char * bootString,  BOOT_PARAMS * pBootParams); 
> > 
> > I'm confused.  You've defined an Ada record Boot_Parameter_Type that has a pointer in it, and a C struct that does not have a pointer. 
> 
> > 
> The second parameter of the function prototype use pointer, BOOT_PARAMS * pBootParams.
> 

How this one.

function Boot_String_To_Type (
           Boot_String : Interfaces.C.Strings.chars_ptr;
           Boot_Params : System.Address) 
                             return Interfaces.C.Strings.chars_ptr;
pragma Import (C, Boot_String_To_Type, "bootStringToStruct");