/usr/lib/pike8.0/modules/Bz2.pmod is in pike8.0-bzip2 8.0.388-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 | #pike __REAL_VERSION__
inherit .___Bz2 : Bz2;
#if constant(.___Bz2.File)
#define DATA_CHUNK_SIZE 64*1024
class File
{
inherit Bz2::File;
function(:string) read_function(int nbytes)
//! Returns a function that when called will call @[read] with
//! nbytes as argument. Can be used to get various callback
//! functions, eg for the fourth argument to
//! @[String.SplitIterator].
{
return lambda(){ return read(nbytes); };
}
String.SplitIterator|Stdio.LineIterator line_iterator( int|void trim )
//! Returns an iterator that will loop over the lines in this file.
//! If trim is true, all @tt{'\r'@} characters will be removed from
//! the input.
{
if( trim )
return String.SplitIterator( "",(<'\n','\r'>),1,
read_function(DATA_CHUNK_SIZE));
// This one is about twice as fast, but it's way less flexible.
return Stdio.LineIterator( read_function(DATA_CHUNK_SIZE) );
}
}
#endif
|