Lines Matching refs:count
831 int count = 0;
847 ST(count) = ST(i);
848 count++;
852 XSRETURN(count);
1562 Perl_PerlIO_read(pTHX_ PerlIO *f, void *vbuf, Size_t count)
1564 Perl_PerlIO_or_Base(f, Read, read, -1, (aTHX_ f, vbuf, count));
1568 Perl_PerlIO_unread(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
1570 Perl_PerlIO_or_Base(f, Unread, unread, -1, (aTHX_ f, vbuf, count));
1574 Perl_PerlIO_write(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
1576 Perl_PerlIO_or_fail(f, Write, -1, (aTHX_ f, vbuf, count));
2023 PerlIOBase_unread(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
2032 done = PerlIOBuf_unread(aTHX_ f, vbuf, count);
2037 PerlIOBase_read(pTHX_ PerlIO *f, void *vbuf, Size_t count)
2046 while (count > 0) {
2050 take = ((SSize_t)count < avail) ? count : avail;
2055 count -= take;
2058 if (count > 0 && avail <= 0) {
2474 PerlIOUnix_read(pTHX_ PerlIO *f, void *vbuf, Size_t count)
2482 SSize_t len = PerlLIO_read(fd, vbuf, count);
2489 else if (len == 0 && count != 0) {
2500 PerlIOUnix_write(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
2504 SSize_t len = PerlLIO_write(fd, vbuf, count);
2961 PerlIOStdio_read(pTHX_ PerlIO *f, void *vbuf, Size_t count)
2966 if (count == 1) {
2979 got = PerlSIO_fread(vbuf, 1, count, s);
2991 PerlIOStdio_unread(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
2998 STDCHAR *buf = ((STDCHAR *) vbuf) + count;
3004 if (avail > count) {
3005 avail = count;
3009 count -= avail;
3024 STDCHAR *buf = ((STDCHAR *) vbuf) + count;
3025 while (count > 0) {
3037 count--;
3042 if (count > 0) {
3043 unread += PerlIOBase_unread(aTHX_ f, vbuf, count);
3049 PerlIOStdio_write(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
3053 got = PerlSIO_fwrite(vbuf, 1, count,
3483 SSize_t count = PerlIO_write(n, p, b->ptr - p);
3484 if (count > 0) {
3485 p += count;
3487 else if (count < 0 || PerlIO_error(n)) {
3594 PerlIOBuf_read(pTHX_ PerlIO *f, void *vbuf, Size_t count)
3600 return PerlIOBase_read(aTHX_ f, vbuf, count);
3606 PerlIOBuf_unread(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
3608 const STDCHAR *buf = (const STDCHAR *) vbuf + count;
3638 if (avail > (SSize_t) count) {
3640 * If we have space for more than count, just move count
3642 avail = count;
3654 count -= avail;
3659 if (count > 0) {
3660 unread += PerlIOBase_unread(aTHX_ f, vbuf, count);
3666 PerlIOBuf_write(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
3682 flushptr = buf + count;
3686 while (count > 0) {
3688 if ((SSize_t) count < avail)
3689 avail = count;
3695 count -= avail;
3959 PerlIOPending_read(pTHX_ PerlIO *f, void *vbuf, Size_t count)
3963 if ((SSize_t)count < avail)
3964 avail = count;
3967 if (got >= 0 && got < (SSize_t)count) {
3969 PerlIO_read(f, ((STDCHAR *) vbuf) + got, count - got);
4055 PerlIOCrlf_unread(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
4063 return PerlIOBuf_unread(aTHX_ f, vbuf, count);
4065 const STDCHAR *buf = (const STDCHAR *) vbuf + count;
4078 while (count > 0 && b->ptr > b->buf) {
4085 count--;
4095 count--;
4186 /* Defered CR at end of buffer case - we lied about count */
4203 /* Defered CR at end of buffer case - we lied about count */
4230 PerlIOCrlf_write(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
4233 return PerlIOBuf_write(aTHX_ f, vbuf, count);
4237 const STDCHAR *ebuf = buf + count;
4503 PerlIOMmap_unread(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
4509 if (b->ptr && (b->ptr - count) >= b->buf
4510 && memEQ(b->ptr - count, vbuf, count)) {
4511 b->ptr -= count;
4513 return count;
4530 return PerlIOBuf_unread(aTHX_ f, vbuf, count);
4534 PerlIOMmap_write(pTHX_ PerlIO *f, const void *vbuf, Size_t count)
4556 return PerlIOBuf_write(aTHX_ f, vbuf, count);
4747 SSize_t count = PerlIO_read(f, buf, 1);
4748 if (count == 1) {