Re: [BLACKBOX] Debugging dll accessing programs

From: [at]} <Frank>
Date: Mon, 14 Mar 2011 23:46:49 -0300

----boundary-LibPST-iamunique-2090651077_-_-
Content-type: text/plain

On 03/14/2011 03:27 PM, Josef Templ wrote:

> Are you sure that the [ccall] option is required?

Actually, no. Those bbox-components indicated by romiras use [ccal], so
I did the same. Meanwhile I tried without, but the trap persists.

> The docu (Dev/Docu/P-S-I.odc) says that no special handling is required for
> callback procedures.
> Please read the said document very carefully.

Did so and will do again.

> Check the parameter list and the involved data types.
> It is not always an easy task to call external procedures successfully.

So let me ask about a specific case:
Some Gtk structs contain arrays. A C array variable is a pointer to the
first array element. So it should translate to Component Pascal as
        POINTER TO ARRAY [untagged] <size> OF <base type>
Correct?

> The <system> lines refer to procedures on the call stack that
> are 'outside' of BlackBox, i.e. that have no debugging information
> available for the BlackBox trap handler.
> In this case, it displays all it knows, which is the program counter (pc)
> and the frame pointer (fp).

 From your answer I deduce that these data aren't of much use for a
simple application programmer. Debugging consists of staring at the
source code in such a case, correct?

-- 
Frank Hrebabetzky		+55 / 48 / 3235 1106
Florianopolis, Brazil
> ----- Original Message ----- From: "Frank Hrebabetzky" <hreba{([at]})nowhere.xy> To: <BLACKBOX{([at]})nowhere.xy> Sent: Monday, March 14, 2011 1:11 PM
> Subject: [BLACKBOX] Debugging dll accessing programs
>
>
>> Hi all,
>>
>> I wrote a simple test program which uses gtk and calls an expose event
>> handler. I first wrote a C version, which works fine, and translated
>> it then line by line to Component Pascal. My interface modules were
>> strongly inspired from a link (which I don't remember (is there an
>> archive of this list?)) from romiras.
>>
>> Execution results in the trap shown below. The call to Gdk.draw_arc is
>> marked.
>>
>> My problems are:
>> 1. The components of noaligned or untagged records and arrays cannot
>> be displayed in trap windows
>> 2. I have no idea what to do with those <system> lines.
>>
>> So how do I debug this?
>>
>> ---------------------------------------------------------------------
>> illegal memory read (ad = DADADCDCH)
>>
>> GtkDraw.Expose [00000074H]
>> .data POINTER NIL
>> .event POINTER [0022E320H]
>> .widget POINTER [62EAC580H]
>> <system> (pc=63B6A099H, fp=0022DF90H)
>> <system> (pc=63A45AC9H, fp=0022E010H)
>> <system> (pc=63A5698FH, fp=0022E0F0H)
>> <system> (pc=63A5DE8DH, fp=0022E210H)
>> <system> (pc=63A5E1F5H, fp=0022E230H)
>> <system> (pc=63C8A2BEH, fp=0022E290H)
>> <system> (pc=63B68A06H, fp=0022E2F0H)
>> <system> (pc=6C363FF0H, fp=0022E390H)
>> <system> (pc=6C363FA4H, fp=0022E430H)
>> <system> (pc=6C35F4D1H, fp=0022E4A0H)
>> <system> (pc=6C3612AAH, fp=0022E4E0H)
>> <system> (pc=6C36131AH, fp=0022E4F0H)
>> <system> (pc=6C34137BH, fp=0022E520H)
>> <system> (pc=685F09EAH, fp=0022E5A0H)
>> <system> (pc=685F1204H, fp=0022E620H)
>> <system> (pc=685F1740H, fp=0022E660H)
>> <system> (pc=63B6780FH, fp=0022E6C0H)
>> GtkDraw.Main [00000155H]
>> .argc POINTER NIL
>> .argv POINTER NIL
>> .drawingArea POINTER [62EAC580H]
>> .window POINTER [62EAE000H]
>> Kernel.Call [00001A63H]
>> .adr INTEGER 1652490770
>> ...
>> ---------------------------------------------------------
>>
>> with GtkDraw.Expose being:
>>
>> ---------------------------------------------------------
>>
>> PROCEDURE [ccall] Expose (
>> widget: Gtk.WidgetP; event: Gdk.EventExposeP; data: G.pointer):
>> G.boolean;
>> BEGIN
>> (**) Out.String("widget.state="); Out.Int(ORD(widget.state),0); Out.Ln;
>> Gdk.draw_arc (
>> widget.window, widget.style.fg_gc[ORD(widget.state)],
>> G.TRUE, 0, 0, widget.allocation.width, widget.allocation.height,
>> 0, 64 * 360);
>> Out.String ("expose_event"); Out.Ln;
>> RETURN G.TRUE;
>> END Expose;
>>
>> -------------------------------------------------------------
>> --
>> Frank Hrebabetzky +55 / 48 / 3235 1106
>> Florianopolis, Brazil
>>
>>
>> ----
>> To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to
>> LISTSERV{([at]})nowhere.xy>
>
> ----
> To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to
> LISTSERV{([at]})nowhere.xy>
>
----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-2090651077_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIE9uIDAzLzE0LzIwMTEgMDM6MjcgUE0sIEpvc2Vm
IFRlbXBsIHdyb3RlOlxwYXINClxwYXINCj4gQXJlIHlvdSBzdXJlIHRoYXQgdGhlIFtjY2FsbF0g
b3B0aW9uIGlzIHJlcXVpcmVkP1xwYXINClxwYXINCkFjdHVhbGx5LCBuby4gVGhvc2UgYmJveC1j
b21wb25lbnRzIGluZGljYXRlZCBieSByb21pcmFzIHVzZSBbY2NhbF0sIHNvIFxwYXINCkkgZGlk
IHRoZSBzYW1lLiBNZWFud2hpbGUgSSB0cmllZCB3aXRob3V0LCBidXQgdGhlIHRyYXAgcGVyc2lz
dHMuXHBhcg0KXHBhcg0KPiBUaGUgZG9jdSAoRGV2L0RvY3UvUC1TLUkub2RjKSBzYXlzIHRoYXQg
bm8gc3BlY2lhbCBoYW5kbGluZyBpcyByZXF1aXJlZCBmb3JccGFyDQo+IGNhbGxiYWNrIHByb2Nl
ZHVyZXMuXHBhcg0KPiBQbGVhc2UgcmVhZCB0aGUgc2FpZCBkb2N1bWVudCB2ZXJ5IGNhcmVmdWxs
eS5ccGFyDQpccGFyDQpEaWQgc28gYW5kIHdpbGwgZG8gYWdhaW4uXHBhcg0KXHBhcg0KPiBDaGVj
ayB0aGUgcGFyYW1ldGVyIGxpc3QgYW5kIHRoZSBpbnZvbHZlZCBkYXRhIHR5cGVzLlxwYXINCj4g
SXQgaXMgbm90IGFsd2F5cyBhbiBlYXN5IHRhc2sgdG8gY2FsbCBleHRlcm5hbCBwcm9jZWR1cmVz
IHN1Y2Nlc3NmdWxseS5ccGFyDQpccGFyDQpTbyBsZXQgbWUgYXNrIGFib3V0IGEgc3BlY2lmaWMg
Y2FzZTpccGFyDQpTb21lIEd0ayBzdHJ1Y3RzIGNvbnRhaW4gYXJyYXlzLiBBIEMgYXJyYXkgdmFy
aWFibGUgaXMgYSBwb2ludGVyIHRvIHRoZSBccGFyDQpmaXJzdCBhcnJheSBlbGVtZW50LiBTbyBp
dCBzaG91bGQgdHJhbnNsYXRlIHRvIENvbXBvbmVudCBQYXNjYWwgYXNccGFyDQpcdGFiIFBPSU5U
RVIgVE8gQVJSQVkgW3VudGFnZ2VkXSA8c2l6ZT4gT0YgPGJhc2UgdHlwZT5ccGFyDQpDb3JyZWN0
P1xwYXINClxwYXINCj4gVGhlIDxzeXN0ZW0+IGxpbmVzIHJlZmVyIHRvIHByb2NlZHVyZXMgb24g
dGhlIGNhbGwgc3RhY2sgdGhhdFxwYXINCj4gYXJlICdvdXRzaWRlJyBvZiBCbGFja0JveCwgaS5l
LiB0aGF0IGhhdmUgbm8gZGVidWdnaW5nIGluZm9ybWF0aW9uXHBhcg0KPiBhdmFpbGFibGUgZm9y
IHRoZSBCbGFja0JveCB0cmFwIGhhbmRsZXIuXHBhcg0KPiBJbiB0aGlzIGNhc2UsIGl0IGRpc3Bs
YXlzIGFsbCBpdCBrbm93cywgd2hpY2ggaXMgdGhlIHByb2dyYW0gY291bnRlciAocGMpXHBhcg0K
PiBhbmQgdGhlIGZyYW1lIHBvaW50ZXIgKGZwKS5ccGFyDQpccGFyDQogRnJvbSB5b3VyIGFuc3dl
ciBJIGRlZHVjZSB0aGF0IHRoZXNlIGRhdGEgYXJlbid0IG9mIG11Y2ggdXNlIGZvciBhIFxwYXIN
CnNpbXBsZSBhcHBsaWNhdGlvbiBwcm9ncmFtbWVyLiBEZWJ1Z2dpbmcgY29uc2lzdHMgb2Ygc3Rh
cmluZyBhdCB0aGUgXHBhcg0Kc291cmNlIGNvZGUgaW4gc3VjaCBhIGNhc2UsIGNvcnJlY3Q/XHBh
cg0KXHBhcg0KLS0gXHBhcg0KRnJhbmsgSHJlYmFiZXR6a3lcdGFiIFx0YWIgKzU1IC8gNDggLyAz
MjM1IDExMDZccGFyDQpGbG9yaWFub3BvbGlzLCBCcmF6aWxccGFyDQpccGFyDQpccGFyDQo+IC0t
LS0tIE9yaWdpbmFsIE1lc3NhZ2UgLS0tLS0gRnJvbTogIkZyYW5rIEhyZWJhYmV0emt5IiA8aHJl
YmFAVEVSUkEuQ09NLkJSPlxwYXINCj4gVG86IDxCTEFDS0JPWEBMSVNUUy5PQkVST04uQ0g+XHBh
cg0KPiBTZW50OiBNb25kYXksIE1hcmNoIDE0LCAyMDExIDE6MTEgUE1ccGFyDQo+IFN1YmplY3Q6
IFtCTEFDS0JPWF0gRGVidWdnaW5nIGRsbCBhY2Nlc3NpbmcgcHJvZ3JhbXNccGFyDQo+XHBhcg0K
PlxwYXINCj4+IEhpIGFsbCxccGFyDQo+PlxwYXINCj4+IEkgd3JvdGUgYSBzaW1wbGUgdGVzdCBw
cm9ncmFtIHdoaWNoIHVzZXMgZ3RrIGFuZCBjYWxscyBhbiBleHBvc2UgZXZlbnRccGFyDQo+PiBo
YW5kbGVyLiBJIGZpcnN0IHdyb3RlIGEgQyB2ZXJzaW9uLCB3aGljaCB3b3JrcyBmaW5lLCBhbmQg
dHJhbnNsYXRlZFxwYXINCj4+IGl0IHRoZW4gbGluZSBieSBsaW5lIHRvIENvbXBvbmVudCBQYXNj
YWwuIE15IGludGVyZmFjZSBtb2R1bGVzIHdlcmVccGFyDQo+PiBzdHJvbmdseSBpbnNwaXJlZCBm
cm9tIGEgbGluayAod2hpY2ggSSBkb24ndCByZW1lbWJlciAoaXMgdGhlcmUgYW5ccGFyDQo+PiBh
cmNoaXZlIG9mIHRoaXMgbGlzdD8pKSBmcm9tIHJvbWlyYXMuXHBhcg0KPj5ccGFyDQo+PiBFeGVj
dXRpb24gcmVzdWx0cyBpbiB0aGUgdHJhcCBzaG93biBiZWxvdy4gVGhlIGNhbGwgdG8gR2RrLmRy
YXdfYXJjIGlzXHBhcg0KPj4gbWFya2VkLlxwYXINCj4+XHBhcg0KPj4gTXkgcHJvYmxlbXMgYXJl
OlxwYXINCj4+IDEuIFRoZSBjb21wb25lbnRzIG9mIG5vYWxpZ25lZCBvciB1bnRhZ2dlZCByZWNv
cmRzIGFuZCBhcnJheXMgY2Fubm90XHBhcg0KPj4gYmUgZGlzcGxheWVkIGluIHRyYXAgd2luZG93
c1xwYXINCj4+IDIuIEkgaGF2ZSBubyBpZGVhIHdoYXQgdG8gZG8gd2l0aCB0aG9zZSA8c3lzdGVt
PiBsaW5lcy5ccGFyDQo+PlxwYXINCj4+IFNvIGhvdyBkbyBJIGRlYnVnIHRoaXM/XHBhcg0KPj5c
cGFyDQo+PiAtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS1ccGFyDQo+PiBpbGxlZ2FsIG1lbW9yeSByZWFkIChhZCA9IERB
REFEQ0RDSClccGFyDQo+PlxwYXINCj4+IEd0a0RyYXcuRXhwb3NlIFswMDAwMDA3NEhdXHBhcg0K
Pj4gLmRhdGEgUE9JTlRFUiBOSUxccGFyDQo+PiAuZXZlbnQgUE9JTlRFUiBbMDAyMkUzMjBIXVxw
YXINCj4+IC53aWRnZXQgUE9JTlRFUiBbNjJFQUM1ODBIXVxwYXINCj4+IDxzeXN0ZW0+IChwYz02
M0I2QTA5OUgsIGZwPTAwMjJERjkwSClccGFyDQo+PiA8c3lzdGVtPiAocGM9NjNBNDVBQzlILCBm
cD0wMDIyRTAxMEgpXHBhcg0KPj4gPHN5c3RlbT4gKHBjPTYzQTU2OThGSCwgZnA9MDAyMkUwRjBI
KVxwYXINCj4+IDxzeXN0ZW0+IChwYz02M0E1REU4REgsIGZwPTAwMjJFMjEwSClccGFyDQo+PiA8
c3lzdGVtPiAocGM9NjNBNUUxRjVILCBmcD0wMDIyRTIzMEgpXHBhcg0KPj4gPHN5c3RlbT4gKHBj
PTYzQzhBMkJFSCwgZnA9MDAyMkUyOTBIKVxwYXINCj4+IDxzeXN0ZW0+IChwYz02M0I2OEEwNkgs
IGZwPTAwMjJFMkYwSClccGFyDQo+PiA8c3lzdGVtPiAocGM9NkMzNjNGRjBILCBmcD0wMDIyRTM5
MEgpXHBhcg0KPj4gPHN5c3RlbT4gKHBjPTZDMzYzRkE0SCwgZnA9MDAyMkU0MzBIKVxwYXINCj4+
IDxzeXN0ZW0+IChwYz02QzM1RjREMUgsIGZwPTAwMjJFNEEwSClccGFyDQo+PiA8c3lzdGVtPiAo
cGM9NkMzNjEyQUFILCBmcD0wMDIyRTRFMEgpXHBhcg0KPj4gPHN5c3RlbT4gKHBjPTZDMzYxMzFB
SCwgZnA9MDAyMkU0RjBIKVxwYXINCj4+IDxzeXN0ZW0+IChwYz02QzM0MTM3QkgsIGZwPTAwMjJF
NTIwSClccGFyDQo+PiA8c3lzdGVtPiAocGM9Njg1RjA5RUFILCBmcD0wMDIyRTVBMEgpXHBhcg0K
Pj4gPHN5c3RlbT4gKHBjPTY4NUYxMjA0SCwgZnA9MDAyMkU2MjBIKVxwYXINCj4+IDxzeXN0ZW0+
IChwYz02ODVGMTc0MEgsIGZwPTAwMjJFNjYwSClccGFyDQo+PiA8c3lzdGVtPiAocGM9NjNCNjc4
MEZILCBmcD0wMDIyRTZDMEgpXHBhcg0KPj4gR3RrRHJhdy5NYWluIFswMDAwMDE1NUhdXHBhcg0K
Pj4gLmFyZ2MgUE9JTlRFUiBOSUxccGFyDQo+PiAuYXJndiBQT0lOVEVSIE5JTFxwYXINCj4+IC5k
cmF3aW5nQXJlYSBQT0lOVEVSIFs2MkVBQzU4MEhdXHBhcg0KPj4gLndpbmRvdyBQT0lOVEVSIFs2
MkVBRTAwMEhdXHBhcg0KPj4gS2VybmVsLkNhbGwgWzAwMDAxQTYzSF1ccGFyDQo+PiAuYWRyIElO
VEVHRVIgMTY1MjQ5MDc3MFxwYXINCj4+IC4uLlxwYXINCj4+IC0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLVxwYXINCj4+XHBhcg0KPj4gd2l0
aCBHdGtEcmF3LkV4cG9zZSBiZWluZzpccGFyDQo+PlxwYXINCj4+IC0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLVxwYXINCj4+XHBhcg0KPj4g
UFJPQ0VEVVJFIFtjY2FsbF0gRXhwb3NlIChccGFyDQo+PiB3aWRnZXQ6IEd0ay5XaWRnZXRQOyBl
dmVudDogR2RrLkV2ZW50RXhwb3NlUDsgZGF0YTogRy5wb2ludGVyKTpccGFyDQo+PiBHLmJvb2xl
YW47XHBhcg0KPj4gQkVHSU5ccGFyDQo+PiAoKiopIE91dC5TdHJpbmcoIndpZGdldC5zdGF0ZT0i
KTsgT3V0LkludChPUkQod2lkZ2V0LnN0YXRlKSwwKTsgT3V0LkxuO1xwYXINCj4+IEdkay5kcmF3
X2FyYyAoXHBhcg0KPj4gd2lkZ2V0LndpbmRvdywgd2lkZ2V0LnN0eWxlLmZnX2djW09SRCh3aWRn
ZXQuc3RhdGUpXSxccGFyDQo+PiBHLlRSVUUsIDAsIDAsIHdpZGdldC5hbGxvY2F0aW9uLndpZHRo
LCB3aWRnZXQuYWxsb2NhdGlvbi5oZWlnaHQsXHBhcg0KPj4gMCwgNjQgKiAzNjApO1xwYXINCj4+
IE91dC5TdHJpbmcgKCJleHBvc2VfZXZlbnQiKTsgT3V0LkxuO1xwYXINCj4+IFJFVFVSTiBHLlRS
VUU7XHBhcg0KPj4gRU5EIEV4cG9zZTtccGFyDQo+PlxwYXINCj4+IC0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS1ccGFyDQo+PiAtLVxw
YXINCj4+IEZyYW5rIEhyZWJhYmV0emt5ICs1NSAvIDQ4IC8gMzIzNSAxMTA2XHBhcg0KPj4gRmxv
cmlhbm9wb2xpcywgQnJhemlsXHBhcg0KPj5ccGFyDQo+PlxwYXINCj4+IC0tLS1ccGFyDQo+PiBU
byB1bnN1YnNjcmliZSwgc2VuZCBhIG1lc3NhZ2Ugd2l0aCBib2R5ICJTSUdOT0ZGIEJMQUNLQk9Y
IiB0b1xwYXINCj4+IExJU1RTRVJWQExJU1RTLk9CRVJPTi5DSFxwYXINCj5ccGFyDQo+XHBhcg0K
PiAtLS0tXHBhcg0KPiBUbyB1bnN1YnNjcmliZSwgc2VuZCBhIG1lc3NhZ2Ugd2l0aCBib2R5ICJT
SUdOT0ZGIEJMQUNLQk9YIiB0b1xwYXINCj4gTElTVFNFUlZATElTVFMuT0JFUk9OLkNIXHBhcg0K
PlxwYXINCj5ccGFyDQpccGFyDQpccGFyDQotLS0tXHBhcg0KVG8gdW5zdWJzY3JpYmUsIHNlbmQg
YSBtZXNzYWdlIHdpdGggYm9keSAiU0lHTk9GRiBCTEFDS0JPWCIgdG8gTElTVFNFUlZATElTVFMu
T319AEptNWljM0E3ZlZ4bw==
----boundary-LibPST-iamunique-2090651077_-_---

Received on Tue Mar 15 2011 - 03:46:49 UTC