[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.57 and 1.112

version 1.57, 2007/11/14 17:54:59 version 1.112, 2014/02/20 18:19:10
Line 5 
Line 5 
  */   */
   
 /*  /*
    * Copyright (c) 2006 Manuel Bouyer.
    *
    * 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 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.
    *
    */
   
   /*
  * Copyright (c) 2001 Wasabi Systems, Inc.   * Copyright (c) 2001 Wasabi Systems, Inc.
  * All rights reserved.   * All rights reserved.
  *   *
Line 41 
Line 66 
   
   
 /*-  /*-
  * Copyright (c) 1998, 2000, 2004, 2006, 2007 The NetBSD Foundation, Inc.   * Copyright (c) 1998, 2000, 2004, 2006, 2007, 2009 The NetBSD Foundation, Inc.
  * All rights reserved.   * All rights reserved.
  *   *
  * This code is derived from software contributed to The NetBSD Foundation   * This code is derived from software contributed to The NetBSD Foundation
  * by Charles M. Hannum.   * by Charles M. Hannum, and by Andrew Doran.
  *   *
  * Redistribution and use in source and binary forms, with or without   * Redistribution and use in source and binary forms, with or without
  * modification, are permitted provided that the following conditions   * modification, are permitted provided that the following conditions
Line 55 
Line 80 
  * 2. Redistributions in binary form must reproduce the above copyright   * 2. Redistributions in binary form must reproduce the above copyright
  *    notice, this list of conditions and the following disclaimer in the   *    notice, this list of conditions and the following disclaimer in the
  *    documentation and/or other materials provided with the distribution.   *    documentation and/or other materials provided with the distribution.
  * 3. All advertising materials mentioning features or use of this software  
  *    must display the following acknowledgement:  
  *        This product includes software developed by the NetBSD  
  *        Foundation, Inc. and its contributors.  
  * 4. Neither the name of The NetBSD Foundation nor the names of its  
  *    contributors may be used to endorse or promote products derived  
  *    from this software without specific prior written permission.  
  *   *
  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS   * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED   * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
Line 110 
Line 128 
  *      @(#)locore.s    7.3 (Berkeley) 5/13/91   *      @(#)locore.s    7.3 (Berkeley) 5/13/91
  */   */
   
   #include <machine/asm.h>
   __KERNEL_RCSID(0, "$NetBSD$");
   
 #include "opt_compat_oldboot.h"  #include "opt_compat_oldboot.h"
 #include "opt_ddb.h"  #include "opt_ddb.h"
   #include "opt_modular.h"
   #include "opt_multiboot.h"
 #include "opt_realmem.h"  #include "opt_realmem.h"
 #include "opt_vm86.h"  #include "opt_vm86.h"
   #include "opt_xen.h"
   
 #include "npx.h"  
 #include "assym.h"  #include "assym.h"
 #include "lapic.h"  #include "lapic.h"
 #include "ioapic.h"  #include "ioapic.h"
Line 129 
Line 152 
 #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/multiboot.h>  
 #include <machine/asm.h>  
 #include <machine/frameasm.h>  #include <machine/frameasm.h>
 #include <machine/i82489reg.h>  #include <machine/i82489reg.h>
   #ifndef XEN
   #include <machine/multiboot.h>
   #endif
   
 /* XXX temporary kluge; these should not be here */  /* 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>
   
   #ifndef XEN
   #define _RELOC(x)       ((x) - KERNBASE)
   #else
   #define _RELOC(x)       ((x))
   #endif /* XEN */
   #define RELOC(x)        _RELOC(_C_LABEL(x))
   
   #ifdef XEN
   /*
    * Xen guest identifier and loader selection
    */
   .section __xen_guest
           .ascii  "GUEST_OS=netbsd,GUEST_VER=3.0,XEN_VER=xen-3.0"
           .ascii  ",VIRT_BASE=0xc0000000" /* KERNBASE */
           .ascii  ",ELF_PADDR_OFFSET=0xc0000000" /* KERNBASE */
           .ascii  ",VIRT_ENTRY=0xc0100000" /* KERNTEXTOFF */
           .ascii  ",HYPERCALL_PAGE=0x00000101"
                   /* (???+HYPERCALL_PAGE_OFFSET)/PAGE_SIZE) */
   #ifdef PAE
           .ascii  ",PAE=yes[extended-cr3]"
   #endif
           .ascii  ",LOADER=generic"
   #if (NKSYMS || defined(DDB) || defined(MODULAR)) && !defined(SYMTAB_SPACE)
           .ascii  ",BSD_SYMTAB=yes"
   #endif
           .byte   0
   #endif  /* XEN */
   
 /*  /*
  * Initialization   * Initialization
  */   */
         .data          .data
   
         .globl  _C_LABEL(cpu)          .globl  _C_LABEL(cputype)
           .globl  _C_LABEL(cpuid_level)
         .globl  _C_LABEL(esym)          .globl  _C_LABEL(esym)
           .globl  _C_LABEL(eblob)
         .globl  _C_LABEL(atdevbase)          .globl  _C_LABEL(atdevbase)
         .globl  _C_LABEL(proc0uarea),_C_LABEL(PDPpaddr)          .globl  _C_LABEL(lwp0uarea)
           .globl  _C_LABEL(PDPpaddr)
         .globl  _C_LABEL(gdt)          .globl  _C_LABEL(gdt)
         .globl  _C_LABEL(idt)          .globl  _C_LABEL(idt)
         .globl  _C_LABEL(lapic_tpr)          .globl  _C_LABEL(lapic_tpr)
Line 158 
Line 213 
         .align  12          .align  12
 #endif  #endif
         .globl _C_LABEL(local_apic), _C_LABEL(lapic_id)          .globl _C_LABEL(local_apic), _C_LABEL(lapic_id)
 _C_LABEL(local_apic):          .type   _C_LABEL(local_apic), @object
   LABEL(local_apic)
         .space  LAPIC_ID          .space  LAPIC_ID
 _C_LABEL(lapic_id):  END(local_apic)
           .type   _C_LABEL(lapic_id), @object
   LABEL(lapic_id)
         .long   0x00000000          .long   0x00000000
         .space  LAPIC_TPRI-(LAPIC_ID+4)          .space  LAPIC_TPRI-(LAPIC_ID+4)
 _C_LABEL(lapic_tpr):  END(lapic_id)
         .space  LAPIC_PPRI-LAPIC_TPRI          .type   _C_LABEL(lapic_tpr), @object
   LABEL(lapic_tpr)
           .space  LAPIC_PPRI-LAPIC_TPRI
   END(lapic_tpr)
           .type   _C_LABEL(lapic_ppr), @object
 _C_LABEL(lapic_ppr):  _C_LABEL(lapic_ppr):
         .space  LAPIC_ISR-LAPIC_PPRI          .space  LAPIC_ISR-LAPIC_PPRI
   END(lapic_ppr)
           .type   _C_LABEL(lapic_isr), @object
 _C_LABEL(lapic_isr):  _C_LABEL(lapic_isr):
         .space  PAGE_SIZE-LAPIC_ISR          .space  PAGE_SIZE-LAPIC_ISR
   END(lapic_isr)
 #else  #else
 _C_LABEL(lapic_tpr):          .type   _C_LABEL(lapic_tpr), @object
   LABEL(lapic_tpr)
         .long 0          .long 0
   END(lapic_tpr)
 #endif  #endif
           .type   _C_LABEL(cputype), @object
 _C_LABEL(cpu):          .long   0       # are we 80486, Pentium, or..  LABEL(cputype)          .long   0       # are we 80486, Pentium, or..
 _C_LABEL(atdevbase):    .long   0       # location of start of iomem in virtual  END(cputype)
 _C_LABEL(proc0uarea):   .long   0          .type   _C_LABEL(cpuid_level), @object
 _C_LABEL(PDPpaddr):     .long   0       # paddr of PDP, for libkvm  LABEL(cpuid_level)      .long   0
   END(cpuid_level)
           .type   _C_LABEL(atdevbase), @object
   LABEL(atdevbase)        .long   0       # location of start of iomem in virtual
   END(atdevbase)
           .type   _C_LABEL(lwp0uarea), @object
   LABEL(lwp0uarea)        .long   0
   END(lwp0uarea)
           .type   _C_LABEL(PDPpaddr), @object
   LABEL(PDPpaddr)         .long   0       # paddr of PDP, for libkvm
   END(PDPpaddr)
           .type   _C_LABEL(tablesize), @object
 _C_LABEL(tablesize):    .long   0  _C_LABEL(tablesize):    .long   0
   END(tablesize)
           .size   tmpstk, tmpstk - .
         .space 512          .space 512
 tmpstk:  tmpstk:
   #ifdef XEN
           .align          PAGE_SIZE, 0x0  # Align on page boundary
 #define _RELOC(x)       ((x) - KERNBASE)  LABEL(tmpgdt)
 #define RELOC(x)        _RELOC(_C_LABEL(x))          .space          PAGE_SIZE       # Xen expects a page
   END(tmpgdt)
   #endif /* XEN */
   
         .text          .text
         .globl  _C_LABEL(kernel_text)          .globl  _C_LABEL(kernel_text)
         .set    _C_LABEL(kernel_text),KERNTEXTOFF          .set    _C_LABEL(kernel_text),KERNTEXTOFF
   
         .globl  start  ENTRY(start)
 start:  movw    $0x1234,0x472                   # warm boot  #ifndef XEN
           movw    $0x1234,0x472                   # warm boot
 #if defined(MULTIBOOT)  #if defined(MULTIBOOT)
         jmp     1f          jmp     1f
   
Line 244  _C_LABEL(Multiboot_Header):
Line 325  _C_LABEL(Multiboot_Header):
         movw    %ax,%fs          movw    %ax,%fs
         movw    %ax,%gs          movw    %ax,%gs
         decl    %eax          decl    %eax
         movl    %eax,RELOC(cpu_info_primary)+CPU_INFO_LEVEL          movl    %eax,RELOC(cpuid_level)
   
         /* Find out our CPU type. */          /* Find out our CPU type. */
   
Line 281  isnx586:
Line 362  isnx586:
          * Don't try cpuid, as Nx586s reportedly don't support the           * Don't try cpuid, as Nx586s reportedly don't support the
          * PSL_ID bit.           * PSL_ID bit.
          */           */
         movl    $CPU_NX586,RELOC(cpu)          movl    $CPU_NX586,RELOC(cputype)
         jmp     2f          jmp     2f
   
 is386:  is386:
         movl    $CPU_386,RELOC(cpu)          movl    $CPU_386,RELOC(cputype)
         jmp     2f          jmp     2f
   
 try486: /* Try to toggle identification flag; does not exist on early 486s. */  try486: /* Try to toggle identification flag; does not exist on early 486s. */
Line 304  try486: /* Try to toggle identification 
Line 385  try486: /* Try to toggle identification 
   
         testl   %eax,%eax          testl   %eax,%eax
         jnz     try586          jnz     try586
 is486:  movl    $CPU_486,RELOC(cpu)  is486:  movl    $CPU_486,RELOC(cputype)
         /*          /*
          * Check Cyrix CPU           * Check Cyrix CPU
          * Cyrix CPUs do not change the undefined flags following           * Cyrix CPUs do not change the undefined flags following
Line 322  is486: movl $CPU_486,RELOC(cpu)
Line 403  is486: movl $CPU_486,RELOC(cpu)
         popfl          popfl
         jmp 2f          jmp 2f
 trycyrix486:  trycyrix486:
         movl    $CPU_6x86,RELOC(cpu)    # 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
Line 340  trycyrix486:
Line 421  trycyrix486:
         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(cpu)  # 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. */
Line 404  trycyrix486:
Line 485  trycyrix486:
 try586: /* Use the `cpuid' instruction. */  try586: /* Use the `cpuid' instruction. */
         xorl    %eax,%eax          xorl    %eax,%eax
         cpuid          cpuid
         movl    %eax,RELOC(cpu_info_primary)+CPU_INFO_LEVEL          movl    %eax,RELOC(cpuid_level)
   
 2:  2:
         /*          /*
Line 422  try586: /* Use the `cpuid' instruction. 
Line 503  try586: /* Use the `cpuid' instruction. 
         movl    $_RELOC(tmpstk),%esp    # bootstrap stack end location          movl    $_RELOC(tmpstk),%esp    # bootstrap stack end location
   
 /*  /*
  * Virtual address space of kernel:   * Virtual address space of kernel, without PAE. The page dir is 1 page long.
    *
    * text | data | bss | [syms] | [blobs] | page dir | proc0 kstack | L1 ptp
    *                                      0          1       2      3
  *   *
  * text | data | bss | [syms] | page dir | proc0 kstack | L1 ptp   * Virtual address space of kernel, with PAE. We need 4 pages for the page dir
  *                            0          1       2      3   * and 1 page for the L3.
    * text | data | bss | [syms] | [blobs] | L3 | page dir | proc0 kstack | L1 ptp
    *                                      0    1          5       6      7
  */   */
   #ifndef PAE
 #define PROC0_PDIR_OFF  0  #define PROC0_PDIR_OFF  0
 #define PROC0_STK_OFF   (PROC0_PDIR_OFF + PAGE_SIZE)  #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)  #define PROC0_PTP1_OFF  (PROC0_STK_OFF + UPAGES * PAGE_SIZE)
   
 /*  /*
  * fillkpt   * fillkpt - Fill in a kernel page table
  *      eax = pte (page frame | control | status)   *      eax = pte (page frame | control | status)
  *      ebx = page table address   *      ebx = page table address
  *      ecx = number of pages to map   *      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 \  #define fillkpt \
 1:      movl    %eax,(%ebx)     ;       /* store phys addr */ \  1:      movl    $0,(PDE_SIZE-4)(%ebx)   ;       /* clear bits */        \
         addl    $4,%ebx         ;       /* next pte/pde */ \          movl    %eax,(%ebx)             ;       /* store phys addr */   \
         addl    $PAGE_SIZE,%eax ;       /* next phys page */ \          addl    $PDE_SIZE,%ebx          ;       /* next pte/pde */      \
         loop    1b              ;  \          addl    $PAGE_SIZE,%eax         ;       /* next phys page */    \
           loop    1b                      ;
   
         /* Find end of kernel image. */          /* Find end of kernel image. */
         movl    $RELOC(end),%edi          movl    $RELOC(end),%edi
 #if (NKSYMS || defined(DDB) || defined(LKM)) && !defined(SYMTAB_SPACE)  
   #if (NKSYMS || defined(DDB) || defined(MODULAR)) && !defined(SYMTAB_SPACE)
         /* Save the symbols (if loaded). */          /* Save the symbols (if loaded). */
         movl    RELOC(esym),%eax          movl    RELOC(esym),%eax
         testl   %eax,%eax          testl   %eax,%eax
Line 458  try586: /* Use the `cpuid' instruction. 
Line 554  try586: /* Use the `cpuid' instruction. 
 1:  1:
 #endif  #endif
   
           /* Skip over any modules/blobs. */
           movl    RELOC(eblob),%eax
           testl   %eax,%eax
           jz      1f
           subl    $KERNBASE,%eax
           movl    %eax,%edi
   1:
         /* Compute sizes */          /* Compute sizes */
         movl    %edi,%esi                       # edi = esym ? esym : end          movl    %edi,%esi
         addl    $PGOFSET,%esi                   # page align up          addl    $PGOFSET,%esi                   # page align up
         andl    $~PGOFSET,%esi          andl    $~PGOFSET,%esi
   
Line 470  try586: /* Use the `cpuid' instruction. 
Line 573  try586: /* Use the `cpuid' instruction. 
         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 = (1 + UPAGES + nkptp) << PGSHIFT; */          /* tablesize = (PDP_SIZE + UPAGES + nkptp) << PGSHIFT; */
         addl    $(1+UPAGES),%eax          addl    $(PDP_SIZE+UPAGES),%eax
   #ifdef PAE
           incl    %eax            /* one more page for the L3 PD */
           shll    $PGSHIFT+1,%eax /* PTP tables are twice larger with PAE */
   #else
         shll    $PGSHIFT,%eax          shll    $PGSHIFT,%eax
   #endif
         movl    %eax,RELOC(tablesize)          movl    %eax,RELOC(tablesize)
   
         /* ensure that nkptp covers bootstrap tables */          /* ensure that nkptp covers bootstrap tables */
Line 483  try586: /* Use the `cpuid' instruction. 
Line 591  try586: /* Use the `cpuid' instruction. 
         cmpl    %eax,RELOC(nkptp)+1*4          cmpl    %eax,RELOC(nkptp)+1*4
         jnz     1b          jnz     1b
   
         /* Clear tables */          /* Clear tables */
         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
   
         leal    (PROC0_PTP1_OFF)(%esi), %ebx          leal    (PROC0_PTP1_OFF)(%esi), %ebx
   
 /*  /*
  * Build initial page tables.   * Build initial page tables.
  */   */
         /*          /*
          * Compute &__data_start - KERNBASE. This can't be > 4G,           * Compute &__data_start - KERNBASE. This can't be > 4G,
          * or we can't deal with it anyway, since we can't load it in           * or we can't deal with it anyway, since we can't load it in
          * 32 bit mode. So use the bottom 32 bits.           * 32 bit mode. So use the bottom 32 bits.
          */           */
         movl    $RELOC(__data_start),%edx          movl    $RELOC(__data_start),%edx
         andl    $~PGOFSET,%edx          andl    $~PGOFSET,%edx
   
         /*          /*
          * Skip the first MB.           * Skip the first MB.
          */           */
         movl    $_RELOC(KERNTEXTOFF),%eax          movl    $_RELOC(KERNTEXTOFF),%eax
         movl    %eax,%ecx          movl    %eax,%ecx
         shrl    $(PGSHIFT-2),%ecx       /* ((n >> PGSHIFT) << 2) for # pdes */          shrl    $(PGSHIFT-2),%ecx       /* ((n >> PGSHIFT) << 2) for # pdes */
         addl    %ecx,%ebx  #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 read-only. */
         movl    %edx,%ecx          movl    %edx,%ecx
Line 536  try586: /* Use the `cpuid' instruction. 
Line 647  try586: /* Use the `cpuid' instruction. 
 /*  /*
  * Construct a page table directory.   * Construct a page table directory.
  */   */
         /* Set up top level entries for identity mapping */          /* Set up top level entries for identity mapping */
         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 top level entries for actual kernel mapping */
         leal    (PROC0_PDIR_OFF + L2_SLOT_KERNBASE*4)(%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 a PDE recursively mapping page directory as a page table! */
         leal    (PROC0_PDIR_OFF + PDIR_SLOT_PTE*4)(%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    %eax,(%ebx)          movl    $PDP_SIZE,%ecx
           fillkpt
   
   #ifdef PAE
           /* Fill in proc0 L3 page with entries pointing to the page dirs */
           leal    (PROC0_L3_OFF)(%esi),%ebx
           leal    (PROC0_PDIR_OFF)(%esi),%eax
           orl     $(PG_V),%eax
           movl    $PDP_SIZE,%ecx
           fillkpt
   
           /* Enable PAE mode */
           movl    %cr4,%eax
           orl     $CR4_PAE,%eax
           movl    %eax,%cr4
   #endif
   
         /* Save phys. addr of PDP, for libkvm. */          /* Save phys. addr of PDP, for libkvm. */
         movl    %esi,RELOC(PDPpaddr)          leal    (PROC0_PDIR_OFF)(%esi),%eax
           movl    %eax,RELOC(PDPpaddr)
   
         /*          /*
          * Startup checklist:           * Startup checklist:
          * 1. Load %cr3 with pointer to PDIR.           * 1. Load %cr3 with pointer to PDIR (or L3 PD page for PAE).
          */           */
         movl    %esi,%eax               # phys address of ptd in proc 0          movl    %esi,%eax               # phys address of ptd in proc 0
         movl    %eax,%cr3               # load ptd addr into mmu          movl    %eax,%cr3               # load ptd addr into mmu
   
         /*          /*
          * 2. Enable paging and the rest of it.           * 2. Enable paging and the rest of it.
          */           */
         movl    %cr0,%eax               # get control word          movl    %cr0,%eax               # get control word
                                         # enable paging & NPX emulation                                          # enable paging & NPX
         orl     $(CR0_PE|CR0_PG|CR0_NE|CR0_TS|CR0_EM|CR0_MP),%eax          orl     $(CR0_PE|CR0_PG|CR0_NE|CR0_TS|CR0_MP|CR0_WP|CR0_AM),%eax
         movl    %eax,%cr0               # and let's page NOW!          movl    %eax,%cr0               # and page NOW!
   
         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 low           * There's no need anymore for the identity mapping in 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, virtual address of PDIR
 1:      movl    $0,(%ebx)  1:      movl    $0,(PDE_SIZE-4)(%ebx)           # Upper bits (for PAE)
         addl    $4,%ebx          movl    $0,(%ebx)
           addl    $PDE_SIZE,%ebx
         loop    1b          loop    1b
   
         /* Relocate atdevbase. */          /* Relocate atdevbase. */
Line 598  begin:
Line 725  begin:
         movl    %edx,_C_LABEL(atdevbase)          movl    %edx,_C_LABEL(atdevbase)
   
         /* Set up bootstrap stack. */          /* Set up bootstrap stack. */
         leal    (PROC0_STK_OFF+KERNBASE)(%esi),%eax          leal    (PROC0_STK_OFF+KERNBASE)(%esi),%eax
         movl    %eax,_C_LABEL(proc0uarea)          movl    %eax,_C_LABEL(lwp0uarea)
         leal    (KSTACK_SIZE-FRAMESIZE)(%eax),%esp          leal    (USPACE-FRAMESIZE)(%eax),%esp
         movl    %esi,(KSTACK_SIZE+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 617  begin:
Line 744  begin:
         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
           pushl   $0      # init386() expects a 64 bits paddr_t with PAE
   #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    $4+NGDT*8,%esp          # pop temporary gdt          addl    $PDE_SIZE,%esp          # pop paddr_t
           addl    $NGDT*8,%esp            # pop temporary gdt
   
 #ifdef SAFARI_FIFO_HACK  #ifdef SAFARI_FIFO_HACK
         movb    $5,%al          movb    $5,%al
Line 643  begin:
Line 774  begin:
 #endif /* SAFARI_FIFO_HACK */  #endif /* SAFARI_FIFO_HACK */
   
         call    _C_LABEL(main)          call    _C_LABEL(main)
   #else /* XEN */
           /* First, reset the PSL. */
           pushl   $PSL_MBO
           popfl
   
           cld
           movl    %esp, %ebx              # save start of available space
           movl    $_RELOC(tmpstk),%esp    # bootstrap stack end location
   
           /* Clear BSS. */
           xorl    %eax,%eax
           movl    $RELOC(__bss_start),%edi
           movl    $RELOC(_end),%ecx
           subl    %edi,%ecx
           rep stosb
   
           /* Copy the necessary stuff from start_info structure. */
           /* We need to copy shared_info early, so that sti/cli work */
           movl    $RELOC(start_info_union),%edi
           movl    $128,%ecx
           rep movsl
   
           /* Clear segment registers; always null in proc0. */
           xorl    %eax,%eax
           movw    %ax,%fs
           movw    %ax,%gs
           decl    %eax
           movl    %eax,RELOC(cpuid_level)
   
           xorl    %eax,%eax
           cpuid
           movl    %eax,RELOC(cpuid_level)
   
           /*
            * Use a temp page. We'll re- add it to uvm(9) once we're
            * done using it.
            */
           movl    $RELOC(tmpgdt), %eax
           pushl   %eax            # start of temporary gdt
           call    _C_LABEL(initgdt)
           addl    $4,%esp
   
           call    xen_pmap_bootstrap
   
           /*
            * First avail returned by xen_pmap_bootstrap in %eax
            */
           movl    %eax, %esi;
           movl    %esi, _C_LABEL(lwp0uarea)
   
           /* Set up bootstrap stack. */
           leal    (USPACE-FRAMESIZE)(%eax),%esp
           xorl    %ebp,%ebp               # mark end of frames
   
           addl    $USPACE, %esi
           subl    $KERNBASE, %esi         #init386 want a physical address
   
   #ifdef PAE
           pushl   $0      # init386() expects a 64 bits paddr_t with PAE
   #endif
           pushl   %esi
           call    _C_LABEL(init386)       # wire 386 chip for unix operation
           addl    $PDE_SIZE,%esp          # pop paddr_t
           call    _C_LABEL(main)
   #endif /* XEN */
   END(start)
   
   #if defined(XEN)
   /* space for the hypercall call page */
   #define HYPERCALL_PAGE_OFFSET 0x1000
   .org HYPERCALL_PAGE_OFFSET
   ENTRY(hypercall_page)
   .skip 0x1000
   END(hypercall_page)
   
   /*
    * void lgdt_finish(void);
    * Finish load a new GDT pointer (do any necessary cleanup).
    * XXX It's somewhat questionable whether reloading all the segment registers
    * is necessary, since the actual descriptor data is not changed except by
    * process creation and exit, both of which clean up via task switches.  OTOH,
    * this only happens at run time when the GDT is resized.
    */
   /* LINTSTUB: Func: void lgdt_finish(void) */
   NENTRY(lgdt_finish)
           movl    $GSEL(GDATA_SEL, SEL_KPL),%eax
           movw    %ax,%ds
           movw    %ax,%es
           movw    %ax,%gs
           movw    %ax,%ss
           movl    $GSEL(GCPU_SEL, SEL_KPL),%eax
           movw    %ax,%fs
           /* Reload code selector by doing intersegment return. */
           popl    %eax
           pushl   $GSEL(GCODE_SEL, SEL_KPL)
           pushl   %eax
           lret
   END(lgdt_finish)
   
   #endif /* XEN */
   
 /*  /*
  * void lwp_trampoline(void);   * void lwp_trampoline(void);
  *   *
  * This is a trampoline function pushed onto the stack of a newly created   * This is a trampoline function pushed onto the stack of a newly created
  * process in order to do some additional setup.  The trampoline is entered by   * process in order to do some additional setup.  The trampoline is entered by
  * cpu_switch()ing to the process, so we abuse the callee-saved registers used   * cpu_switchto()ing to the process, so we abuse the callee-saved
  * by cpu_switch() to store the information about the stub to call.   * registers used by cpu_switchto() to store the information about the
    * stub to call.
  * NOTE: This function does not have a normal calling sequence!   * NOTE: This function does not have a normal calling sequence!
  */   */
 NENTRY(lwp_trampoline)  NENTRY(lwp_trampoline)
         pushl   %ebp          movl    %ebp,%edi       /* for .Lsyscall_checkast */
         xorl    %ebp,%ebp          xorl    %ebp,%ebp
           pushl   %edi
         pushl   %eax          pushl   %eax
         call    _C_LABEL(lwp_startup)          call    _C_LABEL(lwp_startup)
         addl    $8,%esp          addl    $8,%esp
         pushl   %ebx          pushl   %ebx
         call    *%esi          call    *%esi
         addl    $4,%esp          addl    $4,%esp
         DO_DEFERRED_SWITCH          jmp     .Lsyscall_checkast
         INTRFASTEXIT  
         /* NOTREACHED */          /* NOTREACHED */
   END(lwp_trampoline)
   
 /*  /*
  * sigcode()   * sigcode()
Line 686  NENTRY(sigcode)
Line 919  NENTRY(sigcode)
         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)
   
 /*  /*
  * int setjmp(label_t *)   * int setjmp(label_t *)
Line 703  ENTRY(setjmp)
Line 937  ENTRY(setjmp)
         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)
   
 /*  /*
  * int longjmp(label_t *)   * int longjmp(label_t *)
Line 720  ENTRY(longjmp)
Line 955  ENTRY(longjmp)
         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)
   
 /*  /*
  * struct lwp *cpu_switchto(struct lwp *oldlwp, struct newlwp)   * void dumpsys(void)
    *
    * Mimic cpu_switchto() for postmortem debugging.
    */
   ENTRY(dumpsys)
           pushl   %ebx                    # set up fake switchframe
           pushl   %esi                    #   and save context
           pushl   %edi
           movl    %esp,_C_LABEL(dumppcb)+PCB_ESP
           movl    %ebp,_C_LABEL(dumppcb)+PCB_EBP
           call    _C_LABEL(dodumpsys)     # dump!
           addl    $(3*4), %esp            # unwind switchframe
           ret
   END(dumpsys)
   
   /*
    * struct lwp *cpu_switchto(struct lwp *oldlwp, struct lwp *newlwp,
    *                          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 736  ENTRY(cpu_switchto)
Line 989  ENTRY(cpu_switchto)
         pushl   %esi          pushl   %esi
         pushl   %edi          pushl   %edi
   
   #if defined(DIAGNOSTIC) && !defined(XEN)
           cmpl    $IPL_SCHED,CPUVAR(ILEVEL)
           jbe     0f
           pushl   CPUVAR(ILEVEL)
           pushl   $.Lstr
           call    _C_LABEL(panic)
           addl    $8,%esp
   .Lstr:  .string "cpu_switchto: switching above IPL_SCHED (%d)\0"
   0:
   #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
         testl   %esi,%esi          testl   %esi,%esi
         jz      1f          jz      1f
   
         /* Save old context. */          /* Save old context. */
         movl    L_ADDR(%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)
   
         /* Switch to newlwp's stack. */          /* Switch to newlwp's stack. */
 1:      movl    L_ADDR(%edi),%ebx  1:      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
   
         /* Switch TSS.  Reset "task busy" flag before loading. */          /*
         movl    %cr3,%eax           * Set curlwp.  This must be globally visible in order to permit
         movl    %eax,PCB_CR3(%ebx)      # for TSS gates           * non-interlocked mutex release.
         movl    CPUVAR(GDT),%ecx           */
         movl    L_MD_TSS_SEL(%edi),%edx          movl    %edi,%ecx
         andl    $~0x0200,4(%ecx,%edx, 1)          xchgl   %ecx,CPUVAR(CURLWP)
         ltr     %dx  
   
         /* Set curlwp. */          /* Skip the rest if returning to a pinned LWP. */
         movl    %edi,CPUVAR(CURLWP)          testl   %edx,%edx
           jnz     4f
   
   #ifdef XEN
           pushl   %edi
           call    _C_LABEL(i386_switch_context)
           addl    $4,%esp
   #else /* !XEN */
           /* Switch ring0 esp */
           movl    PCB_ESP0(%ebx),%eax
           movl    %eax,CPUVAR(ESP0)
   #endif /* !XEN */
   
         /* 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     4f
   
   #ifndef XEN
         /* Restore thread-private %fs/%gs descriptors. */          /* Restore thread-private %fs/%gs descriptors. */
           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)
Line 775  ENTRY(cpu_switchto)
Line 1052  ENTRY(cpu_switchto)
         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 */
   
           /* Switch I/O bitmap */
           movl    PCB_IOMAP(%ebx),%eax
           orl     %eax,%eax
           jnz     .Lcopy_iobitmap
           movl    $(IOMAP_INVALOFF << 16),CPUVAR(IOBASE)
   .Liobitmap_done:
   
         /* 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
Line 782  ENTRY(cpu_switchto)
Line 1067  ENTRY(cpu_switchto)
         jne     5f          jne     5f
   
         /*          /*
          * Restore cr0 (including FPU state).  Raise the IPL to IPL_IPI.           * 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:      movl    $IPL_IPI,CPUVAR(ILEVEL)  2:
         movl    PCB_CR0(%ebx),%ecx  #ifdef XEN
           pushl   %edi
           call    _C_LABEL(i386_tls_switch)
           addl    $4,%esp
   #else /* !XEN */
           movl    $IPL_HIGH,CPUVAR(ILEVEL)
           movl    PCB_CR0(%ebx),%ecx              /* has CR0_TS clear */
         movl    %cr0,%edx          movl    %cr0,%edx
   
         /*          /*
          * If our floating point registers are on a different CPU,           * If our floating point registers are on a different CPU,
          * set CR0_TS so we'll trap rather than reuse bogus state.           * set CR0_TS so we'll trap rather than reuse bogus state.
          */           */
         movl    PCB_FPCPU(%ebx),%eax          cmpl    CPUVAR(FPCURLWP),%edi
         cmpl    CPUVAR(SELF),%eax  
         je      3f          je      3f
         orl     $CR0_TS,%ecx          orl     $CR0_TS,%ecx
   
Line 803  ENTRY(cpu_switchto)
Line 1093  ENTRY(cpu_switchto)
 3:      cmpl    %edx,%ecx  3:      cmpl    %edx,%ecx
         je      4f          je      4f
         movl    %ecx,%cr0          movl    %ecx,%cr0
   #endif /* !XEN */
   
         /* Return to the new LWP, returning 'oldlwp' in %eax. */          /* Return to the new LWP, returning 'oldlwp' in %eax. */
 4:      movl    %esi,%eax  4:      movl    %esi,%eax
Line 823  ENTRY(cpu_switchto)
Line 1114  ENTRY(cpu_switchto)
         movl    %eax,TF_EIP(%ecx)          movl    %eax,TF_EIP(%ecx)
         jmp     2b          jmp     2b
   
   .Lcopy_iobitmap:
           /* Copy I/O bitmap. */
           incl    _C_LABEL(pmap_iobmp_evcnt)+EV_COUNT
           movl    $(IOMAPSIZE/4),%ecx
           pushl   %esi
           pushl   %edi
           movl    %eax,%esi               /* pcb_iomap */
           movl    CPUVAR(SELF),%edi
           leal    CPU_INFO_IOMAP(%edi),%edi
           rep
           movsl
           popl    %edi
           popl    %esi
           movl    $((CPU_INFO_IOMAP - CPU_INFO_TSS) << 16),CPUVAR(IOBASE)
           jmp     .Liobitmap_done
   END(cpu_switchto)
   
 /*  /*
  * void savectx(struct pcb *pcb);   * void savectx(struct pcb *pcb);
  *   *
Line 833  ENTRY(savectx)
Line 1141  ENTRY(savectx)
         movl    %esp,PCB_ESP(%edx)          movl    %esp,PCB_ESP(%edx)
         movl    %ebp,PCB_EBP(%edx)          movl    %ebp,PCB_EBP(%edx)
         ret          ret
   END(savectx)
   
 /*  /*
  * osyscall()   * osyscall()
Line 840  ENTRY(savectx)
Line 1149  ENTRY(savectx)
  * Old call gate entry for syscall   * Old call gate entry for syscall
  */   */
 IDTVEC(osyscall)  IDTVEC(osyscall)
   #ifndef XEN
           /* XXX we are in trouble! interrupts be off here. */
           cli                     # must be first instruction
   #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
         pushl   $7              # size of instruction for restart          pushl   $7              # size of instruction for restart
         jmp     syscall1          jmp     syscall1
   IDTVEC_END(osyscall)
   
 /*  /*
  * syscall()   * syscall()
Line 855  IDTVEC(syscall)
Line 1170  IDTVEC(syscall)
 syscall1:  syscall1:
         pushl   $T_ASTFLT       # trap # for doing ASTs          pushl   $T_ASTFLT       # trap # for doing ASTs
         INTRENTRY          INTRENTRY
           STI(%eax)
 #ifdef DIAGNOSTIC  #ifdef DIAGNOSTIC
         cmpl    $0, CPUVAR(WANT_PMAPLOAD)  
         jz      1f  
         pushl   $6f  
         call    _C_LABEL(printf)  
         addl    $4, %esp  
 1:  
         movl    CPUVAR(ILEVEL),%ebx          movl    CPUVAR(ILEVEL),%ebx
         testl   %ebx,%ebx          testl   %ebx,%ebx
         jz      1f          jz      1f
         pushl   $5f          pushl   $5f
         call    _C_LABEL(printf)          call    _C_LABEL(panic)
         addl    $4,%esp          addl    $4,%esp
 #ifdef DDB  #ifdef DDB
         int     $3          int     $3
 #endif  #endif
 1:  1:
 #endif /* DIAGNOSTIC */  #endif /* DIAGNOSTIC */
         movl    CPUVAR(CURLWP),%edx          addl    $1,CPUVAR(NSYSCALL)     # count it atomically
         movl    %esp,L_MD_REGS(%edx)    # save pointer to frame          adcl    $0,CPUVAR(NSYSCALL)+4   # count it atomically
         movl    L_PROC(%edx),%edx          movl    CPUVAR(CURLWP),%edi
           movl    L_PROC(%edi),%edx
           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. */
         cli          CLI(%eax)
         CHECK_ASTPENDING(%eax)          movl    L_MD_ASTPENDING(%edi), %eax
         je      1f          orl     CPUVAR(WANT_PMAPLOAD), %eax
         /* Always returning to user mode here. */  
         CLEAR_ASTPENDING(%eax)  
         sti  
         /* Pushed T_ASTFLT into tf_trapno on entry. */  
         pushl   %esp  
         call    _C_LABEL(trap)  
         addl    $4,%esp  
         jmp     .Lsyscall_checkast      /* re-check ASTs */  
 1:      CHECK_DEFERRED_SWITCH  
         jnz     9f          jnz     9f
   #ifdef XEN
           STIC(%eax)
           jz      14f
           call    _C_LABEL(stipending)
           testl   %eax,%eax
           jz      14f
           /* process pending interrupts */
           CLI(%eax)
           movl    CPUVAR(ILEVEL), %ebx
           movl    $.Lsyscall_resume, %esi # address to resume loop at
   .Lsyscall_resume:
           movl    %ebx,%eax       # get cpl
           movl    CPUVAR(IUNMASK)(,%eax,4),%eax
           andl    CPUVAR(IPENDING),%eax   # any non-masked bits left?
           jz      17f
           bsrl    %eax,%eax
           btrl    %eax,CPUVAR(IPENDING)
           movl    CPUVAR(ISOURCES)(,%eax,4),%eax
           jmp     *IS_RESUME(%eax)
   17:     movl    %ebx, CPUVAR(ILEVEL)    #restore cpl
           jmp     .Lsyscall_checkast
   14:
   #endif /* XEN */
 #ifndef DIAGNOSTIC  #ifndef DIAGNOSTIC
         INTRFASTEXIT          INTRFASTEXIT
 #else /* DIAGNOSTIC */  #else /* DIAGNOSTIC */
         cmpl    $IPL_NONE,CPUVAR(ILEVEL)          cmpl    $IPL_NONE,CPUVAR(ILEVEL)
         jne     3f          jne     3f
         INTRFASTEXIT          INTRFASTEXIT
 3:      sti  3:      STI(%eax)
         pushl   $4f          pushl   $4f
         call    _C_LABEL(printf)          call    _C_LABEL(panic)
           addl    $4,%esp
           pushl   $IPL_NONE
           call    _C_LABEL(spllower)
         addl    $4,%esp          addl    $4,%esp
 #ifdef DDB  
         int     $3  
 #endif /* DDB */  
         movl    $IPL_NONE,CPUVAR(ILEVEL)  
         jmp     .Lsyscall_checkast          jmp     .Lsyscall_checkast
 4:      .asciz  "WARNING: SPL NOT LOWERED ON SYSCALL EXIT\n"  4:      .asciz  "SPL NOT LOWERED ON SYSCALL EXIT\n"
 5:      .asciz  "WARNING: SPL NOT ZERO ON SYSCALL ENTRY\n"  5:      .asciz  "SPL NOT ZERO ON SYSCALL ENTRY\n"
 6:      .asciz  "WARNING: WANT PMAPLOAD ON SYSCALL ENTRY\n"  
 #endif /* DIAGNOSTIC */  #endif /* DIAGNOSTIC */
 9:      sti  9:
           cmpl    $0, CPUVAR(WANT_PMAPLOAD)
           jz      10f
           STI(%eax)
         call    _C_LABEL(pmap_load)          call    _C_LABEL(pmap_load)
         jmp     .Lsyscall_checkast      /* re-check ASTs */          jmp     .Lsyscall_checkast      /* re-check ASTs */
   10:
           /* Always returning to user mode here. */
           movl    $0, L_MD_ASTPENDING(%edi)
           STI(%eax)
           /* Pushed T_ASTFLT into tf_trapno on entry. */
           pushl   %esp
           call    _C_LABEL(trap)
           addl    $4,%esp
           jmp     .Lsyscall_checkast      /* re-check ASTs */
   IDTVEC_END(syscall)
   
 #if NNPX > 0  IDTVEC(svr4_fasttrap)
 /*          pushl   $2              # size of instruction for restart
  * Special interrupt handlers.  Someday intr0-intr15 will be used to count          pushl   $T_ASTFLT       # trap # for doing ASTs
  * interrupts.  We'll still need a special exception 16 handler.  The busy          INTRENTRY
  * latch stuff in probintr() can be moved to npxprobe().          STI(%eax)
  */          pushl   $RW_READER
           pushl   $_C_LABEL(svr4_fasttrap_lock)
 /*          call    _C_LABEL(rw_enter)
  * void probeintr(void)          addl    $8,%esp
  */          call    *_C_LABEL(svr4_fasttrap_vec)
 NENTRY(probeintr)          pushl   $_C_LABEL(svr4_fasttrap_lock)
         ss          call    _C_LABEL(rw_exit)
         incl    _C_LABEL(npx_intrs_while_probing)          addl    $4,%esp
         pushl   %eax  2:      /* Check for ASTs on exit to user mode. */
         movb    $0x20,%al       # EOI (asm in strings loses cpp features)          cli
         outb    %al,$0xa0       # IO_ICU2          CHECK_ASTPENDING(%eax)
         outb    %al,$0x20       # IO_ICU1          je      1f
         movb    $0,%al          /* Always returning to user mode here. */
         outb    %al,$0xf0       # clear BUSY# latch          CLEAR_ASTPENDING(%eax)
         popl    %eax          sti
         iret          /* Pushed T_ASTFLT into tf_trapno on entry. */
           pushl   %esp
 /*          call    _C_LABEL(trap)
  * void probetrap(void)          addl    $4,%esp
  */          jmp     2b
 NENTRY(probetrap)  1:      CHECK_DEFERRED_SWITCH
         ss          jnz     9f
         incl    _C_LABEL(npx_traps_while_probing)          INTRFASTEXIT
         fnclex  9:      sti
         iret          call    _C_LABEL(pmap_load)
           cli
           jmp     2b
   
 /*  /*
  * int npx586bug1(int a, int b)   * int npx586bug1(int a, int b)
    * Used when checking for the FDIV bug on first generations pentiums.
    * Anything 120MHz or above is fine.
  */   */
 NENTRY(npx586bug1)  NENTRY(npx586bug1)
         fildl   4(%esp)         # x          fildl   4(%esp)         # x
Line 963  NENTRY(npx586bug1)
Line 1303  NENTRY(npx586bug1)
         fistpl  (%esp)          fistpl  (%esp)
         popl    %eax          popl    %eax
         ret          ret
 #endif /* NNPX > 0 */  END(npx586bug1)
   
 /*  /*
  * void sse2_zero_page(void *pg)   * void sse2_idlezero_page(void *pg)
  *   *
  * Zero a page without polluting the cache.   * Zero a page without polluting the cache.  Preemption must be
    * disabled by the caller. Abort if a preemption is pending.
  */   */
 ENTRY(sse2_zero_page)  ENTRY(sse2_idlezero_page)
         pushl   %ebp          pushl   %ebp
         movl    %esp,%ebp          movl    %esp,%ebp
         movl    8(%esp), %edx          movl    8(%esp), %edx
         movl    $PAGE_SIZE, %ecx          movl    $(PAGE_SIZE/32), %ecx
         xorl    %eax, %eax          xorl    %eax, %eax
         .align  16          .align  16
 1:  1:
           testl   $RESCHED_KPREEMPT, CPUVAR(RESCHED)
           jnz     2f
         movnti  %eax, 0(%edx)          movnti  %eax, 0(%edx)
         movnti  %eax, 4(%edx)          movnti  %eax, 4(%edx)
         movnti  %eax, 8(%edx)          movnti  %eax, 8(%edx)
Line 986  ENTRY(sse2_zero_page)
Line 1329  ENTRY(sse2_zero_page)
         movnti  %eax, 20(%edx)          movnti  %eax, 20(%edx)
         movnti  %eax, 24(%edx)          movnti  %eax, 24(%edx)
         movnti  %eax, 28(%edx)          movnti  %eax, 28(%edx)
         subl    $32, %ecx          addl    $32, %edx
         leal    32(%edx), %edx          decl    %ecx
         jnz     1b          jnz     1b
         sfence          sfence
           incl    %eax
         pop     %ebp          pop     %ebp
         ret          ret
   2:
 /*  
  * void sse2_copy_page(void *src, void *dst)  
  *  
  * Copy a page without polluting the cache.  
  */  
 ENTRY(sse2_copy_page)  
         pushl   %ebp  
         pushl   %ebx  
         pushl   %esi  
         pushl   %edi  
         movl    20(%esp), %esi  
         movl    24(%esp), %edi  
         movl    $PAGE_SIZE, %ebp  
         .align  16  
 1:  
         movl    0(%esi), %eax  
         movl    4(%esi), %ebx  
         movl    8(%esi), %ecx  
         movl    12(%esi), %edx  
         movnti  %eax, 0(%edi)  
         movnti  %ebx, 4(%edi)  
         movnti  %ecx, 8(%edi)  
         movnti  %edx, 12(%edi)  
         subl    $16, %ebp  
         leal    16(%esi), %esi  
         leal    16(%edi), %edi  
         jnz     1b  
         sfence          sfence
         popl    %edi  
         popl    %esi  
         popl    %ebx  
         popl    %ebp          popl    %ebp
         ret          ret
   END(sse2_idlezero_page)

Legend:
Removed from v.1.57  
changed lines
  Added in v.1.112

CVSweb <webmaster@jp.NetBSD.org>