hg/jv-libgdbs: GDBDebugger.st@095c4b0b74d3 (annotated)

0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	1	"{ Package: 'jv:libgdbs' }"
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	2
21 83395ca8b257 Renamed GDB to GDBDebugger Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	3	Object subclass:#GDBDebugger
35 c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	4	instanceVariableNames:'connection commandSequenceNumber inferiorStateSequenceNumber
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	5	inferiors'
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	6	classVariableNames:''
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	7	poolDictionaries:'GDBCommandStatus'
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	8	category:'GDB-Core'
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	9	!
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	10
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	11
21 83395ca8b257 Renamed GDB to GDBDebugger Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	12	!GDBDebugger class methodsFor:'instance creation'!
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	13
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	14	new
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	15	^ self newWithProcess: GDBUnixProcess new
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	16
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	17	"Modified: / 20-06-2014 / 21:44:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	18	!
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	19
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	20	newWithProcess: aGDBProcess
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	21	^ self basicNew initializeWithProcess: aGDBProcess
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	22
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	23	"Created: / 20-06-2014 / 21:44:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	24	! !
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	25
21 83395ca8b257 Renamed GDB to GDBDebugger Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	26	!GDBDebugger methodsFor:'accessing'!
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	27
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	28	announcer
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	29	^ connection eventAnnouncer.
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	30
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	31	"Created: / 02-06-2014 / 23:06:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	32	!
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	33
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	34	inferiorForId: id
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	35	^ inferiors ? #() detect:[:e \| e id = id ] ifNone:[
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	36	self error: ('No inferior (thread group) with id ''%1'' found!!' bindWith: id)
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	37	].
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	38
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	39	"Created: / 07-09-2014 / 21:22:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	40	!
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	41
10 f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	42	inferiorStderr
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	43	^ connection inferiorPTY master
10 f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	44
f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	45	"Created: / 09-06-2014 / 10:01:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
11 474fbb650afe PTY support refactored to use GDBPTY object. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 10 diff changeset	46	"Modified: / 09-06-2014 / 18:26:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
10 f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	47	!
f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	48
f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	49	inferiorStdin
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	50	^ connection inferiorPTY master
10 f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	51
f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	52	"Created: / 09-06-2014 / 10:00:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
11 474fbb650afe PTY support refactored to use GDBPTY object. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 10 diff changeset	53	"Modified: / 09-06-2014 / 18:27:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
10 f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	54	!
f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	55
f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	56	inferiorStdout
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	57	^ connection inferiorPTY master
10 f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	58
f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	59	"Created: / 09-06-2014 / 10:01:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
11 474fbb650afe PTY support refactored to use GDBPTY object. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 10 diff changeset	60	"Modified: / 09-06-2014 / 18:27:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
35 c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	61	!
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	62
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	63	inferiors
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	64	^ inferiors
10 f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	65	! !
f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	66
21 83395ca8b257 Renamed GDB to GDBDebugger Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	67	!GDBDebugger methodsFor:'accessing-private'!
10 f04a22c9b16c Use special PTY for inferior input/output... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	68
19 c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	69	currentInferiorStateSequnceNumber
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	70	^ inferiorStateSequenceNumber
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	71
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	72	"Created: / 19-06-2014 / 22:22:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	73	!
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	74
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	75	nextCommandSequnceNumber
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	76	commandSequenceNumber := commandSequenceNumber + 1.
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	77	commandSequenceNumber == SmallInteger maxVal ifTrue:[
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	78	commandSequenceNumber := 0.
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	79	].
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	80	^ commandSequenceNumber
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	81
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	82	"Created: / 02-06-2014 / 23:48:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	83	!
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	84
19 c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	85	nextInferiorStateSequnceNumber
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	86	inferiorStateSequenceNumber := inferiorStateSequenceNumber + 1.
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	87	inferiorStateSequenceNumber == SmallInteger maxVal ifTrue:[
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	88	inferiorStateSequenceNumber := 0.
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	89	].
19 c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	90	^ inferiorStateSequenceNumber
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	91
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	92	"Created: / 02-06-2014 / 23:48:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	93	! !
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	94
21 83395ca8b257 Renamed GDB to GDBDebugger Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	95	!GDBDebugger methodsFor:'commands'!
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	96
8 7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	97	send: aGDBCommand
7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	98	^ self send: aGDBCommand wait: true.
7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	99
7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	100	"Created: / 03-06-2014 / 00:10:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	101	!
7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	102
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	103	send: aGDBCommand wait: aBoolean
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	104	"Sends given command to GDB. If `aBoolean` is true, wait for
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	105	command to finish. Otherwise, return immediately."
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	106
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	107	\| token blocker releaser \|
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	108
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	109	token := self nextCommandSequnceNumber.
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	110	aGDBCommand token: token.
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	111	aBoolean ifTrue:[
9 5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 8 diff changeset	112	releaser := [ :ev \|
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	113	ev token == token ifTrue:[
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	114	self announcer unsubscribe: releaser.
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	115	blocker signal.
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	116	]].
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	117	blocker := Semaphore new.
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	118	self announcer when: GDBCommandResultEvent do: releaser.
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	119	connection pushEvent: (GDBCommandEvent new command: aGDBCommand).
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	120	blocker wait.
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	121	] ifFalse:[
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	122	connection pushEvent: (GDBCommandEvent new command: aGDBCommand).
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	123	]
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	124
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	125	"Created: / 02-06-2014 / 23:45:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
9 5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 8 diff changeset	126	"Modified: / 04-06-2014 / 09:32:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	127	! !
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	128
21 83395ca8b257 Renamed GDB to GDBDebugger Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	129	!GDBDebugger methodsFor:'event handling'!
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	130
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	131	onCommand: aGDBCommandEvent
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	132	connection send: aGDBCommandEvent command.
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	133
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	134	"Created: / 02-06-2014 / 23:38:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	135	"Modified: / 20-06-2014 / 22:09:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	136	!
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	137
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	138	onCommandResult: aGDBCommandResultEvent
9 5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 8 diff changeset	139	aGDBCommandResultEvent result status == CommandStatusExit ifTrue:[
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	140	connection pushEvent: GDBExitEvent new.
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	141	].
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	142
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	143	"Created: / 02-06-2014 / 23:40:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
9 5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 8 diff changeset	144	"Modified: / 04-06-2014 / 09:30:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
8 7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	145	!
7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	146
19 c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	147	onExecutionEvent: aGDBExecutionEvent
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	148	self nextInferiorStateSequnceNumber.
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	149
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	150	"Created: / 19-06-2014 / 22:21:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	151	!
c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	152
8 7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	153	onExit: aGDBExitEvent
7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	154	self release.
7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	155
7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	156	"Created: / 03-06-2014 / 00:36:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
9 5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 8 diff changeset	157	"Modified: / 04-06-2014 / 09:28:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
35 c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	158	!
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	159
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	160	onThreadCreated:aGDBThreadCreatedEvent
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	161	\| inferior \|
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	162
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	163	inferior := self inferiorForId: aGDBThreadCreatedEvent threadGroupId.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	164	inferior onThreadCreated: aGDBThreadCreatedEvent.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	165
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	166	"Created: / 07-09-2014 / 21:20:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	167	!
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	168
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	169	onThreadExited:aGDBThreadExitedEvent
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	170	\| inferior \|
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	171
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	172	inferior := self inferiorForId: aGDBThreadExitedEvent threadGroupId.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	173	inferior onThreadExited: aGDBThreadExitedEvent.
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	174
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	175	"Created: / 07-09-2014 / 21:20:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	176	!
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	177
35 c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	178	onThreadGroupAdded:aGDBThreadGroupAddedEvent
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	179	\| inferior \|
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	180	inferiors isNil ifTrue:[
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	181	inferiors := List new.
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	182	].
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	183	inferior := GDBThreadGroup newWithDebugger: self id:aGDBThreadGroupAddedEvent threadGroupId.
35 c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	184	inferiors add:inferior.
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	185	aGDBThreadGroupAddedEvent setThreadGroup: inferior
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	186
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	187	"Modified: / 07-09-2014 / 21:18:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
35 c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	188	!
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	189
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	190	onThreadGroupExited:aGDBThreadGroupExitedEvent
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	191	\| inferior \|
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	192
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	193	inferior := self inferiorForId: aGDBThreadGroupExitedEvent threadGroupId.
35 c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	194	inferior setExitCode: aGDBThreadGroupExitedEvent exitCode.
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	195	aGDBThreadGroupExitedEvent setThreadGroup: inferior
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	196
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	197	"Created: / 06-09-2014 / 02:37:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	198	"Modified: / 07-09-2014 / 21:23:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
35 c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	199	!
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	200
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	201	onThreadGroupStarted:aGDBThreadGroupStartedEvent
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	202	\| inferior \|
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	203
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	204	inferior := self inferiorForId: aGDBThreadGroupStartedEvent threadGroupId.
35 c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	205	inferior setPid: aGDBThreadGroupStartedEvent pid.
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	206	aGDBThreadGroupStartedEvent setThreadGroup: inferior
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	207
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	208	"Created: / 06-09-2014 / 02:37:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	209	"Modified: / 07-09-2014 / 21:23:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	210	! !
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	211
21 83395ca8b257 Renamed GDB to GDBDebugger Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	212	!GDBDebugger methodsFor:'finalization'!
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	213
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	214	finalize
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	215	self release.
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	216
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	217	"Created: / 26-05-2014 / 21:23:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	218	! !
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	219
21 83395ca8b257 Renamed GDB to GDBDebugger Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	220	!GDBDebugger methodsFor:'initialize & release'!
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	221
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	222	initializeWithProcess: aGDBProcess
1 da21f8614c2d Fixes in GDBLauncher Jan Vrany <jan.vrany@fit.cvut.cz> parents: 0 diff changeset	223	self registerForFinalization.
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	224	connection := GDBConnection newWithProcess: aGDBProcess.
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	225
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	226	commandSequenceNumber := 0.
19 c48d33e27d34 Added internal announcer. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12 diff changeset	227	inferiorStateSequenceNumber := 0.
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	228
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	229	self subscribe.
8 7f4882e2562a More work on basic example. GDB exiting not yet working. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 7 diff changeset	230
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	231	connection eventPumpStart.
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	232	connection eventDispatchStart.
25 58e042a191a9 More work on GDB session recorder. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 23 diff changeset	233	Delay waitForMilliseconds:100.
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	234
12 568a2971c977 Generated classes for MI commands. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 11 diff changeset	235	"/ self send: (GDBMICommand inferiorTtySet: driver inferiorPTY name).
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	236	self send: (GDBMI_inferior_tty_set arguments: { connection inferiorPTY name })
11 474fbb650afe PTY support refactored to use GDBPTY object. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 10 diff changeset	237
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	238	"Created: / 20-06-2014 / 21:45:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
25 58e042a191a9 More work on GDB session recorder. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 23 diff changeset	239	"Modified: / 23-06-2014 / 23:44:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	240	!
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	241
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	242	release
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	243	connection notNil ifTrue:[
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	244	self unsubscribe.
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	245	connection release.
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	246	connection := nil.
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	247	].
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	248
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	249	"Created: / 26-05-2014 / 21:24:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	250	"Modified: / 20-06-2014 / 22:08:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	251	!
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	252
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	253	subscribe
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	254	connection eventAnnouncerInternal
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	255	when: GDBCommandEvent send: #onCommand: to: self;
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	256	when: GDBCommandResultEvent send: #onCommandResult: to: self;
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	257	when: GDBExitEvent send: #onExit: to: self;
35 c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	258	when: GDBExecutionEvent send: #onExecutionEvent: to: self;
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	259
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	260	when: GDBThreadGroupAddedEvent send: #onThreadGroupAdded: to: self;
c17ecf90e446 Initial support for thread groups, threads and breakpoints. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 25 diff changeset	261	when: GDBThreadGroupStartedEvent send: #onThreadGroupStarted: to: self;
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	262	when: GDBThreadGroupExitedEvent send: #onThreadGroupExited: to: self;
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	263
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	264	when: GDBThreadCreatedEvent send: #onThreadCreated: to: self;
095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	265	when: GDBThreadExitedEvent send: #onThreadExited: to: self.
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	266
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	267	"Created: / 20-06-2014 / 22:07:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
36 095c4b0b74d3 Added support for threads. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 35 diff changeset	268	"Modified: / 07-09-2014 / 22:29:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
23 a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	269	!
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	270
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	271	unsubscribe
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	272	connection eventAnnouncerInternal unsubscribe: self
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	273
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	274	"Created: / 20-06-2014 / 22:07:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	275	! !
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	276
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	277	!GDBDebugger methodsFor:'testing'!
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	278
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	279	isConnected
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	280	^ connection notNil
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	281
a7eb888c81b5 Introduced GDBProcess - a class encapsulating gdb OS process. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 21 diff changeset	282	"Created: / 20-06-2014 / 22:12:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
0 0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	283	! !
0b9e93821620 First shot (merely backup) Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	284
21 83395ca8b257 Renamed GDB to GDBDebugger Jan Vrany <jan.vrany@fit.cvut.cz> parents: 19 diff changeset	285	!GDBDebugger class methodsFor:'documentation'!
7 7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	286
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	287	version_HG
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	288
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	289	^ '$Changeset: <not expanded> $'
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	290	! !
7a51f98e7162 Initial implementation of event dispatcher and event pump. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	291

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Sun, 07 Sep 2014 22:44:55 +0100
changeset 36	095c4b0b74d3
parent 35	c17ecf90e446
child 37	a85f0c91f164
permissions	-rw-r--r--