[BACK]Return to locore.S CVS log [TXT][DIR] Up to [cvs.NetBSD.org] / src / sys / arch / i386 / i386

Please note that diffs are not public domain; they are subject to the copyright notices on the relevant files.

Diff for /src/sys/arch/i386/i386/locore.S between version 1.113 and 1.113.2.4

version 1.113, 2014/08/17 21:17:43 version 1.113.2.4, 2016/10/05 20:55:28
Line 5 
Line 5 
  */   */
   
 /*  /*
    * Copyright (c) 1998, 2000, 2004, 2006, 2007, 2009, 2016
    * The NetBSD Foundation, Inc., All rights reserved.
    *
    * This code is derived from software contributed to The NetBSD Foundation
    * by Charles M. Hannum, by Andrew Doran and by Maxime Villard.
    *
    * Redistribution and use in source and binary forms, with or without
    * modification, are permitted provided that the following conditions
    * are met:
    * 1. Redistributions of source code must retain the above copyright
    *    notice, this list of conditions and the following disclaimer.
    * 2. 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.
    *
    * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
    * ``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 FOUNDATION OR CONTRIBUTORS
    * 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.
    */
   
   /*
  * Copyright (c) 2006 Manuel Bouyer.   * Copyright (c) 2006 Manuel Bouyer.
  *   *
  * Redistribution and use in source and binary forms, with or without   * Redistribution and use in source and binary forms, with or without
Line 64 
Line 93 
  * POSSIBILITY OF SUCH DAMAGE.   * POSSIBILITY OF SUCH DAMAGE.
  */   */
   
   
 /*-  
  * Copyright (c) 1998, 2000, 2004, 2006, 2007, 2009 The NetBSD Foundation, Inc.  
  * All rights reserved.  
  *  
  * This code is derived from software contributed to The NetBSD Foundation  
  * by Charles M. Hannum, and by Andrew Doran.  
  *  
  * Redistribution and use in source and binary forms, with or without  
  * modification, are permitted provided that the following conditions  
  * are met:  
  * 1. Redistributions of source code must retain the above copyright  
  *    notice, this list of conditions and the following disclaimer.  
  * 2. 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.  
  *  
  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS  
  * ``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 FOUNDATION OR CONTRIBUTORS  
  * 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.  
  */  
   
 /*-  /*-
  * Copyright (c) 1990 The Regents of the University of California.   * Copyright (c) 1990 The Regents of the University of California.
  * All rights reserved.   * All rights reserved.
Line 132 
Line 131 
 __KERNEL_RCSID(0, "$NetBSD$");  __KERNEL_RCSID(0, "$NetBSD$");
   
 #include "opt_compat_oldboot.h"  #include "opt_compat_oldboot.h"
   #include "opt_copy_symtab.h"
 #include "opt_ddb.h"  #include "opt_ddb.h"
 #include "opt_modular.h"  #include "opt_modular.h"
 #include "opt_multiboot.h"  #include "opt_multiboot.h"
Line 147  __KERNEL_RCSID(0, "$NetBSD$");
Line 147  __KERNEL_RCSID(0, "$NetBSD$");
 #include <sys/errno.h>  #include <sys/errno.h>
 #include <sys/syscall.h>  #include <sys/syscall.h>
   
 #include <machine/cputypes.h>  
 #include <machine/segments.h>  #include <machine/segments.h>
 #include <machine/specialreg.h>  #include <machine/specialreg.h>
 #include <machine/trap.h>  #include <machine/trap.h>
 #include <machine/i82489reg.h>  #include <machine/i82489reg.h>
 #include <machine/frameasm.h>  #include <machine/frameasm.h>
 #include <machine/i82489reg.h>  #include <machine/i82489reg.h>
   #include <machine/cputypes.h>
   
 #ifndef XEN  #ifndef XEN
 #include <machine/multiboot.h>  #include <machine/multiboot.h>
 #endif  #endif
   
 /* XXX temporary kluge; these should not be here */  
 /* Get definitions for IOM_BEGIN, IOM_END, and IOM_SIZE */  /* Get definitions for IOM_BEGIN, IOM_END, and IOM_SIZE */
 #include <dev/isa/isareg.h>  #include <dev/isa/isareg.h>
   
Line 169  __KERNEL_RCSID(0, "$NetBSD$");
Line 169  __KERNEL_RCSID(0, "$NetBSD$");
 #endif /* XEN */  #endif /* XEN */
 #define RELOC(x)        _RELOC(_C_LABEL(x))  #define RELOC(x)        _RELOC(_C_LABEL(x))
   
   /* 32bit version of PG_NX */
   #define PG_NX32 0x80000000
   
   #ifndef PAE
   #define PROC0_PDIR_OFF  0
   #else
   #define PROC0_L3_OFF    0
   #define PROC0_PDIR_OFF  1 * PAGE_SIZE
   #endif
   
   #define PROC0_STK_OFF   (PROC0_PDIR_OFF + PDP_SIZE * PAGE_SIZE)
   #define PROC0_PTP1_OFF  (PROC0_STK_OFF + UPAGES * PAGE_SIZE)
   
   /*
    * fillkpt - Fill in a kernel page table
    *      eax = pte (page frame | control | status)
    *      ebx = page table address
    *      ecx = number of pages to map
    *
    * For PAE, each entry is 8 bytes long: we must set the 4 upper bytes to 0.
    * This is done by the first instruction of fillkpt. In the non-PAE case, this
    * instruction just clears the page table entry.
    */
   #define fillkpt \
           cmpl    $0,%ecx                 ;       /* zero-sized? */       \
           je      2f                      ; \
   1:      movl    $0,(PDE_SIZE-4)(%ebx)   ;       /* upper 32 bits: 0 */  \
           movl    %eax,(%ebx)             ;       /* store phys addr */   \
           addl    $PDE_SIZE,%ebx          ;       /* next PTE/PDE */      \
           addl    $PAGE_SIZE,%eax         ;       /* next phys page */    \
           loop    1b                      ; \
   2:                                      ;
   
   /*
    * fillkpt_nox - Same as fillkpt, but sets the NX/XD bit.
    */
   #define fillkpt_nox \
           cmpl    $0,%ecx                 ;       /* zero-sized? */       \
           je      2f                      ; \
           pushl   %ebp                    ; \
           movl    RELOC(nox_flag),%ebp    ; \
   1:      movl    %ebp,(PDE_SIZE-4)(%ebx) ;       /* upper 32 bits: NX */ \
           movl    %eax,(%ebx)             ;       /* store phys addr */   \
           addl    $PDE_SIZE,%ebx          ;       /* next PTE/PDE */      \
           addl    $PAGE_SIZE,%eax         ;       /* next phys page */    \
           loop    1b                      ; \
           popl    %ebp                    ; \
   2:                                      ;
   
   /*
    * fillkpt_blank - Fill in a kernel page table with blank entries
    *      ebx = page table address
    *      ecx = number of pages to map
    */
   #define fillkpt_blank   \
           cmpl    $0,%ecx                 ;       /* zero-sized? */       \
           je      2f                      ; \
   1:      movl    $0,(PDE_SIZE-4)(%ebx)   ;       /* upper 32 bits: 0 */  \
           movl    $0,(%ebx)               ;       /* lower 32 bits: 0 */  \
           addl    $PDE_SIZE,%ebx          ;       /* next PTE/PDE */      \
           loop    1b                      ; \
   2:                                      ;
   
   /*
    * killkpt - Destroy a kernel page table
    *      ebx = page table address
    *      ecx = number of pages to destroy
    */
   #define killkpt \
   1:      movl    $0,(PDE_SIZE-4)(%ebx)   ;       /* upper bits (for PAE) */ \
           movl    $0,(%ebx)               ; \
           addl    $PDE_SIZE,%ebx          ; \
           loop    1b                      ;
   
   
 #ifdef XEN  #ifdef XEN
 /*  /*
  * Xen guest identifier and loader selection   * Xen guest identifier and loader selection
Line 184  __KERNEL_RCSID(0, "$NetBSD$");
Line 259  __KERNEL_RCSID(0, "$NetBSD$");
         .ascii  ",PAE=yes[extended-cr3]"          .ascii  ",PAE=yes[extended-cr3]"
 #endif  #endif
         .ascii  ",LOADER=generic"          .ascii  ",LOADER=generic"
 #if (NKSYMS || defined(DDB) || defined(MODULAR)) && !defined(COPY_SYMTAB)  #if (NKSYMS || defined(DDB) || defined(MODULAR)) && !defined(makeoptions_COPY_SYMTAB)
         .ascii  ",BSD_SYMTAB=yes"          .ascii  ",BSD_SYMTAB=yes"
 #endif  #endif
         .byte   0          .byte   0
Line 195  __KERNEL_RCSID(0, "$NetBSD$");
Line 270  __KERNEL_RCSID(0, "$NetBSD$");
  */   */
         .data          .data
   
         .globl  _C_LABEL(cputype)  
         .globl  _C_LABEL(cpuid_level)  
         .globl  _C_LABEL(esym)  
         .globl  _C_LABEL(eblob)  
         .globl  _C_LABEL(atdevbase)  
         .globl  _C_LABEL(lwp0uarea)  
         .globl  _C_LABEL(PDPpaddr)  
         .globl  _C_LABEL(gdt)  
         .globl  _C_LABEL(idt)  
         .globl  _C_LABEL(lapic_tpr)          .globl  _C_LABEL(lapic_tpr)
   
 #if NLAPIC > 0  #if NLAPIC > 0
 #ifdef __ELF__  
         .align  PAGE_SIZE          .align  PAGE_SIZE
 #else          .globl  _C_LABEL(local_apic)
         .align  12  
 #endif  
         .globl _C_LABEL(local_apic), _C_LABEL(lapic_id)  
         .type   _C_LABEL(local_apic), @object          .type   _C_LABEL(local_apic), @object
 LABEL(local_apic)  LABEL(local_apic)
         .space  LAPIC_ID          .space  LAPIC_TPRI
 END(local_apic)  END(local_apic)
         .type   _C_LABEL(lapic_id), @object  
 LABEL(lapic_id)  
         .long   0x00000000  
         .space  LAPIC_TPRI-(LAPIC_ID+4)  
 END(lapic_id)  
         .type   _C_LABEL(lapic_tpr), @object          .type   _C_LABEL(lapic_tpr), @object
 LABEL(lapic_tpr)  LABEL(lapic_tpr)
         .space  LAPIC_PPRI-LAPIC_TPRI          .space  PAGE_SIZE-LAPIC_TPRI
 END(lapic_tpr)  END(lapic_tpr)
         .type   _C_LABEL(lapic_ppr), @object  
 _C_LABEL(lapic_ppr):  
         .space  LAPIC_ISR-LAPIC_PPRI  
 END(lapic_ppr)  
         .type   _C_LABEL(lapic_isr), @object  
 _C_LABEL(lapic_isr):  
         .space  PAGE_SIZE-LAPIC_ISR  
 END(lapic_isr)  
 #else  #else
         .type   _C_LABEL(lapic_tpr), @object          .type   _C_LABEL(lapic_tpr), @object
 LABEL(lapic_tpr)  LABEL(lapic_tpr)
         .long 0          .long 0
 END(lapic_tpr)  END(lapic_tpr)
 #endif  #endif
   
           .globl  _C_LABEL(tablesize)
           .globl  _C_LABEL(nox_flag)
           .globl  _C_LABEL(cputype)
           .globl  _C_LABEL(cpuid_level)
           .globl  _C_LABEL(esym)
           .globl  _C_LABEL(eblob)
           .globl  _C_LABEL(atdevbase)
           .globl  _C_LABEL(PDPpaddr)
           .globl  _C_LABEL(lwp0uarea)
           .globl  _C_LABEL(gdt)
           .globl  _C_LABEL(idt)
   
           .type   _C_LABEL(tablesize), @object
   _C_LABEL(tablesize):    .long   0
   END(tablesize)
           .type   _C_LABEL(nox_flag), @object
   LABEL(nox_flag)         .long   0       /* 32bit NOX flag, set if supported */
   END(nox_flag)
         .type   _C_LABEL(cputype), @object          .type   _C_LABEL(cputype), @object
 LABEL(cputype)          .long   0       # are we 80486, Pentium, or..  LABEL(cputype)          .long   0       /* are we 80486, Pentium, or.. */
 END(cputype)  END(cputype)
         .type   _C_LABEL(cpuid_level), @object          .type   _C_LABEL(cpuid_level), @object
 LABEL(cpuid_level)      .long   0  LABEL(cpuid_level)      .long   -1      /* max. level accepted by cpuid instr */
 END(cpuid_level)  END(cpuid_level)
         .type   _C_LABEL(atdevbase), @object          .type   _C_LABEL(atdevbase), @object
 LABEL(atdevbase)        .long   0       # location of start of iomem in virtual  LABEL(atdevbase)        .long   0       /* location of start of iomem in virt */
 END(atdevbase)  END(atdevbase)
         .type   _C_LABEL(lwp0uarea), @object          .type   _C_LABEL(lwp0uarea), @object
 LABEL(lwp0uarea)        .long   0  LABEL(lwp0uarea)        .long   0
 END(lwp0uarea)  END(lwp0uarea)
         .type   _C_LABEL(PDPpaddr), @object          .type   _C_LABEL(PDPpaddr), @object
 LABEL(PDPpaddr)         .long   0       # paddr of PDP, for libkvm  LABEL(PDPpaddr)         .long   0       /* paddr of PDP, for libkvm */
 END(PDPpaddr)  END(PDPpaddr)
         .type   _C_LABEL(tablesize), @object  
 _C_LABEL(tablesize):    .long   0          /* Space for the temporary stack */
 END(tablesize)  
         .size   tmpstk, tmpstk - .          .size   tmpstk, tmpstk - .
         .space 512          .space  512
 tmpstk:  tmpstk:
 #ifdef XEN  #ifdef XEN
         .align          PAGE_SIZE, 0x0  # Align on page boundary          .align          PAGE_SIZE, 0x0  /* Align on page boundary */
 LABEL(tmpgdt)  LABEL(tmpgdt)
         .space          PAGE_SIZE       # Xen expects a page          .space          PAGE_SIZE       /* Xen expects a page */
 END(tmpgdt)  END(tmpgdt)
 #endif /* XEN */  #endif /* XEN */
   
Line 274  END(tmpgdt)
Line 342  END(tmpgdt)
   
 ENTRY(start)  ENTRY(start)
 #ifndef XEN  #ifndef XEN
         movw    $0x1234,0x472                   # warm boot  
           /* Warm boot */
           movw    $0x1234,0x472
   
 #if defined(MULTIBOOT)  #if defined(MULTIBOOT)
         jmp     1f          jmp     1f
   
Line 298  _C_LABEL(Multiboot_Header):
Line 369  _C_LABEL(Multiboot_Header):
          * space to process it later -- after we are relocated.  It will           * space to process it later -- after we are relocated.  It will
          * be safer to run complex C code than doing it at this point.           * be safer to run complex C code than doing it at this point.
          */           */
         pushl   %ebx            # Address of Multiboot information          pushl   %ebx            /* Address of Multiboot information */
         call    _C_LABEL(multiboot_pre_reloc)          call    _C_LABEL(multiboot_pre_reloc)
         addl    $4,%esp          addl    $4,%esp
         jmp     2f          jmp     2f
Line 307  _C_LABEL(Multiboot_Header):
Line 378  _C_LABEL(Multiboot_Header):
 1:  1:
         /*          /*
          * At this point, we know that a NetBSD-specific boot loader           * At this point, we know that a NetBSD-specific boot loader
          * booted this kernel.  The stack carries the following parameters:           * booted this kernel.
          * (boothowto, [bootdev], bootinfo, esym, biosextmem, biosbasemem),           *
          * 4 bytes each.           * Load parameters from the stack (32 bits):
            *     boothowto, [bootdev], bootinfo, esym, biosextmem, biosbasemem
            * We are not interested in 'bootdev'.
          */           */
         addl    $4,%esp         # Discard return address to boot loader  
           addl    $4,%esp         /* Discard return address to boot loader */
         call    _C_LABEL(native_loader)          call    _C_LABEL(native_loader)
         addl    $24,%esp          addl    $24,%esp
   
Line 324  _C_LABEL(Multiboot_Header):
Line 398  _C_LABEL(Multiboot_Header):
         xorl    %eax,%eax          xorl    %eax,%eax
         movw    %ax,%fs          movw    %ax,%fs
         movw    %ax,%gs          movw    %ax,%gs
         decl    %eax  
         movl    %eax,RELOC(cpuid_level)  
   
         /* Find out our CPU type. */          /* Find out our CPU type. */
   
Line 403  is486: movl $CPU_486,RELOC(cputype)
Line 475  is486: movl $CPU_486,RELOC(cputype)
         popfl          popfl
         jmp 2f          jmp 2f
 trycyrix486:  trycyrix486:
         movl    $CPU_6x86,RELOC(cputype)        # set CPU type          movl    $CPU_6x86,RELOC(cputype)        /* set CPU type */
         /*          /*
          * Check for Cyrix 486 CPU by seeing if the flags change during a           * Check for Cyrix 486 CPU by seeing if the flags change during a
          * divide. This is documented in the Cx486SLC/e SMM Programmer's           * divide. This is documented in the Cx486SLC/e SMM Programmer's
          * Guide.           * Guide.
          */           */
         xorl    %edx,%edx          xorl    %edx,%edx
         cmpl    %edx,%edx               # set flags to known state          cmpl    %edx,%edx               /* set flags to known state */
         pushfl          pushfl
         popl    %ecx                    # store flags in ecx          popl    %ecx                    /* store flags in ecx */
         movl    $-1,%eax          movl    $-1,%eax
         movl    $4,%ebx          movl    $4,%ebx
         divl    %ebx                    # do a long division          divl    %ebx                    /* do a long division */
         pushfl          pushfl
         popl    %eax          popl    %eax
         xorl    %ecx,%eax               # are the flags different?          xorl    %ecx,%eax               /* are the flags different? */
         testl   $0x8d5,%eax             # only check C|PF|AF|Z|N|V          testl   $0x8d5,%eax             /* only check C|PF|AF|Z|N|V */
         jne     2f                      # yes; must be Cyrix 6x86 CPU          jne     2f                      /* yes; must be Cyrix 6x86 CPU */
         movl    $CPU_486DLC,RELOC(cputype)      # set CPU type          movl    $CPU_486DLC,RELOC(cputype)      /* set CPU type */
   
 #ifndef CYRIX_CACHE_WORKS  #ifndef CYRIX_CACHE_WORKS
         /* Disable caching of the ISA hole only. */          /* Disable caching of the ISA hole only. */
         invd          invd
         movb    $CCR0,%al               # Configuration Register index (CCR0)          movb    $CCR0,%al       /* Configuration Register index (CCR0) */
         outb    %al,$0x22          outb    %al,$0x22
         inb     $0x23,%al          inb     $0x23,%al
         orb     $(CCR0_NC1|CCR0_BARB),%al          orb     $(CCR0_NC1|CCR0_BARB),%al
Line 438  trycyrix486:
Line 510  trycyrix486:
         invd          invd
 #else /* CYRIX_CACHE_WORKS */  #else /* CYRIX_CACHE_WORKS */
         /* Set cache parameters */          /* Set cache parameters */
         invd                            # Start with guaranteed clean cache          invd                    /* Start with guaranteed clean cache */
         movb    $CCR0,%al               # Configuration Register index (CCR0)          movb    $CCR0,%al       /* Configuration Register index (CCR0) */
         outb    %al,$0x22          outb    %al,$0x22
         inb     $0x23,%al          inb     $0x23,%al
         andb    $~CCR0_NC0,%al          andb    $~CCR0_NC0,%al
Line 487  try586: /* Use the `cpuid' instruction. 
Line 559  try586: /* Use the `cpuid' instruction. 
         cpuid          cpuid
         movl    %eax,RELOC(cpuid_level)          movl    %eax,RELOC(cpuid_level)
   
           /*
            * Retrieve the NX/XD flag. We use the 32bit version of PG_NX.
            */
           movl    $0x80000001,%eax
           cpuid
           andl    $CPUID_NOX,%edx
           jz      no_NOX
           movl    $PG_NX32,RELOC(nox_flag)
   no_NOX:
   
 2:  2:
         /*          /*
          * Finished with old stack; load new %esp now instead of later so we           * Finished with old stack; load new %esp now instead of later so we
Line 497  try586: /* Use the `cpuid' instruction. 
Line 579  try586: /* Use the `cpuid' instruction. 
          * The boot program should check:           * The boot program should check:
          *      text+data <= &stack_variable - more_space_for_stack           *      text+data <= &stack_variable - more_space_for_stack
          *      text+data+bss+pad+space_for_page_tables <= end_of_memory           *      text+data+bss+pad+space_for_page_tables <= end_of_memory
          * Oops, the gdt is in the carcass of the boot program so clearing           *
            * XXX: the gdt is in the carcass of the boot program so clearing
          * the rest of memory is still not possible.           * the rest of memory is still not possible.
          */           */
         movl    $_RELOC(tmpstk),%esp    # bootstrap stack end location          movl    $_RELOC(tmpstk),%esp
   
 /*  /*
  * Virtual address space of kernel, without PAE. The page dir is 1 page long.   * There are two different layouts possible, depending on whether PAE is
    * enabled or not.
  *   *
  * text | data | bss | [syms] | [blobs] | page dir | proc0 kstack | L1 ptp   * If PAE is not enabled, there are two levels of pages: PD -> PT. They will
  *                                      0          1       2      3   * be referred to as: L2 -> L1. L2 is 1 page long. The BOOTSTRAP TABLES have
    * the following layout:
    *      +-----+------------+----+
    *      | L2 -> PROC0 STK -> L1 |
    *      +-----+------------+----+
    *
    * If PAE is enabled, there are three levels of pages: PDP -> PD -> PT. They
    * will be referred to as: L3 -> L2 -> L1. L3 is 1 page long, L2 is 4 page
    * long. The BOOTSTRAP TABLES have the following layout:
    *      +-----+-----+------------+----+
    *      | L3 -> L2 -> PROC0 STK -> L1 |
    *      +-----+-----+------------+----+
    *
    * Virtual address space of the kernel in both cases:
    * +------+--------+------+-----+--------+---------------------+-----------
    * | TEXT | RODATA | DATA | BSS | [SYMS] | [PRELOADED MODULES] | BOOTSTRAP
    * +------+--------+------+-----+--------+---------------------+-----------
    *                             (1)      (2)                   (3)
    *
    * -------+-------------+
    * TABLES | ISA I/O MEM |
    * -------+-------------+
    *       (4)
  *   *
  * Virtual address space of kernel, with PAE. We need 4 pages for the page dir   * PROC0 STK is obviously not linked as a page level. It just happens to be
  * and 1 page for the L3.   * caught between L2 and L1.
  * text | data | bss | [syms] | [blobs] | L3 | page dir | proc0 kstack | L1 ptp  
  *                                      0    1          5       6      7  
  */  
 #ifndef PAE  
 #define PROC0_PDIR_OFF  0  
 #else  
 #define PROC0_L3_OFF    0  
 #define PROC0_PDIR_OFF  1 * PAGE_SIZE  
 #endif  
   
 #define PROC0_STK_OFF   (PROC0_PDIR_OFF + PDP_SIZE * PAGE_SIZE)  
 #define PROC0_PTP1_OFF  (PROC0_STK_OFF + UPAGES * PAGE_SIZE)  
   
 /*  
  * fillkpt - Fill in a kernel page table  
  *      eax = pte (page frame | control | status)  
  *      ebx = page table address  
  *      ecx = number of pages to map  
  *   *
  * For PAE, each entry is 8 bytes long: we must set the 4 upper bytes to 0.   * Important note: the kernel segments are properly 4k-aligned
  * This is done by the first instruction of fillkpt. In the non-PAE case, this   * (see kern.ldscript), so there's no need to enforce alignment.
  * instruction just clears the page table entry.  
  */   */
   
 #define fillkpt \          /* Find end of kernel image; brings us on (1). */
 1:      movl    $0,(PDE_SIZE-4)(%ebx)   ;       /* clear bits */        \  
         movl    %eax,(%ebx)             ;       /* store phys addr */   \  
         addl    $PDE_SIZE,%ebx          ;       /* next pte/pde */      \  
         addl    $PAGE_SIZE,%eax         ;       /* next phys page */    \  
         loop    1b                      ;  
   
         /* Find end of kernel image. */  
         movl    $RELOC(end),%edi          movl    $RELOC(end),%edi
   
 #if (NKSYMS || defined(DDB) || defined(MODULAR)) && !defined(COPY_SYMTAB)  #if (NKSYMS || defined(DDB) || defined(MODULAR)) && !defined(makeoptions_COPY_SYMTAB)
         /* Save the symbols (if loaded). */          /* Save the symbols (if loaded); brinds us on (2). */
         movl    RELOC(esym),%eax          movl    RELOC(esym),%eax
         testl   %eax,%eax          testl   %eax,%eax
         jz      1f          jz      1f
Line 554  try586: /* Use the `cpuid' instruction. 
Line 634  try586: /* Use the `cpuid' instruction. 
 1:  1:
 #endif  #endif
   
         /* Skip over any modules/blobs. */          /* Skip over any modules/blobs; brings us on (3). */
         movl    RELOC(eblob),%eax          movl    RELOC(eblob),%eax
         testl   %eax,%eax          testl   %eax,%eax
         jz      1f          jz      1f
         subl    $KERNBASE,%eax          subl    $KERNBASE,%eax
         movl    %eax,%edi          movl    %eax,%edi
 1:  1:
         /* Compute sizes */  
           /* We are on (3). Align up for BOOTSTRAP TABLES. */
         movl    %edi,%esi          movl    %edi,%esi
         addl    $PGOFSET,%esi                   # page align up          addl    $PGOFSET,%esi
         andl    $~PGOFSET,%esi          andl    $~PGOFSET,%esi
   
         /* nkptp[1] = (esi + ~L2_FRAME) >> L2_SHIFT + 1; */          /* nkptp[1] = (esi + ~L2_FRAME) >> L2_SHIFT + 1; */
         movl    %esi,%eax          movl    %esi,%eax
         addl    $~L2_FRAME,%eax          addl    $~L2_FRAME,%eax
         shrl    $L2_SHIFT,%eax          shrl    $L2_SHIFT,%eax
         incl    %eax            /* one more ptp for VAs stolen by bootstrap */          incl    %eax            /* one more PTP for VAs stolen by bootstrap */
 1:      movl    %eax,RELOC(nkptp)+1*4  1:      movl    %eax,RELOC(nkptp)+1*4
   
         /* tablesize = (PDP_SIZE + UPAGES + nkptp) << PGSHIFT; */          /* tablesize = (PDP_SIZE + UPAGES + nkptp) << PGSHIFT; */
         addl    $(PDP_SIZE+UPAGES),%eax          addl    $(PDP_SIZE+UPAGES),%eax
 #ifdef PAE  #ifdef PAE
         incl    %eax            /* one more page for the L3 PD */          incl    %eax            /* one more page for L3 */
         shll    $PGSHIFT+1,%eax /* PTP tables are twice larger with PAE */          shll    $PGSHIFT+1,%eax /* PTP tables are twice larger with PAE */
 #else  #else
         shll    $PGSHIFT,%eax          shll    $PGSHIFT,%eax
 #endif  #endif
         movl    %eax,RELOC(tablesize)          movl    %eax,RELOC(tablesize)
   
         /* ensure that nkptp covers bootstrap tables */          /* Ensure that nkptp covers BOOTSTRAP TABLES. */
         addl    %esi,%eax          addl    %esi,%eax
         addl    $~L2_FRAME,%eax          addl    $~L2_FRAME,%eax
         shrl    $L2_SHIFT,%eax          shrl    $L2_SHIFT,%eax
Line 591  try586: /* Use the `cpuid' instruction. 
Line 672  try586: /* Use the `cpuid' instruction. 
         cmpl    %eax,RELOC(nkptp)+1*4          cmpl    %eax,RELOC(nkptp)+1*4
         jnz     1b          jnz     1b
   
         /* Clear tables */          /* Now, zero out the BOOTSTRAP TABLES (before filling them in). */
         movl    %esi,%edi          movl    %esi,%edi
         xorl    %eax,%eax          xorl    %eax,%eax
         cld          cld
         movl    RELOC(tablesize),%ecx          movl    RELOC(tablesize),%ecx
         shrl    $2,%ecx          shrl    $2,%ecx
         rep          rep
         stosl          stosl                           /* copy eax -> edi */
   
         leal    (PROC0_PTP1_OFF)(%esi), %ebx  
   
 /*  /*
  * Build initial page tables.   * Build the page tables and levels. We go from L1 to L2/L3, and link the levels
    * together. Note: RELOC computes &addr - KERNBASE in 32 bits; the value can't
    * be > 4G, or we can't deal with it anyway, since we are in 32bit mode.
  */   */
         /*          /*
          * Compute &__data_start - KERNBASE. This can't be > 4G,           * Build L1.
          * or we can't deal with it anyway, since we can't load it in  
          * 32 bit mode. So use the bottom 32 bits.  
          */           */
         movl    $RELOC(__data_start),%edx          leal    (PROC0_PTP1_OFF)(%esi),%ebx
         andl    $~PGOFSET,%edx  
   
         /*          /* Skip the first MB. */
          * Skip the first MB.          movl    $(KERNTEXTOFF - KERNBASE),%ecx
          */          shrl    $PGSHIFT,%ecx
         movl    $_RELOC(KERNTEXTOFF),%eax          fillkpt_blank
         movl    %eax,%ecx  
         shrl    $(PGSHIFT-2),%ecx       /* ((n >> PGSHIFT) << 2) for # pdes */  
 #ifdef PAE  
         shll    $1,%ecx                 /* pdes are twice larger with PAE */  
 #endif  
         addl    %ecx,%ebx  
   
         /* Map the kernel text read-only. */          /* Map the kernel text RX. */
         movl    %edx,%ecx          movl    $(KERNTEXTOFF - KERNBASE),%eax  /* start of TEXT */
           movl    $RELOC(__rodata_start),%ecx
         subl    %eax,%ecx          subl    %eax,%ecx
         shrl    $PGSHIFT,%ecx          shrl    $PGSHIFT,%ecx
         orl     $(PG_V|PG_KR),%eax          orl     $(PG_V|PG_KR),%eax
         fillkpt          fillkpt
   
         /* Map the data, BSS, and bootstrap tables read-write. */          /* Map the kernel rodata R. */
         leal    (PG_V|PG_KW)(%edx),%eax          movl    $RELOC(__rodata_start),%eax
         movl    RELOC(tablesize),%ecx          movl    $RELOC(__data_start),%ecx
         addl    %esi,%ecx                               # end of tables          subl    %eax,%ecx
         subl    %edx,%ecx                               # subtract end of text  
         shrl    $PGSHIFT,%ecx          shrl    $PGSHIFT,%ecx
         fillkpt          orl     $(PG_V|PG_KR),%eax
           fillkpt_nox
   
         /* Map ISA I/O mem (later atdevbase) */          /* Map the kernel data+bss RW. */
         movl    $(IOM_BEGIN|PG_V|PG_KW/*|PG_N*/),%eax   # having these bits set          movl    $RELOC(__data_start),%eax
         movl    $(IOM_SIZE>>PGSHIFT),%ecx               # for this many pte s,          movl    $RELOC(__kernel_end),%ecx
         fillkpt          subl    %eax,%ecx
           shrl    $PGSHIFT,%ecx
           orl     $(PG_V|PG_KW),%eax
           fillkpt_nox
   
 /*          /* Map [SYMS]+[PRELOADED MODULES] RW. */
  * Construct a page table directory.          movl    $RELOC(__kernel_end),%eax
  */          movl    %esi,%ecx               /* start of BOOTSTRAP TABLES */
         /* Set up top level entries for identity mapping */          subl    %eax,%ecx
           shrl    $PGSHIFT,%ecx
           orl     $(PG_V|PG_KW),%eax
           fillkpt_nox
   
           /* Map the BOOTSTRAP TABLES RW. */
           movl    %esi,%eax               /* start of BOOTSTRAP TABLES */
           movl    RELOC(tablesize),%ecx   /* length of BOOTSTRAP TABLES */
           shrl    $PGSHIFT,%ecx
           orl     $(PG_V|PG_KW),%eax
           fillkpt_nox
   
           /* We are on (4). Map ISA I/O MEM RW. */
           movl    $IOM_BEGIN,%eax
           movl    $IOM_SIZE,%ecx  /* size of ISA I/O MEM */
           shrl    $PGSHIFT,%ecx
           orl     $(PG_V|PG_KW/*|PG_N*/),%eax
           fillkpt_nox
   
           /*
            * Build L2 for identity mapping. Linked to L1.
            */
         leal    (PROC0_PDIR_OFF)(%esi),%ebx          leal    (PROC0_PDIR_OFF)(%esi),%ebx
         leal    (PROC0_PTP1_OFF)(%esi),%eax          leal    (PROC0_PTP1_OFF)(%esi),%eax
         orl     $(PG_V|PG_KW), %eax          orl     $(PG_V|PG_KW),%eax
         movl    RELOC(nkptp)+1*4,%ecx          movl    RELOC(nkptp)+1*4,%ecx
         fillkpt          fillkpt
   
         /* Set up top level entries for actual kernel mapping */          /* Set up L2 entries for actual kernel mapping */
         leal    (PROC0_PDIR_OFF + L2_SLOT_KERNBASE*PDE_SIZE)(%esi),%ebx          leal    (PROC0_PDIR_OFF + L2_SLOT_KERNBASE * PDE_SIZE)(%esi),%ebx
         leal    (PROC0_PTP1_OFF)(%esi),%eax          leal    (PROC0_PTP1_OFF)(%esi),%eax
         orl     $(PG_V|PG_KW), %eax          orl     $(PG_V|PG_KW),%eax
         movl    RELOC(nkptp)+1*4,%ecx          movl    RELOC(nkptp)+1*4,%ecx
         fillkpt          fillkpt
   
         /* Install a PDE recursively mapping page directory as a page table! */          /* Install recursive top level PDE */
         leal    (PROC0_PDIR_OFF + PDIR_SLOT_PTE*PDE_SIZE)(%esi),%ebx          leal    (PROC0_PDIR_OFF + PDIR_SLOT_PTE * PDE_SIZE)(%esi),%ebx
         leal    (PROC0_PDIR_OFF)(%esi),%eax          leal    (PROC0_PDIR_OFF)(%esi),%eax
         orl     $(PG_V|PG_KW),%eax          orl     $(PG_V|PG_KW),%eax
         movl    $PDP_SIZE,%ecx          movl    $PDP_SIZE,%ecx
         fillkpt          fillkpt_nox
   
 #ifdef PAE  #ifdef PAE
         /* Fill in proc0 L3 page with entries pointing to the page dirs */          /*
            * Build L3. Linked to L2.
            */
         leal    (PROC0_L3_OFF)(%esi),%ebx          leal    (PROC0_L3_OFF)(%esi),%ebx
         leal    (PROC0_PDIR_OFF)(%esi),%eax          leal    (PROC0_PDIR_OFF)(%esi),%eax
         orl     $(PG_V),%eax          orl     $(PG_V),%eax
Line 682  try586: /* Use the `cpuid' instruction. 
Line 781  try586: /* Use the `cpuid' instruction. 
         movl    %eax,%cr4          movl    %eax,%cr4
 #endif  #endif
   
         /* Save phys. addr of PDP, for libkvm. */          /* Save physical address of L2. */
         leal    (PROC0_PDIR_OFF)(%esi),%eax          leal    (PROC0_PDIR_OFF)(%esi),%eax
         movl    %eax,RELOC(PDPpaddr)          movl    %eax,RELOC(PDPpaddr)
   
         /*          /*
          * Startup checklist:           * Startup checklist:
          * 1. Load %cr3 with pointer to PDIR (or L3 PD page for PAE).           * 1. Load %cr3 with pointer to L2 (or L3 for PAE).
          */           */
         movl    %esi,%eax               # phys address of ptd in proc 0          movl    %esi,%eax
         movl    %eax,%cr3               # load ptd addr into mmu          movl    %eax,%cr3
   
         /*          /*
          * 2. Enable paging and the rest of it.           * 2. Set NOX in EFER, if available.
          */           */
         movl    %cr0,%eax               # get control word          movl    RELOC(nox_flag),%ebx
                                         # enable paging & NPX          cmpl    $0,%ebx
           je      skip_NOX
           movl    $MSR_EFER,%ecx
           rdmsr
           xorl    %eax,%eax
           orl     $(EFER_NXE),%eax
           wrmsr
   skip_NOX:
   
           /*
            * 3. Enable paging and the rest of it.
            */
           movl    %cr0,%eax
         orl     $(CR0_PE|CR0_PG|CR0_NE|CR0_TS|CR0_MP|CR0_WP|CR0_AM),%eax          orl     $(CR0_PE|CR0_PG|CR0_NE|CR0_TS|CR0_MP|CR0_WP|CR0_AM),%eax
         movl    %eax,%cr0               # and page NOW!          movl    %eax,%cr0
   
         pushl   $begin                  # jump to high mem          pushl   $begin                  /* jump to high mem */
         ret          ret
   
 begin:  begin:
         /*          /*
          * We have arrived.           * We have arrived. There's no need anymore for the identity mapping in
          * There's no need anymore for the identity mapping in low           * low memory, remove it.
          * memory, remove it.  
          */           */
         movl    _C_LABEL(nkptp)+1*4,%ecx          movl    _C_LABEL(nkptp)+1*4,%ecx
         leal    (PROC0_PDIR_OFF)(%esi),%ebx     # old, phys address of PDIR          leal    (PROC0_PDIR_OFF)(%esi),%ebx     /* old, phys address of PDIR */
         addl    $(KERNBASE), %ebx               # new, virtual address of PDIR          addl    $(KERNBASE), %ebx               /* new, virt address of PDIR */
 1:      movl    $0,(PDE_SIZE-4)(%ebx)           # Upper bits (for PAE)          killkpt
         movl    $0,(%ebx)  
         addl    $PDE_SIZE,%ebx  
         loop    1b  
   
         /* Relocate atdevbase. */          /* Relocate atdevbase. */
         movl    $KERNBASE,%edx          movl    $KERNBASE,%edx
Line 728  begin:
Line 835  begin:
         leal    (PROC0_STK_OFF+KERNBASE)(%esi),%eax          leal    (PROC0_STK_OFF+KERNBASE)(%esi),%eax
         movl    %eax,_C_LABEL(lwp0uarea)          movl    %eax,_C_LABEL(lwp0uarea)
         leal    (USPACE-FRAMESIZE)(%eax),%esp          leal    (USPACE-FRAMESIZE)(%eax),%esp
         movl    %esi,PCB_CR3(%eax)      # pcb->pcb_cr3          movl    %esi,PCB_CR3(%eax)      /* pcb->pcb_cr3 */
         xorl    %ebp,%ebp               # mark end of frames          xorl    %ebp,%ebp               /* mark end of frames */
   
 #if defined(MULTIBOOT)  #if defined(MULTIBOOT)
         /* It is now safe to parse the Multiboot information structure          /* It is now safe to parse the Multiboot information structure
Line 739  begin:
Line 846  begin:
         call    _C_LABEL(multiboot_post_reloc)          call    _C_LABEL(multiboot_post_reloc)
 #endif  #endif
   
         subl    $NGDT*8, %esp           # space for temporary gdt          subl    $NGDT*8, %esp           /* space for temporary gdt */
         pushl   %esp          pushl   %esp
         call    _C_LABEL(initgdt)          call    _C_LABEL(initgdt)
         addl    $4,%esp          addl    $4,%esp
   
         movl    _C_LABEL(tablesize),%eax          movl    _C_LABEL(tablesize),%eax
         addl    %esi,%eax               # skip past stack and page tables          addl    %esi,%eax               /* skip past stack and page tables */
   
 #ifdef PAE  #ifdef PAE
         pushl   $0      # init386() expects a 64 bits paddr_t with PAE          pushl   $0      /* init386() expects a 64 bits paddr_t with PAE */
 #endif  #endif
         pushl   %eax          pushl   %eax
         call    _C_LABEL(init386)       # wire 386 chip for unix operation          call    _C_LABEL(init386)       /* wire 386 chip for unix operation */
         addl    $PDE_SIZE,%esp          # pop paddr_t          addl    $PDE_SIZE,%esp          /* pop paddr_t */
         addl    $NGDT*8,%esp            # pop temporary gdt          addl    $NGDT*8,%esp            /* pop temporary gdt */
   
 #ifdef SAFARI_FIFO_HACK  #ifdef SAFARI_FIFO_HACK
         movb    $5,%al          movb    $5,%al
Line 780  begin:
Line 887  begin:
         popfl          popfl
   
         cld          cld
         movl    %esp, %ebx              # save start of available space          movl    %esp, %ebx              /* save start of available space */
         movl    $_RELOC(tmpstk),%esp    # bootstrap stack end location          movl    $_RELOC(tmpstk),%esp    /* bootstrap stack end location */
   
         /* Clear BSS. */          /* Clear BSS. */
         xorl    %eax,%eax          xorl    %eax,%eax
Line 812  begin:
Line 919  begin:
          * done using it.           * done using it.
          */           */
         movl    $RELOC(tmpgdt), %eax          movl    $RELOC(tmpgdt), %eax
         pushl   %eax            # start of temporary gdt          pushl   %eax            /* start of temporary gdt */
         call    _C_LABEL(initgdt)          call    _C_LABEL(initgdt)
         addl    $4,%esp          addl    $4,%esp
   
Line 826  begin:
Line 933  begin:
   
         /* Set up bootstrap stack. */          /* Set up bootstrap stack. */
         leal    (USPACE-FRAMESIZE)(%eax),%esp          leal    (USPACE-FRAMESIZE)(%eax),%esp
         xorl    %ebp,%ebp               # mark end of frames          xorl    %ebp,%ebp               /* mark end of frames */
   
         addl    $USPACE, %esi          addl    $USPACE, %esi
         subl    $KERNBASE, %esi         #init386 want a physical address          subl    $KERNBASE, %esi         /* init386 wants a physical address */
   
 #ifdef PAE  #ifdef PAE
         pushl   $0      # init386() expects a 64 bits paddr_t with PAE          pushl   $0      /* init386() expects a 64 bits paddr_t with PAE */
 #endif  #endif
         pushl   %esi          pushl   %esi
         call    _C_LABEL(init386)       # wire 386 chip for unix operation          call    _C_LABEL(init386)       /* wire 386 chip for unix operation */
         addl    $PDE_SIZE,%esp          # pop paddr_t          addl    $PDE_SIZE,%esp          /* pop paddr_t */
         call    _C_LABEL(main)          call    _C_LABEL(main)
 #endif /* XEN */  #endif /* XEN */
 END(start)  END(start)
Line 910  NENTRY(sigcode)
Line 1017  NENTRY(sigcode)
          * Handler has returned here as if we called it.  The sigcontext           * Handler has returned here as if we called it.  The sigcontext
          * is on the stack after the 3 args "we" pushed.           * is on the stack after the 3 args "we" pushed.
          */           */
         leal    12(%esp),%eax           # get pointer to sigcontext          leal    12(%esp),%eax           /* get pointer to sigcontext */
         movl    %eax,4(%esp)            # put it in the argument slot          movl    %eax,4(%esp)            /* put it in the argument slot */
                                         # fake return address already there                                          /* fake return address already there */
         movl    $SYS_compat_16___sigreturn14,%eax          movl    $SYS_compat_16___sigreturn14,%eax
         int     $0x80                   # enter kernel with args on stack          int     $0x80                   /* enter kernel with args on stack */
         movl    $SYS_exit,%eax          movl    $SYS_exit,%eax
         int     $0x80                   # exit if sigreturn fails          int     $0x80                   /* exit if sigreturn fails */
         .globl  _C_LABEL(esigcode)          .globl  _C_LABEL(esigcode)
 _C_LABEL(esigcode):  _C_LABEL(esigcode):
 END(sigcode)  END(sigcode)
Line 928  END(sigcode)
Line 1035  END(sigcode)
  */   */
 ENTRY(setjmp)  ENTRY(setjmp)
         movl    4(%esp),%eax          movl    4(%esp),%eax
         movl    %ebx,(%eax)             # save ebx          movl    %ebx,(%eax)             /* save ebx */
         movl    %esp,4(%eax)            # save esp          movl    %esp,4(%eax)            /* save esp */
         movl    %ebp,8(%eax)            # save ebp          movl    %ebp,8(%eax)            /* save ebp */
         movl    %esi,12(%eax)           # save esi          movl    %esi,12(%eax)           /* save esi */
         movl    %edi,16(%eax)           # save edi          movl    %edi,16(%eax)           /* save edi */
         movl    (%esp),%edx             # get rta          movl    (%esp),%edx             /* get rta */
         movl    %edx,20(%eax)           # save eip          movl    %edx,20(%eax)           /* save eip */
         xorl    %eax,%eax               # return 0          xorl    %eax,%eax               /* return 0 */
         ret          ret
 END(setjmp)  END(setjmp)
   
Line 946  END(setjmp)
Line 1053  END(setjmp)
  */   */
 ENTRY(longjmp)  ENTRY(longjmp)
         movl    4(%esp),%eax          movl    4(%esp),%eax
         movl    (%eax),%ebx             # restore ebx          movl    (%eax),%ebx             /* restore ebx */
         movl    4(%eax),%esp            # restore esp          movl    4(%eax),%esp            /* restore esp */
         movl    8(%eax),%ebp            # restore ebp          movl    8(%eax),%ebp            /* restore ebp */
         movl    12(%eax),%esi           # restore esi          movl    12(%eax),%esi           /* restore esi */
         movl    16(%eax),%edi           # restore edi          movl    16(%eax),%edi           /* restore edi */
         movl    20(%eax),%edx           # get rta          movl    20(%eax),%edx           /* get rta */
         movl    %edx,(%esp)             # put in return frame          movl    %edx,(%esp)             /* put in return frame */
         movl    $1,%eax                 # return 1          movl    $1,%eax                 /* return 1 */
         ret          ret
 END(longjmp)  END(longjmp)
   
Line 963  END(longjmp)
Line 1070  END(longjmp)
  * Mimic cpu_switchto() for postmortem debugging.   * Mimic cpu_switchto() for postmortem debugging.
  */   */
 ENTRY(dumpsys)  ENTRY(dumpsys)
         pushl   %ebx                    # set up fake switchframe          pushl   %ebx                    /* set up fake switchframe */
         pushl   %esi                    #   and save context          pushl   %esi                    /* and save context */
         pushl   %edi          pushl   %edi
         movl    %esp,_C_LABEL(dumppcb)+PCB_ESP          movl    %esp,_C_LABEL(dumppcb)+PCB_ESP
         movl    %ebp,_C_LABEL(dumppcb)+PCB_EBP          movl    %ebp,_C_LABEL(dumppcb)+PCB_EBP
         call    _C_LABEL(dodumpsys)     # dump!          call    _C_LABEL(dodumpsys)     /* dump! */
         addl    $(3*4), %esp            # unwind switchframe          addl    $(3*4), %esp            /* unwind switchframe */
         ret          ret
 END(dumpsys)  END(dumpsys)
   
 /*  /*
  * struct lwp *cpu_switchto(struct lwp *oldlwp, struct lwp *newlwp,   * struct lwp *cpu_switchto(struct lwp *oldlwp, struct lwp *newlwp,
  *                          bool returning)   *     bool returning)
  *   *
  *      1. if (oldlwp != NULL), save its context.   *      1. if (oldlwp != NULL), save its context.
  *      2. then, restore context of newlwp.   *      2. then, restore context of newlwp.
Line 1000  ENTRY(cpu_switchto)
Line 1107  ENTRY(cpu_switchto)
 0:  0:
 #endif  #endif
   
         movl    16(%esp),%esi           # oldlwp          movl    16(%esp),%esi           /* oldlwp */
         movl    20(%esp),%edi           # newlwp          movl    20(%esp),%edi           /* newlwp */
         movl    24(%esp),%edx           # returning          movl    24(%esp),%edx           /* returning */
         testl   %esi,%esi  
         jz      1f          testl   %esi,%esi               /* oldlwp = NULL ? */
           jz      skip_save
   
         /* Save old context. */          /* Save old context. */
         movl    L_PCB(%esi),%eax          movl    L_PCB(%esi),%eax
         movl    %esp,PCB_ESP(%eax)          movl    %esp,PCB_ESP(%eax)
         movl    %ebp,PCB_EBP(%eax)          movl    %ebp,PCB_EBP(%eax)
   skip_save:
   
         /* Switch to newlwp's stack. */          /* Switch to newlwp's stack. */
 1:      movl    L_PCB(%edi),%ebx          movl    L_PCB(%edi),%ebx
         movl    PCB_EBP(%ebx),%ebp          movl    PCB_EBP(%ebx),%ebp
         movl    PCB_ESP(%ebx),%esp          movl    PCB_ESP(%ebx),%esp
   
Line 1025  ENTRY(cpu_switchto)
Line 1134  ENTRY(cpu_switchto)
   
         /* Skip the rest if returning to a pinned LWP. */          /* Skip the rest if returning to a pinned LWP. */
         testl   %edx,%edx          testl   %edx,%edx
         jnz     4f          jnz     switch_return
   
           /* Switch ring0 stack */
 #ifdef XEN  #ifdef XEN
         pushl   %edi          pushl   %edi
         call    _C_LABEL(i386_switch_context)          call    _C_LABEL(i386_switch_context)
         addl    $4,%esp          addl    $4,%esp
 #else /* !XEN */  #else
         /* Switch ring0 esp */  
         movl    PCB_ESP0(%ebx),%eax          movl    PCB_ESP0(%ebx),%eax
         movl    %eax,CPUVAR(ESP0)          movl    %eax,CPUVAR(ESP0)
 #endif /* !XEN */  #endif
   
         /* Don't bother with the rest if switching to a system process. */          /* Don't bother with the rest if switching to a system process. */
         testl   $LW_SYSTEM,L_FLAG(%edi)          testl   $LW_SYSTEM,L_FLAG(%edi)
         jnz     4f          jnz     switch_return
   
 #ifndef XEN  #ifndef XEN
         /* Restore thread-private %fs/%gs descriptors. */          /* Restore thread-private %fs/%gs descriptors. */
         movl    CPUVAR(GDT),%ecx          movl    CPUVAR(GDT),%ecx
         movl    PCB_FSD(%ebx), %eax          movl    PCB_FSD(%ebx),%eax
         movl    PCB_FSD+4(%ebx), %edx          movl    PCB_FSD+4(%ebx),%edx
         movl    %eax, (GUFS_SEL*8)(%ecx)          movl    %eax,(GUFS_SEL*8)(%ecx)
         movl    %edx, (GUFS_SEL*8+4)(%ecx)          movl    %edx,(GUFS_SEL*8+4)(%ecx)
         movl    PCB_GSD(%ebx), %eax          movl    PCB_GSD(%ebx),%eax
         movl    PCB_GSD+4(%ebx), %edx          movl    PCB_GSD+4(%ebx),%edx
         movl    %eax, (GUGS_SEL*8)(%ecx)          movl    %eax,(GUGS_SEL*8)(%ecx)
         movl    %edx, (GUGS_SEL*8+4)(%ecx)          movl    %edx,(GUGS_SEL*8+4)(%ecx)
 #endif /* !XEN */  #endif /* !XEN */
   
         /* Switch I/O bitmap */          /* Switch I/O bitmap */
Line 1064  ENTRY(cpu_switchto)
Line 1173  ENTRY(cpu_switchto)
         /* Is this process using RAS (restartable atomic sequences)? */          /* Is this process using RAS (restartable atomic sequences)? */
         movl    L_PROC(%edi),%eax          movl    L_PROC(%edi),%eax
         cmpl    $0,P_RASLIST(%eax)          cmpl    $0,P_RASLIST(%eax)
         jne     5f          je      no_RAS
   
           /* Handle restartable atomic sequences (RAS). */
           movl    L_MD_REGS(%edi),%ecx
           pushl   TF_EIP(%ecx)
           pushl   %eax
           call    _C_LABEL(ras_lookup)
           addl    $8,%esp
           cmpl    $-1,%eax
           je      no_RAS
           movl    L_MD_REGS(%edi),%ecx
           movl    %eax,TF_EIP(%ecx)
   no_RAS:
   
         /*          /*
          * Restore cr0 (including FPU state).  Raise the IPL to IPL_HIGH.           * Restore cr0 (including FPU state).  Raise the IPL to IPL_HIGH.
          * FPU IPIs can alter the LWP's saved cr0.  Dropping the priority           * FPU IPIs can alter the LWP's saved cr0.  Dropping the priority
          * is deferred until mi_switch(), when cpu_switchto() returns.           * is deferred until mi_switch(), when cpu_switchto() returns.
          */           */
 2:  
 #ifdef XEN  #ifdef XEN
         pushl   %edi          pushl   %edi
         call    _C_LABEL(i386_tls_switch)          call    _C_LABEL(i386_tls_switch)
Line 1086  ENTRY(cpu_switchto)
Line 1206  ENTRY(cpu_switchto)
          * set CR0_TS so we'll trap rather than reuse bogus state.           * set CR0_TS so we'll trap rather than reuse bogus state.
          */           */
         cmpl    CPUVAR(FPCURLWP),%edi          cmpl    CPUVAR(FPCURLWP),%edi
         je      3f          je      skip_TS
         orl     $CR0_TS,%ecx          orl     $CR0_TS,%ecx
   skip_TS:
   
         /* Reloading CR0 is very expensive - avoid if possible. */          /* Reloading CR0 is very expensive - avoid if possible. */
 3:      cmpl    %edx,%ecx          cmpl    %edx,%ecx
         je      4f          je      switch_return
         movl    %ecx,%cr0          movl    %ecx,%cr0
 #endif /* !XEN */  #endif /* !XEN */
   
   switch_return:
         /* Return to the new LWP, returning 'oldlwp' in %eax. */          /* Return to the new LWP, returning 'oldlwp' in %eax. */
 4:      movl    %esi,%eax          movl    %esi,%eax
         popl    %edi          popl    %edi
         popl    %esi          popl    %esi
         popl    %ebx          popl    %ebx
         ret          ret
   
         /* Check for restartable atomic sequences (RAS). */  
 5:      movl    L_MD_REGS(%edi),%ecx  
         pushl   TF_EIP(%ecx)  
         pushl   %eax  
         call    _C_LABEL(ras_lookup)  
         addl    $8,%esp  
         cmpl    $-1,%eax  
         je      2b  
         movl    L_MD_REGS(%edi),%ecx  
         movl    %eax,TF_EIP(%ecx)  
         jmp     2b  
   
 .Lcopy_iobitmap:  .Lcopy_iobitmap:
         /* Copy I/O bitmap. */          /* Copy I/O bitmap. */
         incl    _C_LABEL(pmap_iobmp_evcnt)+EV_COUNT          incl    _C_LABEL(pmap_iobmp_evcnt)+EV_COUNT
Line 1137  END(cpu_switchto)
Line 1247  END(cpu_switchto)
  * Update pcb, saving current processor state.   * Update pcb, saving current processor state.
  */   */
 ENTRY(savectx)  ENTRY(savectx)
         movl    4(%esp),%edx            # edx = pcb          movl    4(%esp),%edx            /* edx = pcb */
         movl    %esp,PCB_ESP(%edx)          movl    %esp,PCB_ESP(%edx)
         movl    %ebp,PCB_EBP(%edx)          movl    %ebp,PCB_EBP(%edx)
         ret          ret
Line 1151  END(savectx)
Line 1261  END(savectx)
 IDTVEC(osyscall)  IDTVEC(osyscall)
 #ifndef XEN  #ifndef XEN
         /* XXX we are in trouble! interrupts be off here. */          /* XXX we are in trouble! interrupts be off here. */
         cli                     # must be first instruction          cli                     /* must be first instruction */
 #endif  #endif
         pushfl                  # set eflags in trap frame          pushfl                  /* set eflags in trap frame */
         popl    8(%esp)          popl    8(%esp)
         orl     $PSL_I,8(%esp)  # re-enable ints on return to user          orl     $PSL_I,8(%esp)  /* re-enable ints on return to user */
         pushl   $7              # size of instruction for restart          pushl   $7              /* size of instruction for restart */
         jmp     syscall1          jmp     syscall1
 IDTVEC_END(osyscall)  IDTVEC_END(osyscall)
   
Line 1166  IDTVEC_END(osyscall)
Line 1276  IDTVEC_END(osyscall)
  * Trap gate entry for syscall   * Trap gate entry for syscall
  */   */
 IDTVEC(syscall)  IDTVEC(syscall)
         pushl   $2              # size of instruction for restart          pushl   $2              /* size of instruction for restart */
 syscall1:  syscall1:
         pushl   $T_ASTFLT       # trap # for doing ASTs          pushl   $T_ASTFLT       /* trap # for doing ASTs */
         INTRENTRY          INTRENTRY
         STI(%eax)          STI(%eax)
 #ifdef DIAGNOSTIC  #ifdef DIAGNOSTIC
Line 1183  syscall1:
Line 1293  syscall1:
 #endif  #endif
 1:  1:
 #endif /* DIAGNOSTIC */  #endif /* DIAGNOSTIC */
         addl    $1,CPUVAR(NSYSCALL)     # count it atomically          addl    $1,CPUVAR(NSYSCALL)     /* count it atomically */
         adcl    $0,CPUVAR(NSYSCALL)+4   # count it atomically          adcl    $0,CPUVAR(NSYSCALL)+4   /* count it atomically */
         movl    CPUVAR(CURLWP),%edi          movl    CPUVAR(CURLWP),%edi
         movl    L_PROC(%edi),%edx          movl    L_PROC(%edi),%edx
         movl    %esp,L_MD_REGS(%edi)    # save pointer to frame          movl    %esp,L_MD_REGS(%edi)    /* save pointer to frame */
         pushl   %esp          pushl   %esp
         call    *P_MD_SYSCALL(%edx)     # get pointer to syscall() function          call    *P_MD_SYSCALL(%edx)     /* get pointer to syscall() function */
         addl    $4,%esp          addl    $4,%esp
 .Lsyscall_checkast:  .Lsyscall_checkast:
         /* Check for ASTs on exit to user mode. */          /* Check for ASTs on exit to user mode. */
Line 1206  syscall1:
Line 1316  syscall1:
         /* process pending interrupts */          /* process pending interrupts */
         CLI(%eax)          CLI(%eax)
         movl    CPUVAR(ILEVEL), %ebx          movl    CPUVAR(ILEVEL), %ebx
         movl    $.Lsyscall_resume, %esi # address to resume loop at          movl    $.Lsyscall_resume, %esi /* address to resume loop at */
 .Lsyscall_resume:  .Lsyscall_resume:
         movl    %ebx,%eax       # get cpl          movl    %ebx,%eax               /* get cpl */
         movl    CPUVAR(IUNMASK)(,%eax,4),%eax          movl    CPUVAR(IUNMASK)(,%eax,4),%eax
         andl    CPUVAR(IPENDING),%eax   # any non-masked bits left?          andl    CPUVAR(IPENDING),%eax   /* any non-masked bits left? */
         jz      17f          jz      17f
         bsrl    %eax,%eax          bsrl    %eax,%eax
         btrl    %eax,CPUVAR(IPENDING)          btrl    %eax,CPUVAR(IPENDING)
         movl    CPUVAR(ISOURCES)(,%eax,4),%eax          movl    CPUVAR(ISOURCES)(,%eax,4),%eax
         jmp     *IS_RESUME(%eax)          jmp     *IS_RESUME(%eax)
 17:     movl    %ebx, CPUVAR(ILEVEL)    #restore cpl  17:     movl    %ebx, CPUVAR(ILEVEL)    /* restore cpl  */
         jmp     .Lsyscall_checkast          jmp     .Lsyscall_checkast
 14:  14:
 #endif /* XEN */  #endif /* XEN */
Line 1255  syscall1:
Line 1365  syscall1:
 IDTVEC_END(syscall)  IDTVEC_END(syscall)
   
 IDTVEC(svr4_fasttrap)  IDTVEC(svr4_fasttrap)
         pushl   $2              # size of instruction for restart          pushl   $2              /* size of instruction for restart */
         pushl   $T_ASTFLT       # trap # for doing ASTs          pushl   $T_ASTFLT       /* trap # for doing ASTs */
         INTRENTRY          INTRENTRY
         STI(%eax)          STI(%eax)
         pushl   $RW_READER          pushl   $RW_READER
Line 1269  IDTVEC(svr4_fasttrap)
Line 1379  IDTVEC(svr4_fasttrap)
         addl    $4,%esp          addl    $4,%esp
 2:      /* Check for ASTs on exit to user mode. */  2:      /* Check for ASTs on exit to user mode. */
         cli          cli
         CHECK_ASTPENDING(%eax)          CHECK_ASTPENDING(%eax)
         je      1f          je      1f
         /* Always returning to user mode here. */          /* Always returning to user mode here. */
         CLEAR_ASTPENDING(%eax)          CLEAR_ASTPENDING(%eax)
Line 1293  IDTVEC(svr4_fasttrap)
Line 1403  IDTVEC(svr4_fasttrap)
  * Anything 120MHz or above is fine.   * Anything 120MHz or above is fine.
  */   */
 NENTRY(npx586bug1)  NENTRY(npx586bug1)
         fildl   4(%esp)         # x          fildl   4(%esp)         /* x */
         fildl   8(%esp)         # y          fildl   8(%esp)         /* y */
         fld     %st(1)          fld     %st(1)
         fdiv    %st(1),%st      # x/y          fdiv    %st(1),%st      /* x/y */
         fmulp   %st,%st(1)      # (x/y)*y          fmulp   %st,%st(1)      /* (x/y)*y */
         fsubrp  %st,%st(1)      # x-(x/y)*y          fsubrp  %st,%st(1)      /* x-(x/y)*y */
         pushl   $0          pushl   $0
         fistpl  (%esp)          fistpl  (%esp)
         popl    %eax          popl    %eax

Legend:
Removed from v.1.113  
changed lines
  Added in v.1.113.2.4

CVSweb <webmaster@jp.NetBSD.org>