Subversion Repositories Kolibri OS

;; (C) 2004 Ville Turjanmaa, License: GPL                       ;;

;; (C) 2004 Ville Turjanmaa, License: GPL                       ;;

;; Addings by M.Lisovin                                         ;;

;; Addings by M.Lisovin                                         ;;

;; LFN support by diamond                                       ;;

;; LFN support by diamond                                       ;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$Revision: 1021 $

$Revision: 1504 $

; out: al=converted symbol

; out: al=converted symbol

	cmp	al, 'a'

	cmp	al, 'a'

	jb	.ret

	jb	.ret

	cmp	al, 'z'

	cmp	al, 'z'

	jbe	.az

	jbe	.az

	cmp	al, ' '

	cmp	al, ' '

	jb	.ret

	jb	.ret

	cmp	al, 'à'

	cmp	al, 'à'

	jb	.rus1

	jb	.rus1

	cmp	al, 'ï'

	cmp	al, 'ï'

.rus1:

.rus1:

; 0xA0-0xAF -> 0x80-0x8F

; 0xA0-0xAF -> 0x80-0x8F

.az:

.az:

	and	al, not 0x20

	and	al, not 0x20

	ret

	ret

fat_get_name:

fat_get_name:

; in: edi->FAT entry

; in: edi->FAT entry

; out: CF=1 - no valid entry

; out: CF=1 - no valid entry