Lines Matching refs:tmpbuf
2609 char tmpbuf[MAXPATHLEN];
2653 tmpbuf[0] = '\0';
2673 (!hasdir && my_trnlnm("DCL$PATH",tmpbuf,idx++)) )
2677 *tmpbuf = '\0';
2679 if ((strlen(tmpbuf) + strlen(scriptname)
2680 + MAX_EXT_LEN) >= sizeof tmpbuf)
2682 strcat(tmpbuf, scriptname);
2712 if (len+MAX_EXT_LEN+1 >= sizeof(tmpbuf))
2714 cur = strcpy(tmpbuf, scriptname);
2717 && strcpy(tmpbuf+len, ext[extidx++]));
2738 s = delimcpy(tmpbuf, tmpbuf + sizeof tmpbuf, s, PL_bufend,
2748 if (len < sizeof tmpbuf)
2749 tmpbuf[len] = *s;
2751 if (len < sizeof tmpbuf)
2752 tmpbuf[len] = '\0';
2754 s = delimcpy(tmpbuf, tmpbuf + sizeof tmpbuf, s, PL_bufend,
2761 if (len + 1 + strlen(scriptname) + MAX_EXT_LEN >= sizeof tmpbuf)
2764 if (len && tmpbuf[len - 1] != ':')
2765 tmpbuf[len++] = ':';
2769 && tmpbuf[len - 1] != '/'
2770 && tmpbuf[len - 1] != '\\'
2773 tmpbuf[len++] = '/';
2774 if (len == 2 && tmpbuf[0] == '.')
2777 (void)strcpy(tmpbuf + len, scriptname);
2781 len = strlen(tmpbuf);
2786 DEBUG_p(PerlIO_printf(Perl_debug_log, "Looking for %s\n",tmpbuf));
2787 retval = PerlLIO_stat(tmpbuf,&PL_statbuf);
2794 && strcpy(tmpbuf+len, ext[extidx++])
2806 xfound = tmpbuf; /* bingo! */
2810 xfailed = savepv(tmpbuf);
3733 ** tmpbuf overflows. Basically we want to allocate a buffer