forked from KolibriOS/kolibrios
1. Edit procedure check exception 12 (overflow stack)
2. Edit func 68,24 3. Add proc "control exception" 4. Add subfuncs func 51 (GetPriorityThread, SetPriorityThread,GetCurrentThreadId) 5. Add info in ReferenceFunc(rus) git-svn-id: svn://kolibrios.org@10002 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Jurgen
parent
ecdf48270f
commit
5eb750c289
@ -511,7 +511,7 @@ struct APPDATA
|
||||
exc_handler dd ? ;+32
|
||||
except_mask dd ? ;+36
|
||||
pl0_stack dd ? ;+40
|
||||
dd ? ;+44
|
||||
exc_reserve_stack dd ? ;+44
|
||||
fd_ev dd ? ;+48
|
||||
bk_ev dd ? ;+52
|
||||
fd_obj dd ? ;+56
|
||||
@ -528,7 +528,9 @@ struct APPDATA
|
||||
tls_base dd ? ;+104
|
||||
event_mask dd ? ;+108 stores event types allowed for task
|
||||
tid dd ? ;+112 thread id
|
||||
dd ? ;+116
|
||||
def_priority db ? ;+116
|
||||
cur_priority db ? ;+117
|
||||
dw ? ;+118
|
||||
dd ? ;+120
|
||||
state db ? ;+124 thread state
|
||||
wnd_number db ? ;+125
|
||||
@ -590,6 +592,8 @@ ZPOS_ALWAYS_BACK = -1
|
||||
ZPOS_NORMAL = 0
|
||||
ZPOS_ALWAYS_TOP = 1 ;ZPOS_ALWAYS_TOP is always last and has max number!
|
||||
|
||||
CONTROL_EXCEPTION = 'EXPT'
|
||||
|
||||
; Window structure:
|
||||
struct WDATA
|
||||
box BOX
|
||||
|
||||
@ -1177,6 +1177,7 @@ f68:
|
||||
mov eax, [current_slot]
|
||||
xchg ecx, [eax + APPDATA.exc_handler]
|
||||
xchg edx, [eax + APPDATA.except_mask]
|
||||
xchg esi, [eax + APPDATA.exc_reserve_stack]
|
||||
mov [esp + SYSCALL_STACK.ebx], edx
|
||||
mov [esp + SYSCALL_STACK.eax], ecx
|
||||
ret
|
||||
|
||||
@ -307,6 +307,13 @@ proc find_next_task
|
||||
mov [ebx + APPDATA.wait_param], eax ; retval for wait
|
||||
mov [ebx + APPDATA.state], TSTATE_RUNNING
|
||||
.task_found:
|
||||
mov dl, [ebx + APPDATA.def_priority]
|
||||
test dl, dl
|
||||
jz .no_local_priority
|
||||
dec [ebx + APPDATA.cur_priority]
|
||||
jnz .task_next
|
||||
xchg [ebx + APPDATA.cur_priority], dl
|
||||
.no_local_priority:
|
||||
mov [scheduler_current+ecx*4], ebx
|
||||
; If we have selected a thread with higher priority
|
||||
; AND rescheduling is due to IRQ,
|
||||
|
||||
@ -114,6 +114,18 @@ endg
|
||||
|
||||
page_fault_exc: ; foolproof: selectors are clobbered ...
|
||||
pop [ss:pf_err_code] ; actually, until the next #PF
|
||||
|
||||
cmp edi, CONTROL_EXCEPTION ; equ 'EXPT'
|
||||
jne .no_ctrl_exc
|
||||
bt dword [esp], 31
|
||||
jc .setret
|
||||
test esi, esi
|
||||
jl .no_ctrl_exc
|
||||
.setret:
|
||||
mov [esp], esi
|
||||
iret
|
||||
|
||||
.no_ctrl_exc:
|
||||
save_ring3_context
|
||||
mov bl, 14
|
||||
|
||||
@ -211,8 +223,7 @@ IRetToUserHook:
|
||||
add ecx, 1000h
|
||||
jl .nostack
|
||||
.ex_stack:
|
||||
xor ecx, ecx
|
||||
mov ecx, [ecx+APP_HEADER_01_.except_stack_top]
|
||||
mov ecx, [esi+APPDATA.exc_reserve_stack]
|
||||
test ecx, ecx
|
||||
jle .nostack
|
||||
xchg edi, eax
|
||||
|
||||
@ -28,7 +28,6 @@ struct APP_HEADER_01_
|
||||
stack_top dd ? ;+24
|
||||
i_param dd ? ;+28
|
||||
i_icon dd ? ;+32
|
||||
except_stack_top dd ? ;+36
|
||||
ends
|
||||
|
||||
struct APP_HDR
|
||||
@ -1009,6 +1008,7 @@ proc set_app_params stdcall,slot:dword, params:dword, flags:dword
|
||||
|
||||
;set draw data to full screen
|
||||
xor eax, eax
|
||||
mov [SLOT_BASE + ebx + APPDATA.def_priority], al
|
||||
mov [ecx + WDATA.draw_data.left], eax
|
||||
mov [ecx + WDATA.draw_data.top], eax
|
||||
mov eax, [screen_workarea.right]
|
||||
|
||||
@ -2550,11 +2550,12 @@ dword-значение цвета 0x00RRGGBB
|
||||
---------------------- Константы для регистров: ----------------------
|
||||
eax - SF_SET_WINDOW_SHAPE (50)
|
||||
======================================================================
|
||||
===================== Функция 51 - создать поток. ====================
|
||||
===================== Функция 51, подфункция 1 =======================
|
||||
========================== Создать поток =============================
|
||||
======================================================================
|
||||
Параметры:
|
||||
* eax = 51 - номер функции
|
||||
* ebx = 1 - единственная подфункция
|
||||
* ebx = 1 - номер подфункции
|
||||
* ecx = адрес точки входа потока (начальный eip)
|
||||
* edx = указатель стэка потока (начальный esp)
|
||||
Возвращаемое значение:
|
||||
@ -2564,6 +2565,47 @@ dword-значение цвета 0x00RRGGBB
|
||||
---------------------- Константы для регистров: ----------------------
|
||||
eax - SF_CREATE_THREAD (51)
|
||||
======================================================================
|
||||
===================== Функция 51, подфункция 2 =======================
|
||||
=================== Получить номер слота потока ======================
|
||||
======================================================================
|
||||
Параметры:
|
||||
* eax = 51 - номер функции
|
||||
* ebx = 2 - номер подфункции
|
||||
Возвращаемое значение:
|
||||
* eax = номер слота потока
|
||||
|
||||
======================================================================
|
||||
===================== Функция 51, подфункция 3 =======================
|
||||
==================== Получить приоритет потока =======================
|
||||
======================================================================
|
||||
Параметры:
|
||||
* eax = 51 - номер функции
|
||||
* ebx = 3 - номер подфункции
|
||||
* ecx = номер слота потока или -1 (текущий поток)
|
||||
Возвращаемое значение:
|
||||
* eax = -1 - ошибка (неверный номер слота потока или поток завершен)
|
||||
* иначе eax = номер приоритета потока
|
||||
Замечания:
|
||||
* Приоритет потока имеет диапазон значений от 0 до 255.
|
||||
Значение 0 - наивысший приоритет потока, устанавливаемый по умолчанию при создании потока.
|
||||
|
||||
======================================================================
|
||||
===================== Функция 51, подфункция 4 =======================
|
||||
=================== Установить приоритет потока ======================
|
||||
======================================================================
|
||||
Параметры:
|
||||
* eax = 51 - номер функции
|
||||
* ebx = 4 - номер подфункции
|
||||
* ecx = номер слота потока или -1 (текущий поток)
|
||||
* edx = приоритет потока
|
||||
Возвращаемое значение:
|
||||
* eax = -1 - ошибка (неверный номер слота потока или поток завершен)
|
||||
* иначе eax = старое значение приоритета потока
|
||||
Замечания:
|
||||
* Приоритет потока имеет диапазон значений от 0 до 255.
|
||||
Значение 0 - наивысший приоритет потока, устанавливаемый по умолчанию при создании потока.
|
||||
|
||||
======================================================================
|
||||
====================== Функция 54, подфункция 0 ======================
|
||||
============== Узнать количество слотов в буфере обмена. =============
|
||||
======================================================================
|
||||
@ -3599,9 +3641,14 @@ Architecture Software Developer's Manual, Volume 3, Appendix B);
|
||||
подфункцией 25. Сброс флагов исключений в модулях FPU и XMM также возлагается на обработчик пользователя.
|
||||
|
||||
Внимание:
|
||||
Если пользовательский обработчик обрабатывает исключение переполнения стека (#SS), то должен быть установлен адрес резервного стека в заголовке программы (см. структуру APP_HEADER_01_ taskman.inc).
|
||||
В этот резервный стек будут записаны дополнительные данные (см. структуру EXCEPT_STACK sys32.inc).
|
||||
Пользовательский бработчик,при завершении обработки этого исключения, должен дополнительно обнулить бит занятости (бит номер 0) резервного стека в поле LockAccess структуры EXCEPT_STACK.
|
||||
1) Если пользовательский обработчик обрабатывает исключение переполнения стека (#SS), то должен быть установлен стартовый адрес резервного стека в регистре ESI.
|
||||
При возникновении исключения (#SS), в этот резервный стек будут записаны дополнительные данные (см. структуру EXCEPT_STACK sys32.inc).
|
||||
При завершении обработки этого исключения, пользовательский обработчик должен дополнительно обнулить бит занятости (бит номер 0) резервного стека в поле LockAccess структуры EXCEPT_STACK.
|
||||
|
||||
2) Вы можете использовать режим "контролируемое исключение" для проверок на корректность адресов памяти при считывании\записи данных.
|
||||
Для этого:
|
||||
- В регистр ESI заносится адрес, куда должно перейти выполнение кода при возникновении исключения.
|
||||
- В регистр EDI заносится сигнатура - текст 'EXPT'.
|
||||
|
||||
|
||||
---------------------- Константы для регистров: ----------------------
|
||||
|
||||
@ -4281,15 +4281,85 @@ align 4
|
||||
;-----------------------------------------------------------------------------
|
||||
|
||||
align 4
|
||||
syscall_threads: ; CreateThreads
|
||||
;
|
||||
; ecx=thread entry point
|
||||
; edx=thread stack pointer
|
||||
;
|
||||
; on return : eax = pid
|
||||
xor ebx, ebx
|
||||
syscall_threads:
|
||||
; eax = 51
|
||||
; if ebx = 1 CreateThreads
|
||||
; ecx = thread entry point
|
||||
; edx = thread stack pointer
|
||||
; return eax = pid
|
||||
|
||||
; if ebx = 2 GetCurrentThreadId
|
||||
; return eax = current id slot
|
||||
|
||||
; if ebx = 3 GetThreadPriority
|
||||
; ecx = -1 curr slot or id slot
|
||||
; return eax = priority
|
||||
|
||||
; if ebx = 4 SetThreadPriority
|
||||
; ecx = -1 curr slot or id slot
|
||||
; edx = set priority
|
||||
; return eax = old priority
|
||||
|
||||
dec ebx
|
||||
jz .create
|
||||
mov eax, [current_slot_idx]
|
||||
dec ebx
|
||||
jz .end ;get_curr_slot
|
||||
|
||||
test ecx, ecx ;-1 curr slot
|
||||
jl .cur_slot
|
||||
mov eax, ecx
|
||||
.cur_slot:
|
||||
shl eax, BSF sizeof.APPDATA
|
||||
add eax, SLOT_BASE
|
||||
|
||||
test ecx, ecx ;-1 curr slot
|
||||
jl .curr_slot
|
||||
|
||||
mov esi, .err_exit
|
||||
mov edi, CONTROL_EXCEPTION
|
||||
|
||||
movzx ecx, [eax+APPDATA.state]
|
||||
test ecx, ecx
|
||||
jnz .check_state
|
||||
|
||||
cmp [eax+APPDATA.tid], ecx
|
||||
jnz .curr_slot
|
||||
jmp .err_exit
|
||||
|
||||
.check_state:
|
||||
sub ecx, 3 ;TSTATE_ZOMBIE
|
||||
jl .curr_slot
|
||||
je .err_exit
|
||||
dec ecx ; 4 TSTATE_TERMINATING
|
||||
dec ecx ; 5 TSTATE_WAITING
|
||||
jnz .err_exit
|
||||
|
||||
.curr_slot:
|
||||
dec ebx
|
||||
jz .get_priority
|
||||
dec ebx
|
||||
jz .set_priority
|
||||
|
||||
.err_exit:
|
||||
push -1
|
||||
pop eax
|
||||
jmp .end
|
||||
|
||||
.set_priority: ;;sysfn 51,4
|
||||
mov dh, dl
|
||||
lock xchg word [eax+APPDATA.def_priority], dx
|
||||
movzx eax, dl ;old priority
|
||||
jmp .end
|
||||
|
||||
.get_priority: ;;sysfn 51,3
|
||||
movzx eax, [eax+APPDATA.def_priority]
|
||||
jmp .end
|
||||
|
||||
.create: ;sysfn 51,1
|
||||
call new_sys_threads
|
||||
|
||||
.end:
|
||||
mov [esp + SYSCALL_STACK.eax], eax
|
||||
ret
|
||||
|
||||
|
||||
Loading…
Reference in New Issue
Block a user