cemu-idapython/swig/fpro.i

325 lines
7.9 KiB
OpenEdge ABL
Raw Normal View History

%inline %{
//<inline(py_qfile)>
2010-06-28 14:36:40 +02:00
/*
#<pydoc>
class qfile_t(pyidc_opaque_object_t):
"""A helper class to work with FILE related functions."""
def __init__(self):
pass
def close(self):
"""Closes the file"""
pass
def open(self, filename, mode):
"""Opens a file
@param filename: the file name
@param mode: The mode string, ala fopen() style
@return: Boolean
"""
pass
def set_linput(self, linput):
"""Links the current loader_input_t instance to a linput_t instance"""
pass
@staticmethod
def tmpfile():
"""A static method to construct an instance using a temporary file"""
pass
def seek(self, pos, whence = SEEK_SET):
"""Set input source position
@return: the new position (not 0 as fseek!)
"""
pass
def tell(self):
"""Returns the current position"""
pass
def gets(self, len):
"""Reads a line from the input file. Returns the read line or None"""
pass
def read(self, size):
"""Reads from the file. Returns the buffer or None"""
pass
def write(self, buf):
"""Writes to the file. Returns 0 or the number of bytes written"""
pass
def readbytes(self, size, big_endian):
"""Similar to read() but it respect the endianness"""
pass
def writebytes(self, size, big_endian):
"""Similar to write() but it respect the endianness"""
pass
def flush(self):
pass
def get_char(self):
"""Reads a single character from the file. Returns None if EOF or the read character"""
pass
def put_char(self):
"""Writes a single character to the file"""
pass
def opened(self):
"""Checks if the file is opened or not"""
pass
#</pydoc>
*/
class qfile_t
{
private:
FILE *fp;
bool own;
qstring fn;
//--------------------------------------------------------------------------
void assign(const qfile_t &rhs)
{
fn = rhs.fn;
fp = rhs.fp;
own = false;
}
//--------------------------------------------------------------------------
bool _from_fp(FILE *fp)
{
2010-03-22 15:22:17 +01:00
if ( fp == NULL )
return false;
own = false;
fn.sprnt("<FILE * %p>", fp);
2010-02-15 12:58:44 +01:00
this->fp = fp;
return true;
}
inline void _from_cobject(PyObject *pycobject)
{
_from_fp((FILE *)PyCObject_AsVoidPtr(pycobject));
}
public:
int __idc_cvt_id__;
//--------------------------------------------------------------------------
qfile_t(const qfile_t &rhs)
{
assign(rhs);
}
//--------------------------------------------------------------------------
qfile_t(PyObject *pycobject = NULL)
{
fp = NULL;
own = true;
fn.qclear();
__idc_cvt_id__ = PY_ICID_OPAQUE;
2010-03-22 15:22:17 +01:00
if ( pycobject != NULL && PyCObject_Check(pycobject) )
_from_cobject(pycobject);
}
//--------------------------------------------------------------------------
bool opened()
{
return fp != NULL;
}
//--------------------------------------------------------------------------
void close()
{
2010-03-22 15:22:17 +01:00
if ( fp == NULL )
return;
2010-03-22 15:22:17 +01:00
if ( own )
qfclose(fp);
fp = NULL;
own = true;
}
//--------------------------------------------------------------------------
~qfile_t()
{
close();
}
//--------------------------------------------------------------------------
2010-06-28 14:36:40 +02:00
bool open(const char *filename, const char *mode)
{
close();
fp = qfopen(filename, mode);
2010-03-22 15:22:17 +01:00
if ( fp == NULL )
2010-06-28 14:36:40 +02:00
return false;
// Save file name
fn = filename;
own = true;
2010-06-28 14:36:40 +02:00
return true;
}
//--------------------------------------------------------------------------
static qfile_t *from_fp(FILE *fp)
{
2010-03-22 15:22:17 +01:00
if ( fp == NULL )
return NULL;
qfile_t *qf = new qfile_t();
qf->own = false;
qf->fn.sprnt("<FILE * %p>", fp);
qf->fp = fp;
return qf;
}
//--------------------------------------------------------------------------
// This method can be used to pass a FILE* from C code
static qfile_t *from_cobject(PyObject *pycobject)
{
return PyCObject_Check(pycobject) ? from_fp((FILE *)PyCObject_AsVoidPtr(pycobject)) : NULL;
}
//--------------------------------------------------------------------------
static qfile_t *tmpfile()
{
return from_fp(qtmpfile());
}
//--------------------------------------------------------------------------
FILE *get_fp()
{
return fp;
}
//--------------------------------------------------------------------------
int seek(int32 offset, int whence = SEEK_SET)
{
return qfseek(fp, offset, whence);
}
//--------------------------------------------------------------------------
int32 tell()
{
return qftell(fp);
}
//--------------------------------------------------------------------------
PyObject *readbytes(int size, bool big_endian)
{
do
{
char *buf = (char *) malloc(size + 5);
2010-03-22 15:22:17 +01:00
if ( buf == NULL )
break;
int r = freadbytes(fp, buf, size, big_endian);
2010-03-22 15:22:17 +01:00
if ( r != 0 )
{
free(buf);
break;
}
PyObject *ret = PyString_FromStringAndSize(buf, r);
free(buf);
return ret;
2010-03-22 15:22:17 +01:00
} while ( false );
Py_RETURN_NONE;
}
//--------------------------------------------------------------------------
PyObject *read(int size)
{
do
{
char *buf = (char *) malloc(size + 5);
2010-03-22 15:22:17 +01:00
if ( buf == NULL )
break;
int r = qfread(fp, buf, size);
2010-03-22 15:22:17 +01:00
if ( r <= 0 )
{
free(buf);
break;
}
PyObject *ret = PyString_FromStringAndSize(buf, r);
free(buf);
return ret;
2010-03-22 15:22:17 +01:00
} while ( false );
Py_RETURN_NONE;
}
//--------------------------------------------------------------------------
PyObject *gets(int size)
{
do
{
char *buf = (char *) malloc(size + 5);
2010-03-22 15:22:17 +01:00
if ( buf == NULL )
break;
2010-03-22 15:22:17 +01:00
if ( qfgets(buf, size, fp) == NULL )
{
free(buf);
break;
}
PyObject *ret = PyString_FromString(buf);
free(buf);
return ret;
2010-03-22 15:22:17 +01:00
} while ( false );
Py_RETURN_NONE;
}
//--------------------------------------------------------------------------
int writebytes(PyObject *py_buf, bool big_endian)
{
int sz = PyString_GET_SIZE(py_buf);
void *buf = (void *)PyString_AS_STRING(py_buf);
return fwritebytes(fp, buf, sz, big_endian);
}
//--------------------------------------------------------------------------
int write(PyObject *py_buf)
{
2010-03-22 15:22:17 +01:00
if ( !PyString_Check(py_buf) )
2010-02-15 12:58:44 +01:00
return 0;
return qfwrite(fp, (void *)PyString_AS_STRING(py_buf), PyString_GET_SIZE(py_buf));
}
//--------------------------------------------------------------------------
int puts(const char *str)
{
return qfputs(str, fp);
}
//--------------------------------------------------------------------------
int32 size()
{
int pos = qfseek(fp, 0, SEEK_END);
int32 r = qftell(fp);
qfseek(fp, pos, SEEK_SET);
return r;
}
//--------------------------------------------------------------------------
int flush()
{
return qflush(fp);
}
//--------------------------------------------------------------------------
PyObject *filename()
{
return PyString_FromString(fn.c_str());
}
//--------------------------------------------------------------------------
PyObject *get_char()
{
int ch = qfgetc(fp);
2010-03-22 15:22:17 +01:00
if ( ch == EOF )
Py_RETURN_NONE;
return Py_BuildValue("c", ch);
}
//--------------------------------------------------------------------------
int put_char(char chr)
{
return qfputc(chr, fp);
}
};
//</inline(py_qfile)>
%}