Lines Matching refs:statbuf
993 Stat_t statbuf;
997 Zero(&statbuf, 1, Stat_t);
1035 if (PerlLIO_fstat(fd,&statbuf) < 0) {
1040 if (S_ISSOCK(statbuf.st_mode))
1044 !(statbuf.st_mode & S_IFMT)
1140 || (IoTYPE(io) == IoTYPE_WRONLY && fd >= 0 && S_ISCHR(statbuf.st_mode)) ) {
1154 *statbufp = statbuf;
1454 Stat_t statbuf;
1459 if (do_open_raw(gv, PL_oldname, oldlen, O_RDONLY, 0, &statbuf)) {
1480 filedev = statbuf.st_dev;
1481 fileino = statbuf.st_ino;
1483 PL_filemode = statbuf.st_mode;
1484 fileuid = statbuf.st_uid;
1485 filegid = statbuf.st_gid;
1511 if ((PerlLIO_stat(SvPVX_const(sv),&statbuf) >= 0
1512 && statbuf.st_dev == filedev
1513 && statbuf.st_ino == fileino)
1549 if (PerlLIO_stat(".", &statbuf) >= 0) {
1551 newSVpvn((char *)&statbuf, sizeof(statbuf)));
1561 (void)PerlLIO_fstat(PL_lastfd,&statbuf);
1567 if (fileuid != statbuf.st_uid || filegid != statbuf.st_gid) {
1582 Stat_t statbuf;
1583 if (PerlLIO_stat(PL_oldname, &statbuf) >= 0
1584 && !S_ISREG(statbuf.st_mode)) {
1637 Stat_t statbuf;
1651 && PerlLIO_stat(".", &statbuf) >= 0
1652 && ( statbuf.st_dev != orig_cwd_stat->st_dev
1653 || statbuf.st_ino != orig_cwd_stat->st_ino)) {
1664 && PerlLIO_stat(SvPVX(*temp_psv), &statbuf) < 0) {
2821 Stat_t statbuf;
2822 if (PerlLIO_lstat(s, &statbuf) < 0)
2824 else if (S_ISDIR(statbuf.st_mode)) {