Update of /cvsroot/monetdb/geom/src/monetdb5
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv27575

Modified Files:
      Tag: Geom_0-4
        geom.mx 
Log Message:
Export functions.


U geom.mx
Index: geom.mx
===================================================================
RCS file: /cvsroot/monetdb/geom/src/monetdb5/geom.mx,v
retrieving revision 1.13.4.5
retrieving revision 1.13.4.6
diff -u -d -r1.13.4.5 -r1.13.4.6
--- geom.mx     5 Jun 2008 13:12:27 -0000       1.13.4.5
+++ geom.mx     20 Jun 2008 16:11:59 -0000      1.13.4.6
@@ -284,6 +284,9 @@
 
 int TYPE_mbr;
 
+geom_export bat*
+geom_prelude(void);
+
 bat*
 geom_prelude(void)
 {
@@ -292,6 +295,9 @@
        return NULL;    
 }
 
+geom_export void
+geom_epilogue(void);
+
 void
 geom_epilogue(void)
 {
@@ -312,6 +318,9 @@
 
 /* NULL: generic nil mbr. */
 /* returns a pointer to a nil-mbr. */
+geom_export mbr*
+mbrNULL(void);
+
 mbr*
 mbrNULL(void)
 {
@@ -325,6 +334,13 @@
 
 /* FROMSTR: parse string to mbr. */
 /* return number of parsed characters. */
+geom_export int
+mbrFROMSTR(
+   char*       src,    /* IN: to-be-parsed string. */
+   int*                len,    /* INOUT: length of area pointed to by atom 
[may need enlarging!] */
+   mbr**       atom    /* INOUT: ptr to atom-ptr [may need (re-)alloc!] */
+);
+
 int
 mbrFROMSTR(
    char*       src,    /* IN: to-be-parsed string. */
@@ -360,6 +376,13 @@
 
 /* TOSTR: print atom in a string. */
 /* return length of resulting string. */
+geom_export int
+mbrTOSTR(
+   char**      dst,    /* INOUT: dst charbuffer [maybe 0, may need realloc]*/
+   int*                len,    /* INOUT: length of buffer */
+   mbr*        atom    /* IN: to-be-printed mbr. */
+);
+
 int
 mbrTOSTR(
    char**      dst,    /* INOUT: dst charbuffer [maybe 0, may need realloc]*/
@@ -392,6 +415,11 @@
 
 /* HASH: compute a hash value. */
 /* returns a positive integer hash value */
+geom_export hash_t
+mbrHASH(
+   mbr*        atom    /* IN: to-be-hashed mbr. */
+);
+
 hash_t
 mbrHASH(
    mbr*        atom    /* IN: to-be-hashed mbr. */
@@ -402,6 +430,12 @@
 
 /* COMP: compare two mbrs. */
 /* returns int <0 if l<r, 0 if l==r, >0 else */
+geom_export int
+mbrCOMP(
+   mbr*        l,      /* IN: first geom_point. */
+   mbr*        r       /* IN: second geom_point. */
+);
+
 int
 mbrCOMP(
    mbr*        l,      /* IN: first geom_point. */
@@ -423,6 +457,9 @@
        return res;
 }
 
+geom_export mbr *
+mbrREAD(mbr *a, stream *s, size_t cnt);
+
 mbr *
 mbrREAD(mbr *a, stream *s, size_t cnt)
 {
@@ -444,6 +481,9 @@
        return a;
 }
 
+geom_export void
+mbrWRITE(mbr *c, stream *s, size_t cnt);
+
 void
 mbrWRITE(mbr *c, stream *s, size_t cnt)
 {
@@ -458,6 +498,9 @@
        }
 }
 
+geom_export str
+mbrFromString(mbr **w, str *src);
+
 str
 mbrFromString(mbr **w, str *src)
 {
@@ -468,6 +511,9 @@
        throw(MAL, "mbr.FromString", GDKerrbuf);
 }
 
+geom_export str
+mbrFromMBR(mbr **w, mbr **src);
+
 str
 mbrFromMBR(mbr **w, mbr **src)
 {
@@ -491,6 +537,13 @@
 
 /* TOSTR: print atom in a string. */
 /* return length of resulting string. */
+geom_export int
+wkbTOSTR(
+   char**      dst,    /* INOUT: dst charbuffer [maybe 0, may need realloc]*/
+   int*                len,    /* INOUT: length of buffer */
+   wkb*        atom    /* IN: to-be-printed geom_geometry. */
+);
+
 int
 wkbTOSTR(
    char**      dst,    /* INOUT: dst charbuffer [maybe 0, may need realloc]*/
@@ -525,6 +578,13 @@
 
 /* FROMSTR: parse string to @1. */
 /* return number of parsed characters. */
+geom_export int
+wkbFROMSTR(
+   char*       src,    /* IN: to-be-parsed string. */
+   int*                len,    /* INOUT: length of area pointed to by atom 
[may need enlarging!] */
+   wkb**       atom    /* INOUT: ptr to atom-ptr [may need (re-)alloc!] */
+);
+
 int
 wkbFROMSTR(
    char*       src,    /* IN: to-be-parsed string. */
@@ -569,6 +629,9 @@
        return strlen(src);
 }
 
+geom_export str
+wkbFromString(wkb **w, str *wkt);
+
 str
 wkbFromString(wkb **w, str *wkt)
 {
@@ -579,6 +642,9 @@
        throw(MAL, "wkb.FromString", GDKerrbuf);
 }
 
+geom_export str
+wkbFromWKB(wkb **w, wkb **src);
+
 str
 wkbFromWKB(wkb **w, wkb **src)
 {
@@ -593,6 +659,9 @@
        return MAL_SUCCEED;
 }
 
+geom_export str
+wkbFromText(wkb **w, str *wkt, int *tpe);
+
 str
 wkbFromText(wkb **w, str *wkt, int *tpe)
 {
@@ -611,6 +680,9 @@
        throw(MAL, "wkb.FromText", GDKerrbuf);
 }
 
+geom_export hash_t
+wkbHASH(wkb *w);
+
 hash_t
 wkbHASH(wkb *w)
 {
@@ -624,6 +696,9 @@
        return h;
 }
 
+geom_export int
+wkbCOMP(wkb *l, wkb *r);
+
 int
 wkbCOMP(wkb *l, wkb *r)
 {
@@ -638,6 +713,9 @@
        return memcmp(l->data, r->data, len);
 }
 
+geom_export wkb *
+wkbNULL(void);
+
 wkb *
 wkbNULL(void)
 {
@@ -647,6 +725,9 @@
        return (&nullval);
 }
 
+geom_export str
+wkbAsText(str *r, wkb** w);
+
 str
 wkbAsText(str *r, wkb** w) 
 {
@@ -658,12 +739,18 @@
        throw(MAL, "geom.AsText", "Failed to create Text from Well Known 
Format");
 }
 
+geom_export void
+wkbDEL(Heap *h, var_t *index);
+
 void
 wkbDEL(Heap *h, var_t *index)
 {
        HEAP_free(h, *index);
 }
 
+geom_export wkb *
+wkbREAD(wkb *a, stream *s, size_t cnt);
+
 wkb *
 wkbREAD(wkb *a, stream *s, size_t cnt)
 {
@@ -683,6 +770,9 @@
        return a;
 }
 
+geom_export void
+wkbWRITE(wkb *a, stream *s, size_t cnt);
+
 void
 wkbWRITE(wkb *a, stream *s, size_t cnt)
 {
@@ -694,6 +784,9 @@
                stream_write(s, (char *) a->data, len, 1);
 }
 
+geom_export void
+wkbCONVERT(wkb *b, int direction);
+
 void
 wkbCONVERT(wkb *b, int direction)
 {
@@ -701,18 +794,27 @@
        b->len = normal_int_SWAP(b->len);
 }
 
+geom_export int
+wkbLENGTH(wkb *p);
+
 int
 wkbLENGTH(wkb *p)
 {
        return wkb_size(p->len);
 }
 
+geom_export void
+wkbHEAP(Heap *heap, size_t capacity);
+
 void
 wkbHEAP(Heap *heap, size_t capacity)
 {
        HEAP_initialize(heap, capacity, 0, (int) sizeof(var_t));
 }
 
+geom_export var_t
+wkbPUT(Heap *h, var_t *bun, wkb *val);
+
 var_t
 wkbPUT(Heap *h, var_t *bun, wkb *val)
 {
@@ -728,6 +830,15 @@
 /* COMMAND mbr
  * Creates the mbr for the given geom_geometry.
  */
+geom_export str
+ordinatesMBR(
+       mbr** res, /* INOUT. */
+       flt* minX, /* IN. */
+       flt* minY, /* IN. */
+       flt* maxX, /* IN. */
+       flt* maxY /* IN. */
+);
+
 str
 ordinatesMBR(
        mbr** res, /* INOUT. */
@@ -749,6 +860,12 @@
 /* COMMAND mbr
  * Creates the mbr for the given geom_geometry.
  */
+geom_export str
+wkbMBR(
+       mbr** res, /* INOUT. */
+       wkb** geom /* IN. */
+);
+
 str
 wkbMBR(
        mbr** res, /* INOUT. */
@@ -763,6 +880,9 @@
        throw(MAL, "geom.mbr", "Failed to create mbr");
 }
 
+geom_export wkb *
+geos2wkb( GEOSGeom geosGeometry );
+
 wkb *
 geos2wkb( GEOSGeom geosGeometry )
 {
@@ -781,6 +901,9 @@
 }
 
 @= getcoord
+geom_export str
[EMAIL PROTECTED](double *out, wkb **geom);
+
 str
 [EMAIL PROTECTED](double *out, wkb **geom)
 {
@@ -806,6 +929,9 @@
 @:getcoord(Y)@
 
 @c
+geom_export str
+wkbcreatepoint(wkb **out, double *x,double *y);
+
 str
 wkbcreatepoint(wkb **out, double *x,double *y)
 {
@@ -817,6 +943,9 @@
        return MAL_SUCCEED;
 }
 
+geom_export str
+mbroverlaps( bit *out, mbr *b1, mbr *b2);
+
 str
 mbroverlaps( bit *out, mbr *b1, mbr *b2)
 {
@@ -828,6 +957,9 @@
 }
 
 @= basic
+geom_export str
[EMAIL PROTECTED]( @2 *out, wkb **geom);
+
 str
 [EMAIL PROTECTED]( @2 *out, wkb **geom)
 {
@@ -854,6 +986,9 @@
 @:basic(Boundary,wkb*,GEOSBoundary,geos2wkb,NULL)@
 
 @= spatial
+geom_export str
[EMAIL PROTECTED]( bit *out, wkb **a, wkb **b);
+
 str
 [EMAIL PROTECTED]( bit *out, wkb **a, wkb **b)
 {
@@ -874,6 +1009,9 @@
        return ret;
 }
 @= spatial2
+geom_export str
[EMAIL PROTECTED]( bit *out, wkb **a, wkb **b, @3 @4);
+
 str
 [EMAIL PROTECTED]( bit *out, wkb **a, wkb **b, @3 @4)
 {
@@ -905,6 +1043,9 @@
 @:spatial2(Relate,GEOSRelatePattern,char*,pattern)@
 
 @= analysis
+geom_export str
[EMAIL PROTECTED]( dbl *out, wkb **a);
+
 str
 [EMAIL PROTECTED]( dbl *out, wkb **a)
 {
@@ -921,6 +1062,9 @@
        return ret;
 }
 @= analysis2
+geom_export str
[EMAIL PROTECTED]( dbl *out, wkb **a, wkb **b);
+
 str
 [EMAIL PROTECTED]( dbl *out, wkb **a, wkb **b)
 {
@@ -941,6 +1085,9 @@
        return ret;
 }
 @= analysis3
+geom_export str
[EMAIL PROTECTED]( @2 *out, wkb **a, wkb **b);
+
 str
 [EMAIL PROTECTED]( @2 *out, wkb **a, wkb **b)
 {
@@ -971,6 +1118,9 @@
 @:analysis3(SymDifference,wkb*,GEOSSymDifference,geos2wkb)@
 
 @c
+geom_export str
+wkbBuffer( wkb **out, wkb **geom, dbl *distance);
+
 str
 wkbBuffer( wkb **out, wkb **geom, dbl *distance)
 {
@@ -1007,6 +1157,10 @@
        *X = (Y)->batCacheid; \
        BBPkeepref(*(X));\
        BBPreleaseref(Z->batCacheid);
+
+geom_export str 
+bat_wkbMBR(int *ret, int *l);
+
 str 
 bat_wkbMBR(int *ret, int *l)
 {   


-------------------------------------------------------------------------
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services for
just about anything Open Source.
http://sourceforge.net/services/buy/index.php
_______________________________________________
Monetdb-sql-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-sql-checkins

Reply via email to