double
VRND_RandomTestableDouble(void)
{
return (
ldexp((double)VRND_RandomTestable(), -31) +
ldexp((double)VRND_RandomTestable(), -62)
);
}
vfp_esi_pull(struct vfp_ctx *vc, struct vfp_entry *vfe, void *p, ssize_t *lp)
{
enum vfp_status vp;
ssize_t d;
struct vef_priv *vef;
CHECK_OBJ_NOTNULL(vc, VFP_CTX_MAGIC);
CHECK_OBJ_NOTNULL(vfe, VFP_ENTRY_MAGIC);
CAST_OBJ_NOTNULL(vef, vfe->priv1, VEF_MAGIC);
AN(p);
AN(lp);
if (DO_DEBUG(DBG_ESI_CHOP)) {
d = (VRND_RandomTestable() & 3) + 1;
if (d < *lp)
*lp = d;
}
vp = VFP_Suck(vc, p, lp);
if (vp != VFP_ERROR && *lp > 0)
VEP_Parse(vef->vep, p, *lp);
if (vp == VFP_END) {
vp = vfp_esi_end(vc, vef, vp);
vfe->priv1 = NULL;
}
return (vp);
}
void
VRND_SeedTestable(unsigned int x)
{
int i, lim;
state[0] = (uint32_t)x;
for (i = 1; i < rand_deg; i++)
state[i] = good_rand(state[i - 1]);
fptr = &state[rand_sep];
rptr = &state[0];
lim = 10 * rand_deg;
for (i = 0; i < lim; i++)
(void)VRND_RandomTestable();
}
vfp_esi_gzip_pull(struct vfp_ctx *vc, struct vfp_entry *vfe, void *p,
ssize_t *lp)
{
enum vfp_status vp;
ssize_t d, l;
struct vef_priv *vef;
CHECK_OBJ_NOTNULL(vc, VFP_CTX_MAGIC);
CHECK_OBJ_NOTNULL(vfe, VFP_ENTRY_MAGIC);
CAST_OBJ_NOTNULL(vef, vfe->priv1, VEF_MAGIC);
AN(p);
AN(lp);
*lp = 0;
l = vef->ibuf_sz - (vef->ibuf_i - vef->ibuf);
if (DO_DEBUG(DBG_ESI_CHOP)) {
d = (VRND_RandomTestable() & 3) + 1;
if (d < l)
l = d;
}
vp = VFP_Suck(vc, vef->ibuf_i, &l);
if (l > 0) {
VEP_Parse(vef->vep, vef->ibuf_i, l);
vef->ibuf_i += l;
assert(vef->ibuf_o >= vef->ibuf && vef->ibuf_o <= vef->ibuf_i);
if (vef->error) {
errno = vef->error;
return (VFP_ERROR);
}
l = vef->ibuf_i - vef->ibuf_o;
if (l > 0)
memmove(vef->ibuf, vef->ibuf_o, l);
vef->ibuf_o = vef->ibuf;
vef->ibuf_i = vef->ibuf + l;
}
if (vp == VFP_END) {
vp = vfp_esi_end(vc, vef, vp);
vfe->priv1 = NULL;
}
return (vp);
}
