vcs.maemo.org Git - opencv/blob - interfaces/ch/c/handmade/cxcore/cxcore_retstruct_chdl.c

   1 /* Copyright (c) 2001-2002 by SoftIntegration, Inc. All Rights Reserved */
   2 #include <cv.h>
   3 #include <ch.h>
   4
   5 EXPORTCH CvScalar* cvColorToScalar_chdl(void *varg) {
   6     ChInterp_t interp;
   7     va_list ap;
   8     double packed_color;
   9     int arrtype;
  10     CvScalar *retval;
  11
  12     Ch_VaStart(interp, ap, varg);
  13     packed_color = Ch_VaArg(interp, ap, double);
  14     arrtype = Ch_VaArg(interp, ap, int);
  15     retval = (CvScalar*)malloc(sizeof(*retval));
  16     *retval = cvColorToScalar(packed_color, arrtype);
  17     Ch_VaEnd(interp, ap);
  18     return retval;
  19 }
  20
  21 EXPORTCH CvScalar* cvAvg_chdl(void *varg) {
  22     ChInterp_t interp;
  23     va_list ap;
  24     const CvArr* array;
  25     const CvArr* mask;
  26     CvScalar *retval;
  27
  28     Ch_VaStart(interp, ap, varg);
  29     array = Ch_VaArg(interp, ap, const CvArr*);
  30     mask = Ch_VaArg(interp, ap, const CvArr*);
  31     retval = (CvScalar*)malloc(sizeof(*retval));
  32     *retval = cvAvg(array, mask);
  33     Ch_VaEnd(interp, ap);
  34     return retval;
  35 }
  36
  37 EXPORTCH CvScalar* cvGet1D_chdl(void *varg) {
  38     ChInterp_t interp;
  39     va_list ap;
  40     const CvArr* array;
  41     int index;
  42     CvScalar *retval;
  43
  44     Ch_VaStart(interp, ap, varg);
  45     array = Ch_VaArg(interp, ap, const CvArr*);
  46     index = Ch_VaArg(interp, ap, int);
  47     retval = (CvScalar*)malloc(sizeof(*retval));
  48     *retval = cvGet1D(array,index);
  49     Ch_VaEnd(interp, ap);
  50     return retval;
  51 }
  52
  53 EXPORTCH CvScalar* cvGet2D_chdl(void *varg) {
  54     ChInterp_t interp;
  55     va_list ap;
  56     const CvArr* array;
  57     int index1, index2;
  58     CvScalar *retval;
  59
  60     Ch_VaStart(interp, ap, varg);
  61     array = Ch_VaArg(interp, ap, const CvArr*);
  62     index1 = Ch_VaArg(interp, ap, int);
  63     index2 = Ch_VaArg(interp, ap, int);
  64     retval = (CvScalar*)malloc(sizeof(*retval));
  65     *retval = cvGet2D(array,index1,index2);
  66     Ch_VaEnd(interp, ap);
  67     return retval;
  68 }
  69
  70 EXPORTCH CvScalar* cvGet3D_chdl(void *varg) {
  71     ChInterp_t interp;
  72     va_list ap;
  73     const CvArr* array;
  74     int index1, index2, index3;
  75     CvScalar *retval;
  76
  77     Ch_VaStart(interp, ap, varg);
  78     array = Ch_VaArg(interp, ap, const CvArr*);
  79     index1 = Ch_VaArg(interp, ap, int);
  80     index2 = Ch_VaArg(interp, ap, int);
  81     index3 = Ch_VaArg(interp, ap, int);
  82     retval = (CvScalar*)malloc(sizeof(*retval));
  83     *retval = cvGet3D(array,index1,index2,index3);
  84     Ch_VaEnd(interp, ap);
  85     return retval;
  86 }
  87
  88 EXPORTCH CvRect* cvGetImageROI_chdl(void *varg) {
  89     ChInterp_t interp;
  90     va_list ap;
  91     const IplImage* array;
  92     CvRect *retval;
  93
  94     Ch_VaStart(interp, ap, varg);
  95     array = Ch_VaArg(interp, ap, const IplImage*);
  96     retval = (CvRect*)malloc(sizeof(*retval));
  97     *retval = cvGetImageROI(array);
  98     Ch_VaEnd(interp, ap);
  99     return retval;
 100 }
 101
 102 EXPORTCH CvScalar* cvGetND_chdl(void *varg) {
 103     ChInterp_t interp;
 104     va_list ap;
 105     const CvArr* array;
 106     int* index;
 107     CvScalar *retval;
 108
 109     Ch_VaStart(interp, ap, varg);
 110     array = Ch_VaArg(interp, ap, const CvArr*);
 111     index = Ch_VaArg(interp, ap, int*);
 112     retval = (CvScalar*)malloc(sizeof(*retval));
 113     *retval = cvGetND(array,index);
 114     Ch_VaEnd(interp, ap);
 115     return retval;
 116 }
 117
 118 EXPORTCH CvSize* cvGetSize_chdl(void *varg) {
 119     ChInterp_t interp;
 120     va_list ap;
 121     const CvArr* array;
 122     CvSize *retval;
 123
 124     Ch_VaStart(interp, ap, varg);
 125     array = Ch_VaArg(interp, ap, const CvArr*);
 126     retval = (CvSize*)malloc(sizeof(*retval));
 127     *retval = cvGetSize(array);
 128     Ch_VaEnd(interp, ap);
 129     return retval;
 130 }
 131
 132 EXPORTCH CvScalar* cvSum_chdl(void *varg) {
 133     ChInterp_t interp;
 134     va_list ap;
 135     const CvArr* array;
 136     CvScalar *retval;
 137
 138     Ch_VaStart(interp, ap, varg);
 139     array = Ch_VaArg(interp, ap, const CvArr*);
 140     retval = (CvScalar*)malloc(sizeof(*retval));
 141     *retval = cvSum(array);
 142     Ch_VaEnd(interp, ap);
 143     return retval;
 144 }
 145
 146 EXPORTCH CvScalar* cvTrace_chdl(void *varg) {
 147     ChInterp_t interp;
 148     va_list ap;
 149     const CvArr* array;
 150     CvScalar *retval;
 151
 152     Ch_VaStart(interp, ap, varg);
 153     array = Ch_VaArg(interp, ap, const CvArr*);
 154     retval = (CvScalar*)malloc(sizeof(*retval));
 155     *retval = cvTrace(array);
 156     Ch_VaEnd(interp, ap);
 157     return retval;
 158 }
 159