cemu-idapython/swig/diskio.i

337 lines
8.2 KiB
OpenEdge ABL
Raw Permalink Normal View History

// TODO: These could be wrapped
%ignore enumerate_files;
%rename (enumerate_files) py_enumerate_files;
%ignore enumerate_system_files;
%ignore ioport_bit_t;
%ignore ioport_bits_t;
%ignore ioport_t;
%ignore read_ioports;
%ignore choose_ioport_device;
%ignore find_ioport;
%ignore find_ioport_bit;
%ignore free_ioports;
%ignore lread;
%ignore qlread;
%ignore qlgets;
%ignore qlgetc;
%ignore lreadbytes;
%ignore lread2bytes;
%ignore lread2bytes;
%ignore lread4bytes;
%ignore lread4bytes;
%ignore lread8bytes;
%ignore lread8bytes;
%ignore qlsize;
%ignore qlseek;
%ignore qltell;
%ignore qlfile;
%ignore make_linput;
%ignore unmake_linput;
// FIXME: These should be wrapped for completeness
%ignore eread;
%ignore ewrite;
// Ignore kernel-only & unexported symbols
%ignore get_thread_priority;
%ignore set_thread_priority;
%ignore checkdspace;
%ignore lowdiskgo;
%ignore ida_argv;
%ignore exename;
%include "diskio.hpp"
%{
//<code(py_diskio)>
int idaapi py_enumerate_files_cb(const char *file, void *ud)
{
PyObject *py_file = PyString_FromString(file);
PyObject *py_ret = PyObject_CallFunctionObjArgs((PyObject *)ud, py_file, NULL);
int r = (py_ret == 0 || !PyNumber_Check(py_ret)) ? 1 /* stop enumeration on failure */ : PyInt_AsLong(py_ret);
Py_XDECREF(py_file);
Py_XDECREF(py_ret);
return r;
}
//</code(py_diskio)>
%}
%inline %{
//<inline(py_diskio)>
class loader_input_t
{
private:
linput_t *li;
int own;
qstring fn;
enum
{
OWN_NONE = 0, // li not created yet
OWN_CREATE = 1, // Owns li because we created it
OWN_FROM_LI = 2, // No ownership we borrowed the li from another class
OWN_FROM_FP = 3, // We got an li instance from an fp instance, we have to unmake_linput() on Close
};
//--------------------------------------------------------------------------
void assign(const loader_input_t &rhs)
{
fn = rhs.fn;
li = rhs.li;
own = OWN_FROM_LI;
}
public:
//--------------------------------------------------------------------------
loader_input_t(const loader_input_t &rhs)
{
assign(rhs);
}
//--------------------------------------------------------------------------
loader_input_t()
{
li = NULL;
own = OWN_NONE;
fn.qclear();
}
//--------------------------------------------------------------------------
void close()
{
if (li == NULL)
return;
if (own == OWN_CREATE)
close_linput(li);
else if (own == OWN_FROM_FP)
unmake_linput(li);
li = NULL;
}
//--------------------------------------------------------------------------
~loader_input_t()
{
close();
}
//--------------------------------------------------------------------------
PyObject *open(const char *filename, bool remote = false)
{
close();
li = open_linput(filename, remote);
if (li == NULL)
Py_RETURN_FALSE;
// Save file name
fn = filename;
own = OWN_CREATE;
Py_RETURN_TRUE;
}
//--------------------------------------------------------------------------
void set_linput(linput_t *linput)
{
close();
own = OWN_FROM_LI;
li = linput;
fn.sprnt("<linput_t * %p>", linput);
}
//--------------------------------------------------------------------------
static loader_input_t *from_linput(linput_t *linput)
{
loader_input_t *l = new loader_input_t();
l->set_linput(linput);
return l;
}
//--------------------------------------------------------------------------
// This method can be used to pass a linput_t* from C code
static loader_input_t *from_cobject(PyObject *pycobject)
{
if (!PyCObject_Check(pycobject))
return NULL;
loader_input_t *l = new loader_input_t();
l->set_linput((linput_t *)PyCObject_AsVoidPtr(pycobject));
return l;
}
//--------------------------------------------------------------------------
static loader_input_t *from_fp(FILE *fp)
{
linput_t *fp_li = make_linput(fp);
if (fp_li == NULL)
return NULL;
loader_input_t *l = new loader_input_t();
l->own = OWN_FROM_FP;
l->fn.sprnt("<FILE * %p>", fp);
l->li = fp_li;
return l;
}
//--------------------------------------------------------------------------
linput_t *get_linput()
{
return li;
}
//--------------------------------------------------------------------------
PyObject *open_memory(ea_t start, asize_t size = 0)
{
linput_t *l = create_memory_linput(start, size);
if (l == NULL)
Py_RETURN_FALSE;
close();
li = l;
fn = "<memory>";
own = OWN_CREATE;
Py_RETURN_TRUE;
}
//--------------------------------------------------------------------------
int32 seek(int32 pos, int whence = SEEK_SET)
{
return qlseek(li, pos, whence);
}
//--------------------------------------------------------------------------
int32 tell()
{
return qltell(li);
}
//--------------------------------------------------------------------------
PyObject *getz(size_t sz, int32 fpos = -1)
{
do
{
char *buf = (char *) malloc(sz + 5);
if (buf == NULL)
break;
qlgetz(li, fpos, buf, sz);
PyObject *ret = PyString_FromString(buf);
free(buf);
return ret;
} while (false);
Py_RETURN_NONE;
}
//--------------------------------------------------------------------------
PyObject *gets(size_t len)
{
do
{
char *buf = (char *) malloc(len + 5);
if (buf == NULL)
break;
if (qlgets(buf, len, li) == NULL)
{
free(buf);
break;
}
PyObject *ret = PyString_FromString(buf);
free(buf);
return ret;
} while (false);
Py_RETURN_NONE;
}
//--------------------------------------------------------------------------
PyObject *read(size_t size)
{
do
{
char *buf = (char *) malloc(size + 5);
if (buf == NULL)
break;
ssize_t r = qlread(li, buf, size);
if (r == -1)
{
free(buf);
break;
}
PyObject *ret = PyString_FromStringAndSize(buf, r);
free(buf);
return ret;
} while (false);
Py_RETURN_NONE;
}
//--------------------------------------------------------------------------
bool opened()
{
return li != NULL;
}
//--------------------------------------------------------------------------
PyObject *readbytes(size_t size, bool big_endian)
{
do
{
char *buf = (char *) malloc(size + 5);
if (buf == NULL)
break;
int r = lreadbytes(li, buf, size, big_endian);
if (r == -1)
{
free(buf);
break;
}
PyObject *ret = PyString_FromStringAndSize(buf, r);
free(buf);
return ret;
} while (false);
Py_RETURN_NONE;
}
//--------------------------------------------------------------------------
int32 size()
{
return qlsize(li);
}
//--------------------------------------------------------------------------
PyObject *filename()
{
return PyString_FromString(fn.c_str());
}
//--------------------------------------------------------------------------
PyObject *get_char()
{
int ch = qlgetc(li);
if (ch == EOF)
Py_RETURN_NONE;
return Py_BuildValue("c", ch);
}
};
PyObject *py_enumerate_files(PyObject *path, PyObject *fname, PyObject *callback)
{
do
{
if (!PyString_Check(path) || !PyString_Check(fname) || !PyCallable_Check(callback))
break;
const char *_path = PyString_AsString(path);
const char *_fname = PyString_AsString(fname);
if (_path == NULL || _fname == NULL)
break;
char answer[MAXSTR];
answer[0] = '\0';
int r = enumerate_files(answer, sizeof(answer), _path, _fname, py_enumerate_files_cb, callback);
return Py_BuildValue("(is)", r, answer);
} while (false);
Py_RETURN_NONE;
}
//</inline(py_diskio)>
%}
%pythoncode %{
#<pycode(py_diskio)>
def enumerate_system_files(subdir, fname, callback):
return enumerate_files(idadir(subdir), fname, callback)
#</pycode(py_diskio)>
%}