Lines Matching refs:f

16 PerlIOScalar_pushed(pTHX_ PerlIO * f, const char *mode, SV * arg,  in PerlIOScalar_pushed()  argument
20 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_pushed()
41 code = PerlIOBase_pushed(aTHX_ f, mode, Nullsv, tab); in PerlIOScalar_pushed()
42 if (!SvOK(s->var) || (PerlIOBase(f)->flags) & PERLIO_F_TRUNCATE) in PerlIOScalar_pushed()
44 if ((PerlIOBase(f)->flags) & PERLIO_F_APPEND) in PerlIOScalar_pushed()
52 PerlIOScalar_popped(pTHX_ PerlIO * f) in PerlIOScalar_popped() argument
54 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_popped()
63 PerlIOScalar_close(pTHX_ PerlIO * f) in PerlIOScalar_close() argument
65 IV code = PerlIOBase_close(aTHX_ f); in PerlIOScalar_close()
66 PerlIOBase(f)->flags &= ~(PERLIO_F_RDBUF | PERLIO_F_WRBUF); in PerlIOScalar_close()
71 PerlIOScalar_fileno(pTHX_ PerlIO * f) in PerlIOScalar_fileno() argument
77 PerlIOScalar_seek(pTHX_ PerlIO * f, Off_t offset, int whence) in PerlIOScalar_seek() argument
79 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_seek()
98 PerlIOScalar_tell(pTHX_ PerlIO * f) in PerlIOScalar_tell() argument
100 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_tell()
105 PerlIOScalar_unread(pTHX_ PerlIO * f, const void *vbuf, Size_t count) in PerlIOScalar_unread() argument
107 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_unread()
116 PerlIOScalar_write(pTHX_ PerlIO * f, const void *vbuf, Size_t count) in PerlIOScalar_write() argument
118 if (PerlIOBase(f)->flags & PERLIO_F_CANWRITE) { in PerlIOScalar_write()
120 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_write()
123 if ((PerlIOBase(f)->flags) & PERLIO_F_APPEND) { in PerlIOScalar_write()
147 PerlIOScalar_fill(pTHX_ PerlIO * f) in PerlIOScalar_fill() argument
153 PerlIOScalar_flush(pTHX_ PerlIO * f) in PerlIOScalar_flush() argument
159 PerlIOScalar_get_base(pTHX_ PerlIO * f) in PerlIOScalar_get_base() argument
161 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_get_base()
162 if (PerlIOBase(f)->flags & PERLIO_F_CANREAD) { in PerlIOScalar_get_base()
169 PerlIOScalar_get_ptr(pTHX_ PerlIO * f) in PerlIOScalar_get_ptr() argument
171 if (PerlIOBase(f)->flags & PERLIO_F_CANREAD) { in PerlIOScalar_get_ptr()
172 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_get_ptr()
173 return PerlIOScalar_get_base(aTHX_ f) + s->posn; in PerlIOScalar_get_ptr()
179 PerlIOScalar_get_cnt(pTHX_ PerlIO * f) in PerlIOScalar_get_cnt() argument
181 if (PerlIOBase(f)->flags & PERLIO_F_CANREAD) { in PerlIOScalar_get_cnt()
182 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_get_cnt()
192 PerlIOScalar_bufsiz(pTHX_ PerlIO * f) in PerlIOScalar_bufsiz() argument
194 if (PerlIOBase(f)->flags & PERLIO_F_CANREAD) { in PerlIOScalar_bufsiz()
195 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_bufsiz()
202 PerlIOScalar_set_ptrcnt(pTHX_ PerlIO * f, STDCHAR * ptr, SSize_t cnt) in PerlIOScalar_set_ptrcnt() argument
204 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_set_ptrcnt()
211 PerlIO * f, int narg, SV ** args) in PerlIOScalar_open() argument
215 if (!f) { in PerlIOScalar_open()
216 f = PerlIO_allocate(aTHX); in PerlIOScalar_open()
218 if ( (f = PerlIO_push(aTHX_ f, self, mode, arg)) ) { in PerlIOScalar_open()
219 PerlIOBase(f)->flags |= PERLIO_F_OPEN; in PerlIOScalar_open()
221 return f; in PerlIOScalar_open()
227 PerlIOScalar_arg(pTHX_ PerlIO * f, CLONE_PARAMS * param, int flags) in PerlIOScalar_arg() argument
229 PerlIOScalar *s = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_arg()
244 PerlIOScalar_dup(pTHX_ PerlIO * f, PerlIO * o, CLONE_PARAMS * param, in PerlIOScalar_dup() argument
247 if ((f = PerlIOBase_dup(aTHX_ f, o, param, flags))) { in PerlIOScalar_dup()
248 PerlIOScalar *fs = PerlIOSelf(f, PerlIOScalar); in PerlIOScalar_dup()
253 return f; in PerlIOScalar_dup()