connect.cpp 21.5 KB
Newer Older
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
		/*************************************************************/
		/******************* editeur de PCB **************************/
		/*  traitement du Chevelu: routines de calcul des connexions */
		/*************************************************************/

#include "fctsys.h"
#include "gr_basic.h"

#include "common.h"
#include "pcbnew.h"
#include "autorout.h"

#include "protos.h"


/* variables locales */

/* routines exportees */
void Recalcule_all_net_connexion(wxDC * DC);

/* Routines locales */
static void propage_equipot(TRACK* pt_start_conn,TRACK* pt_end_conn) ;
static void calcule_connexite_1_net(TRACK* pt_start_conn,TRACK* pt_end_conn);
static void RebuildTrackChain(BOARD * pcb);
static int tri_par_netcode(TRACK ** pt_ref, TRACK ** pt_compare);

/*..*/


/*****************************************************************/
static int change_equipot(TRACK* pt_start_conn,TRACK* pt_end_conn,
			int old_val, int new_val)
/*****************************************************************/
/*
 Change les num locaux d'equipot old valeur en new valeur
 retourne le nombre de changements
	si pt_end_conn = NULL: recherche jusqu'a fin de chaine
*/
{
TRACK * pt_conn;
int nb_change = 0 ;
D_PAD * pt_pad;

	if( old_val == new_val) return(0) ;

46
	if( (old_val > 0) && (old_val < new_val) ) EXCHG(old_val,new_val) ;
47 48 49

	pt_conn = pt_start_conn;
	for ( ; pt_conn != NULL; pt_conn= (TRACK*) pt_conn->Pnext)
50
	{
51
		if( pt_conn->m_Sous_Netcode != old_val)
52
		{
53 54
			if(pt_conn == pt_end_conn) break;
			continue;
55
		}
56 57 58 59 60

		nb_change++;
		pt_conn->m_Sous_Netcode = new_val ;

		if( pt_conn->start && ( pt_conn->start->m_StructType == TYPEPAD) )
61
		{
62 63 64
			pt_pad = (D_PAD*)(pt_conn->start);
			if(pt_pad->m_physical_connexion == old_val)
				pt_pad->m_physical_connexion = pt_conn->m_Sous_Netcode;
65
		}
66 67

		if( pt_conn->end &&	(pt_conn->end->m_StructType == TYPEPAD) )
68
		{
69 70 71 72
			pt_pad = (D_PAD*)(pt_conn->end);
			if(pt_pad->m_physical_connexion == old_val)
				pt_pad->m_physical_connexion = pt_conn->m_Sous_Netcode;
		}
73 74
		if(pt_conn == pt_end_conn) break;
	}
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 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553
	return(nb_change);
}

/******************************************************************/
static void propage_equipot(TRACK* pt_start_conn,TRACK* pt_end_conn)
/******************************************************************/
/* balaye la liste des SEGMENTS de PISTE
	- debut = pt_start_conn
	- fin	 = pt_end_conn (pointe le dernier segment a analyser)
	pour attribuer ou propager un numero d'equipotentielle par
	blocs de connexions existantes
	la zone balayee est supposee appartenir au meme net, c'est a dire que
	les segments de pistes sont tries par net_code
*/
{
TRACK * pt_conn;
int sous_net_code ;
D_PAD * pt_pad;
TRACK * pt_autre_piste;
EDA_BaseStruct * PtStruct;

	/* Initialisations prealables */
	pt_conn = pt_start_conn;
	for ( ; pt_conn != NULL; pt_conn= (TRACK*) pt_conn->Pnext)
	{
		pt_conn->m_Sous_Netcode = 0;
		PtStruct = pt_conn->start;
		if( PtStruct && (PtStruct->m_StructType == TYPEPAD) )
			((D_PAD*)PtStruct)->m_physical_connexion = 0;

		PtStruct = pt_conn->end;
		if( PtStruct && (PtStruct->m_StructType == TYPEPAD) )
			((D_PAD*)PtStruct)->m_physical_connexion = 0;

		if (pt_conn == pt_end_conn) break;
	}
	sous_net_code = 1 ; pt_start_conn->m_Sous_Netcode = sous_net_code;

	/* debut du calcul de propagation */
	pt_conn = pt_start_conn;
	for ( ; pt_conn != NULL; pt_conn= (TRACK*) pt_conn->Pnext)
	{
		/* Traitement des connexions a pads */
		PtStruct = pt_conn->start;
		if( PtStruct && (PtStruct->m_StructType == TYPEPAD) )
				/* la connexion debute sur 1 pad */
		{
			pt_pad = (D_PAD*) PtStruct;
			if( pt_conn->m_Sous_Netcode) /* la connexion fait deja partie d'une chaine */
			{
				if(pt_pad->m_physical_connexion > 0) /* le pad fait aussi partie d'une chaine */
				{
					change_equipot(pt_start_conn,pt_end_conn,
						pt_pad->m_physical_connexion,pt_conn->m_Sous_Netcode);
				}
				else pt_pad->m_physical_connexion = pt_conn->m_Sous_Netcode;
			}
			else	/* la connexion ne fait pas partie encore d'une chaine */
			{
				if(pt_pad->m_physical_connexion > 0)
				{
					pt_conn->m_Sous_Netcode = pt_pad->m_physical_connexion;
				}
				else
				{
					sous_net_code++ ; pt_conn->m_Sous_Netcode = sous_net_code;
					pt_pad->m_physical_connexion = pt_conn->m_Sous_Netcode;
				}
			}
		}

		PtStruct = pt_conn->end;
		if( PtStruct && (PtStruct->m_StructType == TYPEPAD) )
				 /* la connexion finit sur 1 pad */
		{
			pt_pad = (D_PAD*)PtStruct;
			if( pt_conn->m_Sous_Netcode)
			{
				if(pt_pad->m_physical_connexion > 0)
				{
					change_equipot(pt_start_conn,pt_end_conn,
						pt_pad->m_physical_connexion,pt_conn->m_Sous_Netcode);
				}
				else pt_pad->m_physical_connexion = pt_conn->m_Sous_Netcode;
			}
			else
			{
				if(pt_pad->m_physical_connexion > 0)
				{
					pt_conn->m_Sous_Netcode =  pt_pad->m_physical_connexion;
				}
				else
				{
					sous_net_code++ ; pt_conn->m_Sous_Netcode = sous_net_code;
					pt_pad->m_physical_connexion = pt_conn->m_Sous_Netcode;
				}
			}
		}


		/* traitement des connexions entre segments */
		PtStruct = pt_conn->start;
		if( PtStruct && (PtStruct->m_StructType != TYPEPAD) )
			{  /* debut sur une autre piste */
			pt_autre_piste = (TRACK*)PtStruct;

			if(pt_conn->m_Sous_Netcode)  /* La connexion fait deja partie d'un block */
				{
				if(pt_autre_piste->m_Sous_Netcode)
					{
					change_equipot(pt_start_conn,pt_end_conn,
							pt_autre_piste->m_Sous_Netcode,pt_conn->m_Sous_Netcode);
					}
				else
					{
					pt_autre_piste->m_Sous_Netcode = pt_conn->m_Sous_Netcode;
					}
				}

			else	   /* La connexion ne fait partie d'aucun block */
				{
				if(pt_autre_piste->m_Sous_Netcode)
					{
					pt_conn->m_Sous_Netcode = pt_autre_piste->m_Sous_Netcode;
					}
				else
					{
					sous_net_code++ ; pt_conn->m_Sous_Netcode = sous_net_code;
					pt_autre_piste->m_Sous_Netcode = pt_conn->m_Sous_Netcode;
					}
				}
			}

		PtStruct = pt_conn->end;
		if( PtStruct && (PtStruct->m_StructType != TYPEPAD) )
			{  /* fin connectee a une autre piste */
			pt_autre_piste = (TRACK*) PtStruct;
			if(pt_conn->m_Sous_Netcode)  /* La connexion fait deja partie d'un block */
				{
				if(pt_autre_piste->m_Sous_Netcode)
					{
					change_equipot(pt_start_conn,pt_end_conn,
								pt_autre_piste->m_Sous_Netcode,pt_conn->m_Sous_Netcode);
					}
				else pt_autre_piste->m_Sous_Netcode = pt_conn->m_Sous_Netcode;
				}
			else	/* La connexion ne fait partie d'aucun block */
				{
				if(pt_autre_piste->m_Sous_Netcode)
					{
					pt_conn->m_Sous_Netcode = pt_autre_piste->m_Sous_Netcode;
					}
				else
					{
					sous_net_code++ ; pt_conn->m_Sous_Netcode = sous_net_code;
					pt_autre_piste->m_Sous_Netcode = pt_conn->m_Sous_Netcode;
					}
				}
			}
		if (pt_conn == pt_end_conn) break;
		}
}

/***************************************************/
void WinEDA_BasePcbFrame::test_connexions(wxDC * DC )
/***************************************************/
/*
Routine recherchant les connexions deja faites et mettant a jour
le status du chevelu ( Bit CH_ACTIF mis a 0 si connexion trouvee
Les pistes sont supposees etre triees par ordre de net_code croissant
*/
{
TRACK * pt_start_conn, * pt_end_conn;
int ii ;
LISTE_PAD * pt_pad;
int current_net_code;

	/* Etablissement des equipotentielles vraies */
	pt_pad = m_Pcb->m_Pads;
	for( ii = 0; ii < m_Pcb->m_NbPads; ii++ , pt_pad++)
		{
		(*pt_pad)->m_physical_connexion = 0 ;
		}

	////////////////////////////
	// Calcul de la connexite //
	////////////////////////////

	/*  Les pointeurs .start et .end sont mis a jour, si la
		 connexion est du type segment a segment
	*/

	pt_start_conn = m_Pcb->m_Track;
	while(pt_start_conn != NULL)
		{
		current_net_code =  pt_start_conn->m_NetCode;
		pt_end_conn = pt_start_conn->GetEndNetCode(current_net_code);

		/* Calcul des connexions type segment du net courant */
		calcule_connexite_1_net(pt_start_conn, pt_end_conn);

		pt_start_conn = (TRACK*)pt_end_conn->Pnext;
		}

	return;
}

/**************************************************************/
void WinEDA_BasePcbFrame::Recalcule_all_net_connexion(wxDC * DC)
/**************************************************************/
/*
	Routine Recalculant les pointeurs sur connexions types piste a piste
	relatives a tous les nets.
	Cette routine est utilisee apres reclassement des segments de piste par
	ordre de net_code, puisque des pointeurs sur connexions deviennent faux
	( les pointeurs type pad restent bons )
*/
{
TRACK * EndConn;
int net_code, net_code_max;

	if(m_Pcb->m_Track == NULL ) return;

	/* calcul du net_code max */
	EndConn = m_Pcb->m_Track;
	while( EndConn->Pnext) EndConn = (TRACK*)EndConn->Pnext;
	net_code_max = EndConn->m_NetCode;

	for ( net_code = 0; net_code <= net_code_max; net_code++ )
		{
		test_1_net_connexion(DC, net_code);
		}
}

/*************************************************************************/
void WinEDA_BasePcbFrame::test_1_net_connexion(wxDC * DC,  int net_code)
/*************************************************************************/
/*
Routine recherchant les connexions deja faites relatives a 1 net
*/
{
TRACK * pt_start_conn, * pt_end_conn;
int ii, nb_net_noconnect = 0;
LISTE_PAD * pt_pad;
wxString msg;
	
	if(net_code == 0) return;

	if ( (m_Pcb->m_Status_Pcb & LISTE_CHEVELU_OK) == 0 )
		Compile_Ratsnest( DC, TRUE );

	pt_pad = (LISTE_PAD*)m_Pcb->m_Pads;
	for( ii = 0; ii < m_Pcb->m_NbPads; ii++ , pt_pad++)
		{
		int pad_net_code = (*pt_pad)->m_NetCode;
		if(pad_net_code < net_code) continue;
		if(pad_net_code > net_code) break;
		(*pt_pad)->m_physical_connexion = 0 ;
		}

	/* Determination des limites du net */
	if( m_Pcb->m_Track )
		{
		pt_end_conn = NULL;
		pt_start_conn = m_Pcb->m_Track->GetStartNetCode(net_code);

		if( pt_start_conn )
			pt_end_conn = pt_start_conn->GetEndNetCode(net_code);

		if( pt_start_conn && pt_end_conn ) // c.a.d. s'il y a des segments
			{
			calcule_connexite_1_net(pt_start_conn, pt_end_conn);
			}
		}

	/* Test des chevelus */
	nb_net_noconnect = Test_1_Net_Ratsnest(DC, net_code);

	/* Affichage des resultats */
	msg.Printf( wxT("links %d nc %d  net:nc %d"),
				 m_Pcb->m_NbLinks, m_Pcb->GetNumNoconnect(),
				 nb_net_noconnect);

	Affiche_Message(msg);
	return;
}



/***************************************************************************/
static void calcule_connexite_1_net(TRACK* pt_start_conn,TRACK* pt_end_conn)
/***************************************************************************/
/* calcule la connexite d'un net constitue de segments de piste consecutifs.
	Entree:
		pt_start_conn = adresse du 1er segment ( debut du net )
		pt_end_conn = adr de fin (dernier segment)
	Les connexions relatives aux pads doivent etre deja calculees, car elles
	ne sont pas ici recalculees ( pour des raisons de temps de calcul, et
	du fait que lors des modif de pistes, les pads ne sont pas touches
*/
{
TRACK * Track;

	/*  Les pointeurs .start et .end sont mis a jour, si la
		 connexion est du type segment a segment.
		la connexion sur pads est supposee etre deja calculee */

	/* Raz des pointeurs sur pistes */
	for( Track = pt_start_conn; Track != NULL; Track = (TRACK*) Track->Pnext)
		{
		Track->m_Sous_Netcode = 0;

		if( Track->GetState(BEGIN_ONPAD) == 0 ) Track->start = NULL;
		if( Track->GetState(END_ONPAD) == 0 ) Track->end = NULL;

		if (Track == pt_end_conn) break;
		}

	/* calcul des connexions */
	for( Track = pt_start_conn; Track != NULL; Track = (TRACK*) Track->Pnext)
	{
		if(Track->m_StructType == TYPEVIA)
		{
			TRACK* pt_segm;
			int layermask = Track->ReturnMaskLayer();
			for( pt_segm = pt_start_conn; pt_segm != NULL; pt_segm = (TRACK*) pt_segm->Pnext)
			{
				int curlayermask = pt_segm->ReturnMaskLayer();
				if( !pt_segm->start && (pt_segm->m_Start == Track->m_Start) &&
					 ( layermask & curlayermask ) )
				{
					pt_segm->start = Track;
				}
				if( !pt_segm->end && (pt_segm->m_End == Track->m_Start) &&
					(layermask & curlayermask) )
				{
					pt_segm->end = Track;
				}
				if( pt_segm == pt_end_conn ) break;
			}
		}

		if( Track->start == NULL )
		{
			Track->start = Locate_Piste_Connectee(Track, Track,pt_end_conn,START);
		}

		if( Track->end == NULL )
		{
			Track->end = Locate_Piste_Connectee(Track, Track,pt_end_conn,END);
		}
		if (Track == pt_end_conn) break;
	}

	/* Generation des sous equipots du net */
	propage_equipot(pt_start_conn,pt_end_conn);

}



	/********************************************/
	/* Reattribution des net_codes de reference */
	/********************************************/
/*
	reattribution des net_codes aux segments de pistes.
	Routine utilisee apres modification generale des noms de nets (apres
	lecrure netliste ou edition de nets sur pads, effacement /ajout de
	modules...)

	Elle se fait en 2 passes:
		1 - reattribution des segments commencant ( et/ou finissant ) sur 1 pad
			les autres segments sont mis a reference NULLE
		2 - reattribution des segments restantes a ref NULLE
*/

#define POS_AFF_CHREF 62
/* recherche le pad connecte a l'extremite de la piste de coord px, py
	parametres d'appel:
		px, py = coord du point tst
		masque_layer = couche(s) de connexion
		pt_liste = adresse de la liste des pointeurs de pads, tels que
		apparaissant apres build_liste_pad, mais classee par position X
		de pads croissantes.
	retourne : pointeur sur le pad connecte
	la routine travaille par dichotomie sur la liste des pads tries par pos X
croissante, elle est donc beaucoup plus rapide que Fast_Locate_Pad_connecte,
mais implique le calcul de cette liste.

(la liste placee en m_Pcb->m_Pads et elle triee par netcodes croissants)
*/

static D_PAD * SuperFast_Locate_Pad_Connecte( BOARD * pcb, LISTE_PAD * pt_liste,
									int px, int py, int masque_layer)
{
D_PAD * pad ;
LISTE_PAD * ptr_pad , * lim;
int nb_pad = pcb->m_NbPads;
int ii;
	lim = pt_liste + (pcb->m_NbPads - 1 );
	ptr_pad = pt_liste;
	while(nb_pad)
		{
		pad = * ptr_pad;
		ii = nb_pad;
		nb_pad >>= 1; if( (ii & 1) && ( ii > 1 ) ) nb_pad++;
		if( pad->m_Pos.x < px )	/* on doit chercher plus loin */
			{
			ptr_pad += nb_pad; if(ptr_pad > lim) ptr_pad = lim;
			continue;
			}
		if( pad->m_Pos.x > px )	/* on doit chercher moins loin */
			{
			ptr_pad -= nb_pad;
			if(ptr_pad < pt_liste) ptr_pad = pt_liste;
			continue;
			}

		if( pad->m_Pos.x == px )  /* zone de classement trouvee */
			{
			/* recherche du debut de la zone */
			while( ptr_pad >= pt_liste)
				{
				pad = * ptr_pad;
				if(pad->m_Pos.x == px) ptr_pad--;
				else break;
				}
			ptr_pad++;	/* pointe depart de zone a pad->m_Pos.x = px */

			for( ; ; ptr_pad++ )
				{
				if(ptr_pad > lim) return(NULL);			/* hors zone */
				pad = *ptr_pad;
				if( pad->m_Pos.x != px ) return(NULL);	/* hors zone */
				if( pad->m_Pos.y != py ) continue ;
				/* Pad peut-etre trouve ici: il doit etre sur la bonne couche */
				if (pad->m_Masque_Layer & masque_layer) return(pad) ;
				}
			}
		}
	return(NULL);
}


static int SortPadsByXCoord( void * pt_ref, void * pt_comp)
/* used to Sort a pad list by x coordinate value
*/
{
D_PAD * ref = *(LISTE_PAD*) pt_ref;
D_PAD * comp = *(LISTE_PAD*) pt_comp;
	return( ref->m_Pos.x - comp->m_Pos.x );
}

/****************************************************/
LISTE_PAD* CreateSortedPadListByXCoord(BOARD * pcb )
/****************************************************/
/* Create a sorted list of pointers to pads.
	This list is sorted by X ccordinate value.
	The list must be freed bu user
*/
{
LISTE_PAD* pad_list = (LISTE_PAD*) MyMalloc( pcb->m_NbPads * sizeof( D_PAD *) );
	memcpy(pad_list, pcb->m_Pads, pcb->m_NbPads* sizeof( D_PAD *) );
	qsort(pad_list, pcb->m_NbPads, sizeof( D_PAD *),
			(int(*)(const void *, const void *)) SortPadsByXCoord);
	return pad_list;
}

/******************************************************************/
void WinEDA_BasePcbFrame::reattribution_reference_piste(int affiche)
/******************************************************************/
{
TRACK  * pt_piste,
		* pt_next;
int a_color;
char new_passe_request = 1, flag;
LISTE_PAD * pt_mem;
EDA_BaseStruct * PtStruct;
int masque_layer;
554
wxString msg;
555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575

	if( m_Pcb->m_NbPads == 0 ) return;
	a_color = CYAN;
	if(affiche)
		Affiche_1_Parametre(this, POS_AFF_CHREF, wxT("DataBase"), wxT("Netcodes"),a_color);

	recalcule_pad_net_code();

	if(affiche) Affiche_1_Parametre(this, -1,wxEmptyString, wxT("Gen Pads "),a_color);

	//////////////////////////////////////////////////////
	// Connexion des pistes accrochees a 1 pad au moins //
	//////////////////////////////////////////////////////
	pt_mem = CreateSortedPadListByXCoord(m_Pcb);

	if(affiche)
		Affiche_1_Parametre(this, -1,wxEmptyString, wxT("Conn Pads"),a_color);

	/* Raz des flags particuliers des segments de piste */
	pt_piste = m_Pcb->m_Track;
	for ( ; pt_piste != NULL; pt_piste = (TRACK*) pt_piste->Pnext)
576
	{
577 578
		pt_piste->SetState(BUSY|EDIT|BEGIN_ONPAD|END_ONPAD, OFF);
		pt_piste->m_NetCode = 0;
579
	}
580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617

	pt_piste = m_Pcb->m_Track;
	for ( ; pt_piste != NULL; pt_piste = (TRACK*) pt_piste->Pnext)
		{
		flag = 0;
		masque_layer = g_TabOneLayerMask[pt_piste->m_Layer];

		/* y a t-il une pastille sur une extremite */
		pt_piste->start = SuperFast_Locate_Pad_Connecte(m_Pcb, pt_mem,
				pt_piste->m_Start.x, pt_piste->m_Start.y, masque_layer);
		if( pt_piste->start != NULL)
			{
			pt_piste->SetState( BEGIN_ONPAD, ON);
			pt_piste->m_NetCode = ((D_PAD*)(pt_piste->start))->m_NetCode;
			}

		pt_piste->end = SuperFast_Locate_Pad_Connecte(m_Pcb, pt_mem,
									pt_piste->m_End.x, pt_piste->m_End.y, masque_layer);

		if( pt_piste->end != NULL)
			{
			pt_piste->SetState(END_ONPAD, ON);
			pt_piste->m_NetCode = ((D_PAD*)(pt_piste->end))->m_NetCode;
			}

		}
	MyFree(pt_mem);

	////////////////////////////////////////////////////
	// Calcul de la connexite entre segments de piste //
	////////////////////////////////////////////////////

	/*  Les pointeurs .start et .end sont mis a jour, s'ils etaient NULLs.
		La connexion est alors du type segment a segment
	*/
	if(affiche)
		Affiche_1_Parametre(this, POS_AFF_CHREF,wxEmptyString, wxT("Conn Segm"), a_color);

618 619
	for ( pt_piste = m_Pcb->m_Track; pt_piste != NULL; pt_piste = pt_piste->Next())
	{
620
		if ( pt_piste->start == NULL )
621 622 623
		{
			pt_piste->start = Locate_Piste_Connectee(pt_piste, m_Pcb->m_Track,NULL,START);
		}
624 625

		if ( pt_piste->end == NULL )
626 627
		{
			pt_piste->end = Locate_Piste_Connectee(pt_piste, m_Pcb->m_Track,NULL,END);
628
		}
629
	}
630 631 632 633 634 635 636 637

	////////////////////////////////
	// Reattribution des net_code //
	////////////////////////////////

	a_color = YELLOW;

	while(new_passe_request)
638 639
	{
		bool reset_flag = FALSE;
640
		new_passe_request = 0;
641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664
		if(affiche)
		{
			msg.Printf( wxT("Net->Segm pass %d  "), new_passe_request+1);
			Affiche_1_Parametre(this, POS_AFF_CHREF,wxEmptyString, msg, a_color);
		}

		/* look for vias which could be connect many tracks */
		for ( TRACK * via = m_Pcb->m_Track; via != NULL; via = via->Next() )
		{
			if ( via->m_StructType != TYPEVIA ) continue;
			if ( via->m_NetCode > 0 ) continue;	// Netcode already known
			// Lock for a connection to a track with a known netcode
			pt_next = m_Pcb->m_Track;
			while ( (pt_next = Locate_Piste_Connectee(via, pt_next, NULL,START)) != NULL )
			{
				if (pt_next->m_NetCode )
				{
					via->m_NetCode = pt_next->m_NetCode;
					break;
				}
				pt_next->SetState(BUSY, ON);
				reset_flag = TRUE;
			}
		}
665

666
		if ( reset_flag ) for ( pt_piste = m_Pcb->m_Track; pt_piste != NULL; pt_piste = pt_piste->Next())
667
			{
668 669 670 671 672
				pt_piste->SetState(BUSY, OFF);
			}

		for ( pt_piste = m_Pcb->m_Track; pt_piste != NULL; pt_piste = pt_piste->Next())
		{
673 674 675
			/* Traitement du point de debut */
			PtStruct = (EDA_BaseStruct*)pt_piste->start;
			if( PtStruct && (PtStruct->m_StructType != TYPEPAD) )
676
			{	 // Begin on an other track segment
677 678
				pt_next = (TRACK*)PtStruct;
				if(pt_piste->m_NetCode)
679
				{
680
					if(pt_next->m_NetCode == 0)
681
					{
682 683 684
						new_passe_request = 1;
						pt_next->m_NetCode = pt_piste->m_NetCode;
					}
685
				}
686 687

				else
688
				{
689
					if(pt_next->m_NetCode != 0)
690
					{
691 692 693 694
						pt_piste->m_NetCode = pt_next->m_NetCode;
						new_passe_request = 1;
					}
				}
695
			}
696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722

			/* Localisation du point de fin */
			PtStruct = pt_piste->end;
			if( PtStruct &&(PtStruct->m_StructType != TYPEPAD) )
				{	 // End sur piste
				pt_next = (TRACK*)PtStruct;
				if(pt_piste->m_NetCode)
					{
					if(pt_next->m_NetCode == 0)
						{
						new_passe_request = 1;
						pt_next->m_NetCode = pt_piste->m_NetCode;
						}
					}
				else
					{
					if(pt_next->m_NetCode != 0)
						{
						pt_piste->m_NetCode = pt_next->m_NetCode;
						new_passe_request = 1;
						}
					}
				}
			}
		}

	/* Reclassemment des pistes par numero de net: */
723
	if( affiche ) Affiche_1_Parametre(this, -1,wxEmptyString, wxT("Reorder "),a_color);
724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781
	RebuildTrackChain(m_Pcb);

	if( affiche ) Affiche_1_Parametre(this, -1,wxEmptyString, wxT("         "),a_color);
}

/*
 routine de tri de connexion utilisee par la fonction QSORT
	le tri est fait par numero de net
*/
int tri_par_netcode(TRACK ** pt_ref, TRACK ** pt_compare)
{
int ii ;
	ii = (*pt_ref)->m_NetCode -(* pt_compare)->m_NetCode ;
	return(ii) ;
}



/*****************************************/
static void RebuildTrackChain(BOARD * pcb)
/*****************************************/
/* Recalcule le chainage des pistes pour que le chainage soit fait par
   netcodes croissants
*/
{
TRACK * Track, ** Liste;
int ii, nbsegm;

	/* Count segments */
	nbsegm = pcb->GetNumSegmTrack();
	if( pcb->m_Track == NULL ) return;

	Liste = (TRACK ** ) MyZMalloc( (nbsegm+1) * sizeof(TRACK*) );

	ii = 0; Track = pcb->m_Track;
	for( ; Track != NULL; ii++, Track = (TRACK*) Track->Pnext)
		{
		Liste[ii] = Track;
		}

	qsort(Liste, nbsegm, sizeof(TRACK*),
					 (int(*)(const void *, const void *)) tri_par_netcode);

	/* Update the linked list pointers */

	Track = Liste[0];
	Track->Pback = pcb; Track->Pnext = Liste[1];
	pcb->m_Track = Track;
	for( ii = 1; ii < nbsegm; ii++ )
		{
		Track = Liste[ii];
		Track->Pback = Liste[ii-1];
		Track->Pnext = Liste[ii+1];
		}

	MyFree(Liste);
}