// File: /workspace/github_c_makefile_star2_O1/mishun[P]plantri/fullgen.c
// Function: brille
void brille(int min_sechsecke, int max_sechsecke) 
{ 
int knotenzahl, pfadlaenge, s1ps2; 
int laenge_1, laenge_3; 
KNOTENTYP adresse_1[6], adresse_2[6],adresse_3[6];
int sixgons_1, sixgons_2, sixgons_3; /* zur besseren lesbarkeit -- es koennte auch immer adresse_i[1] 
					benutzt werden */
KANTE *anfang_1, *anfang_2, *anfang_3; /* eine kanonische Kante auf dem Rand zum Anfangen */ 
ITEMLISTE *item_1, *item_2, *item_3; 
BOOL gebaut_1, gebaut_2, ipr_fault_item2; 
PLANMAP map;
KNOTENTYP code[20];
int j, czmerke_1, czmerke_2, czmerke_3;
int modulozaehler;

modulozaehler=rest;

knotenzahl= 20 + 2*max_sechsecke;

init_map(map);

code[1]=2;

for (pfadlaenge=2*minbrillenglas+1; pfadlaenge <= knotenzahl+1; pfadlaenge++) 
  { /* EINZIGE Konvention: laenge_1 >= laenge_3 --- dann darf keine konvention 
       fuer die 6-Ecke mehr erfolgen ! */ 
    code[0]=pfadlaenge;
    for (laenge_1=minbrillenglas; (laenge_1 <= maxbrillenglas) &&
	                            (laenge_1 < pfadlaenge-minbrillenglas); laenge_1++) 
      if (brillenglasmark[laenge_1])
      { if ((laenge_1 % 2)==0) 
	  { adresse_1[0]=4; adresse_1[2]=(laenge_1-2)/2; adresse_1[3]=0; } 
        else { adresse_1[0]=5; adresse_1[2]=(laenge_1-1)/2; } 	
	code[2]=laenge_1;
	for (sixgons_1=0; sixgons_1 <= max_sechsecke; sixgons_1++) 
	  /* auch hier kann man besser abschaetzen */ 	 
	  { adresse_1[1]=sixgons_1;
	    for (item_1=suche_item(adresse_1); item_1 != nil; item_1=item_1->next_item) 	 
	      { 
		czmerke_1=4+adresse_1[0];
		for (j=4; j<czmerke_1; j++) code[j]=item_1->code[j-4];
 		for (laenge_3=minbrillenglas; 
		     (laenge_3 <= laenge_1) && (laenge_1+laenge_3 < pfadlaenge); laenge_3++)
		 if (brillenglasmark[laenge_3])
 		 {
		   modulozaehler++;
		   if (modulozaehler==mod) modulozaehler=0;
		   if (!mod || (modulozaehler==0))
		     {
		       code[3]=laenge_3;
		       berechne_brillenadressen(laenge_1,pfadlaenge,laenge_3,adresse_2,adresse_3);
		       gebaut_1=0; /* Man koennte auch patch_1 immer in der aeusseren
				      Schleife bauen und dann die Brille verschieden fortsetzen, aber erst Brille bauen 
				      und dann die patches einkleben erscheint mir sympathischer und weniger fehleranfaellig --
				      wenn auch von der Komplexitaet her ein wenig schlechter */ 
		       for (sixgons_2=0; sixgons_2 <= max_sechsecke-sixgons_1; sixgons_2++)
			 { s1ps2=sixgons_1 + sixgons_2;
			   adresse_2[1]=sixgons_2;
			   for (sixgons_3=max_sechsecke-s1ps2; (sixgons_3>=min_sechsecke-s1ps2) && (sixgons_3>=0);
				sixgons_3--)
			     {
			       adresse_3[1]=sixgons_3;
			       for (item_2=suche_item(adresse_2); item_2 != nil; item_2=item_2->next_item)
				 { is_ipr=1; ipr_fault_item2=0;
				   gebaut_2=0;
				   czmerke_2=czmerke_1+adresse_2[0];
				   for (j=czmerke_1; j<czmerke_2; j++) code[j]=item_2->code[j-czmerke_1];
				   for (item_3=suche_item(adresse_3); (item_3 != nil) && (!ipr_fault_item2); 
					item_3=item_3->next_item) 	  
				     { czmerke_3=czmerke_2+adresse_3[0];
				       for (j=czmerke_2; j<czmerke_3; j++) code[j]=item_3->code[j-czmerke_2];
				       if (gebaut_1==0) {
					 anzahl_5ek=0;
					 baue_brille(pfadlaenge,laenge_1,laenge_3,map, &anfang_1, &anfang_2,&anfang_3);
					 insert_patch(map,anfang_1,item_1,sixgons_1+adresse_1[0],adresse_1[0]); 
					 gebaut_1=1;
				       }
				       if (gebaut_2==0) 
					 { anzahl_5ek=5*adresse_1[0];
					   insert_patch(map,anfang_2,item_2,sixgons_2+adresse_2[0],adresse_2[0]); 
					   gebaut_2=1;
					   if (is_ipr==0) ipr_fault_item2=1;}
				       anzahl_5ek=5*(12-adresse_3[0]);
				       if (is_ipr) 
					 { insert_patch(map,anfang_3,item_3,sixgons_3+adresse_3[0],adresse_3[0]);
					   if (is_ipr) teste_und_schreibe(map,code); else is_ipr=1;
					   delete_patch(map,anfang_3,adresse_3); }
				     } /* ende for ueber item_3 */
				   if (gebaut_2) delete_patch(map,anfang_2,adresse_2);
				 } /* ende for ueber item_2 */
			     } /* ende for ueber sixgons_3 */
			 } /* ende for ueber sixgons_2 */
		       map[0][0].name=0; /* entspricht loeschen von map */
		     }
 		 } /* ende for ueber laenge_3 */
	      } /* ende for ueber item_1 */
	  } /* ende for ueber sixgons_1 */
      } /* ende for ueber laenge_1 */ 
  } /* ende for ueber pfadlaenge */
 }

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x14808, %rsp          # imm = 0x14808
movl %esi, %ebx
movl %edi, %ebp
movl 0x7ac4(%rip), %r14d     # 0x1519c
leaq 0x130(%rsp), %rdi
callq 0x44a6
movw $0x2, 0x102(%rsp)
movslq 0x7a62(%rip), %r15      # 0x15158
addq %r15, %r15
movq %rbx, 0x8(%rsp)
leal 0x15(,%rbx,2), %eax
cmpl %eax, %r15d
jge 0xdca9
movq 0x8(%rsp), %rax
leal (%rax,%rax), %ecx
incl %eax
movl %eax, 0x54(%rsp)
orq $0x1, %r15
addl $0x16, %ecx
movl %ecx, 0x50(%rsp)
leaq 0x12d12(%rip), %rbx     # 0x20440
movl %ebp, 0x5c(%rsp)
movw %r15w, 0x100(%rsp)
movslq 0x7a16(%rip), %r12      # 0x15158
cmpl 0x7a3b(%rip), %r12d     # 0x15184
jg 0xdc9b
movq %r15, 0xa8(%rsp)
movslq 0x79fa(%rip), %rax      # 0x15158
movq %r15, %rcx
subq %rax, %rcx
cmpq %rcx, %r12
jge 0xdc9b
cmpb $0x0, (%r12,%rbx)
je 0xdc83
testb $0x1, %r12b
jne 0xd7a2
movw $0x4, 0x34(%rsp)
leal 0x1fffe(%r12), %eax
shrl %eax
movw %ax, 0x38(%rsp)
movw $0x0, 0x3a(%rsp)
movl $0x4, %eax
jmp 0xd7ba
movw $0x5, 0x34(%rsp)
leal -0x1(%r12), %eax
shrl %eax
movw %ax, 0x38(%rsp)
movl $0x5, %eax
movq %rax, 0x20(%rsp)
movw %r12w, 0x104(%rsp)
cmpl $0x0, 0x8(%rsp)
js 0xdc83
movq 0x20(%rsp), %rax
leal 0x4(%rax), %ecx
movq %rcx, 0x98(%rsp)
leal (%rax,%rax,4), %ecx
movl %ecx, 0x64(%rsp)
movl %eax, %r13d
xorl %ecx, %ecx
movslq %r12d, %rax
movq %rax, 0xc8(%rsp)
movl 0x54(%rsp), %eax
movl %eax, 0x14(%rsp)
movq %r12, 0xa0(%rsp)
movq %r13, 0xd0(%rsp)
movq %rcx, 0x18(%rsp)
movw %cx, 0x36(%rsp)
leaq 0x34(%rsp), %rdi
callq 0xc4aa
testq %rax, %rax
je 0xdc6b
movq %rax, %rsi
movq 0x20(%rsp), %rax
movq 0x18(%rsp), %rdi
addl %edi, %eax
movl %eax, 0x68(%rsp)
xorl %eax, %eax
movzbl 0x8(%rsi,%rax), %ecx
movw %cx, 0x108(%rsp,%rax,2)
incq %rax
cmpq %rax, %r13
jne 0xd844
movslq 0x78f8(%rip), %rdx      # 0x15158
cmpq %rdx, %r12
jl 0xdc5d
movq 0xc8(%rsp), %rax
addq %rdx, %rax
cmpq %rax, %r15
jle 0xdc5d
movq %rsi, 0xb0(%rsp)
cmpb $0x0, (%rdx,%rbx)
je 0xdc45
incl %r14d
movl 0x7900(%rip), %eax      # 0x15198
cmpl %eax, %r14d
movl $0x0, %ecx
cmovel %ecx, %r14d
testl %eax, %eax
je 0xd8b1
testl %r14d, %r14d
jne 0xdc45
movl %r14d, 0x58(%rsp)
movw %dx, 0x106(%rsp)
movl %r12d, %edi
movl %r15d, %esi
movq %rdx, 0xb8(%rsp)
leaq 0x8c(%rsp), %rcx
leaq 0x80(%rsp), %r8
callq 0xd1f3
movq 0x18(%rsp), %rdi
cmpl 0x8(%rsp), %edi
jg 0xdc07
movzwl 0x8c(%rsp), %ecx
movq 0x98(%rsp), %rax
movq %rcx, 0x40(%rsp)
leal (%rax,%rcx), %r12d
movzwl 0x80(%rsp), %ecx
leal (%r12,%rcx), %r13d
movl $0xc, %eax
movq %rcx, 0x48(%rsp)
subl %ecx, %eax
leal (%rax,%rax,4), %eax
movl %eax, 0x74(%rsp)
xorl %ebx, %ebx
xorl %r8d, %r8d
movq 0x8(%rsp), %rdx
movl 0x5c(%rsp), %esi
cmpl %esi, %edx
setl %cl
leal (%r8,%rdi), %eax
movw %r8w, 0x8e(%rsp)
movl %edx, %r14d
subl %eax, %r14d
sets %dl
orb %cl, %dl
movq %r8, 0xd8(%rsp)
jne 0xdbec
subl %eax, %esi
movq 0x40(%rsp), %rax
addl %r8d, %eax
movl %eax, 0x6c(%rsp)
testl %esi, %esi
movl $0x0, %eax
cmovlel %eax, %esi
movl %esi, 0x60(%rsp)
movw %r14w, 0x82(%rsp)
leaq 0x8c(%rsp), %rdi
callq 0xc4aa
movq %rax, 0x28(%rsp)
testq %rax, %rax
je 0xdbda
movq 0x48(%rsp), %rax
addl %r14d, %eax
movl %eax, 0x70(%rsp)
movq %r14, 0xe0(%rsp)
movb $0x1, 0x77a8(%rip)      # 0x15164
cmpl $0x0, 0x40(%rsp)
je 0xd9ea
movq 0x28(%rsp), %rax
addq $0x8, %rax
movq 0x98(%rsp), %rcx
movzbl (%rax), %edx
movw %dx, 0x100(%rsp,%rcx,2)
incq %rcx
incq %rax
cmpq %r12, %rcx
jb 0xd9d4
leaq 0x80(%rsp), %rdi
callq 0xc4aa
testq %rax, %rax
movq %rax, 0xe8(%rsp)
je 0xdb94
xorl %r14d, %r14d
xorl %r15d, %r15d
movq %rax, %rbp
cmpl $0x0, 0x48(%rsp)
je 0xda35
leaq 0x8(%rbp), %rax
movq %r12, %rcx
movzbl (%rax), %edx
movw %dx, 0x100(%rsp,%rcx,2)
incq %rcx
incq %rax
cmpq %r13, %rcx
jb 0xda1f
testb %bl, %bl
jne 0xdaaa
movl $0x0, 0x14315(%rip)     # 0x21d58
leaq 0xf0(%rsp), %rax
movq %rax, (%rsp)
movq 0xa8(%rsp), %rdi
movq 0xa0(%rsp), %rsi
movq 0xb8(%rsp), %rdx
leaq 0x130(%rsp), %rbx
movq %rbx, %rcx
leaq 0xf8(%rsp), %r8
leaq 0xc0(%rsp), %r9
callq 0xd32f
movq 0xf8(%rsp), %rsi
movq %rbx, %rdi
movq 0xb0(%rsp), %rdx
movl 0x68(%rsp), %ecx
movq 0x20(%rsp), %r8
callq 0xd55b
movb $0x1, %bl
testb %r15b, %r15b
jne 0xdaf3
movl 0x64(%rsp), %eax
movl %eax, 0x1429f(%rip)     # 0x21d58
movq 0xc0(%rsp), %rsi
leaq 0x130(%rsp), %rdi
movq 0x28(%rsp), %rdx
movl 0x6c(%rsp), %ecx
movq 0x40(%rsp), %r8
callq 0xd55b
cmpb $0x0, 0x7681(%rip)      # 0x15164
movzbl %r14b, %r14d
movl $0x1, %eax
cmovel %eax, %r14d
movb $0x1, %r15b
movl 0x74(%rsp), %eax
movl %eax, 0x1425b(%rip)     # 0x21d58
cmpb $0x0, 0x7660(%rip)      # 0x15164
je 0xdb82
movl %r15d, 0x78(%rsp)
movl %r14d, 0x7c(%rsp)
movl %ebx, %r14d
movq %r12, %r15
movq 0xf0(%rsp), %r12
leaq 0x130(%rsp), %rbx
movq %rbx, %rdi
movq %r12, %rsi
movq %rbp, %rdx
movl 0x70(%rsp), %ecx
movq 0x48(%rsp), %r8
callq 0xd55b
cmpb $0x0, 0x7620(%rip)      # 0x15164
je 0xdb58
movq %rbx, %rdi
leaq 0x100(%rsp), %rsi
callq 0xc438
jmp 0xdb5f
movb $0x1, 0x7605(%rip)      # 0x15164
movq %rbx, %rdi
movq %r12, %rsi
leaq 0x80(%rsp), %rdx
callq 0xd5f6
movq %r15, %r12
movl %r14d, %ebx
movl 0x7c(%rsp), %r14d
movl 0x78(%rsp), %r15d
movq (%rbp), %rbp
testq %rbp, %rbp
je 0xdb94
testb %r14b, %r14b
je 0xda11
cmpq $0x0, 0xe8(%rsp)
je 0xdbbc
movq 0xc0(%rsp), %rsi
leaq 0x130(%rsp), %rdi
leaq 0x8c(%rsp), %rdx
callq 0xd5f6
movq 0x28(%rsp), %rax
movq (%rax), %rax
movq %rax, 0x28(%rsp)
testq %rax, %rax
movq 0xe0(%rsp), %r14
jne 0xd9b5
leal -0x1(%r14), %eax
cmpl 0x60(%rsp), %r14d
movl %eax, %r14d
jg 0xd97d
movq 0xd8(%rsp), %r8
incl %r8d
cmpl 0x14(%rsp), %r8d
movq 0x18(%rsp), %rdi
jne 0xd92d
movw $0x0, 0x132(%rsp)
movl 0x58(%rsp), %r14d
movq 0xa8(%rsp), %r15
leaq 0x1281b(%rip), %rbx     # 0x20440
movq 0xa0(%rsp), %r12
movq 0xd0(%rsp), %r13
movq 0xb0(%rsp), %rsi
movq 0xb8(%rsp), %rdx
cmpq %r12, %rdx
jge 0xdc5d
leaq (%rdx,%r12), %rax
incq %rax
incq %rdx
cmpq %r15, %rax
jl 0xd885
movq (%rsi), %rsi
testq %rsi, %rsi
jne 0xd842
jmp 0xdc70
movq 0x18(%rsp), %rdi
leal 0x1(%rdi), %eax
decl 0x14(%rsp)
cmpl 0x8(%rsp), %edi
movl %eax, %ecx
jne 0xd812
leaq 0x1(%r12), %rax
movslq 0x74f5(%rip), %rcx      # 0x15184
cmpq %rcx, %r12
movq %rax, %r12
jl 0xd757
incq %r15
cmpl %r15d, 0x50(%rsp)
jne 0xd732
addq $0x14808, %rsp          # imm = 0x14808
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq