MkCall_py.c

Go to the documentation of this file.

 
/* LABEL-NO */
 
#include "LibMkKernel_py.h"
#include "misc_check_py.h"
 
enum MkErrorE NS(CheckCallable) (
  OT_Check_ARGS,
  MK_CBP      *retP
) {
  assert(retP);
  if ((*skipP) >= objc) {
    WrongNumArgs(hdl,(*skipP), objc, -999, +999, arg);
    goto error;
  }
  PyObject  *val = OT_TUPLE_GET_ITEM(objv,(*skipP)++);
  if (!PyCallable_Check(val)) {
    if (val == Py_None) {
      *retP = NULL;
      return MK_OK;
    } else if (PyUnicode_Check(val)) {
      Py_ssize_t size=0;
      const char * tmp = PyUnicode_AsUTF8AndSize(val, &size);
      if (tmp[0] == '\0' || MK_NULL_STR_CHECK(tmp,size)) {
        *retP = NULL;
        return MK_OK;
      }
      WrongCallableError(tmp);
    } else {
      WrongCallableError(OT_OBJ_TYPE_STRING(val));
    }
  }
  if (*retP != NULL) {
    MkCallS *cbS = *retP;
    cbS->mkrt = MK_RT_PTR;
    cbS->hdl = hdl;
    cbS->callable = Py_NewRef(val);
  } else {
    *retP = (MK_CBP)Py_NewRef(val);
//printP(*retP)
  }
  return MK_OK;
error:
  return OT_ERROR_STACK;
}
 
// *********************************************************************
 
/*
[ObjectDeleteCall signature]
  callback-args := typeName:MK_STRN[in], typeHdl:MK_HDL[in], objHdl:MK_HDL[in]
  [static]   def callback ( callback-args )
  [instance] class YYY:
               def callback ( self, callback-args )
  [class]    class ZZZ: 
               @staticmethod
               def callback ( callback-args )
[ObjectDeleteCall signature]
*/
 
enum MkErrorE
NS(ObjectDeleteCall) ( MkObjectDeleteCallF_ARGS )
{
  MkObjectDeleteCallF_CHECK;
 
  // if NO self object is available than NO callback is called
  if (!MkSelfExists(obj)) return MK_OK;
 
  // if NO self object is available than NO python callback is called
  PyObject * const callable = (PyObject*) __data__;
  PyObject * resultO = NULL;
 
  PyErr_Clear();
 
  // call the function
  resultO = PyObject_CallFunctionObjArgs(callable, STRN2VAL(typeName), HDL2VAL(typeHdl), HDL2VAL(objHdl), NULL);
 
  // no error return OK
  if (resultO == NULL) {
    OT_ERROR_LNG_2_META(MkObjectC_TT);
  } else {
    Py_CLEAR(resultO);
  }
 
  return MkErrorStack_0E_Check();
}
 
void
MK_DECL NS(ObjectDeleteFree) ( MkObjectDeleteFreeF_ARGS )
{
  MK(CallFree)(dataP);
}
 
void
MK_DECL NS(ObjectDeleteFree2) ( MkObjectDeleteFreeF_ARGS )
{
  MK(CallFree)(dataP);
}
 
// vim: tags+=$theKenel_SRCDIR/py/tags