Home
last modified time | relevance | path

Searched refs:PerlIO (Results 1 – 25 of 213) sorted by relevance

123456789

/openbsd/src/gnu/usr.bin/perl/
Dperliol.h21 IV (*Pushed) (pTHX_ PerlIO *f, const char *mode, SV *arg, PerlIO_funcs *tab);
22 IV (*Popped) (pTHX_ PerlIO *f);
23 PerlIO *(*Open) (pTHX_ PerlIO_funcs *tab,
27 PerlIO *old, int narg, SV **args);
28 IV (*Binmode)(pTHX_ PerlIO *f);
29 SV *(*Getarg) (pTHX_ PerlIO *f, CLONE_PARAMS *param, int flags);
30 IV (*Fileno) (pTHX_ PerlIO *f);
31 PerlIO *(*Dup) (pTHX_ PerlIO *f, PerlIO *o, CLONE_PARAMS *param, int flags);
33 SSize_t(*Read) (pTHX_ PerlIO *f, void *vbuf, Size_t count);
34 SSize_t(*Unread) (pTHX_ PerlIO *f, const void *vbuf, Size_t count);
[all …]
Dperlio.h56 #ifndef PerlIO
62 typedef PerlIOl *PerlIO; typedef
63 #define PerlIO PerlIO macro
84 PERL_CALLCONV PerlIO *PerlIO_push(pTHX_ PerlIO *f, PERLIO_FUNCS_DECL(*tab),
86 PERL_CALLCONV void PerlIO_pop(pTHX_ PerlIO *f);
87 PERL_CALLCONV AV* PerlIO_get_layers(pTHX_ PerlIO *f);
189 PERL_CALLCONV int PerlIO_puts(PerlIO *, const char *);
192 PERL_CALLCONV PerlIO *PerlIO_open(const char *, const char *);
195 PERL_CALLCONV PerlIO *PerlIO_openn(pTHX_ const char *layers, const char *mode,
196 int fd, int imode, int perm, PerlIO *old,
[all …]
Dperlio.c205 PerlIO_apply_layers(pTHX_ PerlIO *f, const char *mode, const char *names) in PerlIO_apply_layers()
227 PerlIO_binmode(pTHX_ PerlIO *fp, int iotype, int mode, const char *names) in PerlIO_binmode()
232 PerlIO *
233 PerlIO_fdupopen(pTHX_ PerlIO *f, CLONE_PARAMS *param, int flags) in PerlIO_fdupopen()
265 PerlIO *
267 int imode, int perm, PerlIO *old, int narg, SV **args) in PerlIO_openn()
407 PerlIO_verify_head(pTHX_ PerlIO *f) in PerlIO_verify_head()
446 PerlIO *
478 PerlIO *
479 PerlIO_fdupopen(pTHX_ PerlIO *f, CLONE_PARAMS *param, int flags) in PerlIO_fdupopen()
[all …]
/openbsd/src/gnu/usr.bin/perl/t/io/
Dlayers.t40 sub PerlIO::F_UTF8 () { 0x00008000 } # from perliol.h
110 check([ PerlIO::get_layers(STDIN) ],
117 check([ PerlIO::get_layers(F) ],
123 check([ PerlIO::get_layers(F) ],
129 check([ PerlIO::get_layers(F) ],
135 check([ PerlIO::get_layers(F) ],
141 check([ PerlIO::get_layers(F) ],
147 check([ PerlIO::get_layers(F) ],
153 check([ PerlIO::get_layers(F) ],
159 check([ PerlIO::get_layers(F) ],
[all …]
Dbinmode.t17 unless find PerlIO::Layer 'perlio';
27 unless find PerlIO::Layer 'perlio';
/openbsd/src/gnu/usr.bin/perl/pod/
Dperlapio.pod10 PerlIO *PerlIO_stdin(void);
11 PerlIO *PerlIO_stdout(void);
12 PerlIO *PerlIO_stderr(void);
14 PerlIO *PerlIO_open(const char *path,const char *mode);
15 PerlIO *PerlIO_fdopen(int fd, const char *mode);
16 PerlIO *PerlIO_reopen(const char *path, /* deprecated */
17 const char *mode, PerlIO *old);
18 int PerlIO_close(PerlIO *f);
21 int PerlIO_puts(PerlIO *f,const char *string);
22 int PerlIO_putc(PerlIO *f,int ch);
[all …]
Dperliol.pod12 This document describes the behavior and implementation of the PerlIO
17 The PerlIO abstraction was introduced in perl5.003_02 but languished as
22 The aim of the implementation is to provide the PerlIO API in a flexible
28 PerlIO is a stack of layers.
47 operating system: that's where PerlIO buffering comes into play.
49 When you do an open() and specify extra PerlIO layers to be deployed,
56 configuration, and Perl runtime configuration. See L<PerlIO>,
64 limited to the "top": PerlIO layers can be very 'active' and inspect
73 directly at the level of file descriptors: in the terms of PerlIO
95 typedef PerlIOl *PerlIO;
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/autodie/t/
Dutf8_open.t33 my @layers = PerlIO::get_layers($fh);
44 my @layers = PerlIO::get_layers($fh);
54 my @layers = PerlIO::get_layers($fh);
64 my @layers = PerlIO::get_layers($fh);
72 my @layers = PerlIO::get_layers($fh);
80 my @layers = PerlIO::get_layers($fh);
92 my @layers = PerlIO::get_layers($fh);
109 my @layers = PerlIO::get_layers($fh);
120 my @layers = PerlIO::get_layers($fh);
130 my @layers = PerlIO::get_layers($fh);
/openbsd/src/gnu/usr.bin/perl/ext/PerlIO-via/
Dvia.xs69 PerlIOVia_method(pTHX_ PerlIO * f, const char *method, CV ** save, int flags, in PerlIOVia_method()
132 PerlIOVia_pushed(pTHX_ PerlIO * f, const char *mode, SV * arg, in PerlIOVia_pushed()
220 static PerlIO *
223 PerlIO * f, int narg, SV ** args) in PerlIOVia_open()
316 PerlIOVia_popped(pTHX_ PerlIO * f) in PerlIOVia_popped()
342 PerlIOVia_close(pTHX_ PerlIO * f) in PerlIOVia_close()
355 PerlIOVia_fileno(pTHX_ PerlIO * f) in PerlIOVia_fileno()
364 PerlIOVia_binmode(pTHX_ PerlIO * f) in PerlIOVia_binmode()
377 PerlIOVia_seek(pTHX_ PerlIO * f, Off_t offset, int whence) in PerlIOVia_seek()
397 PerlIOVia_tell(pTHX_ PerlIO * f) in PerlIOVia_tell()
[all …]
/openbsd/src/gnu/usr.bin/perl/t/lib/warnings/
Dperlio11 Invalid separator character %c%c%c in PerlIO layer specification %s
16 Argument list not closed for PerlIO layer \"%.*s\""
20 Unknown PerlIO layer \"%.*s\"
22 # PerlIO/xyz.pm has 1;
34 Invalid separator character '-' in PerlIO layer specification -aa at - line 6.
44 Argument list not closed for PerlIO layer "aa(" at - line 6.
58 Unknown PerlIO layer "xyz" at - line 5.
/openbsd/src/gnu/usr.bin/perl/cpan/Encode/lib/Encode/
DPerlIO.pod3 Encode::PerlIO -- a detailed document on Encode and PerlIO
10 C<Encode> provides a "layer" (see L<PerlIO>) which can transform
49 You can also use PerlIO to convert larger amounts of data you don't
71 Here is a crude diagram of how filehandle, PerlIO, and Encode
74 filehandle <-> PerlIO PerlIO <-> scalar (read/printed)
78 When PerlIO receives data from either direction, it fills a buffer
80 Encode tries to convert the valid part and passes it back to PerlIO,
82 PerlIO then appends more data to the buffer, calls Encode again,
85 To do so, PerlIO always calls (de|en)code methods with CHECK set to 1.
88 PerlIO and Encode tries to encode (from utf8) more than 1024 bytes
[all …]
/openbsd/src/gnu/usr.bin/perl/ext/PerlIO-mmap/
Dmmap.xs27 PerlIOMmap_map(pTHX_ PerlIO *f) in PerlIOMmap_map()
91 PerlIOMmap_unmap(pTHX_ PerlIO *f) in PerlIOMmap_unmap()
119 PerlIOMmap_get_base(pTHX_ PerlIO *f) in PerlIOMmap_get_base()
152 PerlIOMmap_unread(pTHX_ PerlIO *f, const void *vbuf, Size_t count) in PerlIOMmap_unread()
183 PerlIOMmap_write(pTHX_ PerlIO *f, const void *vbuf, Size_t count) in PerlIOMmap_write()
210 PerlIOMmap_flush(pTHX_ PerlIO *f) in PerlIOMmap_flush()
238 PerlIOMmap_fill(pTHX_ PerlIO *f) in PerlIOMmap_fill()
251 static PerlIO *
252 PerlIOMmap_dup(pTHX_ PerlIO *f, PerlIO *o, CLONE_PARAMS *param, int flags) in PerlIOMmap_dup()
291 MODULE = PerlIO::mmap PACKAGE = PerlIO::mmap
/openbsd/src/gnu/usr.bin/perl/cpan/Term-ReadKey/
DReadKey.xs9 #define InputStream PerlIO *
382 STATIC int GetTermSizeVIO _((pTHX_ PerlIO * file,
386 STATIC int GetTermSizeGWINSZ _((pTHX_ PerlIO * file,
390 STATIC int GetTermSizeGSIZE _((pTHX_ PerlIO * file,
394 STATIC int GetTermSizeWin32 _((pTHX_ PerlIO * file,
398 STATIC int SetTerminalSize _((pTHX_ PerlIO * file,
402 STATIC void ReadMode _((pTHX_ PerlIO * file,int mode));
404 STATIC int pollfile _((pTHX_ PerlIO * file, double delay));
406 STATIC int setnodelay _((pTHX_ PerlIO * file, int mode));
408 STATIC int selectfile _((pTHX_ PerlIO * file, double delay));
[all …]
/openbsd/src/gnu/usr.bin/perl/ext/PerlIO-via/t/
Dvia.t77 sub PerlIO::via::Bar::PUSHED { $obj = shift; -1; } subroutine
104 package PerlIO::via::XXX;
117 package PerlIO::via::YYY;
150 like($warn, qr/Invalid return from PerlIO::via::BadRead::READ = -1, expected undef or 0 to 10/,
156 like($warn, qr/Invalid return from PerlIO::via::BadRead::READ = 11, expected undef or 0 to 10/,
163 …like($warn, qr/Invalid return from PerlIO::via::BadRead::READ = 10, beyond end of the returned buf…
166 package PerlIO::via::BadRead;
/openbsd/src/regress/usr.sbin/ospfd/
DPassFd.xs28 sendfd(PerlIO *so, PerlIO *fh)
57 PerlIO *
58 recvfd(PerlIO *so)
60 PerlIO *fh = NULL;
/openbsd/src/gnu/usr.bin/perl/lib/
Dopen.t23 like( $@, qr/needs explicit list of PerlIO layers/,
40 like( $warn, qr/Unknown PerlIO layer/,
56 like( $@, qr/Unknown PerlIO layer class/, 'should croak with unknown class' );
65 skip("no perlio", 1) unless (find PerlIO::Layer 'perlio');
/openbsd/src/gnu/usr.bin/perl/dist/IO/
DIO.xs31 #ifdef PerlIO
40 typedef PerlIO * InputStream;
41 typedef PerlIO * OutputStream;
67 #ifndef PerlIO
154 #ifdef PerlIO
194 #ifdef PerlIO
236 #ifdef PerlIO
312 #ifdef PerlIO
357 #ifdef PerlIO
378 #ifdef PerlIO
[all …]
/openbsd/src/gnu/usr.bin/perl/ext/PerlIO-encoding/
Dencoding.xs61 PerlIOEncode_getarg(pTHX_ PerlIO * f, CLONE_PARAMS * param, int flags) in PerlIOEncode_getarg()
97 PerlIOEncode_pushed(pTHX_ PerlIO * f, const char *mode, SV * arg, PerlIO_funcs *tab) in PerlIOEncode_pushed()
185 PerlIOEncode_popped(pTHX_ PerlIO * f) in PerlIOEncode_popped()
208 PerlIOEncode_get_base(pTHX_ PerlIO * f) in PerlIOEncode_get_base()
245 PerlIOEncode_fill(pTHX_ PerlIO * f) in PerlIOEncode_fill()
250 PerlIO *n; in PerlIOEncode_fill()
404 PerlIOEncode_flush(pTHX_ PerlIO * f) in PerlIOEncode_flush()
520 PerlIOEncode_close(pTHX_ PerlIO * f) in PerlIOEncode_close()
549 PerlIOEncode_tell(pTHX_ PerlIO * f) in PerlIOEncode_tell()
562 static PerlIO *
[all …]
/openbsd/src/gnu/usr.bin/perl/ext/PerlIO-encoding/t/
Dfallback.t4 unless (find PerlIO::Layer 'perlio') {
29 $PerlIO::encoding::fallback = Encode::PERLQQ;
42 $PerlIO::encoding::fallback = Encode::HTMLCREF;
72 $PerlIO::encoding::fallback = Encode::WARN_ON_ERR;
/openbsd/src/gnu/usr.bin/perl/cpan/Encode/t/
DCJKT.t11 # should work w/o PerlIO now!
12 # unless (PerlIO::Layer->find('perlio')){
13 # print "1..0 # Skip: PerlIO required\n";
53 if (PerlIO::Layer->find('perlio')){
65 if (PerlIO::Layer->find('perlio')){
80 if (PerlIO::Layer->find('perlio')){
Dutf32warnings.t196 use PerlIO::encoding;
197 $PerlIO::encoding::fallback |= Encode::ONLY_PRAGMA_WARNINGS;
206 is($warn, undef, "Calling PerlIO :encoding on valid string produces no warnings");
207 is($str, "a", "PerlIO decodes string correctly");
219 …like($warn, qr/may not be portable.* at $script line /, "Calling PerlIO :encoding on invalid strin…
230 is($warn, undef, "Warning from PerlIO :encoding can be silenced via no warnings 'utf8'");
241 is($warn, undef, "Warning from PerlIO :encoding can be silenced via no warnings");
251 is($warn, undef, "Calling PerlIO :encoding on valid string produces no warnings");
252 is($str, $valid, "PerlIO encodes string correctly");
262 …like($warn, qr/UTF-16 surrogate.* at $script line /, "Calling PerlIO :encoding on invalid string w…
[all …]
Drt65541.t22 use PerlIO::encoding;
23 $PerlIO::encoding::fallback &= ~Encode::WARN_ON_ERR;
/openbsd/src/gnu/usr.bin/perl/cpan/PerlIO-via-QuotedPrint/t/
DQuotedPrint.t7 unless (find PerlIO::Layer 'perlio') {
8 print "1..0 # Skip: PerlIO not used\n";
19 BEGIN { use_ok('PerlIO::via::QuotedPrint') }
37 open( my $out,'>:via(PerlIO::via::QuotedPrint)', $file ),
/openbsd/src/gnu/usr.bin/perl/ext/VMS-Stdio/
DStdio.xs83 newFH(PerlIO *fp, char type) { in newFH()
136 PerlIO *fp;
184 PerlIO * fp
194 PerlIO * fp
205 PerlIO * fp
275 PerlIO * fp
300 PerlIO *pio_fp;
367 PerlIO *pio_fp;
418 PerlIO * fp
434 PerlIO *fp = io ? IoOFP(io) : NULL; in IoOFP()
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/t/Legacy/
Dutf8.t55 is_deeply { map { $_ => 1 } PerlIO::get_layers($dest) },
56 { map { $_ => 1 } PerlIO::get_layers($src) },

123456789