5 #include <mono/io-layer/io-layer.h>
7 /* We're digging into handle internals here... */
8 #include <mono/io-layer/handles-private.h>
9 #include <mono/io-layer/wapi-private.h>
11 #define HDRSIZE sizeof(struct _WapiScratchHeader)
13 static guchar *printable (guchar *data, guint32 datalen)
15 static guchar buf[32];
22 for(i=0; i<datalen; i++) {
23 if(g_ascii_isprint (data[i])) {
34 int main (int argc, char **argv)
37 struct _WapiScratchHeader *hdr;
40 _wapi_shared_data=_wapi_shm_attach (&success);
42 g_error ("Failed to attach shared memory!");
46 hdr=(struct _WapiScratchHeader *)&_wapi_shared_data->scratch_base[0];
47 if(hdr->flags==0 && hdr->length==0) {
48 g_print ("Scratch space unused\n");
52 while(idx < _WAPI_SHM_SCRATCH_SIZE) {
53 hdr=(struct _WapiScratchHeader *)&_wapi_shared_data->scratch_base[idx];
54 if(hdr->flags & WAPI_SHM_SCRATCH_FREE) {
55 g_print ("Free block at %6d (index %6d), length %6d\n",
56 idx, idx+HDRSIZE, hdr->length);
58 guchar *data=&_wapi_shared_data->scratch_base[idx+HDRSIZE];
60 g_print ("Used block at %6d (index %6d), length %6d, [%s]\n",
61 idx, idx+HDRSIZE, hdr->length,
62 printable (data, hdr->length));
65 idx+=(hdr->length+HDRSIZE);