source: xtideuniversalbios/trunk/Assembly_Library/Src/String/String.asm @ 619

Last change on this file since 619 was 619, checked in by aitotat, 3 years ago

Fixed return register info on two string library functions. No changes to code.
File size: 3.4 KB
RevLine 
[41]1; Project name  :   Assembly Library
2; Description   :   Functions for handling characters.
3
[376]4;
[526]5; XTIDE Universal BIOS and Associated Tools
6; Copyright (C) 2009-2010 by Tomi Tilli, 2011-2013 by XTIDE Universal BIOS Team.
[376]7;
8; This program is free software; you can redistribute it and/or modify
9; it under the terms of the GNU General Public License as published by
10; the Free Software Foundation; either version 2 of the License, or
11; (at your option) any later version.
[526]12;
[376]13; This program is distributed in the hope that it will be useful,
14; but WITHOUT ANY WARRANTY; without even the implied warranty of
15; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
[526]16; GNU General Public License for more details.
[376]17; Visit http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
[526]18;
[376]19
[41]20; Section containing code
21SECTION .text
22
23;--------------------------------------------------------------------
[53]24; String_ConvertDSSItoLowerCase
25;   Parameters:
26;       DS:SI:  Ptr to string to convert
27;   Returns:
28;       CX:     Number of characters processed
29;   Corrupts registers:
30;       Nothing
31;--------------------------------------------------------------------
[369]32ALIGN STRING_JUMP_ALIGN
[53]33String_ConvertDSSItoLowerCase:
34    push    dx
35    push    ax
36
37    mov     dx, StringProcess_ConvertToLowerCase
38    call    StringProcess_DSSIwithFunctionInDX
39
40    pop     ax
41    pop     dx
42    ret
43
44
45;--------------------------------------------------------------------
[41]46; String_ConvertWordToAXfromStringInDSSIwithBaseInBX
47;   Parameters:
48;       BX:     Numeric base (10 or 16)
49;       DS:SI:  Ptr to string to convert
50;   Returns:
51;       AX:     Word converted from string
[53]52;       CX:     Number of characters processed
[293]53;       CF:     Cleared if successful
[52]54;               Set if error during conversion
[41]55;   Corrupts registers:
[52]56;       Nothing
[41]57;--------------------------------------------------------------------
[369]58ALIGN STRING_JUMP_ALIGN
[41]59String_ConvertWordToAXfromStringInDSSIwithBaseInBX:
[52]60    push    di
61    push    dx
[41]62
[52]63    xor     di, di
64    mov     dx, StringProcess_ConvertToWordInDIWithBaseInBX
65    call    StringProcess_DSSIwithFunctionInDX
66    xchg    ax, di
[41]67
[52]68    pop     dx
69    pop     di
[41]70    ret
71
72
73;--------------------------------------------------------------------
[53]74; String_CopyDSSItoESDIandGetLengthToCX
[41]75;   Parameters:
76;       DS:SI:  Ptr to source NULL terminated string
77;       ES:DI:  Ptr to destination buffer
78;   Returns:
79;       CX:     Number of characters copied
80;       SI,DI:  Updated by CX characters
81;   Corrupts registers:
82;       Nothing
83;--------------------------------------------------------------------
[369]84ALIGN STRING_JUMP_ALIGN
[53]85String_CopyDSSItoESDIandGetLengthToCX:
[41]86    push    ax
[52]87
[41]88    xor     cx, cx
[369]89ALIGN STRING_JUMP_ALIGN
[52]90.CopyNextCharacter:
[41]91    lodsb                       ; Load from DS:SI to AL
92    test    al, al              ; NULL to end string?
93    jz      SHORT .EndOfString
94    stosb                       ; Store from AL to ES:DI
95    inc     cx                  ; Increment number of characters written
[52]96    jmp     SHORT .CopyNextCharacter
[41]97
[369]98ALIGN STRING_JUMP_ALIGN
[41]99.EndOfString:
100    pop     ax
101    ret
[46]102
103
104;--------------------------------------------------------------------
[52]105; String_GetLengthFromDSSItoCX
[46]106;   Parameters:
[52]107;       DS:SI:  Ptr to NULL terminated string
[46]108;   Returns:
[52]109;       CX:     String length in characters
[46]110;   Corrupts registers:
111;       Nothing
112;--------------------------------------------------------------------
[369]113ALIGN STRING_JUMP_ALIGN
[52]114String_GetLengthFromDSSItoCX:
115    push    ax
[46]116    push    si
117
[54]118    call    Registers_ExchangeDSSIwithESDI
[52]119    xor     ax, ax      ; Find NULL
120    mov     cx, -1      ; Full segment if necessary
121    repne scasb
122    mov     cx, di
[54]123    call    Registers_ExchangeDSSIwithESDI
[46]124
[52]125    pop     si
126    stc
127    sbb     cx, si      ; Subtract NULL
[46]128    pop     ax
129    ret
Note: See TracBrowser for help on using the repository browser.