Subversion Repositories Kolibri OS

Rev

Rev 6576 | Rev 6845 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6576 Rev 6798
Line 3... Line 3...
3
;; Copyright (C) KolibriOS team 2004-2016. All rights reserved. ;;
3
;; Copyright (C) KolibriOS team 2004-2016. All rights reserved. ;;
4
;;  Distributed under terms of the GNU General Public License.  ;;
4
;;  Distributed under terms of the GNU General Public License.  ;;
5
;;                                                              ;;
5
;;                                                              ;;
6
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
6
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 7... Line 7...
7
 
7
 
Line 8... Line 8...
8
$Revision: 6576 $
8
$Revision: 6798 $
9
 
9
 
10
; FAT external functions
10
; FAT external functions
11
;   in:
11
;   in:
Line 1408... Line 1408...
1408
        jz      .ret
1408
        jz      .ret
1409
        add     esi, 40
1409
        add     esi, 40
1410
        push    edi esi
1410
        push    edi esi
1411
        mov     edi, esi
1411
        mov     edi, esi
1412
        mov     esi, ebp
1412
        mov     esi, ebp
-
 
1413
        cmp     byte [ebp-4], 2
-
 
1414
        jz      .utf16
1413
        test    byte [ebp-4], 1
1415
        cmp     byte [ebp-4], 3
1414
        jz      .ansi
1416
        jz      .utf8
1415
.uni:
1417
@@:
1416
        lodsw
1418
        lodsw
-
 
1419
        call    uni2ansi_char
1417
        stosw
1420
        stosb
1418
        test    eax, eax
1421
        test    al, al
1419
        jnz     .uni
1422
        jnz     @b
1420
        pop     esi edi
1423
        pop     esi edi
1421
        add     esi, 520
1424
        add     esi, 264
1422
.ret:
1425
.ret:
1423
        ret
1426
        ret
Line 1424... Line 1427...
1424
 
1427
 
-
 
1428
.utf8:
-
 
1429
        push    ecx
-
 
1430
        mov     ecx, 519
-
 
1431
        call    UTF16to8_string
-
 
1432
        pop     ecx
-
 
1433
        jmp     @f
-
 
1434
 
1425
.ansi:
1435
.utf16:
1426
        lodsw
-
 
1427
        call    uni2ansi_char
1436
        lodsw
1428
        stosb
1437
        stosw
1429
        test    al, al
1438
        test    eax, eax
-
 
1439
        jnz     .utf16
1430
        jnz     .ansi
1440
@@:
1431
        pop     esi edi
1441
        pop     esi edi
1432
        add     esi, 264
1442
        add     esi, 520
Line 1433... Line 1443...
1433
        ret
1443
        ret
1434
 
1444
 
1435
bdfe_to_fat_entry:
1445
bdfe_to_fat_entry: