88 lines
2.3 KiB
ArmAsm
88 lines
2.3 KiB
ArmAsm
/*
|
|
* Copyright (c) 2012 Jonas 'Sortie' Termansen.
|
|
*
|
|
* Permission to use, copy, modify, and distribute this software for any
|
|
* purpose with or without fee is hereby granted, provided that the above
|
|
* copyright notice and this permission notice appear in all copies.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
|
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
|
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
|
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
|
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
|
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
|
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
*
|
|
* x86/kthread.S
|
|
* Utilities and synchronization mechanisms for x86 kernel threads.
|
|
*/
|
|
|
|
.section .text
|
|
|
|
.global kthread_mutex_trylock
|
|
.type kthread_mutex_trylock, @function
|
|
kthread_mutex_trylock:
|
|
pushl %ebp
|
|
movl %esp, %ebp
|
|
movl 8(%ebp), %edx
|
|
movl $-1, %eax
|
|
xchgl (%edx), %eax
|
|
not %eax
|
|
leavel
|
|
retl
|
|
.size kthread_mutex_trylock, . - kthread_mutex_trylock
|
|
|
|
.global kthread_mutex_lock
|
|
.type kthread_mutex_lock, @function
|
|
kthread_mutex_lock:
|
|
pushl %ebp
|
|
movl %esp, %ebp
|
|
movl 8(%ebp), %edx
|
|
kthread_mutex_lock_retry:
|
|
movl $-1, %eax
|
|
xchgl (%edx), %eax
|
|
testl %eax, %eax
|
|
jnz kthread_mutex_lock_failed
|
|
leavel
|
|
retl
|
|
kthread_mutex_lock_failed:
|
|
int $0x81 # Yield the CPU.
|
|
jmp kthread_mutex_lock_retry
|
|
.size kthread_mutex_lock, . - kthread_mutex_lock
|
|
|
|
.global kthread_mutex_lock_signal
|
|
.type kthread_mutex_lock_signal, @function
|
|
kthread_mutex_lock_signal:
|
|
pushl %ebp
|
|
movl %esp, %ebp
|
|
movl 8(%ebp), %edx
|
|
kthread_mutex_lock_signal_retry:
|
|
movl asm_signal_is_pending, %eax
|
|
testl %eax, %eax
|
|
jnz kthread_mutex_lock_signal_pending
|
|
movl $-1, %eax
|
|
xchgl (%edx), %eax
|
|
testl %eax, %eax
|
|
jnz kthread_mutex_lock_signal_failed
|
|
inc %eax
|
|
kthread_mutex_lock_signal_out:
|
|
leavel
|
|
retl
|
|
kthread_mutex_lock_signal_failed:
|
|
int $0x81 # Yield the CPU.
|
|
jmp kthread_mutex_lock_signal_retry
|
|
kthread_mutex_lock_signal_pending:
|
|
xorl %eax, %eax
|
|
jmp kthread_mutex_lock_signal_out
|
|
|
|
.global kthread_mutex_unlock
|
|
.type kthread_mutex_unlock, @function
|
|
kthread_mutex_unlock:
|
|
pushl %ebp
|
|
movl %esp, %ebp
|
|
movl 8(%ebp), %edx
|
|
movl $0, (%edx)
|
|
leavel
|
|
retl
|
|
.size kthread_mutex_lock_signal, . - kthread_mutex_lock_signal
|