1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
|
// TITLE("memcmp")
//++
//
// Copyright (c) 1994 IBM Corporation
//
// Module Name:
//
// memcmp.s
//
// Routine Description:
//
// This function lexically determines two blocks of memory and
// returns an integer indicating order.
//
// Author:
//
// Jeff Simon (jhs) 02-Aug-1994
//
// Environment:
//
// User or Kernel mode.
//
// Revision History:
//
// Includes
#include <kxppc.h>
//
// int memcmp (
// void * src1,
// void * src2,
// int
// )
//
// Arguments:
//
// SRC1 (r.3) - A pointer to the first block of memory
//
// SRC2 (r.4) - A pointer to the second block of memory
//
// LNGTH (r.5) - Max number of comparison in bytes
//
// Return Value:
//
// < 0 if SRC1 < SRC2
// = 0 if SRC1 = SRC2 for LNGTH bytes, or if LNGTH == 0
// > 0 if SRC1 > SRC2
//
//
LEAF_ENTRY(memcmp)
cmpwi r.5,0 // we'll do the first iteration
mtctr r.5 // by hand, iff length > 0
beq zip // branch if nothing to check
lbz r.6,0(r.4) // read first byte
lbz r.5,0(r.3) // of both strings
b comp
next: lbzu r.6,1(r.4) // get next byte (src2)
lbzu r.5,1(r.3) // get next byte (src1)
comp: cmpw r.5,r.6 // bytes equal?
bdnzt eq,next // branch equal AND length not exhausted
subf r.3,r.6,r.5 // r7 ?= r8
blr
zip: li r.3,0 // return null when length == 0
LEAF_EXIT(memcmp)
|
