DF-5700 / bcmp_fixed_instr.c
/* * Load-instrumented copy of the FIXED bcmp (fix.diff applied) — same * LDB/LDC accounting as bcmp_instr.c to show out-of-region loads == 0. */ #include <string.h> #include <machine/endian.h> typedef const unsigned char *ustring; typedef unsigned long ul; typedef const unsigned long *culp; unsigned long g_below_start[2], g_past_end[2], g_in[2], g_max_below[2], g_max_past[2]; const unsigned char *g_lo[2], *g_hi[2]; long g_last_outside_case[4]; int g_case[3]; #define NOTE(idx, p, sz) do { \ const unsigned char *_p = (const unsigned char *)(p); \ if (_p < g_lo[idx]) { \ g_below_start[idx]++; \ unsigned long d = (unsigned long)(g_lo[idx] - _p); \ if (d > g_max_below[idx]) g_max_below[idx] = d; \ } else if (_p + (sz) > g_hi[idx]) { \ g_past_end[idx]++; \ unsigned long d = (unsigned long)(_p + (sz) - g_hi[idx]); \ if (d > g_max_past[idx]) { \ g_max_past[idx] = d; \ g_last_outside_case[0]=g_case[0]; \ g_last_outside_case[1]=g_case[1]; \ g_last_outside_case[2]=g_case[2]; \ g_last_outside_case[3]=idx; \ } \ } else g_in[idx]++; \ } while (0) #define LDC(idx, e) ({ culp _q = (e); NOTE(idx, _q, sizeof(ul)); *_q; }) #define LDB(idx, e) ({ const unsigned char *_q = (e); NOTE(idx, _q, 1); *_q; }) int bcmp_fixed(const void *b1, const void *b2, size_t length) { size_t len = length; ustring p1 = b1, p2 = b2; if (len == 0) return (0); while (((long)p1 | (long)p2) & (sizeof(long) - 1)) { if (LDB(0, p1) != LDB(1, p2)) { p1++; p2++; return (1); } p1++; p2++; if (--len <= 0) return (0); } while (len >= sizeof(long)) { if (LDC(0, (culp)p1) != LDC(1, (culp)p2)) return (1); p1 += sizeof(long); p2 += sizeof(long); len -= sizeof(long); } while (len--) { if (LDB(0, p1++) != LDB(1, p2++)) return (1); } return (0); } |