mirror of
https://github.com/reactos/reactos.git
synced 2025-06-24 20:10:21 +00:00
88 lines
2.2 KiB
ArmAsm
88 lines
2.2 KiB
ArmAsm
#include <asm.inc>
|
|
#if 0
|
|
page ,132
|
|
title strset - set all characters of string to character
|
|
;***
|
|
;strset.asm - sets all charcaters of string to given character
|
|
;
|
|
; Copyright (c) Microsoft Corporation. All rights reserved.
|
|
;
|
|
;Purpose:
|
|
; defines _strset() - sets all of the characters in a string (except
|
|
; the '\0') equal to a given character.
|
|
;
|
|
;*******************************************************************************
|
|
|
|
.xlist
|
|
include cruntime.inc
|
|
.list
|
|
|
|
page
|
|
;***
|
|
;char *_strset(string, val) - sets all of string to val
|
|
;
|
|
;Purpose:
|
|
; Sets all of characters in string (except the terminating '/0'
|
|
; character) equal to val.
|
|
;
|
|
; Algorithm:
|
|
; char *
|
|
; _strset (string, val)
|
|
; char *string;
|
|
; char val;
|
|
; {
|
|
; char *start = string;
|
|
;
|
|
; while (*string)
|
|
; *string++ = val;
|
|
; return(start);
|
|
; }
|
|
;
|
|
;Entry:
|
|
; char *string - string to modify
|
|
; char val - value to fill string with
|
|
;
|
|
;Exit:
|
|
; returns string -- now filled with val's
|
|
;
|
|
;Uses:
|
|
;
|
|
;Exceptions:
|
|
;
|
|
;*******************************************************************************
|
|
#endif
|
|
|
|
.code
|
|
|
|
public __strset
|
|
.PROC __strset
|
|
// Prolog. Original sources used ML's extended PROC feature to autogenerate this.
|
|
push ebp
|
|
mov ebp, esp
|
|
push edi // uses edi
|
|
#define string ebp + 8 // string:ptr byte
|
|
#define val ebp + 12 // val:byte
|
|
|
|
|
|
mov edi,[string] // di = string
|
|
mov edx,edi // dx=string addr; save return value
|
|
|
|
xor eax,eax // ax = 0
|
|
or ecx,-1 // cx = -1
|
|
repne scasb // scan string & count bytes
|
|
add ecx,2 // cx=-strlen
|
|
neg ecx // cx=strlen
|
|
mov al,[val] // al = byte value to store
|
|
mov edi,edx // di=string addr
|
|
rep stosb
|
|
|
|
mov eax,edx // return value: string addr
|
|
|
|
// Epilog. Original sources used ML's extended PROC feature to autogenerate this.
|
|
pop edi
|
|
pop ebp
|
|
|
|
ret // _cdecl return
|
|
|
|
.ENDP // __strset
|
|
end
|