1
0
mirror of https://gitlab.os-k.eu/os-k-team/kvisc.git synced 2023-08-25 14:05:46 +02:00
kvisc/dos/str/strcpy.k
julianb0 ea6ec1f01e
dos
2019-05-30 21:46:00 +02:00

59 lines
717 B
Plaintext

; The OS/K Team licenses this file to you under the MIT license.
; See the LICENSE file in the project root for more information.
;
; void strcpy(char *, const char *)
;
strcpy:
mov b[ax0], b[ax1]
test b[ax1], b[ax1]
cretz
inc ax0
inc ax1
jmp strcpy
;
; void strncpy(char *, const char *, int)
;
strncpy:
mov rcx, ax2
jcxz .2
dec rcx
.1:
mov b[ax0], b[ax1]
test b[ax1], b[ax1]
cretz
inc ax0
inc ax1
loop .1
.2:
ret
;
; void strnzcpy(char *, const char *, int)
;
strnzcpy:
mov rcx, ax2
jcxz .2
dec rcx
.1:
mov b[ax0], b[ax1]
test b[ax1], b[ax1]
cretz
inc ax0
inc ax1
loop .1
.2:
mov b[ax0], 0
ret