source: xtideuniversalbios/trunk/Assembly_Library/Src/Display/DisplayPrint.asm @ 489

Last change on this file since 489 was 489, checked in by gregli@…, 11 years ago

Added version string to initial title banner, for cases where there is not a boot menu (just hotkeys, or no hotkeys). Also ifdef'd out some unused code.
File size: 12.4 KB
Line 
1; Project name  :   Assembly Library
2; Description   :   Functions for display output.
3
4;
5; XTIDE Universal BIOS and Associated Tools 
6; Copyright (C) 2009-2010 by Tomi Tilli, 2011-2012 by XTIDE Universal BIOS Team.
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.
12; 
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
16; GNU General Public License for more details.     
17; Visit http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
18;       
19
20; Section containing code
21SECTION .text
22
23
24;--------------------------------------------------------------------
25; Supports following formatting types:
26;   %a      Specifies attribute for next character
27;   %A      Specifies attribute for remaining string (or until next %A)
28;   %d      Prints signed 16-bit decimal integer
29;   %u      Prints unsigned 16-bit decimal integer
30;   %x      Prints 16-bit hexadecimal integer
31;   %s      Prints string (from CS segment)
32;   %S      Prints string (far pointer)
33;   %c      Prints character
34;   %t      Prints character number of times (character needs to be pushed first, then repeat times)
35;   %%      Prints '%' character (no parameter pushed)
36;
37;   Any placeholder can be set to minimum length by specifying
38;   minimum number of characters. For example %8d would append spaces
39;   after integer so that at least 8 characters would be printed.
40;
41;   When placing '-' after number, then spaces will be used for prepending.
42;   For example %8-d would prepend integer with spaces so that at least
43;   8 characters would be printed.
44;
45; DisplayPrint_FormattedNullTerminatedStringFromCSSI
46;   Parameters:
47;       BP:     SP before pushing parameters
48;       DS:     BDA segment (zero)
49;       CS:SI:  Pointer to string to format
50;       ES:DI:  Ptr to cursor location in video RAM
51;       Stack:  Parameters for formatting placeholders.
52;               Parameter for first placeholder must be pushed first.
53;               Low word must pushed first for placeholders requiring
54;               32-bit parameters (two words).
55;   Returns:
56;       DI:     Updated offset to video RAM
57;   Corrupts registers:
58;       AX, DX
59;--------------------------------------------------------------------
60ALIGN DISPLAY_JUMP_ALIGN
61DisplayPrint_FormattedNullTerminatedStringFromCSSI:
62    push    bp
63    push    si
64    push    cx
65    push    bx
66    push    WORD [VIDEO_BDA.displayContext+DISPLAY_CONTEXT.bAttribute]
67
68    dec     bp                  ; Point BP to...
69    dec     bp                  ; ...first stack parameter
70    call    DisplayFormat_ParseCharacters
71
72    ; Pop original character attribute
73    pop     ax
74    mov     [VIDEO_BDA.displayContext+DISPLAY_CONTEXT.bAttribute], al
75
76    pop     bx
77    pop     cx
78    pop     si
79    pop     bp
80
81    ret
82
83
84;--------------------------------------------------------------------
85; DisplayPrint_SignedWordFromAXWithBaseInBX
86;   Parameters:
87;       AX:     Word to display
88;       BX:     Integer base (binary=2, octal=8, decimal=10, hexadecimal=16)
89;       DS:     BDA segment (zero)
90;       ES:DI:  Ptr to cursor location in video RAM
91;   Returns:
92;       DI:     Updated offset to video RAM
93;   Corrupts registers:
94;       AX, DX
95;--------------------------------------------------------------------
96%ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS
97ALIGN DISPLAY_JUMP_ALIGN
98DisplayPrint_SignedWordFromAXWithBaseInBX:
99    test    ax, ax
100    jns     SHORT DisplayPrint_WordFromAXWithBaseInBX
101
102    push    ax
103    mov     al, '-'
104    call    DisplayPrint_CharacterFromAL
105    pop     ax
106    neg     ax
107    ; Fall to DisplayPrint_WordFromAXWithBaseInBX
108%endif
109
110
111%ifndef MODULE_STRINGS_COMPRESSED
112;--------------------------------------------------------------------
113; DisplayPrint_WordFromAXWithBaseInBX
114;   Parameters:
115;       AX:     Word to display
116;       BX:     Integer base (binary=2, octal=8, decimal=10, hexadecimal=16)
117;       DS:     BDA segment (zero)
118;       ES:DI:  Ptr to cursor location in video RAM
119;   Returns:
120;       DI:     Updated offset to video RAM
121;   Corrupts registers:
122;       AX, DX
123;--------------------------------------------------------------------
124ALIGN DISPLAY_JUMP_ALIGN
125DisplayPrint_WordFromAXWithBaseInBX:
126    push    cx
127    push    bx
128
129    xor     cx, cx
130ALIGN DISPLAY_JUMP_ALIGN
131.DivideLoop:
132    xor     dx, dx              ; DX:AX now holds the integer
133    div     bx                  ; Divide DX:AX by base
134    push    dx                  ; Push remainder
135    inc     cx                  ; Increment character count
136    test    ax, ax              ; All divided?
137    jnz     SHORT .DivideLoop   ;  If not, loop
138
139PrintAllPushedDigits:
140    mov     bx, g_rgcDigitToCharacter
141ALIGN DISPLAY_JUMP_ALIGN
142.PrintNextDigit:
143    pop     ax                  ; Pop digit
144    cs xlatb
145    call    DisplayPrint_CharacterFromAL
146    loop    .PrintNextDigit
147
148    pop     bx
149    pop     cx
150    ret
151
152g_rgcDigitToCharacter:  db  "0123456789ABCDEF"
153
154;--------------------------------------------------------------------
155; DisplayPrint_QWordFromSSBPwithBaseInBX
156;   Parameters:
157;       SS:BP:  QWord to display
158;       BX:     Integer base (binary=2, octal=8, decimal=10, hexadecimal=16)
159;       DS:     BDA segment (zero)
160;       ES:DI:  Ptr to cursor location in video RAM
161;   Returns:
162;       DI:     Updated offset to video RAM
163;   Corrupts registers:
164;       AX, DX, [SS:BP]
165;--------------------------------------------------------------------
166%ifndef EXCLUDE_FROM_XTIDECFG   ; Not used in XTIDECFG
167ALIGN DISPLAY_JUMP_ALIGN
168DisplayPrint_QWordFromSSBPwithBaseInBX:
169    push    cx
170    push    bx
171
172    mov     cx, bx              ; CX = Integer base
173    xor     bx, bx              ; BX = Character count
174ALIGN DISPLAY_JUMP_ALIGN
175.DivideLoop:
176    call    Math_DivQWatSSBPbyCX; Divide by base
177    push    dx                  ; Push remainder
178    inc     bx                  ; Increment character count
179    cmp     WORD [bp], BYTE 0   ; All divided?
180    jne     SHORT .DivideLoop   ;  If not, loop
181    mov     cx, bx              ; Character count to CX
182    jmp     SHORT PrintAllPushedDigits
183%endif  ; EXCLUDE_FROM_XTIDECFG
184
185%endif  ; MODULE_STRINGS_COMPRESSED
186
187
188;--------------------------------------------------------------------
189; DisplayPrint_CharacterBufferFromBXSIwithLengthInCX
190;   Parameters:
191;       CX:     Buffer length (characters)
192;       BX:SI:  Ptr to NULL terminated string
193;       DS:     BDA segment (zero)
194;       ES:DI:  Ptr to cursor location in video RAM
195;   Returns:
196;       DI:     Updated offset to video RAM
197;   Corrupts registers:
198;       AX, DX
199;--------------------------------------------------------------------
200%ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS
201ALIGN DISPLAY_JUMP_ALIGN
202DisplayPrint_CharacterBufferFromBXSIwithLengthInCX:
203    jcxz    .NothingToPrintSinceZeroLength
204    push    si
205    push    cx
206
207ALIGN DISPLAY_JUMP_ALIGN
208.PrintNextCharacter:
209    mov     ds, bx
210    lodsb
211    LOAD_BDA_SEGMENT_TO ds, dx
212    call    DisplayPrint_CharacterFromAL
213    loop    .PrintNextCharacter
214
215    pop     cx
216    pop     si
217.NothingToPrintSinceZeroLength:
218    ret
219%endif
220
221
222%ifdef INCLUDE_MENU_LIBRARY
223;--------------------------------------------------------------------
224; DisplayPrint_ClearScreenWithCharInALandAttributeInAH
225;   Parameters:
226;       AL:     Character to clear with
227;       AH:     Attribute to clear with
228;       DS:     BDA segment (zero)
229;       ES:DI:  Ptr to cursor location in video RAM
230;   Returns:
231;       Nothing
232;   Corrupts registers:
233;       AX, DX
234;--------------------------------------------------------------------
235ALIGN DISPLAY_JUMP_ALIGN
236DisplayPrint_ClearScreenWithCharInALandAttributeInAH:
237    push    di
238    push    cx
239
240    xchg    cx, ax
241    xor     ax, ax
242    call    DisplayCursor_SetCoordinatesFromAX      ; Updates DI
243    call    DisplayPage_GetColumnsToALandRowsToAH
244    mul     ah      ; AX = AL*AH = Characters on screen
245    xchg    cx, ax  ; AX = Char+Attr, CX = WORDs to store
246    rep stosw
247
248    pop     cx
249    pop     di
250    mov     [VIDEO_BDA.displayContext+DISPLAY_CONTEXT.fpCursorPosition], di
251    ret
252%endif
253       
254;--------------------------------------------------------------------
255; DisplayPrint_ClearAreaWithHeightInAHandWidthInAL
256;   Parameters:
257;       AH:     Area height
258;       AL:     Area width
259;       DS:     BDA segment (zero)
260;       ES:DI:  Ptr to cursor location in video RAM
261;   Returns:
262;       DI:     Updated offset to video RAM
263;   Corrupts registers:
264;       AX, DX
265;--------------------------------------------------------------------
266%ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS
267ALIGN DISPLAY_JUMP_ALIGN
268DisplayPrint_ClearAreaWithHeightInAHandWidthInAL:
269    push    si
270    push    cx
271    push    bx
272
273    xchg    bx, ax                          ; Area size to BX
274    call    DisplayCursor_GetSoftwareCoordinatesToAX
275    xchg    si, ax                          ; Software (Y,X) coordinates now in SI
276    xor     cx, cx
277
278ALIGN DISPLAY_JUMP_ALIGN
279.ClearRowLoop:
280    mov     cl, bl                          ; Area width now in CX
281    mov     al, SCREEN_BACKGROUND_CHARACTER
282    call    DisplayPrint_RepeatCharacterFromALwithCountInCX
283
284    xchg    ax, si                          ; Coordinates to AX
285    inc     ah                              ; Increment row
286    mov     si, ax
287    call    DisplayCursor_SetCoordinatesFromAX
288    dec     bh                              ; Decrement rows left
289    jnz     SHORT .ClearRowLoop
290
291    pop     bx
292    pop     cx
293    pop     si
294    ret
295%endif
296
297
298;--------------------------------------------------------------------
299; DisplayPrint_RepeatCharacterFromALwithCountInCX
300;   Parameters:
301;       AL:     Character to display
302;       CX:     Repeat count
303;       DS:     BDA segment (zero)
304;       ES:DI:  Ptr to cursor location in video RAM
305;   Returns:
306;       DI:     Updated offset to video RAM
307;   Corrupts registers:
308;       DX
309;--------------------------------------------------------------------
310ALIGN DISPLAY_JUMP_ALIGN
311DisplayPrint_RepeatCharacterFromALwithCountInCX:
312    jcxz    .NothingToRepeat
313    push    cx
314
315ALIGN DISPLAY_JUMP_ALIGN
316.RepeatCharacter:
317    push    ax
318    call    DisplayPrint_CharacterFromAL
319    pop     ax
320    loop    .RepeatCharacter
321
322    pop     cx
323.NothingToRepeat:
324    ret
325
326
327;--------------------------------------------------------------------
328; DisplayPrint_NullTerminatedStringFromCSSI
329;   Parameters:
330;       CS:SI:  Ptr to NULL terminated string
331;       DS:     BDA segment (zero)
332;       ES:DI:  Ptr to cursor location in video RAM
333;   Returns:
334;       DI:     Updated offset to video RAM
335;   Corrupts registers:
336;       AX, DX
337;--------------------------------------------------------------------
338%ifndef MODULE_STRINGS_COMPRESSED
339;;;
340;;; Take care when using this routine with compressed strings (which is why it is disabled).
341;;; All strings in CSSI should go through the DisplayFormatCompressed code to be decoded.
342;;;
343ALIGN DISPLAY_JUMP_ALIGN
344DisplayPrint_NullTerminatedStringFromCSSI:
345    push    bx
346    mov     bx, cs
347    call    DisplayPrint_NullTerminatedStringFromBXSI
348    pop     bx
349    ret
350%endif
351
352
353;;;
354;;; Note that the following routines need to be at the bottom of this file
355;;; to accomodate short jumps from the next file (DisplayFormat/DisplayFormatCompressed)
356;;;
357
358;--------------------------------------------------------------------
359; DisplayPrint_Newline
360;   Parameters:
361;       DS:     BDA segment (zero)
362;       ES:DI:  Ptr to cursor location in video RAM
363;   Returns:
364;       DI:     Updated offset to video RAM
365;   Corrupts registers:
366;       AX, DX
367;--------------------------------------------------------------------
368%ifdef MODULE_STRINGS_COMPRESSED
369ALIGN DISPLAY_JUMP_ALIGN
370DisplayPrint_Newline_FormatAdjustBP:
371    inc     bp                  ; we didn't need a parameter after all, readjust BP
372    inc     bp
373    ; fall through to DisplayPrint_Newline
374%endif
375
376ALIGN DISPLAY_JUMP_ALIGN
377DisplayPrint_Newline:
378    mov     al, LF
379    call    DisplayPrint_CharacterFromAL
380    mov     al, CR
381    ; Fall to DisplayPrint_CharacterFromAL
382
383;--------------------------------------------------------------------
384; DisplayPrint_CharacterFromAL
385;   Parameters:
386;       AL:     Character to display
387;               Zero value is ignored (no characer is printed)
388;       DS:     BDA segment (zero)
389;       ES:DI:  Ptr to cursor location in video RAM
390;   Returns:
391;       DI:     Updated offset to video RAM
392;   Corrupts registers:
393;       AX, DX
394;--------------------------------------------------------------------
395ALIGN DISPLAY_JUMP_ALIGN
396DisplayPrint_CharacterFromAL:
397    test    al,al
398    jz      DisplayPrint_Ret
399
400    mov     ah, [VIDEO_BDA.displayContext+DISPLAY_CONTEXT.bAttribute]
401    jmp     [VIDEO_BDA.displayContext+DISPLAY_CONTEXT.fnCharOut]
402
403
404;--------------------------------------------------------------------
405; DisplayPrint_NullTerminatedStringFromBXSI
406;   Parameters:
407;       DS:     BDA segment (zero)
408;       BX:SI:  Ptr to NULL terminated string
409;       ES:DI:  Ptr to cursor location in video RAM
410;   Returns:
411;       DI:     Updated offset to video RAM
412;   Corrupts registers:
413;       AX, DX
414;--------------------------------------------------------------------
415ALIGN DISPLAY_JUMP_ALIGN
416DisplayPrint_NullTerminatedStringFromBXSI:
417    push    si
418    push    cx
419
420    xor     cx, cx
421ALIGN DISPLAY_JUMP_ALIGN
422.PrintNextCharacter:
423    mov     ds, bx              ; String segment to DS
424    lodsb
425    mov     ds, cx              ; BDA segment to DS
426    test    al, al              ; NULL?
427    jz      SHORT .EndOfString
428    call    DisplayPrint_CharacterFromAL
429    jmp     SHORT .PrintNextCharacter
430
431ALIGN DISPLAY_JUMP_ALIGN
432.EndOfString:
433    pop     cx
434    pop     si
435
436DisplayPrint_Ret:               ; random ret to jump to
437    ret
438
Note: See TracBrowser for help on using the repository browser.