Lines Matching refs:tmpbuf
3410 char tmpbuf[MAXPATHLEN];
3458 tmpbuf[0] = '\0';
3478 (!hasdir && my_trnlnm("DCL$PATH",tmpbuf,idx++)) )
3483 *tmpbuf = '\0';
3485 if ((strlen(tmpbuf) + strlen(scriptname)
3486 + MAX_EXT_LEN) >= sizeof tmpbuf)
3488 my_strlcat(tmpbuf, scriptname, sizeof(tmpbuf));
3521 if (len+MAX_EXT_LEN+1 >= sizeof(tmpbuf))
3523 my_strlcpy(tmpbuf, scriptname, sizeof(tmpbuf));
3524 cur = tmpbuf;
3527 && my_strlcpy(tmpbuf+len, ext[extidx++], sizeof(tmpbuf) - len));
3546 if (len < sizeof tmpbuf)
3547 tmpbuf[len] = *s;
3549 if (len < sizeof tmpbuf)
3550 tmpbuf[len] = '\0';
3552 s = delimcpy_no_escape(tmpbuf, tmpbuf + sizeof tmpbuf, s, bufend,
3557 if (len + 1 + strlen(scriptname) + MAX_EXT_LEN >= sizeof tmpbuf)
3561 && tmpbuf[len - 1] != '/'
3562 && tmpbuf[len - 1] != '\\'
3565 tmpbuf[len++] = '/';
3566 if (len == 2 && tmpbuf[0] == '.')
3568 (void)my_strlcpy(tmpbuf + len, scriptname, sizeof(tmpbuf) - len);
3572 len = strlen(tmpbuf);
3577 DEBUG_p(PerlIO_printf(Perl_debug_log, "Looking for %s\n",tmpbuf));
3578 retval = PerlLIO_stat(tmpbuf,&statbuf);
3585 && my_strlcpy(tmpbuf+len, ext[extidx++], sizeof(tmpbuf) - len)
3597 xfound = tmpbuf; /* bingo! */
3601 xfailed = savepv(tmpbuf);