Branch Coverage

FCGI.xs
Criterion Covered Total %
branch 28 178 15.7


line true false branch
52 0 0 if(!request->bound)
54 0 0 FCGX_FFlush(INT2PTR(FCGX_Stream *, SvIV((SV*) SvRV(request->svout))));
55 0 0 FCGX_FFlush(INT2PTR(FCGX_Stream *, SvIV((SV*) SvRV(request->sverr))));
80 0 2 if (!GvIOp(request->gv[1]))
82 0 2 if (!GvIOp(request->gv[2]))
84 0 2 if (!GvIOp(request->gv[0]))
107 2 4 if((p = envp[i]) == NULL)
114 4 0 SvSETMAGIC(sv);
122 0 2 if (request->requestPtr->listen_sock == FCGI_LISTENSOCK_FILENO) {
123 0 0 if (isCGI == -1)
136 0 2 if (!FCGI_IsFastCGI(request)) {
143 0 0 if (been_here)
159 0 2 if(acceptResult < 0) {
165 1 1 if (!request->svout) {
184 1 2 if(!request->accepted)
187 2 0 if (was_bound = request->bound)
189 2 0 if (was_bound)
199 0 0 FCGX_StartFilterData(request->requestPtr->in) : -1;
316 0 0 EXTEND(sp,3);
317 0 0 for (i = 0; i < 3; ++i)
330 0 0 if (request->accepted && request->bound) {
0 0 if (request->accepted && request->bound) {
340 0 0 if (request->accepted && !request->bound) {
0 0 if (request->accepted && !request->bound) {
374 8 0 for (n = 1; ok && n < items; ++n) {
4 4 for (n = 1; ok && n < items; ++n) {
376 0 4 if (DO_UTF8(ST(n)) && !sv_utf8_downgrade(ST(n), 1) && ckWARN_d(WARN_UTF8))
0 0 if (DO_UTF8(ST(n)) && !sv_utf8_downgrade(ST(n), 1) && ckWARN_d(WARN_UTF8))
0 0 if (DO_UTF8(ST(n)) && !sv_utf8_downgrade(ST(n), 1) && ckWARN_d(WARN_UTF8))
0 0 if (DO_UTF8(ST(n)) && !sv_utf8_downgrade(ST(n), 1) && ckWARN_d(WARN_UTF8))
380 4 0 str = (char *)SvPV(ST(n),len);
381 0 4 if (FCGX_PutStr(str, len, stream) < 0)
384 4 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
4 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
4 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
4 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
4 0 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
0 4 if (ok && SvTRUEx(perl_get_sv("|", FALSE)) && FCGX_FFlush(stream) < 0)
386 4 0 RETVAL = ok ? &PL_sv_yes : &PL_sv_undef;
401 0 0 offset = (items == 4) ? (int)SvIV(ST(3)) : 0;
0 0 offset = (items == 4) ? (int)SvIV(ST(3)) : 0;
403 0 0 if (DO_UTF8(bufsv) && !sv_utf8_downgrade(bufsv, 1) && ckWARN_d(WARN_UTF8))
0 0 if (DO_UTF8(bufsv) && !sv_utf8_downgrade(bufsv, 1) && ckWARN_d(WARN_UTF8))
0 0 if (DO_UTF8(bufsv) && !sv_utf8_downgrade(bufsv, 1) && ckWARN_d(WARN_UTF8))
0 0 if (DO_UTF8(bufsv) && !sv_utf8_downgrade(bufsv, 1) && ckWARN_d(WARN_UTF8))
407 0 0 buf = SvPV(bufsv, blen);
408 0 0 if (offset < 0) offset += blen;
409 0 0 if (len > blen - offset)
411 0 0 if (offset < 0 || offset >= blen ||
0 0 if (offset < 0 || offset >= blen ||
0 0 if (offset < 0 || offset >= blen ||
429 0 0 if (items < 3 || items > 4)
0 0 if (items < 3 || items > 4)
431 0 0 if (len < 0)
433 0 0 if (!SvOK(bufsv))
0 0 if (!SvOK(bufsv))
0 0 if (!SvOK(bufsv))
436 0 0 if (DO_UTF8(bufsv) && !sv_utf8_downgrade(bufsv, 1) && ckWARN_d(WARN_UTF8))
0 0 if (DO_UTF8(bufsv) && !sv_utf8_downgrade(bufsv, 1) && ckWARN_d(WARN_UTF8))
0 0 if (DO_UTF8(bufsv) && !sv_utf8_downgrade(bufsv, 1) && ckWARN_d(WARN_UTF8))
0 0 if (DO_UTF8(bufsv) && !sv_utf8_downgrade(bufsv, 1) && ckWARN_d(WARN_UTF8))
440 0 0 buf = SvPV_force(bufsv, blen);
441 0 0 if (items == 4) {
442 0 0 offset = SvIV(ST(3));
443 0 0 if (offset < 0) {
444 0 0 if (-offset > (int)blen)
449 0 0 buf = SvGROW(bufsv, len + offset + 1);
0 0 buf = SvGROW(bufsv, len + offset + 1);
450 0 0 if (offset > blen)
456 0 0 SvSETMAGIC(bufsv);
465 0 0 if ((retval = FCGX_GetChar(stream)) != -1) {
477 0 0 RETVAL = boolSV(FCGX_HasSeenEOF(stream));
485 0 0 if (FCGX_HasSeenEOF(stream) != 0)