00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00041 #include <stdio.h>
00042 #ifndef __UNIX_
00043 #include <stdlib.h>
00044 #endif
00045 #include "mensagem.h"
00046 #include "memvirtu.h"
00047 #include "lowparam.h"
00048 #include "lowmacro.h"
00049 #include "lowsolid.h"
00050 #include "eulerops.h"
00051 #include "mancommd.h"
00052 #include "vectorop.h"
00053 #include "lowgeome.h"
00054
00055 #ifdef __Extended_Version
00056 void MSD_execRingMove(void)
00057 {
00058 int sn, v1, v2, f1, f2, out, op;
00059
00060 while (sscanf(restbuf, "%d %d %d %d %d %d %d", &sn, &op, &v1, &v2,
00061 &f1, &f2, &out) != 7)
00062 {
00063 printf("ringmv: Sid v1 v2 f1 f2 out");
00064 if (!lineins("? "))
00065 {
00066 return;
00067 }
00068 }
00069 MSD_highRingMove(sn, v1, v2, f1, f2, out);
00070 }
00071
00072 #endif
00073
00074 int MSD_highRingMove(Id sn, Id v1, Id v2, Id f1, Id f2, int out)
00075 {
00076 SPTYPE s;
00077 FPTYPE ff1;
00078 FPTYPE ff2;
00079 LPTYPE move_l;
00080 HPTYPE dum;
00081
00082 if ((s = MSD_getSolid(sn)) == SNIL)
00083 {
00084 fprintf(stderr, MEN_NaoEncontrouSolido, NAM_RingMove, sn);
00085 return(ERROR);
00086 }
00087 if ((ff1 = MSD_getFace(s, f1)) == FNIL)
00088 {
00089 fprintf(stderr, MEN_NaoEncontrouFace, NAM_RingMove, f1, sn);
00090 return(ERROR);
00091 }
00092 if ((ff2 = MSD_getFace(s, f2)) == FNIL)
00093 {
00094 fprintf(stderr, MEN_NaoEncontrouFace, NAM_RingMove, f2, sn);
00095 return(ERROR);
00096 }
00097
00098 move_l = v2 != 0 ? MSD_getEdge(ff1, v1, v2, &dum) : MSD_getLoop(ff1, v1, &dum);
00099 if (move_l == LNIL)
00100 {
00101 fprintf(stderr, MEN_NaoEncontrouArestaV, NAM_RingMove, v1, v2, sn);
00102 return(ERROR);
00103 }
00104 return(MSD_lowRingMove(ff1, ff2, move_l, out));
00105 }
00106
00107 int MSD_lowRingMove(FPTYPE f1, FPTYPE f2, LPTYPE l, int out)
00108 {
00109 SPTYPE s;
00110 Id v1, v2, ff1, ff2;
00111 int flag;
00112
00113 assert(LooLFace(l) == f1);
00114
00115 s = SheSSolids(FacFShell(f1));
00116 if (Gdoinversion)
00117 {
00118 s = SheSSolids(FacFShell(f1));
00119 v1 = VerVertexNo(HalVtx(LooLEdg(l)));
00120 v2 = HalEdg(LooLEdg(l)) != ENIL ? VerVertexNo(HalVtx(HalNxt(LooLEdg(l)))) : 0;
00121 ff2 = FacFaceNo(f2);
00122 ff1 = FacFaceNo(f1);
00123 flag = l == FacFLOut(f1) ? TRUE : FALSE;
00124 MSD_lowAddEulerOp(s, RMOVE, v1, v2, ff2, ff1, flag, 0, 0, 0, 0.0, 0.0, 0.0, 0.0);
00125 }
00126 if (Gdodirect)
00127 {
00128 ff2 = FacFaceNo(f2);
00129 ff1 = FacFaceNo(f1);
00130 v1 = VerVertexNo(HalVtx(LooLEdg(l)));
00131 v2 = HalEdg(LooLEdg(l)) != ENIL ? VerVertexNo(HalVtx(HalNxt(LooLEdg(l)))) : 0;
00132 MSD_lowAddEulerOpRedo(s, RMOVE, v1, v2, ff1, ff2, out, 0, 0, 0,
00133 0.0, 0.0, 0.0, 0.0);
00134 }
00135
00136 if (FacFLOut(f1) == l)
00137 {
00138 FacFLOut(f1) = InnerLoop(f1);
00139 }
00140 MSD_lowDelList(LOOP, (NPTYPE)l, (NPTYPE)f1);
00141 MSD_lowAddList(LOOP, (NPTYPE)l, (NPTYPE)f2);
00142 if (out)
00143 {
00144 FacFLOut(f2) = l;
00145 }
00146
00147 if (SetTrace)
00148 {
00149 if (TraceSolid(s))
00150 {
00151 fprintf(stderr, MEN_MSDAbortou, NAM_RingMove);
00152 fprintf(stderr, "solid = %ld", SolSolidNo(s));
00153 fprintf(stderr, "ArrayBottom[SOLID] = %ld", ArrayBottom[SOLID]);
00154 exit(1);
00155 }
00156 }
00157 return(SUCCESS);
00158 }
00159
00160 int MSD_execStructRingMove(EulerOp *op)
00161 {
00162 Id sid, id1, id2, id3, id4, id5;
00163
00164 sid = op->solidno;
00165 id1 = op->ip1;
00166 id2 = op->ip2;
00167 id3 = op->ip3;
00168 id4 = op->ip4;
00169 id5 = op->ip5;
00170 return(MSD_highRingMove(sid, id1, id2, id3, id4, id5));
00171 }
00172
00173 void MSD_printStructRingMove(FILE *f, EulerOp *op)
00174 {
00175 Id sid, id1, id2, id3, id4, id5;
00176 int com;
00177
00178 sid = op->solidno;
00179 id1 = op->ip1;
00180 id2 = op->ip2;
00181 id3 = op->ip3;
00182 id4 = op->ip4;
00183 id5 = op->ip5;
00184 com = op->CommandCount;
00185 fprintf(f, "rmove %d %d %d %d %d %d %d \n", sid, com, id1, id2, id3, id4, id5);
00186 }
00187
00188 int MSD_readStructRingMove(FILE *f, EulerOp *op)
00189 {
00190 int solidno, ip1, ip2, ip3, ip4, ip5, com;
00191
00192 if (fscanf(f, "%d %d %d %d %d %d\n", &solidno, &com, &ip1, &ip2, &ip3, &ip4,
00193 &ip5) != 7)
00194 {
00195 return(ERROR);
00196 }
00197 op->solidno = solidno;
00198 op->CommandCount = com;
00199 op->ip1 = ip1;
00200 op->ip2 = ip2;
00201 op->ip3 = ip3;
00202 op->ip4 = ip4;
00203 op->ip5 = ip5;
00204 op->ip6 = 0;
00205 op->ip7 = 0;
00206 op->ip8 = 0;
00207 op->fp1 = 0.0;
00208 op->fp2 = 0.0;
00209 op->fp3 = 0.0;
00210 op->fp4 = 0.0;
00211 return(SUCCESS);
00212 }
00213
00214 int MSD_modifyStructRingMove(EulerOp *op)
00215 {
00216 int solidno;
00217
00218 solidno = MSD_lowCheckTranslatorTable(op->solidno, SOLID);
00219 op->solidno = solidno;
00220 return(SUCCESS);
00221 }
00222
00223 #ifdef __Extended_Version
00224 void MSD_execAllRingMove(void)
00225 {
00226 int sn, f1, f2;
00227
00228 while (sscanf(restbuf, "%d %d %d", &sn, &f1, &f2) != 3)
00229 {
00230 printf("aringmv: Sid f1 f2");
00231 if (!lineins("? "))
00232 {
00233 return;
00234 }
00235 }
00236 MSD_highAllRingMove(sn, f1, f2);
00237 }
00238
00239 #endif
00240
00241 int MSD_highAllRingMove(Id sn, Id f1, Id f2)
00242 {
00243 SPTYPE s;
00244 FPTYPE ff1;
00245 FPTYPE ff2;
00246
00247 if ((s = MSD_getSolid(sn)) == SNIL)
00248 {
00249 fprintf(stderr, MEN_NaoEncontrouSolido, NAM_AllRingMove, sn);
00250 return(ERROR);
00251 }
00252 if ((ff1 = MSD_getFace(s, f1)) == FNIL)
00253 {
00254 fprintf(stderr, MEN_NaoEncontrouFace, NAM_AllRingMove, f1, sn);
00255 return(ERROR);
00256 }
00257 if ((ff2 = MSD_getFace(s, f2)) == FNIL)
00258 {
00259 fprintf(stderr, MEN_NaoEncontrouFace, NAM_AllRingMove, f2, sn);
00260 return(ERROR);
00261 }
00262 return(MSD_lowAllRingMove(ff1, ff2));
00263 }
00264
00265 int MSD_lowAllRingMove(FPTYPE f1, FPTYPE f2)
00266 {
00267 SPTYPE s;
00268 LPTYPE l;
00269 LPTYPE ll;
00270 Id v1, v2, ff1, ff2;
00271 int drop, flag;
00272
00273 s = SheSSolids(FacFShell(f1));
00274 MSD_lowFaceEq(FacFLOut(f1), FacFeq(f1));
00275 drop = getdrop(FacFeq(f1));
00276
00277 for (l = ll = FacFLoops(f1); l != LNIL; l = ll)
00278 {
00279 ll = LooNextL(l);
00280 if (l != FacFLOut(f1))
00281 {
00282 if (MSD_lowFacVtxCoordContainment(f1, HalVtx(LooLEdg(l)), drop) == 0)
00283 {
00284 if (Gdoinversion)
00285 {
00286 v1 = VerVertexNo(HalVtx(LooLEdg(l)));
00287 v2 = HalEdg(LooLEdg(l)) ? VerVertexNo(HalVtx(HalNxt(LooLEdg(l)))) : 0;
00288 ff2 = FacFaceNo(f2);
00289 ff1 = FacFaceNo(f1);
00290 flag = l == FacFLOut(f1) ? TRUE : FALSE;
00291 MSD_lowAddEulerOp(s, RMOVE, v1, v2, ff2, ff1, flag,
00292 0, 0, 0, 0.0, 0.0, 0.0, 0.0);
00293 }
00294 MSD_lowDelList(LOOP, (NPTYPE)l, (NPTYPE)f1);
00295 MSD_lowAddList(LOOP, (NPTYPE)l, (NPTYPE)f2);
00296 }
00297 }
00298 }
00299
00300 if (SetTrace)
00301 {
00302 if (TraceSolid(s))
00303 {
00304 fprintf(stderr, MEN_MSDAbortou, NAM_AllRingMove);
00305 exit(1);
00306 }
00307 }
00308 return(SUCCESS);
00309 }