Subversion Repositories Kolibri OS

Rev

Rev 593 | Rev 680 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 593 Rev 667
Line 3... Line 3...
3
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
3
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
4
;; Distributed under terms of the GNU General Public License    ;;
4
;; Distributed under terms of the GNU General Public License    ;;
5
;;                                                              ;;
5
;;                                                              ;;
6
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
6
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 7... Line 7...
7
 
7
 
Line 8... Line 8...
8
$Revision: 593 $
8
$Revision: 667 $
9
 
9
 
10
 
10
 
Line 77... Line 77...
77
	jmp	sys_system
77
	jmp	sys_system
Line 78... Line 78...
78
 
78
 
79
debug_suspend:
79
debug_suspend:
80
; in: ebx=pid
80
; in: ebx=pid
-
 
81
; destroys eax,ebx
-
 
82
        cli
81
; destroys eax,ebx
83
        mov     eax, ebx
-
 
84
        call    pid_to_slot
82
	call	get_debuggee_slot
85
        test    eax, eax
83
	jc	.ret
86
        jz      .ret
84
        mov     bl, [CURRENT_TASK+eax+TASKDATA.state] ; process state
87
        mov     bl, [CURRENT_TASK+eax+TASKDATA.state] ; process state
85
	test	bl, bl
88
	test	bl, bl
86
	jz	.1
89
	jz	.1
87
	cmp	bl, 5
90
	cmp	bl, 5
Line 108... Line 111...
108
	jmp	.2
111
	jmp	.2
Line 109... Line 112...
109
 
112
 
110
debug_resume:
113
debug_resume:
111
; in: ebx=pid
114
; in: ebx=pid
-
 
115
; destroys eax,ebx
-
 
116
        cli
112
; destroys eax,ebx
117
        mov     eax, ebx
-
 
118
        call    pid_to_slot
113
	call	get_debuggee_slot
119
        test    eax, eax
114
	jc	.ret
120
        jz      .ret
115
	call	do_resume
121
        call    do_resume
116
.ret:	sti
122
.ret:	sti
Line 117... Line 123...
117
	ret
123
	ret