缥缈峰一座01号

梁二伯的窝

  DonewsBlog  |  Donews首页  |  Donews社区  |  Donews邮箱  |  我的首页  |  联系作者  |  聚合   |  登录
  86篇文章 :: 0篇收藏:: 27篇评论:: 0个Trackbacks

公告

Equality && Free

文章

收藏

相册

存档


正在读取评论……


内核版本 2.6.6

由于最近比较忙,还没有注释完成.以后抽空补好

/*
 * setup.S  Copyright (C) 1991, 1992 Linus Torvalds
 *
 * setup.s  负责从bios获取系统数据并放到内存合适的地方.
 * setup.s和system模块都已被bootsect加载如内存
 *
 * 这段代码想bios询问内存 磁盘 等其它参数,
 * 并把它们存放在安全的地方: 0x90000-0x901FF,
 * 然后转换到保护模式下
 * system模块必须在它们被缓存块覆盖前读取它们
 *
 * Move PS/2 aux init code to psaux.c
 * (troyer@saifr00.cfsat.Honeywell.COM) 03Oct92
 *
 * some changes and additional features by Christoph Niemann,
 * March 1993/June 1994 (Christoph.Niemann@linux.org)
 *
 * add APM BIOS checking by Stephen Rothwell, May 1994
 * (sfr@canb.auug.org.au)
 *
 * High load stuff, initrd support and position independency
 * by Hans Lermen & Werner Almesberger, February 1996
 * <lermen@elserv.ffm.fgan.de>, <almesber@lrc.epfl.ch>
 *
 * Video handling moved to video.S by Martin Mares, March 1996
 * <mj@k332.feld.cvut.cz>
 *
 * Extended memory detection scheme retwiddled by orc@pell.chi.il.us (david
 * parsons) to avoid loadlin confusion, July 1997
 *
 * Transcribed from Intel (as86) -> AT&T (gas) by Chris Noe, May 1999.
 * <stiker@northlink.com>
 *
 * Fix to work around buggy BIOSes which dont use carry bit correctly
 * and/or report extended memory in CX/DX for e801h memory size detection
 * call.  As a result the kernel got wrong figures.  The int15/e801h docs
 * from Ralf Brown interrupt list seem to indicate AX/BX should be used
 * anyway.  So to avoid breaking many machines (presumably there was a reason
 * to orginally use CX/DX instead of AX/BX), we do a kludge to see
 * if CX/DX have been changed in the e801 call and if so use AX/BX .
 * Michael Miller, April 2001 <michaelm@mjmm.org>
 *
 * New A20 code ported from SYSLINUX by H. Peter Anvin. AMD Elan bugfixes
 * by Robert Schwebel, December 2001 <robert@schwebel.de>
 */

#include <linux/config.h>
#include <asm/segment.h>
#include <linux/version.h>
#include <linux/compile.h>
#include <asm/boot.h>
#include <asm/e820.h>
#include <asm/page.h>
 
/* 确保LILO载入正确 */
#define SIG1 0xAA55
#define SIG2 0x5A5A

INITSEG  = DEF_INITSEG  # 0x9000, boot的位置
SYSSEG   = DEF_SYSSEG  # 0x1000, system模块位置 0x10000 (65536).
SETUPSEG = DEF_SETUPSEG  # 0x9020, 现在setup段的位置
    # ... and the former contents of CS

DELTA_INITSEG = SETUPSEG - INITSEG # 0x0020

.code16
.globl begtext, begdata, begbss, endtext, enddata, endbss

.text
begtext:
.data
begdata:
.bss
begbss:
.text

start:
 jmp trampoline

# setup头, 必须处于%cs:2 (老版 0x9020:2)

  .ascii "HdrS"  #头签名
  .word 0x0203  # 头版本号 (>= 0x0105)
     # 不然loadlin-1.5将出错)
realmode_swtch: .word 0, 0  # default_switch, SETUPSEG
start_sys_seg: .word SYSSEG
  .word kernel_version # 内核版本字符串指针
     # 上面的头与loadlin-1.5 (header v1.5)兼容
     # 不要修改它们
     

type_of_loader: .byte 0  # = 0, old one (LILO, Loadlin,
     #      Bootlin, SYSLX, bootsect...)
     # 参考 Documentation/i386/boot.txt
     
/*
      已分配 ids:
 0  LILO
 1  Loadlin
 2  bootsect-loader
 3  SYSLINUX
 4  EtherBoot
 */
 
# flags, loadflags 未使用的位必须置零
loadflags:
LOADED_HIGH = 1   # 假如设置,内核将加载在高地址
CAN_USE_HEAP = 0x80   # 如果置位,则loader必须置位heap_end_ptr
     #  它指明在setup.s之后有多少空间可用作堆
     # 只有loader知道有多少
#ifndef __BIG_KERNEL__       
  .byte 0              
#else
  .byte LOADED_HIGH
#endif

setup_move_size: .word  0x8000  # size to move, when setup is not
     # loaded at 0x90000. We will move setup
     # to 0x90000 then just before jumping
     # into the kernel. However, only the
     # loader knows how much data behind
     # us also needs to be loaded.

code32_start:    # here loaders can put a different
     # start address for 32-bit code.
#ifndef __BIG_KERNEL__
  .long 0x1000  #   0x1000  zImage
#else
  .long 0x100000 # 0x100000  big kernel
#endif

ramdisk_image: .long 0  # address of loaded ramdisk image
     # Here the loader puts the 32-bit
     # address where it loaded the image.
     # This only will be read by the kernel.

ramdisk_size: .long 0  # its size in bytes

bootsect_kludge:
  .word  bootsect_helper, SETUPSEG

heap_end_ptr: .word modelist+1024 # (Header version 0x0201 or later)
     # space from here (exclusive) down to
     # end of setup code can be used by setup
     # for local heap purposes.

pad1:  .word 0
cmd_line_ptr: .long 0   # (Header version 0x0202 or later)
     # If nonzero, a 32-bit pointer
     # to the kernel command line.
     # The command line should be
     # located between the start of
     # setup and the end of low
     # memory (0xa0000), or it may
     # get overwritten before it
     # gets read.  If this field is
     # used, there is no longer
     # anything magical about the
     # 0x90000 segment; the setup
     # can be located anywhere in
     # low memory 0x10000 or higher.

ramdisk_max: .long MAXMEM-1  # (Header version 0x0203 or later)
     # The highest safe address for
     # the contents of an initrd

trampoline: call start_of_setup
  .space 1024
# setup头结尾 #####################################################

start_of_setup:
# 启动linux需要这段代码尽早完成
 movw $0x01500, %ax                 
 movb $0x81, %dl                     //DL =驱动器号 (第七位 设位硬盘)
 int $0x13                            //int 0x13 取得磁盘类型

#假如设置了安全重置磁盘控制器
# 重新设置磁盘控制器
 movw $0x0000, %ax
 movb $0x80, %dl               // 硬盘控制器将被重置        
 int $0x13                      // int 0x13 重置磁盘系统


# 设置 %ds = %cs,此刻SETUPSEG = %cs
 movw %cs, %ax  # aka SETUPSEG
 movw %ax, %ds
# 在setup最后检查检查签名
 cmpw $SIG1, setup_sig1
 jne bad_sig            // 签名不正确则跳转

 cmpw $SIG2, setup_sig2
 jne bad_sig            // 签名不正确则跳转

 jmp good_sig1          //正确则跳到 good_sig1

# 输出ds:si处字符串的例程
prtstr:
 lodsb
 andb %al, %al
 jz fin                 //为空则跳到fin返回

 call prtchr
 jmp prtstr

fin: ret

# 打印空格
prtsp2: call prtspc  # 打印两个空格
prtspc: movb $0x20, %al # 打印一个空格 (note: fall-thru)

# 打印 al的字符
prtchr: pushw %ax
 pushw %cx
 movw $7,%bx
 movw $0x01, %cx
 movb $0x0e, %ah
 int $0x10
 popw %cx
 popw %ax
 ret

beep: movb $0x07, %al
 jmp prtchr
 
no_sig_mess: .string "No setup signature found ..."

good_sig1:
 jmp good_sig

# 现在我们必须找到setup的其余代码和数据
// 签名错误处理 签名错误说明setup大于4个扇区
bad_sig:
 movw %cs, %ax   # SETUPSEG 0x9020
 subw $DELTA_INITSEG, %ax  # INITSEG 0x9000
 movw %ax, %ds               //ds =0x9000
 xorb %bh, %bh               //清零
 movb (497), %bl   # 从bootsect取setup扇区数
 subw $4, %bx    # LILO 一次载入 setup 四个扇区
 shlw $8, %bx    # 转换为字(一个扇区为2^8字)
 movw %bx, %cx          //此时cx为剩余字数  
 shrw $3, %bx    # 转换为段 这个3的由来,是因为是字,所以少移一位
 addw $SYSSEG, %bx     //SYSSEG=0x1000  算出段地址
 movw %bx, %cs:start_sys_seg       //system开始处
# 把 setup其余代码数据载入到这
 movw $2048, %di   # LILO已载入四个扇区
 subw %si, %si           //清零
 pushw %cs                //把es 设为cs值
 popw %es
 movw $SYSSEG, %ax         //ds置为0x1000
 movw %ax, %ds
 rep
 movsw                      // 前头已设好cx
 movw %cs, %ax   # aka SETUPSEG
 movw %ax, %ds        //重置ds
 cmpw $SIG1, setup_sig1
 jne no_sig          //假如签名不对则跳转

 cmpw $SIG2, setup_sig2
 jne no_sig         //假如签名不对则跳转

 jmp good_sig

//没有签名
no_sig:
 lea no_sig_mess, %si      //打印出错信息 "No setup signature found ..."
 call prtstr

no_sig_loop:
 hlt
 jmp no_sig_loop           //死循环

good_sig:
 movw %cs, %ax   # SETUPSEG
 subw $DELTA_INITSEG, %ax   #  INITSEG
 movw %ax, %ds               //ds置为 INITSEG
# 检测是否有老版本loader试图载入big-kernel
 testb $LOADED_HIGH, %cs:loadflags # 是否是big-kernel?
 jz loader_ok   # 没有置1,对于老版本loader也没什么问题.

 cmpb $0, %cs:type_of_loader   # 检测loader版本 是否可以载入big-kernel
                                  //参考 Documentation/boot.txt
     
 jnz loader_ok   # 0为老版本

 pushw %cs    # 老版本不能载入big-kernel
 popw %ds    # die.
 lea loader_panic_mess, %si
 call prtstr

 jmp no_sig_loop

loader_panic_mess: .string "Wrong loader, giving up..."

loader_ok:
# 取得内存大小 (扩展内存, kB)

 xorl %eax, %eax
 movl %eax, (0x1e0)
#ifndef STANDARD_MEMORY_BIOS_CALL
 movb %al, (E820NR)
# Try three different memory detection schemes.  First, try
# e820h, which lets us assemble a memory map, then try e801h,
# which returns a 32-bit memory size, and finally 88h, which
# returns 0-64m

# method E820H:
# the memory map from hell.  e820h returns memory classified into
# a whole bunch of different types, and allows memory holes and
# everything.  We scan through this memory map and build a list
# of the first 32 memory areas, which we return at [E820MAP].
# This is documented at http://www.acpi.info/, in the ACPI 2.0 specification.

#define SMAP  0x534d4150

meme820:
 xorl %ebx, %ebx   # continuation counter
 movw $E820MAP, %di   # point into the whitelist
      # so we can have the bios
      # directly write into it.

jmpe820:
 movl $0x0000e820, %eax  # e820, upper word zeroed
 movl $SMAP, %edx   # ascii 'SMAP'
 movl $20, %ecx   # size of the e820rec
 pushw %ds    # data record.
 popw %es
 int $0x15    # make the call
 jc bail820    # fall to e801 if it fails

 cmpl $SMAP, %eax   # check the return is `SMAP'
 jne bail820    # fall to e801 if it fails

# cmpl $1, 16(%di)   # is this usable memory?
# jne again820

 # If this is usable memory, we save it by simply advancing %di by
 # sizeof(e820rec).
 #
good820:
 movb (E820NR), %al   # up to 32 entries
 cmpb $E820MAX, %al
 jnl bail820

 incb (E820NR)
 movw %di, %ax
 addw $20, %ax
 movw %ax, %di
again820:
 cmpl $0, %ebx   # check to see if
 jne jmpe820    # %ebx is set to EOF
bail820:


# method E801H:
# memory size is in 1k chunksizes, to avoid confusing loadlin.
# we store the 0xe801 memory size in a completely different place,
# because it will most likely be longer than 16 bits.
# (use 1e0 because that's what Larry Augustine uses in his
# alternative new memory detection scheme, and it's sensible
# to write everything into the same place.)

meme801:
 stc     # fix to work around buggy
 xorw %cx,%cx    # BIOSes which dont clear/set
 xorw %dx,%dx    # carry on pass/error of
      # e801h memory size call
      # or merely pass cx,dx though
      # without changing them.
 movw $0xe801, %ax
 int $0x15
 jc mem88

 cmpw $0x0, %cx   # Kludge to handle BIOSes
 jne e801usecxdx   # which report their extended
 cmpw $0x0, %dx   # memory in AX/BX rather than
 jne e801usecxdx   # CX/DX.  The spec I have read
 movw %ax, %cx   # seems to indicate AX/BX
 movw %bx, %dx   # are more reasonable anyway...

e801usecxdx:
 andl $0xffff, %edx   # clear sign extend
 shll $6, %edx   # and go from 64k to 1k chunks
 movl %edx, (0x1e0)   # store extended memory size
 andl $0xffff, %ecx   # clear sign extend
  addl %ecx, (0x1e0)   # and add lower memory into
      # total size.

# Ye Olde Traditional Methode.  Returns the memory size (up to 16mb or
# 64mb, depending on the bios) in ax.
mem88:

#endif
 movb $0x88, %ah
 int $0x15
 movw %ax, (2)

# Set the keyboard repeat rate to the max
 movw $0x0305, %ax
 xorw %bx, %bx
 int $0x16

# Check for video adapter and its parameters and allow the
# user to browse video modes.
 call video    # NOTE: we need %ds pointing
      # to bootsector

# Get hd0 data...
 xorw %ax, %ax
 movw %ax, %ds
 ldsw (4 * 0x41), %si
 movw %cs, %ax   # aka SETUPSEG
 subw $DELTA_INITSEG, %ax  # aka INITSEG
 pushw %ax
 movw %ax, %es
 movw $0x0080, %di
 movw $0x10, %cx
 pushw %cx
 cld
 rep
  movsb
# Get hd1 data...
 xorw %ax, %ax
 movw %ax, %ds
 ldsw (4 * 0x46), %si
 popw %cx
 popw %es
 movw $0x0090, %di
 rep
 movsb
# Check that there IS a hd1 :-)
 movw $0x01500, %ax
 movb $0x81, %dl
 int $0x13
 jc no_disk1
 
 cmpb $3, %ah
 je is_disk1

no_disk1:
 movw %cs, %ax   # aka SETUPSEG
 subw $DELTA_INITSEG, %ax   # aka INITSEG
 movw %ax, %es
 movw $0x0090, %di
 movw $0x10, %cx
 xorw %ax, %ax
 cld
 rep
 stosb
is_disk1:
# check for Micro Channel (MCA) bus
 movw %cs, %ax   # aka SETUPSEG
 subw $DELTA_INITSEG, %ax  # aka INITSEG
 movw %ax, %ds
 xorw %ax, %ax
 movw %ax, (0xa0)   # set table length to 0
 movb $0xc0, %ah
 stc
 int $0x15    # moves feature table to es:bx
 jc no_mca

 pushw %ds
 movw %es, %ax
 movw %ax, %ds
 movw %cs, %ax   # aka SETUPSEG
 subw $DELTA_INITSEG, %ax  # aka INITSEG
 movw %ax, %es
 movw %bx, %si
 movw $0xa0, %di
 movw (%si), %cx
 addw $2, %cx    # table length is a short
 cmpw $0x10, %cx
 jc sysdesc_ok

 movw $0x10, %cx   # we keep only first 16 bytes
sysdesc_ok:
 rep
 movsb
 popw %ds
no_mca:
#ifdef CONFIG_X86_VOYAGER
 movb $0xff, 0x40 # flag on config found
 movb $0xc0, %al
 mov $0xff, %ah
 int $0x15  # put voyager config info at es:di
 jc no_voyager
 movw $0x40, %si # place voyager info in apm table
 cld
 movw $7, %cx
voyager_rep:
 movb %es:(%di), %al
 movb %al,(%si)
 incw %di
 incw %si
 decw %cx
 jnz voyager_rep
no_voyager: 
#endif
# Check for PS/2 pointing device
 movw %cs, %ax   # aka SETUPSEG
 subw $DELTA_INITSEG, %ax  # aka INITSEG
 movw %ax, %ds
 movw $0, (0x1ff)   # default is no pointing device
 int $0x11    # int 0x11: equipment list
 testb $0x04, %al   # check if mouse installed
 jz no_psmouse

 movw $0xAA, (0x1ff)   # device present
no_psmouse:

#if defined(CONFIG_X86_SPEEDSTEP_SMI) || defined(CONFIG_X86_SPEEDSTEP_SMI_MODULE)
 movl $0x0000E980, %eax  # IST Support
 movl $0x47534943, %edx  # Request value
 int $0x15

 movl %eax, (96)
 movl %ebx, (100)
 movl %ecx, (104)
 movl %edx, (108)
#endif

#if defined(CONFIG_APM) || defined(CONFIG_APM_MODULE)
# Then check for an APM BIOS...
      # %ds points to the bootsector
 movw $0, 0x40   # version = 0 means no APM BIOS
 movw $0x05300, %ax   # APM BIOS installation check
 xorw %bx, %bx
 int $0x15
 jc done_apm_bios   # Nope, no APM BIOS
 
 cmpw $0x0504d, %bx   # Check for "PM" signature
 jne done_apm_bios   # No signature, no APM BIOS

 andw $0x02, %cx   # Is 32 bit supported?
 je done_apm_bios   # No 32-bit, no (good) APM BIOS

 movw $0x05304, %ax   # Disconnect first just in case
 xorw %bx, %bx
 int $0x15    # ignore return code
 movw $0x05303, %ax   # 32 bit connect
 xorl %ebx, %ebx
 xorw %cx, %cx   # paranoia :-)
 xorw %dx, %dx   #   ...
 xorl %esi, %esi   #   ...
 xorw %di, %di   #   ...
 int $0x15
 jc no_32_apm_bios   # Ack, error.

 movw %ax,  (66)   # BIOS code segment
 movl %ebx, (68)   # BIOS entry point offset
 movw %cx,  (72)   # BIOS 16 bit code segment
 movw %dx,  (74)   # BIOS data segment
 movl %esi, (78)   # BIOS code segment lengths
 movw %di,  (82)   # BIOS data segment length
# Redo the installation check as the 32 bit connect
# modifies the flags returned on some BIOSs
 movw $0x05300, %ax   # APM BIOS installation check
 xorw %bx, %bx
 xorw %cx, %cx   # paranoia
 int $0x15
 jc apm_disconnect   # error -> shouldn't happen

 cmpw $0x0504d, %bx   # check for "PM" signature
 jne apm_disconnect   # no sig -> shouldn't happen

 movw %ax, (64)   # record the APM BIOS version
 movw %cx, (76)   # and flags
 jmp done_apm_bios

apm_disconnect:     # Tidy up
 movw $0x05304, %ax   # Disconnect
 xorw %bx, %bx
 int $0x15    # ignore return code

 jmp done_apm_bios

no_32_apm_bios:
 andw $0xfffd, (76)   # remove 32 bit support bit
done_apm_bios:
#endif

#include "edd.S"

# Now we want to move to protected mode ...
 cmpw $0, %cs:realmode_swtch
 jz rmodeswtch_normal

 lcall *%cs:realmode_swtch

 jmp rmodeswtch_end

rmodeswtch_normal:
        pushw %cs
 call default_switch

rmodeswtch_end:
# we get the code32 start address and modify the below 'jmpi'
# (loader may have changed it)
 movl %cs:code32_start, %eax
 movl %eax, %cs:code32

# Now we move the system to its rightful place ... but we check if we have a
# big-kernel. In that case we *must* not move it ...
 testb $LOADED_HIGH, %cs:loadflags
 jz do_move0   # .. then we have a normal low
      # loaded zImage
      # .. or else we have a high
      # loaded bzImage
 jmp end_move   # ... and we skip moving

do_move0:
 movw $0x100, %ax   # start of destination segment
 movw %cs, %bp   # aka SETUPSEG
 subw $DELTA_INITSEG, %bp  # aka INITSEG
 movw %cs:start_sys_seg, %bx  # start of source segment
 cld
do_move:
 movw %ax, %es   # destination segment
 incb %ah    # instead of add ax,#0x100
 movw %bx, %ds   # source segment
 addw $0x100, %bx
 subw %di, %di
 subw %si, %si
 movw  $0x800, %cx
 rep
 movsw
 cmpw %bp, %bx   # assume start_sys_seg > 0x200,
      # so we will perhaps read one
      # page more than needed, but
      # never overwrite INITSEG
      # because destination is a
      # minimum one page below source
 jb do_move

end_move:
# then we load the segment descriptors
 movw %cs, %ax   # aka SETUPSEG
 movw %ax, %ds
  
# Check whether we need to be downward compatible with version <=201
 cmpl $0, cmd_line_ptr
 jne end_move_self  # loader uses version >=202 features
 cmpb $0x20, type_of_loader
 je end_move_self  # bootsect loader, we know of it

# Boot loader doesnt support boot protocol version 2.02.
# If we have our code not at 0x90000, we need to move it there now.
# We also then need to move the params behind it (commandline)
# Because we would overwrite the code on the current IP, we move
# it in two steps, jumping high after the first one.
 movw %cs, %ax
 cmpw $SETUPSEG, %ax
 je end_move_self

 cli     # make sure we really have
      # interrupts disabled !
      # because after this the stack
      # should not be used
 subw $DELTA_INITSEG, %ax  # aka INITSEG
 movw %ss, %dx
 cmpw %ax, %dx
 jb move_self_1

 addw $INITSEG, %dx
 subw %ax, %dx   # this will go into %ss after
      # the move
move_self_1:
 movw %ax, %ds
 movw $INITSEG, %ax   # real INITSEG
 movw %ax, %es
 movw %cs:setup_move_size, %cx
 std     # we have to move up, so we use
      # direction down because the
      # areas may overlap
 movw %cx, %di
 decw %di
 movw %di, %si
 subw $move_self_here+0x200, %cx
 rep
 movsb
 ljmp $SETUPSEG, $move_self_here

move_self_here:
 movw $move_self_here+0x200, %cx
 rep
 movsb
 movw $SETUPSEG, %ax
 movw %ax, %ds
 movw %dx, %ss
end_move_self:     # now we are at the right place

#
# Enable A20.  This is at the very best an annoying procedure.
# A20 code ported from SYSLINUX 1.52-1.63 by H. Peter Anvin.
# AMD Elan bug fix by Robert Schwebel.
#

#if defined(CONFIG_X86_ELAN)
 movb $0x02, %al   # alternate A20 gate
 outb %al, $0x92   # this works on SC410/SC520
a20_elan_wait:
 call a20_test
 jz a20_elan_wait
 jmp a20_done
#endif


A20_TEST_LOOPS  =  32  # Iterations per wait
A20_ENABLE_LOOPS = 255  # Total loops to try  


#ifndef CONFIG_X86_VOYAGER
a20_try_loop:

 # First, see if we are on a system with no A20 gate.
a20_none:
 call a20_test
 jnz a20_done

 # Next, try the BIOS (INT 0x15, AX=0x2401)
a20_bios:
 movw $0x2401, %ax
 pushfl     # Be paranoid about flags
 int $0x15
 popfl

 call a20_test
 jnz a20_done

 # Try enabling A20 through the keyboard controller
#endif /* CONFIG_X86_VOYAGER */
a20_kbc:
 call empty_8042

#ifndef CONFIG_X86_VOYAGER
 call a20_test   # Just in case the BIOS worked
 jnz a20_done   # but had a delayed reaction.
#endif

 movb $0xD1, %al   # command write
 outb %al, $0x64
 call empty_8042

 movb $0xDF, %al   # A20 on
 outb %al, $0x60
 call empty_8042

#ifndef CONFIG_X86_VOYAGER
 # Wait until a20 really *is* enabled; it can take a fair amount of
 # time on certain systems; Toshiba Tecras are known to have this
 # problem.
a20_kbc_wait:
 xorw %cx, %cx
a20_kbc_wait_loop:
 call a20_test
 jnz a20_done
 loop a20_kbc_wait_loop

 # Final attempt: use "configuration port A"
a20_fast:
 inb $0x92, %al   # Configuration Port A
 orb $0x02, %al   # "fast A20" version
 andb $0xFE, %al   # don't accidentally reset
 outb %al, $0x92

 # Wait for configuration port A to take effect
a20_fast_wait:
 xorw %cx, %cx
a20_fast_wait_loop:
 call a20_test
 jnz a20_done
 loop a20_fast_wait_loop

 # A20 is still not responding.  Try frobbing it again.
 #
 decb (a20_tries)
 jnz a20_try_loop
 
 movw $a20_err_msg, %si
 call prtstr

a20_die:
 hlt
 jmp a20_die

a20_tries:
 .byte A20_ENABLE_LOOPS

a20_err_msg:
 .ascii "linux: fatal error: A20 gate not responding!"
 .byte 13, 10, 0

 # If we get here, all is good
a20_done:

#endif /* CONFIG_X86_VOYAGER */
# set up gdt and idt
 lidt idt_48    # load idt with 0,0
 xorl %eax, %eax   # Compute gdt_base
 movw %ds, %ax   # (Convert %ds:gdt to a linear ptr)
 shll $4, %eax
 addl $gdt, %eax
 movl %eax, (gdt_48+2)
 lgdt gdt_48    # load gdt with whatever is
      # appropriate

# make sure any possible coprocessor is properly reset..
 xorw %ax, %ax
 outb %al, $0xf0
 call delay

 outb %al, $0xf1
 call delay

# well, that went ok, I hope. Now we mask all interrupts - the rest
# is done in init_IRQ().
 movb $0xFF, %al   # mask all interrupts for now
 outb %al, $0xA1
 call delay
 
 movb $0xFB, %al   # mask all irq's but irq2 which
 outb %al, $0x21   # is cascaded

# Well, that certainly wasn't fun :-(. Hopefully it works, and we don't
# need no steenking BIOS anyway (except for the initial loading :-).
# The BIOS-routine wants lots of unnecessary data, and it's less
# "interesting" anyway. This is how REAL programmers do it.
#
# Well, now's the time to actually move into protected mode. To make
# things as simple as possible, we do no register set-up or anything,
# we let the gnu-compiled 32-bit programs do that. We just jump to
# absolute address 0x1000 (or the loader supplied one),
# in 32-bit protected mode.
#
# Note that the short jump isn't strictly needed, although there are
# reasons why it might be a good idea. It won't hurt in any case.
 movw $1, %ax    # protected mode (PE) bit
 lmsw %ax    # This is it!
 jmp flush_instr

flush_instr:
 xorw %bx, %bx   # Flag to indicate a boot
 xorl %esi, %esi   # Pointer to real-mode code
 movw %cs, %si
 subw $DELTA_INITSEG, %si
 shll $4, %esi   # Convert to 32-bit pointer

# jump to startup_32 in arch/i386/kernel/head.S

# NOTE: For high loaded big kernels we need a
# jmpi    0x100000,__BOOT_CS
#
# but we yet haven't reloaded the CS register, so the default size
# of the target offset still is 16 bit.
#       However, using an operand prefix (0x66), the CPU will properly
# take our 48 bit far pointer. (INTeL 80386 Programmer's Reference
# Manual, Mixing 16-bit and 32-bit code, page 16-6)

 .byte 0x66, 0xea   # prefix + jmpi-opcode
code32: .long 0x1000    # will be set to 0x100000
      # for big kernels
 .word __BOOT_CS

# Here's a bunch of information about your current kernel..
kernel_version: .ascii UTS_RELEASE
  .ascii " ("
  .ascii LINUX_COMPILE_BY
  .ascii "@"
  .ascii LINUX_COMPILE_HOST
  .ascii ") "
  .ascii UTS_VERSION
  .byte 0

# This is the default real mode switch routine.
# to be called just before protected mode transition
default_switch:
 cli     # no interrupts allowed !
 movb $0x80, %al   # disable NMI for bootup
      # sequence
 outb %al, $0x70
 lret

# This routine only gets called, if we get loaded by the simple
# bootsect loader _and_ have a bzImage to load.
# Because there is no place left in the 512 bytes of the boot sector,
# we must emigrate to code space here.
bootsect_helper:
 cmpw $0, %cs:bootsect_es
 jnz bootsect_second

 movb $0x20, %cs:type_of_loader
 movw %es, %ax
 shrw $4, %ax
 movb %ah, %cs:bootsect_src_base+2
 movw %es, %ax
 movw %ax, %cs:bootsect_es
 subw $SYSSEG, %ax
 lret     # nothing else to do for now

bootsect_second:
 pushw %cx
 pushw %si
 pushw %bx
 testw %bx, %bx   # 64K full?
 jne bootsect_ex

 movw $0x8000, %cx   # full 64K, INT15 moves words
 pushw %cs
 popw %es
 movw $bootsect_gdt, %si
 movw $0x8700, %ax
 int $0x15
 jc bootsect_panic   # this, if INT15 fails

 movw %cs:bootsect_es, %es  # we reset %es to always point
 incb %cs:bootsect_dst_base+2  # to 0x10000
bootsect_ex:
 movb %cs:bootsect_dst_base+2, %ah
 shlb $4, %ah    # we now have the number of
      # moved frames in %ax
 xorb %al, %al
 popw %bx
 popw %si
 popw %cx
 lret

bootsect_gdt:
 .word 0, 0, 0, 0
 .word 0, 0, 0, 0

bootsect_src:
 .word 0xffff

bootsect_src_base:
 .byte 0x00, 0x00, 0x01  # base = 0x010000
 .byte 0x93    # typbyte
 .word 0    # limit16,base24 =0

bootsect_dst:
 .word 0xffff

bootsect_dst_base:
 .byte 0x00, 0x00, 0x10  # base = 0x100000
 .byte 0x93    # typbyte
 .word 0    # limit16,base24 =0
 .word 0, 0, 0, 0   # BIOS CS
 .word 0, 0, 0, 0   # BIOS DS

bootsect_es:
 .word 0

bootsect_panic:
 pushw %cs
 popw %ds
 cld
 leaw bootsect_panic_mess, %si
 call prtstr
 
bootsect_panic_loop:
 jmp bootsect_panic_loop

bootsect_panic_mess:
 .string "INT15 refuses to access high mem, giving up."


#ifndef CONFIG_X86_VOYAGER
# This routine tests whether or not A20 is enabled.  If so, it
# exits with zf = 0.
#
# The memory address used, 0x200, is the int $0x80 vector, which
# should be safe.

A20_TEST_ADDR = 4*0x80

a20_test:
 pushw %cx
 pushw %ax
 xorw %cx, %cx
 movw %cx, %fs   # Low memory
 decw %cx
 movw %cx, %gs   # High memory area
 movw $A20_TEST_LOOPS, %cx
 movw %fs:(A20_TEST_ADDR), %ax
 pushw %ax
a20_test_wait:
 incw %ax
 movw %ax, %fs:(A20_TEST_ADDR)
 call delay    # Serialize and make delay constant
 cmpw %gs:(A20_TEST_ADDR+0x10), %ax
 loope a20_test_wait

 popw %fs:(A20_TEST_ADDR)
 popw %ax
 popw %cx
 ret 

#endif /* CONFIG_X86_VOYAGER */

# This routine checks that the keyboard command queue is empty
# (after emptying the output buffers)
#
# Some machines have delusions that the keyboard buffer is always full
# with no keyboard attached...
#
# If there is no keyboard controller, we will usually get 0xff
# to all the reads.  With each IO taking a microsecond and
# a timeout of 100,000 iterations, this can take about half a
# second ("delay" == outb to port 0x80). That should be ok,
# and should also be plenty of time for a real keyboard controller
# to empty.
#

empty_8042:
 pushl %ecx
 movl $100000, %ecx

empty_8042_loop:
 decl %ecx
 jz empty_8042_end_loop

 call delay

 inb $0x64, %al   # 8042 status port
 testb $1, %al    # output buffer?
 jz no_output

 call delay
 inb $0x60, %al   # read it
 jmp empty_8042_loop

no_output:
 testb $2, %al    # is input buffer full?
 jnz empty_8042_loop   # yes - loop
empty_8042_end_loop:
 popl %ecx
 ret

# Read the cmos clock. Return the seconds in al
gettime:
 pushw %cx
 movb $0x02, %ah
 int $0x1a
 movb %dh, %al   # %dh contains the seconds
 andb $0x0f, %al
 movb %dh, %ah
 movb $0x04, %cl
 shrb %cl, %ah
 aad
 popw %cx
 ret

# Delay is needed after doing I/O
delay:
 outb %al,$0x80
 ret

# Descriptor tables
#
# NOTE: The intel manual says gdt should be sixteen bytes aligned for
# efficiency reasons.  However, there are machines which are known not
# to boot with misaligned GDTs, so alter this at your peril!  If you alter
# GDT_ENTRY_BOOT_CS (in asm/segment.h) remember to leave at least two
# empty GDT entries (one for NULL and one reserved).
#
# NOTE: On some CPUs, the GDT must be 8 byte aligned.  This is
# true for the Voyager Quad CPU card which will not boot without
# This directive.  16 byte aligment is recommended by intel.
#
 .align 16
gdt:
 .fill GDT_ENTRY_BOOT_CS,8,0

 .word 0xFFFF    # 4Gb - (0x100000*0x1000 = 4Gb)
 .word 0    # base address = 0
 .word 0x9A00    # code read/exec
 .word 0x00CF    # granularity = 4096, 386
      #  (+5th nibble of limit)

 .word 0xFFFF    # 4Gb - (0x100000*0x1000 = 4Gb)
 .word 0    # base address = 0
 .word 0x9200    # data read/write
 .word 0x00CF    # granularity = 4096, 386
      #  (+5th nibble of limit)
gdt_end:
 .align 4
 
 .word 0    # alignment byte
idt_48:
 .word 0    # idt limit = 0
 .word 0, 0    # idt base = 0L

 .word 0    # alignment byte
gdt_48:
 .word gdt_end - gdt - 1  # gdt limit
 .word 0, 0    # gdt base (filled in later)

# Include video setup & detection code

#include "video.S"

# Setup signature -- must be last
setup_sig1: .word SIG1
setup_sig2: .word SIG2

# After this point, there is some free space which is used by the video mode
# handling code to store the temporary mode table (not used by the kernel).

modelist:

.text
endtext:
.data
enddata:
.bss
endbss:



Trackback: http://tb.donews.net/TrackBack.aspx?PostId=480844


[点击此处收藏本文]  发表于2005年07月25日 11:34 PM




正在读取评论……

发表评论

大名:
网址:
验证码
评论