// File: /workspace/github_c_makefile_star2_O2/mishun[P]plantri/fullgen.c
// Function: belege_sequenz
void belege_sequenz( KANTE *start, SEQUENZ *sq)
/* belegt die sequenz startend bei der Kante start */
/* geht fest davon aus, dass 2 mal nach innen hintereinander nicht vorkommt */

{
int i, j, k, zaehler, position;
KANTE *run;
int *sequenz; 
KANTE **seqkanten;
int puffer[7];
char *kan;


sequenz=sq->sequenz;
seqkanten=sq->kanten;
kan=sq->k_marks;


if (start->next->invers->next->name == aussen) 
    { fprintf(stderr,"Achtung -- naechste Kante nicht nach innen -- FEHLER !\n");
      exit(7); }

for (i=0; i<7; i++) { sequenz[i]=leer; seqkanten[i]=nil; kan[i]=0;}

if (start->prev->invers->prev->name != aussen) /* d.h. vorige Kante nicht nach aussen, also nur
						  Randlaenge zu bestimmen */
    { sq->laenge=0;
      for (run=start->next->invers->next->invers->next, zaehler=1; run != start;
           run=run->next->invers->next->invers->next) zaehler++;
      sequenz[0]=zaehler;
      seqkanten[0]=start;
      return;
    }

sq->laenge=0;
zaehler=1;
position=0;
seqkanten[0]=start;


for (run=start->next->invers->next->invers->next; run->next->invers->next->name < aussen;
     run=run->next->invers->next->invers->next) zaehler++;
sequenz[0]=zaehler; position=1; 
if (run->next->invers->next != start) seqkanten[position]=run->next->invers->next;
for (run=run->next->invers->next; run->next->invers->next->name >= aussen;
     run=run->next->invers->next) 
{ sequenz[position]=0; position++;
if (run->next->invers->next != start) seqkanten[position]=run->next->invers->next; }
/* naechste Kante vor nicht-0-sequenz suchen */


while (run != start)
{
for (zaehler=0; run->next->invers->next->name < aussen; 
                run=run->next->invers->next->invers->next) zaehler++;
sequenz[position]=zaehler;  position++;
if (run->next->invers->next != start) seqkanten[position]=run->next->invers->next; 
for (run=run->next->invers->next; run->next->invers->next->name >= aussen;
     run=run->next->invers->next) { sequenz[position]=0;  position++;
if (run->next->invers->next != start) seqkanten[position]=run->next->invers->next; }

}

sequenz[position]=leer; seqkanten[position]=nil;
sq->laenge=position;

kan[0]=sequenz_kanonisch(sequenz);

for (i=1; sequenz[i] != leer; i++)
  { for (j=i, k=0; sequenz[j]!=leer; j++, k++) puffer[k]=sequenz[j];
    for (j=0; j<i; j++, k++) puffer[k]=sequenz[j];
    puffer[k]=leer;
    kan[i]=sequenz_kanonisch(puffer);
  }



}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x28, %rsp
movq 0x20(%rdi), %rax
movq 0x28(%rax), %rax
movq 0x20(%rax), %rax
cmpw $0x246, 0x2(%rax)       # imm = 0x246
je 0x3400
movq %rsi, %rbx
leaq 0x4(%rsi), %r14
leaq 0x20(%rdi), %rax
pushq $0x58
popq %rcx
cmpq $0x5f, %rcx
je 0x3210
movl $0xfffe, -0x15c(%rbx,%rcx,4) # imm = 0xFFFE
andq $0x0, -0x2a0(%rbx,%rcx,8)
movb $0x0, (%rbx,%rcx)
incq %rcx
jmp 0x31ed
movq 0x18(%rdi), %rcx
movq 0x28(%rcx), %rcx
movq 0x18(%rcx), %rcx
cmpw $0x246, 0x2(%rcx)       # imm = 0x246
jne 0x329d
movq %rdi, 0x20(%rbx)
movq 0x20(%rdi), %rax
movq 0x28(%rax), %rax
movq 0x20(%rax), %rax
xorl %edx, %edx
movq 0x28(%rax), %rax
movq 0x20(%rax), %rcx
movq 0x20(%rcx), %rax
movq 0x28(%rax), %rax
movq 0x20(%rax), %rax
incl %edx
cmpw $0x246, 0x2(%rax)       # imm = 0x246
jb 0x3236
movl %edx, (%r14)
cmpq %rdi, %rax
je 0x3260
movq %rax, 0x28(%rbx)
addq $0x20, %rcx
pushq $0x6
popq %rax
movq (%rcx), %rcx
movq 0x28(%rcx), %rcx
movq 0x20(%rcx), %rcx
movq 0x20(%rcx), %rdx
movq 0x28(%rdx), %rdx
movq 0x20(%rdx), %rdx
cmpw $0x245, 0x2(%rdx)       # imm = 0x245
jbe 0x32c7
andl $0x0, -0x10(%rbx,%rax,4)
cmpq %rdi, %rdx
je 0x3294
movq %rdx, (%rbx,%rax,8)
addq $0x20, %rcx
incq %rax
jmp 0x3267
andl $0x0, (%rbx)
pushq $0x1
popq %rcx
movq (%rax), %rax
movq 0x28(%rax), %rax
movq 0x20(%rax), %rax
movq 0x28(%rax), %rax
movq 0x20(%rax), %rax
cmpq %rdi, %rax
je 0x3361
incl %ecx
addq $0x20, %rax
jmp 0x32a3
addq $-0x5, %rax
movabsq $0x100000000, %rdx      # imm = 0x100000000
cmpq %rdi, %rcx
je 0x3377
xorl %r8d, %r8d
movq 0x20(%rcx), %rsi
movq 0x28(%rsi), %rsi
movq 0x20(%rsi), %rsi
cmpw $0x245, 0x2(%rsi)       # imm = 0x245
ja 0x3302
incl %r8d
movq 0x28(%rsi), %rcx
movq 0x20(%rcx), %rcx
jmp 0x32e1
addq $0x20, %rcx
shlq $0x20, %rax
movq %rax, %r9
sarq $0x1e, %r9
movl %r8d, (%r14,%r9)
addq %rdx, %rax
sarq $0x20, %rax
movq %rcx, %r8
cmpq %rdi, %rsi
jne 0x3357
movq %rcx, %r8
movq (%r8), %rcx
movq 0x28(%rcx), %rcx
movq 0x20(%rcx), %rcx
leaq 0x20(%rcx), %r8
movq 0x20(%rcx), %rsi
movq 0x28(%rsi), %rsi
movq 0x20(%rsi), %rsi
cmpw $0x246, 0x2(%rsi)       # imm = 0x246
jb 0x32d5
andl $0x0, (%r14,%rax,4)
incq %rax
cmpq %rdi, %rsi
je 0x3327
movq %rsi, 0x20(%rbx,%rax,8)
movq %r8, %rcx
jmp 0x3324
movl %ecx, 0x4(%rbx)
movq %rdi, 0x20(%rbx)
addq $0x28, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
cltq
movl $0xfffe, 0x4(%rbx,%rax,4) # imm = 0xFFFE
andq $0x0, 0x20(%rbx,%rax,8)
movl %eax, (%rbx)
movq %r14, %rdi
callq 0x2d7d
movb %al, 0x58(%rbx)
leaq 0xc(%rbx), %r12
pushq $0x1
popq %r15
xorl %ebp, %ebp
movq %r15, %r13
movl (%r14,%r13,4), %ecx
cmpl $0xfffe, %ecx           # imm = 0xFFFE
je 0x3368
xorl %eax, %eax
cmpl $0xfffe, %ecx           # imm = 0xFFFE
je 0x33c3
movl %ecx, (%rsp,%rax,4)
movl (%r12,%rax,4), %ecx
incq %rax
jmp 0x33af
movq %r15, %rcx
leaq (%rcx,%rbp), %rdx
cmpq $0x2, %rdx
je 0x33de
movl (%rbx,%rcx,4), %edx
movl %edx, (%rsp,%rax,4)
incq %rax
incq %rcx
jmp 0x33c6
movl %eax, %eax
movl $0xfffe, (%rsp,%rax,4)  # imm = 0xFFFE
movq %rsp, %rdi
callq 0x2d7d
movb %al, 0x58(%rbx,%r13)
incq %r13
addq $0x4, %r12
decq %rbp
jmp 0x33a1
movq 0xfbf1(%rip), %rax      # 0x12ff8
movq (%rax), %rcx
leaq 0xaf93(%rip), %rdi      # 0xe3a4
pushq $0x37
popq %rsi
pushq $0x1
popq %rdx
callq 0x1150
pushq $0x7
popq %rdi
callq 0x1140