xfstests updates - rework build to be like other xfs packages, revive some old fs...
[xfstests-dev.git] / lib / pattern.c
1 /*
2  * Copyright (c) 2000 Silicon Graphics, Inc.  All Rights Reserved.
3  * 
4  * This program is free software; you can redistribute it and/or modify it
5  * under the terms of version 2 of the GNU General Public License as
6  * published by the Free Software Foundation.
7  * 
8  * This program is distributed in the hope that it would be useful, but
9  * WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
11  * 
12  * Further, this software is distributed without any warranty that it is
13  * free of the rightful claim of any third person regarding infringement
14  * or the like.  Any license provided herein, whether implied or
15  * otherwise, applies only to this software file.  Patent licenses, if
16  * any, provided herein do not apply to combinations of this program with
17  * other software, or any other product whatsoever.
18  * 
19  * You should have received a copy of the GNU General Public License along
20  * with this program; if not, write the Free Software Foundation, Inc., 59
21  * Temple Place - Suite 330, Boston MA 02111-1307, USA.
22  * 
23  * Contact information: Silicon Graphics, Inc., 1600 Amphitheatre Pkwy,
24  * Mountain View, CA  94043, or:
25  * 
26  * http://www.sgi.com 
27  * 
28  * For further information regarding this notice, see: 
29  * 
30  * http://oss.sgi.com/projects/GenInfo/NoticeExplan/
31  */
32 #include <string.h>
33 #include "pattern.h"
34
35 /*
36  * The routines in this module are used to fill/check a data buffer
37  * with/against a known pattern.
38  */
39
40 int
41 pattern_check(buf, buflen, pat, patlen, patshift)
42 char    *buf;
43 int     buflen;
44 char    *pat;
45 int     patlen;
46 int     patshift;
47 {
48     int         nb, ncmp, nleft;
49     char        *cp;
50
51     if (patlen)
52         patshift = patshift % patlen;
53
54     cp = buf;
55     nleft = buflen;
56
57     /*
58      * The following 2 blocks of code are to compare the first patlen
59      * bytes of buf.  We need 2 checks if patshift is > 0 since we
60      * must check the last (patlen - patshift) bytes, and then the
61      * first (patshift) bytes.
62      */
63
64     nb = patlen - patshift;
65     if (nleft < nb) {
66         return (memcmp(cp, pat + patshift, nleft) ? -1 : 0);
67     } else {
68         if (memcmp(cp, pat + patshift, nb))
69             return -1;
70
71         nleft -= nb;
72         cp += nb;
73     }
74
75     if (patshift > 0) {
76         nb = patshift;
77         if (nleft < nb) {
78             return (memcmp(cp, pat, nleft) ? -1 : 0);
79         } else {
80             if (memcmp(cp, pat, nb))
81                 return -1;
82
83             nleft -= nb;
84             cp += nb;
85         }
86     }
87
88     /*
89      * Now, verify the rest of the buffer using the algorithm described
90      * in the function header.
91      */
92
93     ncmp = cp - buf;
94     while (ncmp < buflen) {
95         nb = (ncmp < nleft) ? ncmp : nleft;
96         if (memcmp(buf, cp, nb))
97             return -1;
98
99         cp += nb;
100         ncmp += nb;
101         nleft -= nb;
102     }
103
104     return 0;
105 }
106
107 int
108 pattern_fill(buf, buflen, pat, patlen, patshift)
109 char    *buf;
110 int     buflen;
111 char    *pat;
112 int     patlen;
113 int     patshift;
114 {
115     int         trans, ncopied, nleft;
116     char        *cp;
117
118     if (patlen)
119         patshift = patshift % patlen;
120
121     cp = buf;
122     nleft = buflen;
123
124     /*
125      * The following 2 blocks of code are to fill the first patlen
126      * bytes of buf.  We need 2 sections if patshift is > 0 since we
127      * must first copy the last (patlen - patshift) bytes into buf[0]...,
128      * and then the first (patshift) bytes of pattern following them.
129      */
130
131     trans = patlen - patshift;
132     if (nleft < trans) {
133         memcpy(cp, pat + patshift, nleft);
134         return 0;
135     } else {
136         memcpy(cp, pat + patshift, trans);
137         nleft -= trans;
138         cp += trans;
139     }
140
141     if (patshift > 0) {
142         trans = patshift;
143         if (nleft < trans) {
144             memcpy(cp, pat, nleft);
145             return 0;
146         } else {
147             memcpy(cp, pat, trans);
148             nleft -= trans;
149             cp += trans;
150         }
151     }
152
153     /*
154      * Now, fill the rest of the buffer using the algorithm described
155      * in the function header comment.
156      */
157
158     ncopied = cp - buf;
159     while (ncopied < buflen) {
160         trans = (ncopied < nleft) ? ncopied : nleft;
161         memcpy(cp, buf, trans);
162         cp += trans;
163         ncopied += trans;
164         nleft -= trans;
165     }
166
167     return(0);
168 }