Subversion Repositories Kolibri OS

Rev

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

Rev 6503 Rev 6534
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: 6503 $
8
$Revision: 6534 $
9
 
9
 
10
ERROR_SUCCESS        = 0
10
ERROR_SUCCESS        = 0
11
ERROR_DISK_BASE      = 1
11
ERROR_DISK_BASE      = 1
Line 442... Line 442...
442
        call    UTF16to8_string
442
        call    UTF16to8_string
443
        jmp     @b
443
        jmp     @b
Line 444... Line 444...
444
 
444
 
445
.get:       ; in: ecx -> buffer, edx = length
445
.get:       ; in: ecx -> buffer, edx = length
-
 
446
        mov     esi, edi
446
        mov     esi, edi
447
        inc     esi
447
        mov     edi, ecx
448
        mov     edi, ecx
448
        cmp     edx, maxPathLength
449
        cmp     edx, maxPathLength
449
        jc      @f
450
        jc      @f
450
        mov     edx, maxPathLength
451
        mov     edx, maxPathLength
451
@@:
-
 
452
        mov     al, '/'
-
 
453
        stosb
452
@@:
454
        mov     ecx, edx
-
 
455
        dec     ecx
453
        mov     ecx, edx
456
@@:
454
@@:
457
        dec     ecx
455
        dec     ecx
458
        js      @f
456
        js      @f
459
        call    utf8to16
457
        call    utf8to16
Line 467... Line 465...
467
        mov     [esp+32], ecx
465
        mov     [esp+32], ecx
468
        ret
466
        ret
Line 469... Line 467...
469
 
467
 
470
.get16:
468
.get16:
-
 
469
        mov     esi, edi
471
        mov     esi, edi
470
        inc     esi
472
        mov     edi, ecx
471
        mov     edi, ecx
473
        cmp     edx, maxPathLength
472
        cmp     edx, maxPathLength
474
        jc      @f
473
        jc      @f
475
        mov     edx, maxPathLength
474
        mov     edx, maxPathLength
476
@@:
475
@@:
477
        shr     edx, 1
-
 
478
        mov     ax, '/'
-
 
479
        stosw
476
        shr     edx, 1
480
        mov     ecx, edx
-
 
481
        dec     ecx
477
        mov     ecx, edx
482
@@:
478
@@:
483
        dec     ecx
479
        dec     ecx
484
        js      @f
480
        js      @f
485
        call    utf8to16
481
        call    utf8to16