Subversion Repositories Kolibri OS

; Copyright (c) 2009, 

; All rights reserved.

;

; Redistribution and use in source and binary forms, with or without

; modification, are permitted provided that the following conditions are met:

;       * Redistributions of source code must retain the above copyright

;       notice, this list of conditions and the following disclaimer.

;       * Redistributions in binary form must reproduce the above copyright

;       notice, this list of conditions and the following disclaimer in the

;       documentation and/or other materials provided with the distribution.

;       * Neither the name of the  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 Alexey Teplov nickname  ''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  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.

;*****************************************************************************

; Модуль парсинга - это стандартный компонент, встраиваемый во вторичный загрузчик.

; Данный модуль позволяет стандартно произвести разбор ini файла

; (и с использованием полученных данных ОС будет загружаться дальше).

; В начале найдем открывающий "[" - это будет указывать на начало

; секции. Поддерживается 1 секция это [loader], остальные секции могут иметь

; любые имена, но они должны быть заключены в в скобки []

macro  use_parse

{

;input cx=size of ini file

parse_start:

;es:di as 2000:0000 new segment

;установим указатель на загруженный блок

        enter   256, 0  ;set 16 byte for current task in stack

;we are is not use bp because bp is pointer on array 16 byte

        mov     word [save_bp_from_timer], bp   ;save point to own data array

        mov     save_cx, cx     ;it's placed size of ini file

        les     di, dword [file_data]

;обнулим все переменные выделенные из стека

;init flag

        xor     ax, ax

        mov     status_flag, ax

;set data size

        mov     info_real_mode_size, ini_data_ +0x1000   ;изменим значение занятости памяти

;поиск начала блока.

;///////////check [loader]

        cld

        mov     ret_on_ch, .start    ;set return

        mov     al, byte [es:di]

        push    word .first_ret

        cmp     al, ' '

        jz      .first_sp_1

        jmp     get_firs_sym.not_space

.first_sp_1:

        jmp     get_firs_sym.first_sp

.start:

        call    get_firs_sym    ;get first symbol on new line

.first_ret:                     ;первый возврат

;        jcxz   .end_file       ;.end_loader     ;found or not found parametrs in section  exit in section

        test    cx, cx

        jz      error.not_loader

        cmp     al, '['

        jz      .parse_loader

        jmp     .start

;////// проверка на наличее секции loader

use_parse_loader

;pause

if DEBUG

        xor     ax, ax

        int     16h

end if

;////// вывод графического экрана, выбор, секции под дефолту

use_any_sec

;парсинг выбраной или дефолтной секции т.е. разбор параметров выполнение сценария

use_parse_def_sect

;//////////////////

;/end parse block

;//////////////////

;.end_bl:

;        mov     cx,bx

;

;        jmp     .start

.exit:

;        mov     si,parse_ini_end

;        call    printplain

;

;if DEBUG

;        pusha

;        mov     ax,cx

;        mov     cx,0x0a

;        mov     di,show_db1_dec

;        mov     dword[ds:di],'    '

;        call    decode

;Show size

;        mov     si,show_db1

;        call    printplain

;

;        popa

;end if

        jmp     $

;///////////////////procedure //////////

;input es:di - is pointer to date

;cx - counter

;return: cx - status if =0 - end of date else es:di point to first symbol on new line

}