UG二次开发源码：计算曲线信息评估非常好用的方法分享

admin

1. /******************************************************************************
   
2.              Copyright (c) 1999 Unigraphics Solutions, Inc.
   
3.                        Unpublished - All Rights Reserved
   
4. 
   $ \/ o, L( ?6 g9 U4 g
5. *******************************************************************************/
   $ v3 _* N, W. R/ L
6. /* This example demonstrates the UF_EVAL api for lines and arcs.
   9 s1 e+ M: V7 O. C' k/ _
7. Some of the UF_EVAL routines operate on an evaluator
   # D& p& C; e3 z4 i; L  x" c
8. independent of type while others are type dependent.  No longer use
   
9. UF_CURVE_ask_curve_struct ( ),
   8 ?2 q( U& @# Z) ?! `8 \
10. UF_CURVE_ask_curve_struct_data ( ) and
    
11. UF_CURVE_free_curve_struct ( )
    & @% u! L& I6 O
12. */
    & g! I7 b! g9 f2 V& l$ A8 e4 `. w
13. 
    
14. #include <stdio.h>
    
15. #include <uf_object_types.h>
    ! i; s+ e3 j4 Z9 S5 y. g! U
16. #include <uf_curve.h>
    5 P2 F% b9 z5 p4 L' s" }0 x: L& E
17. #include <uf_eval.h>
    
18. #include <uf_modl.h>
    
19. #include <uf_part.h>
    
20. #include <uf_so.h>
    
21. #include <uf.h>
    
22. #define UF_CALL( X ) ( report ( __FILE__, __LINE__, #X, ( X ) ) )
    - ?: e: \% N$ N# ^7 D
23. static void show_edge_points(UF_EVAL_p_t eval, int n_pts);
    6 L5 r/ I9 H9 X/ u7 [5 S
24. /*---------------------------------------------------------------*/
    
25. static int report ( char *file, int line, char *call, int irc )
    " U5 H1 l" J0 a0 k
26. {
    
27.     if ( irc )
    
28.     {
    2 L$ A( \) |9 G+ ]8 G' F
29.         char message [ 132 + 1 ];
    * H  }6 G! O+ @) ^2 w
30.         printf ( "%s, line %d:  %s\n", file, line, call );
    1 }! u2 N1 Y  F2 E
31.         UF_get_fail_message ( irc, message ) ?
    
32.             printf ( "    error %d\n", irc ) :
    
33.             printf ( "    error %d:  %s\n", irc, message );
    9 Y6 J4 l1 P7 ~1 _2 k2 L9 H, p
34.     }
    5 x# @* A* _  `
35.     return irc;
    
36. }
    
37. /*---------------------------------------------------------------*/
    * P% r. r0 q( Y+ T, M5 `
38. int ufusr_ask_unload ( void )
    - o/ ?# K' c9 y* C3 B
39. {
    * A4 A# q6 X2 z6 E
40.     return UF_UNLOAD_IMMEDIATELY;
    # T( w  o8 N2 w# V6 s& V
41. }
    
42. /*---------------------------------------------------------------*/
    
43. /* ARGSUSED */
    
44. extern void ufusr ( char *param, int *reTCod, int param_len )
    
45. {
    7 E8 G: `0 [; s
46.     tag_t line;
    * @7 Q) Y+ `7 i3 p2 c
47.     tag_t arc;
    
48.     tag_t edge;
    
49.     tag_t edges [ 3 ];
    ) X. w) p0 C& ]( M: D
50.     UF_EVAL_p_t line_evaluator;
    3 x" z3 N) K6 k: K
51.     UF_EVAL_p_t arc_evaluator;
    ( i( ?- `( a7 N0 F: K: A$ A
52.     UF_EVAL_p_t edge_evaluator;
    9 f; }* ]- p# H6 ]* I
53.     UF_CALL ( UF_initialize ( ) );
    + v- c9 u% R5 F& Q" j& ^, N
54.     /*  
    
55.         Create new part "ufd_eval.prt".
    0 x& k1 Y, w0 R. U0 N1 w7 s
56.         
    , @1 L1 f% y0 _* {3 r
57.         Close part if it already exists.
    
58.     */
    
59.     {
    
60.         tag_t part = UF_PART_ask_part_tag ( "ufd_eval.prt" );
    ) Q7 T8 t) S' k3 y/ [! {
61.         if ( part != NULL_TAG )
    3 U. p3 \2 d; i3 A4 \8 q
62.         {
    * f  s& C) w- B% H# Z2 w
63.             UF_CALL ( UF_PART_close ( part, 0, 1 ) );
    
64.         }
    
65.         UF_CALL ( UF_PART_new ( "UGd_eval.prt",
    
66.                                 UF_PART_ENGLISH,
    
67.                                 &part ) );
    
68.     }
    
69.     /*
    
70.         Create block and get edges.
    
71.     */
    
72.     {
    ) J) L2 j5 ^' T
73.         double  origin [ ] = { 0.0, 0.0, 0.0 };
    
74.         char   *sizes  [ ] = { "1", "1", "1" };
    ' g! P. d) Y9 G& J# a: Y/ |
75.         tag_t block_feature;
    # `* t9 R( d/ O
76.             
    
77.         UF_CALL ( UF_MODL_create_block1 ( UF_NULLSIGN,
    
78.                                           origin,
    $ {- h1 T) V, T" ^% r
79.                                           sizes,
    
80.                                           &block_feature ) );
    " [/ w7 q. V& l7 ~% D6 w
81.         {
      f7 [( P8 a9 r1 |' F5 i
82.             uf_list_p_t edge_list;
    & D# o/ q( l; ?; y8 U. w+ S: Z
83.             UF_CALL ( UF_MODL_ask_feat_edges ( block_feature,
    
84.                                                &edge_list ) );
    : z* c( S6 g. Q* j0 Y* Q
85.             
    
86.             UF_CALL ( UF_MODL_ask_list_item ( edge_list,
    
87.                                               1,
    
88.                                               &edge ) );
    0 e" a/ T9 j7 ?. r! {& L3 ]
89.             edges [ 0 ] = edge;
    0 p4 _8 n9 x# j9 r3 q9 S
90.             edges [ 1 ] = edge;
    ' F6 n5 X6 g( \* X; ^" y/ e6 k
91.             UF_CALL ( UF_MODL_ask_list_item ( edge_list,
    8 R! A; x2 W. S' E
92.                                               0,
    % b4 g. R, s# c1 A
93.                                               &edges [ 2 ] ) );
    / ?* K# t; ^! y/ f- w
94.             UF_CALL ( UF_MODL_delete_list ( &edge_list ) );
    ( T' N- c* `! f4 M* O$ T+ c
95.         }
    
96. }
    - W, J; F! d0 W/ R+ v
97.     /*  
    8 ~0 P2 x. w: ^* H/ I
98.         Create smart line.
    ; m& P9 L+ u( g. i8 J
99.     */
    
100.     UF_CALL ( UF_SO_create_curve_extract
     
101.               (
     2 i8 Z5 d  _/ W. m0 D
102.                   edge,
     
103.                   UF_SO_update_after_modeling,
     5 K, U) h; e9 E7 S7 ]9 T; a
104.                   edge,
     
105.                   UF_line_type, /* enforce line type */
     
106.                   0,            /* no subtype to enforce */
     
107.                   NULL_TAG,
     # Q" u- C' [8 `# Q" M# ?- J
108.                   &line
     
109.               ) );
     
110.         
     , S: j, _& f3 f. `& s- F+ M
111.     /*  
     * n. z! {) _5 B) a0 w. g: G
112.         Create smart arc.
     
113.     */
     
114.     {
     6 p" b" r1 ~3 ^9 [3 ]. N
115.         int i;
     ( v9 s) F$ r  o! C" l
116.         tag_t points [ 3 ];
     
117.         for ( i = 0; i < 3; i++ )
     
118.         {
     
119.             char *strings [  ] = { "center=1.0",
     
120.                                    "start=0.0",
     ) @' ]+ _& |, y+ w: Y. ?
121.                                    "end=1.0" };
     
122.             tag_t exps    [ 3 ];
     
123.             tag_t scalars [ 3 ];
     
124.             UF_CALL ( UF_MODL_create_exp_tag ( strings [ i ],
     
125.                                                &exps [ i ] ) );
     
126.             UF_CALL ( UF_SO_create_scalar_exp
     3 p1 Q& Q: t, P0 H! |
127.                       (
     $ ]4 N- ~: p& B' {) G
128.                           exps [ i ],
     . c% M& W, y- O) ]& s5 J
129.                           UF_SO_update_after_modeling,
     " L- o, p) h" K- [
130.                           exps [ i ],
     ( c5 @& M: U! |
131.                           &scalars [ i ]
     
132.                     ) );
     
133.             UF_CALL ( UF_SO_create_point_on_curve
     1 H7 a- i* O% C4 q. G1 b3 z& c) t
134.                       (
     
135.                           edges [ i ],
     
136.                           UF_SO_update_after_modeling,
     
137.                           edges [ i ],
     
138.                           scalars [ i ],
     
139.                           &points [ i ]
     0 M5 Y& X' @4 I7 X9 ]0 R: v
140.                     ) );
     . m, m/ i: c% P9 ^1 T' J$ n
141.         }
     ' v, m: i) T# y2 Y; T0 m* M. Y
142.         UF_CALL ( UF_SO_create_arc_center_2_pnts
     : d# F  t; q- f1 I
143.                  (
     , }" z) f+ t) f% F* p! F
144.                       points [ 0 ],
     + x: H# x2 R" ~
145.                       UF_SO_update_after_modeling,
     ( C- Z# H' ?. K7 `
146.                       points,
     
147.                       &arc
     9 W2 f! }% M' w. U& N! d
148.                   ) );
     8 x8 Y( h) i1 B* L+ s. x: P/ E
149.     }
     # w* X: y0 F7 K  R( }/ y
150.         
     % I3 \, |9 t5 r$ H8 R0 K
151.     /*
     
152.        Smart objects are created as invisible objects by
     
153.        default.  UF_SO_set_visibility_option ( ) can be
     & F7 L" K7 n  E. A  Q/ @8 f  y5 ?0 ^4 y
154.        used to make them visible in the graphics window.
     / {6 q( V, b# D
155.     */
     2 b8 F7 b2 P  Q
156.     UF_CALL ( UF_SO_set_visibility_option ( line,
     
157.                                             UF_SO_visible ) );
     
158.     UF_CALL ( UF_SO_set_visibility_option ( arc,  
     
159.                                             UF_SO_visible ) );
     
160.     /*  
     
161.         Get line/arc/edge evaluators.
     ' o- I4 u2 |4 m8 F
162.     */
     0 M$ M0 C3 a8 K+ c) ~8 p
163.     UF_CALL ( UF_EVAL_initialize ( line, &line_evaluator ) );
     
164.     UF_CALL ( UF_EVAL_initialize ( arc,  &arc_evaluator ) );
     
165.     UF_CALL ( UF_EVAL_initialize ( edge, &edge_evaluator ) );
     
166.     show_edge_points(line_evaluator, 10);
     ' p: y. H' d8 d: z$ e% _- u
167.     show_edge_points(arc_evaluator, 10);
     # C4 E$ U' k; ]1 _7 d2 J* t; g
168.     show_edge_points(edge_evaluator, 10);
     9 k& ^4 t+ g# f7 p. }- z9 W4 h! v
169.     /*  
     6 l" R) j1 S7 F' [8 |1 D% C. \
170.         Get line/arc/edge data.
     
171.     */
     
172.     {
     1 _7 O7 H% @6 J# D; P! C" A
173.         UF_EVAL_line_t line_data;
     0 j# [6 N; C- N
174.         UF_EVAL_arc_t  arc_data;
     9 y) ^; Q3 X7 n! O+ K3 i, l
175.         UF_EVAL_line_t edge_data;
     
176.         UF_CALL ( UF_EVAL_ask_line ( line_evaluator,
     
177.                                      &line_data ) );
     
178.         UF_CALL ( UF_EVAL_ask_arc  ( arc_evaluator,  
     / g3 V' n$ Q) k1 M
179.                                      &arc_data ) );
     6 ^, t5 ~. W) x
180.         UF_CALL ( UF_EVAL_ask_line ( edge_evaluator,  
     1 \" E# ~, @/ F) ]- g# O/ |% |
181.                                      &edge_data ) );
     - ^+ R6 k; `. T$ O
182.     }
     
183.     /*  
     1 I8 [7 f' N2 S, O
184.         Check line/arc/edge periodicity.
     
185.     */
     
186.     {
     
187.         logical is_periodic;
     2 Y: f8 E8 `5 r$ v3 Y
188.         
     4 m9 D) ~3 s) I5 u8 m
189.         UF_CALL ( UF_EVAL_is_periodic ( line_evaluator,
     ( s7 g: T  A6 c3 @
190.                                         &is_periodic ) );
     
191.         UF_CALL ( UF_EVAL_is_periodic ( arc_evaluator,  
     . m2 f/ J/ m. }  x; W
192.                                         &is_periodic ) );
     6 T+ o0 ~1 U) d/ t4 {0 q7 J' |
193.         UF_CALL ( UF_EVAL_is_periodic ( edge_evaluator,  
     
194.                                         &is_periodic ) );
     
195.     }
     
196. /*  
     * m, M& \/ `$ G
197.         Evaluate line/arc/edge.
     
198. */
     * b. G- S& g' e2 i' D6 j' c
199.     {
     . j( X* [/ ^- G! Y
200.         double limits [ 2 ];        
     
201.         double mid_t;
     - }  Y' t" J; `- W7 S4 J
202.         double point [ 3 ];
     ( P! @( a. ?& a3 A8 i2 \
203.         double derivative [ 3 ];
     
204.         double tangent [ 3 ];
     7 p% _9 w) `* h2 k
205.         double normal [ 3 ];
     : C) c. V+ T- x4 o  R  \. B
206.         double binormal [ 3 ];
     2 Q4 ]1 V) G( C0 u) @) i- ~* ?
207.         UF_CALL ( UF_EVAL_ask_limits ( line_evaluator, limits ) );
     0 |" m+ w8 Y4 Y7 F; J
208.         mid_t = ( limits [ 1 ] + limits [ 0 ] ) / 2.0;
     
209.         UF_CALL ( UF_EVAL_evaluate ( line_evaluator,
     
210.                                      1,
     
211.                                      mid_t,
     8 ]/ Q; q% ?  T% {$ e
212.                                      point,
     8 B  ~7 u, v2 H3 |- K9 `7 p% K3 \* r
213.                                      derivative ) );
     3 o# ~0 Z  n/ m" c# f% A
214.                   
     + F% [+ a8 a  M# }
215.         UF_CALL ( UF_EVAL_evaluate_unit_vectors ( line_evaluator,
     
216.                                                   mid_t,
     7 j2 l9 E* a9 U: |  q2 y! d% `% M1 m3 _
217.                                                   point,
     9 a+ \% y0 n7 ~7 u
218.                                                   tangent,
     
219.                                                   normal,
     6 A/ |$ B9 b& X
220.                                                   binormal ) );
     
221.         UF_CALL ( UF_EVAL_ask_limits ( arc_evaluator, limits ) );
     
222.         mid_t = ( limits [ 1 ] + limits [ 0 ] ) / 2.0;
     
223.         
     ! u9 N8 g) l1 _3 _
224.         UF_CALL ( UF_EVAL_evaluate ( arc_evaluator,
     
225.                                      1,
     
226.                                      mid_t,
     , W& n5 b, {. e, o8 e8 G  U
227.                                      point,
     ' J1 \4 I+ o. H) a4 a+ D
228.                                      derivative ) );
     9 ^) {* V0 {9 @% ]
229.         
     ' C+ d' W* p# t6 H, P
230.         UF_CALL ( UF_EVAL_evaluate_unit_vectors ( arc_evaluator,
     & H; m0 q4 w7 h  S
231.                                                   mid_t,
     
232.                                                   point,
     * q& b' S- ], {0 l5 Q
233.                                                   tangent,
     , V: C+ v3 F! G) h) R1 }
234.                                                   normal,
     8 L6 z; p+ Z: M) X
235.                                                   binormal ) );
     
236.         UF_CALL ( UF_EVAL_ask_limits ( edge_evaluator, limits ) );
     
237.         mid_t = ( limits [ 1 ] + limits [ 0 ] ) / 2.0;
     
238.         UF_CALL ( UF_EVAL_evaluate ( edge_evaluator,
     
239.                                      1,
     
240.                                      mid_t,
     ! e! [3 W* M# V- C% h6 \! y0 L
241.                                      point,
     
242.                                      derivative ) );
     
243.         UF_CALL ( UF_EVAL_evaluate_unit_vectors ( edge_evaluator,
     . V* K+ _) F. F2 S, s( M, v* W- {1 h
244.                                                   mid_t,
     
245.                                                   point,
     - {& Z+ [* R( b7 W! Y
246.                                                   tangent,
     - @$ c: G2 `/ C3 x+ d! Y) k
247.                                                   normal,
     # V* T7 y0 N8 h, x; `& T7 H
248.                                                   binormal ) );
     ! w- S0 ?) C. w3 J5 V5 a
249.     }
     ) ?# Z# Y2 d/ F5 h
250.     /*  
     ; L9 d" G( N( B: w2 O! M  Q
251.         Check line/arc/edge equality of evaluators.
     & P. z( X& r2 e3 {, l, r3 i
252.     */
     
253.     {
     
254.         logical is_equal;
     
255.         UF_EVAL_p_t line_evaluator_copy;
     
256.         UF_CALL ( UF_EVAL_copy ( line_evaluator,
     ' F* U' O/ p9 u
257.                                  &line_evaluator_copy ) );
     6 q8 J3 T+ K  F1 n5 A; E
258.         UF_CALL ( UF_EVAL_is_equal ( line_evaluator,
     
259.                                      line_evaluator_copy,
     % t9 Z  m1 W$ e/ k$ j4 f
260.                                      &is_equal ) );
     " {5 I6 O* K0 a5 t1 R1 Z
261.         UF_CALL ( UF_EVAL_free ( line_evaluator_copy ) );
     
262.         UF_CALL ( UF_EVAL_is_equal ( line_evaluator,
     
263.                                      arc_evaluator,
     ! A* A% \  F- d+ I5 u3 \+ _) ~& ?
264.                                      &is_equal ) );
     ) ?% s& f1 h: M0 T! W. N8 m
265.         UF_CALL ( UF_EVAL_is_equal ( line_evaluator,
     6 F4 O( a4 U+ a0 P8 ]" V
266.                                      edge_evaluator,
     
267.                                      &is_equal ) );
     ! m0 d0 k& m; W* N6 o& h) C
268.     }
     
269.     /*  
     
270.         Check line/arc/edge type.
     
271.     */
     " Y5 H$ v$ D9 C( d3 l
272.     {
     ; Q  E5 ^! A2 m+ v0 A! Q: ?0 t
273.         logical is_line;
     & d5 r5 S8 g# O
274.         logical is_arc;
     
275.         UF_CALL ( UF_EVAL_is_line ( line_evaluator, &is_line ) );
     
276.         UF_CALL ( UF_EVAL_is_arc  ( line_evaluator, &is_arc ) );
     0 }/ ^3 e8 E( N
277.         UF_CALL ( UF_EVAL_is_arc  ( arc_evaluator,  &is_arc ) );
     
278.         UF_CALL ( UF_EVAL_is_line ( arc_evaluator,  &is_line ) );
     
279.         UF_CALL ( UF_EVAL_is_arc  ( edge_evaluator, &is_arc ) );
     
280.         UF_CALL ( UF_EVAL_is_line ( edge_evaluator, &is_line ) );
     
281.     }
     ; {3 \# h) w/ d! b7 ]
282.     UF_CALL ( UF_EVAL_free ( line_evaluator ) );
     
283.     UF_CALL ( UF_EVAL_free ( arc_evaluator ) );
     
284.     UF_CALL ( UF_EVAL_free ( edge_evaluator ) );
     ! H9 Z( l9 _2 n' p! d
285.     UF_CALL ( UF_terminate ( ) );
     2 ^* ]1 ]1 T& ]' L) @2 y" ~, u
286. }
     
287. 
     * s: Z& h1 N. H7 Y7 `2 W: B8 O
288. /* This function will disply n_pts equally spaced along the
     
289.    input curve.
     
290. */
     7 m) t: e8 E3 N0 D* D7 E% b2 L
291. static void show_edge_points(UF_EVAL_p_t eval, int n_pts)
     
292. {
     ) W: H# m+ D9 z) F% k
293.     int ii;
     
294.     double limits[2], p, point[3], end_parameter, start_parameter;
     * ^3 ^+ E/ i0 l
295.     UF_OBJ_disp_props_t
     % m/ h" E% A5 N! T9 w5 V9 z+ X) X
296.         attrib = { 1, UF_OBJ_WHITE, UF_OBJ_NOT_BLANKED, UF_OBJ_WIDTH_NORMAL,
     9 {2 x, Z. o2 Y0 M" I( h
297.             UF_OBJ_FONT_SOLID, FALSE};
     * ]% D# \  t4 D0 ?, Q) Y: Y. b/ D# d
298. 
     
299.     UF_CALL(UF_EVAL_ask_limits(eval, limits));
     % G" m" H& q( Z% s: B
300.     printf ( "limit0 = %f\n", limits[0] );
     
301.     printf ( "limit1 = %f\n", limits[1] );
     
302.     start_parameter = limits[0];
     
303.     end_parameter = limits[1];
     
304. 
     
305.     for (ii = 0; ii < n_pts; ii++)
     
306.     {
     + y) k. ~8 I! ?. i+ h; L' J
307.         p =start_parameter + ii*((end_parameter - start_parameter)/(n_pts - 1));
     
308.         printf ( "evaluate = %f\n", p );
     
309.         UF_CALL(UF_EVAL_evaluate(eval, 0, p, point, NULL));
     
310.         UF_CALL(UF_DISP_display_temporary_point(NULL_TAG,
     " w1 `* I& s3 v
311.             UF_DISP_USE_ACTIVE_PLUS, point, &attrib, UF_DISP_POINT));
     
312.     }
     
313. 
       `( ^8 F9 O0 R) ~' E& L' y0 X
314. }
     6 [5 y/ z5 U$ h! T9 O" _0 [

复制代码