在 Visual Works Smalltalk 中从 CPointer 创建 CByteArray

Question

Some C function return aCPointer to a C struct . The C struct is known.
Now i want to put the C struct into a ByteArray . Basically copy the contents of the struct to a ByteArray .
In GemStone/S this can be done with:
CByteArray fromCPointer: aCPointer numBytes: 120.
"this create aCByteArray with the contents of the struct referenced by CPointer (copying only 120 bytes)"

Is there something similar on Visual Works ? I did not find it yet. It could be possible to replicate C struct at Visual Works level but is only one struct and it is ok to handle it at low level.

Answer 1

There's only the rather ugly #copyAt:to:size:startingAt: that you can send to a pointer. You need to allocate a ByteArray yourself (make sure it's big enough).

answer := ByteArray new: size.
pointer
        copyAt: 0
        to: answer
        size: size
        startingAt: 1.

The other way (ByteArray -> Pointer) would be done using #copyAt:from:size:startingAt: .

This method works for both ByteArray and UninterpretedBytes . If you want to read data from the bytes, UninterpretedBytes may be more helpful as you can send things like #longAt: to read a long from an offset.

Answer 2

If aCPointer points to a struct of char * for example:

struct Names 
{char * name;
char * longname;} name;

Then:

(aCPointer at: 0) copyCStringFromHeap. "answer [name]"
(aCPointer at: 1) copyCStringFromHeap. "answer [longname]"

For structs with char * it work nicely not tested with other C types.