# This Source Code Form is subject to the terms of the Mozilla Public License, v. 2.0.

# If a copy of the MPL was not distributed with this file, You can obtain one at https://mozilla.org/MPL/2.0/.

# TOOLS

#CC = clang

# TOOL FLAGS

-g \

-march=native

-Ofast \

-fPIC \

-ffreestanding \

-g \

-march=native \

-Iinclude \

# ARTEFACTS

LIB = libzap.a

# TARGETS

$(LIB): $(OBJS)

$(AR) r $@ $^

clean:

$(RM) $(OBJS)

#if !defined(zap_priv_hdr_priv)

#define zap_priv_hdr_priv

#include <zap/bs.h>

#endif

#define zap_nopos (~((zap_sz)+0u))

typedef unsigned long zap_sz;

#if defined(__cplusplus)

}

__attribute__ ((hot,nothrow,warn_unused_result)) zap_sz zap_fndchr( char const * str, char chr);

__attribute__ ((hot)) void zap_foreach( void * ptr, zap_sz sz, zap_sz num, void (* fn)(void *));

__attribute__ ((hot,nothrow)) void zap_memcat( void const * lptr, zap_sz llen,void const * rptr, zap_sz rlen, void * buf);

__attribute__ ((hot,nothrow)) void zap_memcp( void const * in, zap_sz num, void * out);

__attribute__ ((hot,nothrow,warn_unused_result)) zap_bool zap_memeq( void const * lptr, zap_sz num, void const * rptr);

__attribute__ ((hot,nothrow)) void zap_memfill( void * ptr, zap_sz num, unsigned char val);

__attribute__ ((hot)) void zap_memgen( void * ptr, zap_sz sz, zap_sz num, void (* fn)(zap_sz,void *));

__attribute__ ((hot,nothrow)) void zap_strcat( char const * lstr, char const * rstr,char * buf);

__attribute__ ((hot,nothrow)) zap_sz zap_strcp( char const * in, char * out);

__attribute__ ((hot,nothrow,warn_unused_result)) zap_bool zap_streq( char const * lstr, char const * rstr);

__attribute__ ((hot,nothrow)) zap_sz zap_strfill( char * lstr, char chr);

.globl zap_fndbyte

zap_fndbyte:

# rax: Address of the current element.

# rdi: Address of the first element.

# rsi: Address of the element after the last element.

movq $0xFFFFFFFFFFFFFFFF,%rax

ret

.globl zap_fndchr

zap_fndchr:

# rdi: Address of the first character.

# rsi: Character to be found.

# rax: Address of the current character.

movq $0xFFFFFFFFFFFFFFFF,%rax

ret

.globl zap_foreach

zap_foreach:

# rbx: Address of the current element.

# r12: Address of the element after the last input element.

# r13: Size of each input element.

popq %rbx

ret

.globl zap_memcp

zap_memcp:

# rdi: Address of the current input element.

# rsi: Number of remaining elements.

# rdx: Address of the current output element.

.done:

ret

.globl zap_memeq

zap_memeq:

/* rdi: Left pointer. */

/* rsi: Number of remaining elements. */

/* rdx: Right pointer. */

.neq:

movb $0x0,%al

ret

.globl zap_memfill

zap_memfill:

# rdi: Address of the current element.

# rsi: Address of the element after the last element.

# rdx: Byte value.

# Finish:

.done:

ret

.globl zap_strcp

zap_strcp:

# rax: Address of the current input character.

# rdi: Address of the first input character.

# rsi: Address of the current output character.

decq %rax # We do not count the null-terminator in the string length.

ret

.globl zap_streq

zap_streq:

# rdi: Address of the current left character.

# rsi: Address of the current right character.

# rax: Current left character.

movb $0x0,%al

ret

.globl zap_strfill

zap_strfill:

# rdi: Address of the first character of the string.

# rsi: Fill character.

# rax: Address of the current character.

subq %rdi,%rax

ret

.globl zap_strlen

zap_strlen:

# rax: Address of the current character.

# rdx: Current character.

subq %rdi,%rax

ret

.globl zap_utf8enc

zap_utf8enc:

# rdi: Current input codepoint.

# rsi: Current output octet.

# rax: Current codepoint.

jmp .cnt

.oct4:

# Octet #0:

.done:

ret

.globl zap_utf8enclen

zap_utf8enclen:

# rdi: Address of the current character.

# rax: Length of the string.

# rsi: Current character.

.done:

ret