+++ /dev/null
-// Copyright (c) 1999-2012 OPEN CASCADE SAS
-//
-// The content of this file is subject to the Open CASCADE Technology Public
-// License Version 6.5 (the "License"). You may not use the content of this file
-// except in compliance with the License. Please obtain a copy of the License
-// at http://www.opencascade.org and read it completely before using this file.
-//
-// The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
-// main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
-//
-// The Original Code and all software distributed under the License is
-// distributed on an "AS IS" basis, without warranty of any kind, and the
-// Initial Developer hereby disclaims all such warranties, including without
-// limitation, any warranties of merchantability, fitness for a particular
-// purpose or non-infringement. Please see the License for the specific terms
-// and conditions governing the rights and limitations under the License.
-
-#define BUC40223 /*GG_070797
-Protection contre zoom trop grand*/
-
-#include <Xw_Extension.h>
-
- /* ifdef then trace on */
-#ifdef TRACE
-#define TRACE_DRAW_POLY
-#endif
-
-/*
- STATUS Xw_draw_poly (awindow,npoint,px,py):
- XW_EXT_WINDOW *awindow
- int npoint Polygone point number
- float *px,*py Polygone points
-
-
- Display continuous poly in current QG set by set_poly_attrib .
- Note that polys can be buffered depending of the DisplayMode context
- and Flush at Xw_flush time .
-
- returns ERROR if npoint > MAXPOINTS
- returns SUCCESS if successful
-
-*/
-
-static int FirstPolyPoint = -1 ;
-static int FirstPolyLine = -1 ;
-static int FirstPathPoint = -1 ;
-static XW_EXT_POLY *ppolylist ;
-static XW_EXT_POINT *plinedesc ;
-static XSegment segment;
-
-#ifdef XW_PROTOTYPE
-XW_STATUS Xw_draw_poly (void* awindow,int npoint,float* px,float* py)
-#else
-XW_STATUS Xw_draw_poly (awindow,npoint,px,py)
-void *awindow;
-int npoint ;
-float *px,*py ;
-#endif /*XW_PROTOTYPE*/
-{
-XW_EXT_WINDOW *pwindow = (XW_EXT_WINDOW*)awindow;
-XW_EXT_BUFFER *pbuffer ;
-int i,npoly,ldesc,bindex;
-int x=0,y=0,lx=0,ly=0 ;
-XPoint *ppoint ;
-
- if( !Xw_isdefine_window(pwindow) ) {
- /*ERROR*Bad EXT_WINDOW Address*/
- Xw_set_error(24,"Xw_draw_poly",pwindow) ;
- return (XW_ERROR) ;
- }
-
- if( npoint >= MAXPOINTS ) {
- npoint = MAXPOINTS-1 ;
- /*ERROR*Too many points in POLYGONE*/
- Xw_set_error(28,"Xw_draw_poly",&npoint) ;
- return (XW_ERROR) ;
- }
-
- if( npoint < 3 ) {
- /*WARNING*POLYGONE is Empty !!!*/
- Xw_set_error(33,"Xw_draw_poly",&npoint) ;
- return (XW_ERROR) ;
- }
-
- bindex = _BINDEX ;
- pbuffer = &_BUFFER(bindex) ;
- for( ppolylist = pbuffer->ppolylist ; ppolylist ;
- ppolylist = (XW_EXT_POLY*)ppolylist->link ) {
- if( ppolylist->npoly < MAXPOLYS ) break ;
- }
-
- if( !ppolylist ) {
- ppolylist = Xw_add_polygone_structure(pbuffer) ;
- }
-
- if( !ppolylist ) return XW_ERROR ;
-
- for( plinedesc = pbuffer->plinedesc ; plinedesc ;
- plinedesc = (XW_EXT_POINT*)plinedesc->link ) {
- if( plinedesc->npoint + npoint < MAXPOINTS ) break ;
- }
-
- if( !plinedesc ) {
- plinedesc = Xw_add_line_desc_structure(pbuffer) ;
- }
-
- if( !plinedesc ) return XW_ERROR ;
-
- npoly = ppolylist->npoly ;
- ldesc = plinedesc->npoint ;
- ppolylist->ppolys[npoly] = ppoint = &plinedesc->rpoints[ldesc] ;
- for( i=0 ; i<npoint ; i++ ) {
-//OCC186
- x = PXPOINT(px[i], pwindow->xratio) ;
- y = PYPOINT(py[i], pwindow->attributes.height, pwindow->yratio) ;
-//OCC186
-#ifdef BUC40223
- if( i > 0 ) {
- int status;
- status = Xw_clip_segment(pwindow,lx,ly,x,y,&segment);
- if( status >= 0 ) {
- if( (i < 2) || (status & 0xF ) ) {
- plinedesc->rpoints[ldesc].x = segment.x1 ;
- plinedesc->rpoints[ldesc].y = segment.y1 ;
- ldesc++;
- if( bindex > 0 ) {
- int xx = segment.x1,yy = segment.y1;
- pbuffer->rxmin = min(pbuffer->rxmin,xx) ;
- pbuffer->rymin = min(pbuffer->rymin,yy) ;
- pbuffer->rxmax = max(pbuffer->rxmax,xx) ;
- pbuffer->rymax = max(pbuffer->rymax,yy) ;
- }
- }
- plinedesc->rpoints[ldesc].x = segment.x2 ;
- plinedesc->rpoints[ldesc].y = segment.y2 ;
- ldesc++;
- if( bindex > 0 ) {
- int xx = segment.x2,yy = segment.y2;
- pbuffer->rxmin = min(pbuffer->rxmin,xx) ;
- pbuffer->rymin = min(pbuffer->rymin,yy) ;
- pbuffer->rxmax = max(pbuffer->rxmax,xx) ;
- pbuffer->rymax = max(pbuffer->rymax,yy) ;
- }
- }
- }
- lx = x; ly = y;
-#else
- plinedesc->rpoints[ldesc].x = x ;
- plinedesc->rpoints[ldesc].y = y ;
- ldesc++ ;
- if( bindex > 0 ) {
- pbuffer->rxmin = min(pbuffer->rxmin,x) ;
- pbuffer->rymin = min(pbuffer->rymin,y) ;
- pbuffer->rxmax = max(pbuffer->rxmax,x) ;
- pbuffer->rymax = max(pbuffer->rymax,y) ;
- }
-#endif
- }
- if( ppoint->x != x || ppoint->y != y ) {
- plinedesc->rpoints[ldesc].x = ppoint->x ;
- plinedesc->rpoints[ldesc].y = ppoint->y ;
- ldesc++ ;
- }
- ppolylist->polys[npoly] = ldesc - plinedesc->npoint ;
- ppolylist->paths[npoly] = ppolylist->polys[npoly] ;
- if( ppolylist->polys[npoly] > 3 ) {
- ppolylist->npoly++ ;
- plinedesc->npoint = ldesc ;
-
- if( bindex > 0 ) {
- pbuffer->isempty = False ;
- } else if( FirstPolyPoint < 0 ) {
- int polyindex = pwindow->polyindex ;
- int lineindex = pwindow->lineindex ;
- GC gcpoly = (QGTILE(pwindow->qgpoly[polyindex].code)) ?
- pwindow->qgpoly[polyindex].gc : NULL ;
- GC gcline = (QGTYPE(pwindow->qgpoly[polyindex].code)) ?
- pwindow->qgline[lineindex].gc : NULL ;
- Xw_draw_pixel_polys(pwindow,ppolylist,gcpoly,gcline);
- ppolylist->npoly = 0 ;
- plinedesc->npoint = 0 ;
- }
- }
-
-#ifdef TRACE_DRAW_POLY
-if( Xw_get_trace() > 2 ) {
- printf(" Xw_draw_poly(%lx,%d)\n",(long ) pwindow,npoint) ;
- for( i=0 ; i<npoint ; i++ ) {
- printf(" Point(%d) = {%f,%f}\n",i,px[i],py[i]) ;
- }
-}
-#endif
-
- return (XW_SUCCESS);
-}
-
-#ifdef XW_PROTOTYPE
-void Xw_draw_pixel_polys(XW_EXT_WINDOW* pwindow,XW_EXT_POLY* ppolylist,
- GC gcpoly,GC gcline)
-#else
-void Xw_draw_pixel_polys(pwindow,ppolylist,gcpoly,gcline)
-XW_EXT_WINDOW *pwindow ;
-XW_EXT_POLY *ppolylist ;
-GC gcpoly,gcline ;
-#endif
-{
-int i,npolypoint,npathpoint,shape,npoint=0,count=0;
-Region chr_region=NULL;
-XPoint *ppoint ;
-
- for( i=0 ; i<ppolylist->npoly ; i++ ) {
- npolypoint = ppolylist->polys[i] ;
- npathpoint = ppolylist->paths[i] ;
- ppoint = ppolylist->ppolys[i] ;
- if( ppolylist->isupdated ) {
- ppoint += MAXPOINTS ;
- }
- if( gcpoly ) {
- if( npolypoint > 0 ) {
- npoint = npolypoint; count = 0;
- chr_region = 0;
- }
- if( npoint > npathpoint ) {
- if( npathpoint > 3 ) {
- if( chr_region == 0 ) {
- chr_region =
- XPolygonRegion(ppoint,npathpoint-1,EvenOddRule);
- } else {
- Region chr_pathreg =
- XPolygonRegion(ppoint,npathpoint-1,EvenOddRule);
- Region chr_xorreg = XCreateRegion ();
- XXorRegion (chr_region, chr_pathreg, chr_xorreg);
- XDestroyRegion (chr_region);
- chr_region = chr_xorreg;
- }
- }
- count += npathpoint;
- if( count >= npoint && chr_region ) {
- XRectangle rect;
- XSetRegion(_DISPLAY,gcpoly,chr_region);
- XClipBox(chr_region,&rect);
- XFillRectangles(_DISPLAY,_DRAWABLE,gcpoly,&rect,1);
- XDestroyRegion(chr_region);
- XSetClipMask(_DISPLAY,gcpoly,None);
- }
- } else if( npoint > 3 ) {
- shape = (npoint > 4) ? Nonconvex : Convex;
- XFillPolygon(_DISPLAY,_DRAWABLE,gcpoly,ppoint,npoint-1,
- shape,CoordModeOrigin) ;
-
- }
- }
- if( gcline && (gcpoly != gcline) && (npathpoint > 3) ) {
- XDrawLines(_DISPLAY,_DRAWABLE,gcline,
- ppoint,npathpoint,CoordModeOrigin) ;
- }
- }
-}
-
-/*
- STATUS Xw_begin_poly (awindow,npoint,npath):
- XW_EXT_WINDOW *awindow
- int npoint Estimated polygone point number
- int npath Estimated polygone path number
-
-
- Begin Polygone which must be filled by Xw_poly_point and
- closed by Xw_close_poly
-
- returns ERROR if npoint > MAXPOINTS
- or npath > MAXPOLYS
- returns SUCCESS if successful
-
-*/
-
-static int Npoint = 0;
-static int Lx,Ly;
-#ifdef XW_PROTOTYPE
-XW_STATUS Xw_begin_poly(void* awindow,int npoint,int npath)
-#else
-XW_STATUS Xw_begin_poly(awindow,npoint,npath)
-void *awindow ;
-int npoint,npath ;
-#endif /*XW_PROTOTYPE*/
-{
-XW_EXT_WINDOW *pwindow = (XW_EXT_WINDOW*)awindow ;
-int npoly,ldesc,bindex ;
-
- if( !Xw_isdefine_window(pwindow) ) {
- /*ERROR*Bad EXT_WINDOW Address*/
- Xw_set_error(24,"Xw_begin_poly",pwindow) ;
- return (XW_ERROR) ;
- }
-
- if( npoint >= MAXPOINTS ) {
- npoint = MAXPOINTS-1 ;
- /*ERROR*Too many points in POLYGONE*/
- Xw_set_error(32,"Xw_begin_poly",&npoint) ;
- return (XW_ERROR) ;
- }
-
- if( npath >= MAXPOLYS ) {
- npath = MAXPOLYS-1 ;
- /*ERROR*Too many paths in POLYGONE*/
- Xw_set_error(32,"Xw_begin_poly",&npath) ;
- return (XW_ERROR) ;
- }
-
- if( FirstPolyPoint >= 0 ) Xw_close_poly(pwindow) ;
-
- bindex = _BINDEX ;
- for( ppolylist = _BUFFER(bindex).ppolylist ; ppolylist ;
- ppolylist = (XW_EXT_POLY*)ppolylist->link ) {
- if( (ppolylist->npoly + npath) < MAXPOLYS ) break ;
- }
-
- if( !ppolylist ) {
- ppolylist = Xw_add_polygone_structure(&_BUFFER(bindex)) ;
- }
-
- if( !ppolylist ) return XW_ERROR ;
-
- for( plinedesc = _BUFFER(bindex).plinedesc ; plinedesc ;
- plinedesc = (XW_EXT_POINT*)plinedesc->link ) {
- if( (plinedesc->npoint + npoint) < MAXPOINTS ) break ;
- }
-
- if( !plinedesc ) {
- plinedesc = Xw_add_line_desc_structure(&_BUFFER(bindex)) ;
- }
-
- if( !plinedesc ) return XW_ERROR ;
-
- npoly = ppolylist->npoly ;
- ldesc = plinedesc->npoint ;
- ppolylist->polys[npoly] = 0 ;
- ppolylist->paths[npoly] = Npoint = 0 ;
- ppolylist->ppolys[npoly] = &plinedesc->rpoints[ldesc] ;
- FirstPolyPoint = FirstPathPoint = ldesc ;
- FirstPolyLine = npoly;
-
-
-#ifdef TRACE_DRAW_POLY
-if( Xw_get_trace() > 2 ) {
- printf(" Xw_begin_poly(%lx,%d,%d)\n",(long ) pwindow,npoint,npath) ;
-}
-#endif
- return (XW_SUCCESS) ;
-}
-
-/*
- STATUS Xw_poly_point (awindow,x,y):
- XW_EXT_WINDOW *awindow
- float x,y New point to add in polygone in user-space coordinates
-
- Fill Polygone with one point more
-
- returns ERROR if Too Many Points in polygones
- returns SUCCESS if successful
-
-*/
-
-#ifdef XW_PROTOTYPE
-XW_STATUS Xw_poly_point(void* awindow,float x,float y)
-#else
-XW_STATUS Xw_poly_point(awindow,x,y)
-void *awindow ;
-float x,y ;
-#endif /*XW_PROTOTYPE*/
-{
-XW_EXT_WINDOW *pwindow = (XW_EXT_WINDOW*)awindow ;
-XW_EXT_BUFFER *pbuffer ;
-int bindex,xi,yi ;
-
- if( FirstPolyPoint >= 0 ) {
- int ldesc = plinedesc->npoint ;
- if( ldesc >= MAXPOINTS ) {
- /*ERROR*Too many points in POLYGONE*/
- Xw_set_error(32,"Xw_poly_point",&ldesc) ;
- Xw_close_poly(pwindow) ;
- return (XW_ERROR) ;
- }
-
- bindex = _BINDEX ;
-//OCC186
- xi = PXPOINT(x, pwindow->xratio) ;
- yi = PYPOINT(y, pwindow->attributes.height, pwindow->yratio) ;
-//OCC186
-#ifdef BUC40223
- if( Npoint > 0 ) {
- int status;
- status = Xw_clip_segment(pwindow,Lx,Ly,xi,yi,&segment);
- if( status >= 0 ) {
- if( (Npoint < 2) || (status & 0xF ) ) {
- plinedesc->rpoints[ldesc].x = segment.x1 ;
- plinedesc->rpoints[ldesc].y = segment.y1 ;
- ldesc++; plinedesc->npoint++ ;
- if( bindex > 0 ) {
- int xx = segment.x1,yy = segment.y1;
- pbuffer = &_BUFFER(bindex) ;
- pbuffer->isempty = False ;
- pbuffer->rxmin = min(pbuffer->rxmin,xx) ;
- pbuffer->rymin = min(pbuffer->rymin,yy) ;
- pbuffer->rxmax = max(pbuffer->rxmax,xx) ;
- pbuffer->rymax = max(pbuffer->rymax,yy) ;
- }
- }
- plinedesc->rpoints[ldesc].x = segment.x2 ;
- plinedesc->rpoints[ldesc].y = segment.y2 ;
- plinedesc->npoint++ ;
- if( bindex > 0 ) {
- int xx = segment.x2,yy = segment.y2;
- pbuffer = &_BUFFER(bindex) ;
- pbuffer->isempty = False ;
- pbuffer->rxmin = min(pbuffer->rxmin,xx) ;
- pbuffer->rymin = min(pbuffer->rymin,yy) ;
- pbuffer->rxmax = max(pbuffer->rxmax,xx) ;
- pbuffer->rymax = max(pbuffer->rymax,yy) ;
- }
- }
- }
- Lx = xi; Ly = yi;
- Npoint++;
-#else
- plinedesc->rpoints[ldesc].x = xi ;
- plinedesc->rpoints[ldesc].y = yi ;
- plinedesc->npoint++ ;
- if( bindex > 0 ) {
- pbuffer = &_BUFFER(bindex) ;
- pbuffer->isempty = False ;
- pbuffer->rxmin = min(pbuffer->rxmin,xi) ;
- pbuffer->rymin = min(pbuffer->rymin,yi) ;
- pbuffer->rxmax = max(pbuffer->rxmax,xi) ;
- pbuffer->rymax = max(pbuffer->rymax,yi) ;
- }
-#endif
- }
-
-#ifdef TRACE_DRAW_POLY
-if( Xw_get_trace() > 3 ) {
- printf(" Xw_poly_point(%lx,%f,%f)\n",(long ) pwindow,x,y) ;
-}
-#endif
- return (XW_SUCCESS) ;
-}
-
-/*
- STATUS Xw_close_path (awindow):
- XW_EXT_WINDOW *awindow
-
- Close the Polygone path
-
- returns ERROR if TOO many path
- returns SUCCESS if successful
-
-*/
-
-#ifdef XW_PROTOTYPE
-XW_STATUS Xw_close_path(void* awindow)
-#else
-XW_STATUS Xw_close_path(awindow)
-void *awindow ;
-#endif /*XW_PROTOTYPE*/
-{
-#ifdef TRACE_DRAW_POLY
-XW_EXT_WINDOW *pwindow = (XW_EXT_WINDOW*)awindow ;
-#endif
-
- if( FirstPolyPoint >= 0 ) {
- int npoly = ppolylist->npoly ;
- int ldesc = plinedesc->npoint ;
-
- if( plinedesc->rpoints[FirstPathPoint].x != plinedesc->rpoints[ldesc-1].x ||
- plinedesc->rpoints[FirstPathPoint].y != plinedesc->rpoints[ldesc-1].y ) {
- plinedesc->rpoints[ldesc].x = plinedesc->rpoints[FirstPathPoint].x ;
- plinedesc->rpoints[ldesc].y = plinedesc->rpoints[FirstPathPoint].y ;
- plinedesc->npoint++ ; ldesc++ ;
- }
- ppolylist->polys[FirstPolyLine] = ldesc - FirstPolyPoint ;
- ppolylist->paths[npoly] = ldesc - FirstPathPoint ;
- FirstPathPoint = ldesc;
- if( ppolylist->npoly < MAXPOLYS ) {
- ppolylist->npoly = ++npoly ;
- ppolylist->polys[npoly] = 0 ;
- ppolylist->paths[npoly] = Npoint = 0 ;
- ppolylist->ppolys[npoly] = &plinedesc->rpoints[ldesc] ;
- } else {
- /*ERROR*Too many paths in POLYGONE*/
- Xw_set_error(32,"Xw_close_path",&ppolylist->npoly) ;
- return (XW_ERROR) ;
- }
- }
-
-#ifdef TRACE_DRAW_POLY
-if( Xw_get_trace() > 2 ) {
- printf(" Xw_close_path(%lx)\n",(long ) pwindow) ;
-}
-#endif
- return (XW_SUCCESS) ;
-}
-
-/*
- STATUS Xw_close_poly (awindow):
- XW_EXT_WINDOW *awindow
-
- Close the Polygone
-
- returns ERROR if Polygone is empty
- returns SUCCESS if successful
-
-*/
-
-#ifdef XW_PROTOTYPE
-XW_STATUS Xw_close_poly(void* awindow)
-#else
-XW_STATUS Xw_close_poly(awindow)
-void *awindow ;
-#endif /*XW_PROTOTYPE*/
-{
-XW_EXT_WINDOW *pwindow = (XW_EXT_WINDOW*)awindow ;
-
- if( FirstPolyPoint >= 0 ) {
-
- if( plinedesc->npoint > FirstPathPoint ) Xw_close_path(pwindow);
-
- if( !_BINDEX ) {
- int polyindex = pwindow->polyindex ;
- int lineindex = pwindow->lineindex ;
- GC gcpoly = (QGTILE(pwindow->qgpoly[polyindex].code)) ?
- pwindow->qgpoly[polyindex].gc : NULL ;
- GC gcline = (QGTYPE(pwindow->qgpoly[polyindex].code)) ?
- pwindow->qgline[lineindex].gc : NULL ;
- Xw_draw_pixel_polys(pwindow,ppolylist,gcpoly,gcline);
- ppolylist->npoly = 0 ;
- plinedesc->npoint = 0 ;
- }
- FirstPolyPoint = -1 ;
- }
-
-#ifdef TRACE_DRAW_POLY
-if( Xw_get_trace() > 2 ) {
- printf(" Xw_close_poly(%lx)\n",(long ) pwindow) ;
-}
-#endif
- return (XW_SUCCESS) ;
-}
-
-#ifdef XW_PROTOTYPE
-XW_EXT_POLY* Xw_add_polygone_structure(XW_EXT_BUFFER* pbuflist )
-#else
-XW_EXT_POLY* Xw_add_polygone_structure(pbuflist )
-XW_EXT_BUFFER *pbuflist ;
-#endif /*XW_PROTOTYPE*/
-/*
- Create and Insert at end one Extended polygone structure in the
- polygone List
-
- returns Extended polygone address if successful
- or NULL if Bad Allocation
-*/
-{
-XW_EXT_POLY *ppoly ;
-
- ppoly = (XW_EXT_POLY*) Xw_malloc(sizeof(XW_EXT_POLY)) ;
- if( ppoly ) {
- ppoly->link = pbuflist->ppolylist ;
- ppoly->isupdated = False ;
- ppoly->npoly = 0 ;
- pbuflist->ppolylist = ppoly ;
- } else {
- /*ERROR*EXT_POLYGONE allocation failed*/
- Xw_set_error(34,"Xw_add_polygone_structure",NULL) ;
- }
-
- return (ppoly) ;
-}
-
-#ifdef XW_PROTOTYPE
-XW_STATUS Xw_del_polygone_structure(XW_EXT_BUFFER* pbuflist)
-#else
-XW_STATUS Xw_del_polygone_structure(pbuflist)
-XW_EXT_BUFFER *pbuflist ;
-#endif /*XW_PROTOTYPE*/
-/*
- Remove ALL Extended polygone structure in the
- polygone List
-
- SUCCESS always
-*/
-{
-XW_EXT_POLY *ppoly,*qpoly ;
-
- for( ppoly = pbuflist->ppolylist ; ppoly ; ppoly = qpoly ) {
- qpoly = (XW_EXT_POLY*)ppoly->link ;
- Xw_free(ppoly) ;
- }
- pbuflist->ppolylist = NULL ;
-
- return (XW_SUCCESS) ;
-}
projects / occt.git / blobdiff