| 0,0 → 1,332 |
|---|
| # |
| # Copyright (C) 2001-2004 Jakub Jermar |
| # All rights reserved. |
| # |
| # Redistribution and use in source and binary forms, with or without |
| # modification, are permitted provided that the following conditions |
| # are met: |
| # |
| # - Redistributions of source code must retain the above copyright |
| # notice, this list of conditions and the following disclaimer. |
| # - Redistributions in binary form must reproduce the above copyright |
| # notice, this list of conditions and the following disclaimer in the |
| # documentation and/or other materials provided with the distribution. |
| # - The name of the author may not be used to endorse or promote products |
| # derived from this software without specific prior written permission. |
| # |
| # THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
| # IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
| # OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
| # IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
| # INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
| # NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
| # DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
| # THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| # (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
| # THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| # |
| |
| # very low and hardware-level functions |
| |
| .text |
| |
| .global cpu_priority_high |
| .global cpu_priority_low |
| .global cpu_priority_restore |
| .global cpu_priority_read |
| .global cpu_halt |
| .global cpu_sleep |
| .global paging_on |
| .global cpu_read_dba |
| .global cpu_write_dba |
| .global cpu_read_cr2 |
| .global enable_l_apic_in_msr |
| .global interrupt_handlers |
| .global inb |
| .global inw |
| .global inl |
| .global outb |
| .global outw |
| .global outl |
| .global memcopy |
| .global memsetb |
| .global memsetw |
| .global memcmp |
| |
| # |
| # set priority level high |
| cpu_priority_high: |
| pushf |
| pop %eax |
| cli |
| ret |
| |
| # |
| # set priority level low |
| cpu_priority_low: |
| pushf |
| pop %eax |
| sti |
| ret |
| |
| # |
| # restore priority level |
| cpu_priority_restore: |
| push 4(%esp) |
| popf |
| ret |
| |
| # return raw priority level |
| cpu_priority_read: |
| pushf |
| pop %eax |
| ret |
| |
| cpu_halt: |
| cpu_sleep: |
| hlt |
| ret |
| |
| paging_on: |
| pushl %eax |
| movl %cr0,%eax |
| orl $(1<<31),%eax # paging on |
| andl $~((1<<30)|(1<<29)),%eax # clear Cache Disable and not Write Though |
| movl %eax,%cr0 |
| jmp 0f |
| 0: |
| popl %eax |
| ret |
| |
| cpu_read_dba: |
| movl %cr3,%eax |
| ret |
| |
| cpu_write_dba: |
| pushl %eax |
| movl 8(%esp),%eax |
| movl %eax,%cr3 |
| popl %eax |
| ret |
| |
| cpu_read_cr2: |
| movl %cr2,%eax |
| ret |
| |
| enable_l_apic_in_msr: |
| pusha |
| |
| movl $0x1b, %ecx |
| rdmsr |
| orl $(1<<11),%eax |
| orl $(0xfee00000),%eax |
| wrmsr |
| |
| popa |
| ret |
| |
| .macro handler i n |
| push %ebp |
| movl %esp,%ebp |
| pusha |
| |
| # we must fill the data segment registers |
| movw $16,%ax |
| movw %ax,%ds |
| movw %ax,%es |
| |
| movl $(\i),%edi |
| pushl %ebp |
| addl $4,(%esp) |
| pushl %edi |
| call trap_dispatcher |
| addl $8,%esp |
| |
| popa |
| pop %ebp |
| |
| iret |
| |
| .if (\n-\i)-1 |
| handler "(\i+1)",\n |
| .endif |
| .endm |
| |
| # keep in sync with pm.h !!! |
| IDT_ITEMS=64 |
| interrupt_handlers: |
| h_start: |
| handler 0 64 |
| # handler 64 128 |
| # handler 128 192 |
| # handler 192 256 |
| h_end: |
| |
| |
| inb: |
| push %edx |
| xorl %eax,%eax |
| movl 8(%esp),%edx |
| inb %dx,%al |
| pop %edx |
| ret |
| |
| inw: |
| push %edx |
| xorl %eax,%eax |
| movl 8(%esp),%edx |
| inw %dx,%ax |
| pop %edx |
| ret |
| |
| inl: |
| push %edx |
| xorl %eax,%eax |
| movl 8(%esp),%edx |
| inl %dx,%eax |
| pop %edx |
| ret |
| |
| outb: |
| push %ebp |
| movl %esp,%ebp |
| pusha |
| |
| movl 8(%ebp),%edx |
| movl 12(%ebp),%eax |
| outb %al,%dx |
| |
| popa |
| pop %ebp |
| ret |
| |
| outw: |
| push %ebp |
| movl %esp,%ebp |
| pusha |
| |
| movl 8(%ebp),%edx |
| movl 12(%ebp),%eax |
| outw %ax,%dx |
| |
| popa |
| pop %ebp |
| ret |
| |
| outl: |
| push %ebp |
| movl %esp,%ebp |
| pusha |
| |
| movl 8(%ebp),%edx |
| movl 12(%ebp),%eax |
| outl %eax,%dx |
| |
| popa |
| pop %ebp |
| ret |
| |
| SRC=8 |
| DST=12 |
| CNT=16 |
| memcopy: |
| push %ebp |
| movl %esp,%ebp |
| pusha |
| |
| cld |
| movl CNT(%ebp),%ecx |
| movl DST(%ebp),%edi |
| movl SRC(%ebp),%esi |
| |
| rep movsb %ds:(%esi),%es:(%edi) |
| |
| popa |
| pop %ebp |
| ret |
| |
| DST=8 |
| CNT=12 |
| X=16 |
| memsetw: |
| push %ebp |
| movl %esp,%ebp |
| pusha |
| |
| cld |
| movl CNT(%ebp),%ecx |
| movl DST(%ebp),%edi |
| movl X(%ebp),%eax |
| |
| rep stosw %ax,%es:(%edi) |
| |
| popa |
| pop %ebp |
| ret |
| |
| DST=8 |
| CNT=12 |
| X=16 |
| memsetb: |
| push %ebp |
| movl %esp,%ebp |
| pusha |
| |
| cld |
| movl CNT(%ebp),%ecx |
| movl DST(%ebp),%edi |
| movl X(%ebp),%eax |
| |
| rep stosb %al,%es:(%edi) |
| |
| popa |
| pop %ebp |
| ret |
| |
| SRC=12 |
| DST=16 |
| CNT=20 |
| memcmp: |
| push %ebp |
| subl $4,%esp |
| movl %esp,%ebp |
| |
| pusha |
| |
| cld |
| movl CNT(%ebp),%ecx |
| movl DST(%ebp),%edi |
| movl SRC(%ebp),%esi |
| |
| repe cmpsb %es:(%edi),%ds:(%esi) |
| movl %ecx,(%ebp) |
| |
| popa |
| |
| movl (%ebp),%eax # return value => %eax (zero on success) |
| addl $4,%esp |
| pop %ebp |
| |
| ret |
| |
| |
| # THIS IS USERSPACE CODE |
| .global utext |
| utext: |
| 0: |
| movl $0xdeadbeaf, %eax |
| int $48 |
| jmp 0b |
| # not reached |
| utext_end: |
| |
| .data |
| .global utext_size |
| utext_size: |
| .long utext_end - utext |
| |
| |
| .section K_DATA_START |
| .global interrupt_handler_size |
| |
| interrupt_handler_size: .long (h_end-h_start)/IDT_ITEMS |