1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
|
/*
libspiro - A sharable library of Spiro formula and functions.
This file is a fork from ppedit for use by the libspiro project.
Please see Changelog or git history for description of changes.
=============================================================
Copyright (C) 2007... Raph Levien (ppedit)
Copyright (C) 2007... George Williams (libspiro fork)
Copyright (C) 2013... Joe Da Silva (improvements)
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 3
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
02110-1301, USA.
*/
#include "spiroentrypoints.h"
#include "spiro_intf.h"
/* These six functions are kept for backwards compatibility */
LS_DLL_EXPORT
void SpiroCPsToBezier(spiro_cp *spiros,int n,int isclosed,bezctx *bc) {
SpiroCPsToBezier2(spiros,n,SPIRO_RETRO_VER1,isclosed,bc);
}
LS_DLL_EXPORT
void TaggedSpiroCPsToBezier(spiro_cp *spiros,bezctx *bc) {
TaggedSpiroCPsToBezier2(spiros,SPIRO_RETRO_VER1,bc);
}
LS_DLL_EXPORT
int SpiroCPsToBezier0(spiro_cp *spiros,int n,int isclosed,bezctx *bc) {
return SpiroCPsToBezier2(spiros,n,SPIRO_RETRO_VER1,isclosed,bc);
}
LS_DLL_EXPORT
int TaggedSpiroCPsToBezier0(spiro_cp *spiros,bezctx *bc) {
return TaggedSpiroCPsToBezier2(spiros,SPIRO_RETRO_VER1,bc);
}
LS_DLL_EXPORT
void SpiroCPsToBezier1(spiro_cp *spiros,int n,int isclosed,bezctx *bc,int *done) {
*done = SpiroCPsToBezier2(spiros,n,SPIRO_RETRO_VER1,isclosed,bc);
}
LS_DLL_EXPORT
void TaggedSpiroCPsToBezier1(spiro_cp *spiros,bezctx *bc,int *done) {
*done = TaggedSpiroCPsToBezier2(spiros,SPIRO_RETRO_VER1,bc);
}
LS_DLL_EXPORT
int SpiroCPsToBezier2(spiro_cp *spiros,int n,int ncq,int isclosed,bezctx *bc) {
double dm[6];
spiro_seg *s;
if ( n<=0 || ncq<0 ) return 0; /* invalid inputs */
if ( n > 1 && (ncq & SPIRO_REVERSE_SRC) && spiroreverse(spiros,n) )
return 0;
if ( isclosed )
s = run_spiro0(spiros,dm,ncq,n);
else {
char oldty_start = spiros[0].ty;
char oldty_end = spiros[n-1].ty;
spiros[0].ty = '{';
spiros[n-1].ty = '}';
s = run_spiro0(spiros,dm,ncq,n);
spiros[n-1].ty = oldty_end;
spiros[0].ty = oldty_start;
}
if ( s ) {
if ( spiro_to_bpath0(spiros,s,dm,ncq,n,bc) ) {
free_spiro(s);
return 1; /* success */
}
free_spiro(s);
}
return 0; /* spiro did not converge or encountered non-finite values */
}
LS_DLL_EXPORT
int TaggedSpiroCPsToBezier2(spiro_cp *spiros,int ncq,bezctx *bc) {
double dm[6];
spiro_seg *s;
int n;
for ( n=0; spiros[n].ty!='z' && spiros[n].ty!='}'; ++n );
if ( spiros[n].ty == '}' ) ++n;
if ( n<=0 || ncq<0 ) return 0; /* invalid inputs */
if ( n > 1 && (ncq & SPIRO_REVERSE_SRC) && spiroreverse(spiros,n) )
return 0;
s = run_spiro0(spiros,dm,ncq,n);
if ( s ) {
if ( spiro_to_bpath0(spiros,s,dm,ncq,n,bc) ) {
free_spiro(s);
return 1; /* success */
}
free_spiro(s);
}
return 0; /* spiro did not converge or encountered non-finite values */
}
|
