user: 请显示与下面列出的汇编代码相匹配的C语言实现：

```asm
<schreier_sims_step>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x118,%rsp
  mov    %rdi,0x20(%rsp)
  mov    %esi,0x7c(%rsp)
  mov    %rdx,0x28(%rsp)
  mov    %ecx,%ebp
  mov    %r8d,%r12d
  mov    %r9d,0x78(%rsp)
  mov    0x150(%rsp),%rax
  mov    %rax,0xe0(%rsp)
  mov    0x160(%rsp),%r13
  mov    0x168(%rsp),%r14
  mov    0x170(%rsp),%r10
  mov    %r10,0x68(%rsp)
  mov    0x178(%rsp),%r15
  mov    0x180(%rsp),%r11
  mov    %r11,0x58(%rsp)
  mov    %fs:0x28,%rax
  mov    %rax,0x108(%rsp)
  xor    %eax,%eax
  movslq %r8d,%rax
  lea    0x0(,%rax,4),%rbx
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0x30(%rsp)
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0x38(%rsp)
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0x40(%rsp)
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0x48(%rsp)
  mov    %ebp,0x80(%rsp)
  mov    %ebp,%eax
  imul   %r12d,%eax
  mov    %eax,0x60(%rsp)
  cltq
  lea    0x0(,%rax,4),%rbp
  mov    %rbp,%rdi
  call   <malloc@plt>
  mov    %rax,0xc0(%rsp)
  mov    %rbp,%rdi
  call   <malloc@plt>
  mov    %rax,0xd0(%rsp)
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0xa0(%rsp)
  mov    %rbx,0x70(%rsp)
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0x18(%rsp)
  mov    %r12d,%r11d
  imul   %r12d,%r11d
  movslq %r11d,%rbx
  shl    $0x2,%rbx
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0x10(%rsp)
  mov    0x70(%rsp),%rdi
  call   <malloc@plt>
  mov    %rax,0xa8(%rsp)
  mov    0x70(%rsp),%rdi
  call   <malloc@plt>
  mov    %rax,0xd8(%rsp)
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0xc8(%rsp)
  mov    %rbp,%rdi
  call   <malloc@plt>
  mov    %rax,0x98(%rsp)
  mov    0x70(%rsp),%rbx
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0x90(%rsp)
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0x50(%rsp)
  mov    %rbp,%rdi
  call   <malloc@plt>
  mov    %rax,0x8(%rsp)
  mov    %rbx,%rdi
  call   <malloc@plt>
  mov    %rax,0xb8(%rsp)
  mov    0x7c(%rsp),%ebx
  mov    %ebx,%edx
  mov    %r13,%rsi
  mov    0x20(%rsp),%rdi
  mov    $0x0,%eax
  call   <copy_list@plt>
  mov    %ebx,(%r14)
  mov    0x60(%rsp),%edx
  mov    0x68(%rsp),%r10
  mov    (%r10),%rsi
  mov    0x28(%rsp),%rdi
  mov    $0x0,%eax
  call   <copy_list@plt>
  mov    0x80(%rsp),%ecx
  mov    %ecx,(%r15)
  mov    0x78(%rsp),%ebx
  lea    -0x1(%rbx),%esi
  sub    $0x8,%rsp
  lea    0xf8(%rsp),%rax
  push   %rax
  mov    0xd0(%rsp),%rbp
  mov    %rbp,%r9
  mov    %r12d,%r8d
  mov    0x38(%rsp),%rdx
  mov    0x30(%rsp),%rdi
  mov    $0x0,%eax
  call   <stabilizer@plt>
  add    $0x8,%rsp
  lea    0xfc(%rsp),%rax
  push   %rax
  mov    0xe0(%rsp),%r9
  mov    %r12d,%r8d
  mov    0x168(%rsp),%ecx
  mov    0xf0(%rsp),%rdx
  mov    0x100(%rsp),%esi
  mov    %rbp,%rdi
  mov    $0x0,%eax
  call   <complement@plt>
  movslq %ebx,%rax
  lea    0x0(,%rax,4),%rdx
  mov    %rdx,0xc0(%rsp)
  mov    0x30(%rsp),%rcx
  lea    -0x4(%rcx,%rdx,1),%rbx
  movl   $0x1,(%rsp)
  push   0x28(%rsp)
  push   0x28(%rsp)
  lea    0x118(%rsp),%r9
  mov    0xc0(%rsp),%r8
  mov    %r12d,%ecx
  mov    0x110(%rsp),%edx
  mov    %rbp,%rsi
  mov    (%rbx),%edi
  mov    $0x0,%eax
  call   <one_schreier_orbit@plt>
  add    $0x18,%rsp
  push   $0x1
  push   0xe8(%rsp)
  push   0xe0(%rsp)
  lea    0x11c(%rsp),%r9
  mov    0xc8(%rsp),%r8
  mov    %r12d,%ecx
  mov    0x114(%rsp),%edx
  mov    0xf0(%rsp),%rsi
  mov    (%rbx),%edi
  mov    $0x0,%eax
  call   <one_schreier_orbit@plt>
  add    $0x20,%rsp
  test   %r12d,%r12d
  jle    L266
  mov    %r12d,%eax
  mov    $0x0,%ebp
  mov    $0x0,%ebx
  mov    %r13,0x20(%rsp)
  mov    0x18(%rsp),%r13
  mov    %r14,0x28(%rsp)
  mov    0xd8(%rsp),%r14
  mov    %r15,0x60(%rsp)
  mov    %rax,%r15
  jmp    L9
L243:
  movslq %ebp,%rdi
  shl    $0x2,%rdi
  mov    0x10(%rsp),%rax
  lea    (%rax,%rdi,1),%rsi
  add    0xc8(%rsp),%rdi
  mov    %r12d,%edx
  mov    $0x0,%eax
  call   <copy_list@plt>
  mov    (%r14,%rbx,4),%eax
  mov    %eax,0x0(%r13,%rbx,4)
L143:
  add    $0x1,%rbx
  add    %r12d,%ebp
  cmp    %r15,%rbx
  je     L157
L9:
  mov    (%r14,%rbx,4),%eax
  cmp    %eax,0x0(%r13,%rbx,4)
  je     L143
  test   %eax,%eax
  je     L143
  jmp    L243
L157:
  mov    0x20(%rsp),%r13
  mov    0x28(%rsp),%r14
  mov    0x60(%rsp),%r15
L266:
  cmpl   $0x0,0xf8(%rsp)
  jle    L291
  mov    %r12d,%eax
  imul   0x158(%rsp),%eax
  mov    %eax,0xec(%rsp)
  movq   $0x0,0x88(%rsp)
  movl   $0x0,0x7c(%rsp)
  jmp    L296
L169:
  mov    %r12d,%edx
  imul   0xf0(%rsp),%edx
  mov    0x98(%rsp),%rsi
  mov    0xc0(%rsp),%rdi
  mov    $0x0,%eax
  call   <copy_list@plt>
  mov    0xf0(%rsp),%eax
  mov    %eax,0x60(%rsp)
  jmp    L68
L56:
  mov    0xe8(%rsp),%ebp
  mov    0x7c(%rsp),%eax
  add    $0x1,%eax
  mov    %eax,0x7c(%rsp)
L220:
  mov    (%r14),%eax
  add    $0x1,%eax
  cmp    0x7c(%rsp),%eax
  je     L28
L106:
  mov    0x7c(%rsp),%eax
  mov    0x78(%rsp),%ecx
  cmp    %ecx,%eax
  jle    L22
  mov    %ebp,0xe8(%rsp)
  mov    %eax,%ebp
  mov    0x68(%rsp),%rbx
L3:
  sub    $0x8,%rsp
  push   0x60(%rsp)
  push   %r15
  push   %rbx
  push   %r14
  push   %r13
  push   $0x1
  push   0x88(%rsp)
  mov    %ebp,%r9d
  mov    %r12d,%r8d
  mov    (%r15),%ecx
  mov    (%rbx),%rdx
  mov    (%r14),%esi
  mov    %r13,%rdi
  call   <schreier_sims_step>
  sub    $0x1,%ebp
  add    $0x40,%rsp
  cmp    %ebp,0x78(%rsp)
  jne    L3
  mov    0xe8(%rsp),%ebp
L22:
  add    $0x1,%ebp
  mov    0x70(%rsp),%rcx
  add    %rcx,0x28(%rsp)
  cmp    %ebp,0x60(%rsp)
  je     L158
L137:
  mov    %r12d,%edx
  mov    0x90(%rsp),%rbx
  mov    %rbx,%rsi
  mov    0x28(%rsp),%rdi
  mov    $0x0,%eax
  call   <copy_list@plt>
  mov    0x58(%rsp),%rax
  addl   $0x1,(%rax)
  mov    %r12d,%r8d
  mov    0x30(%rsp),%rcx
  mov    0x18(%rsp),%rdx
  mov    0x10(%rsp),%rsi
  mov    0x20(%rsp),%edi
  mov    $0x0,%eax
  call   <trace_schreier@plt>
  mov    %r12d,%edx
  mov    %rbx,%rsi
  mov    0x20(%rsp),%edi
  mov    $0x0,%eax
  call   <onpoints@plt>
  mov    %eax,%edi
  mov    %r12d,%r8d
  mov    0x40(%rsp),%rcx
  mov    0x18(%rsp),%rdx
  mov    0x10(%rsp),%rsi
  mov    $0x0,%eax
  call   <trace_schreier@plt>
  mov    %r12d,%edx
  mov    0x38(%rsp),%rsi
  mov    0x40(%rsp),%rdi
  mov    $0x0,%eax
  call   <inverse@plt>
  mov    %r12d,%ecx
  mov    0x48(%rsp),%rdx
  mov    %rbx,%rsi
  mov    0x30(%rsp),%rdi
  mov    $0x0,%eax
  call   <product@plt>
  mov    %r12d,%ecx
  mov    0x50(%rsp),%rbx
  mov    %rbx,%rdx
  mov    0x38(%rsp),%rsi
  mov    0x48(%rsp),%rdi
  mov    $0x0,%eax
  call   <product@plt>
  mov    %r12d,%esi
  imul   (%r15),%esi
  movslq %esi,%rsi
  shl    $0x2,%rsi
  mov    0x8(%rsp),%rdi
  call   <realloc@plt>
  sub    $0x8,%rsp
  push   0x88(%rsp)
  mov    %rax,0x18(%rsp)
  mov    %rax,%r9
  mov    %r12d,%r8d
  mov    (%r15),%ecx
  mov    0x78(%rsp),%rdx
  mov    (%rdx),%rdx
  mov    0x88(%rsp),%esi
  mov    %r13,%rdi
  mov    $0x0,%eax
  call   <stabilizer@plt>
  mov    %r12d,%esi
  mov    %rbx,%rdi
  mov    $0x0,%eax
  call   <isid@plt>
  add    $0x10,%rsp
  test   %eax,%eax
  jne    L22
  mov    0x100(%rsp),%r8d
  test   %r8d,%r8d
  je     L267
  mov    (%r14),%edx
  sub    0x78(%rsp),%edx
  mov    0xb0(%rsp),%rcx
  lea    0x0(%r13,%rcx,1),%rsi
  mov    %r12d,%r9d
  mov    0x8(%rsp),%rcx
  mov    %rbx,%rdi
  call   <perm_member@plt>
  test   %eax,%eax
  jne    L22
L267:
  mov    (%r15),%eax
  lea    0x1(%rax),%esi
  imul   %r12d,%esi
  movslq %esi,%rsi
  shl    $0x2,%rsi
  mov    0x68(%rsp),%rbx
  mov    (%rbx),%rdi
  call   <realloc@plt>
  mov    %rax,(%rbx)
  mov    %r12d,%edx
  imul   (%r15),%edx
  movslq %edx,%rdx
  lea    (%rax,%rdx,4),%rsi
  mov    %r12d,%edx
  mov    0x50(%rsp),%rbx
  mov    %rbx,%rdi
  mov    $0x0,%eax
  call   <copy_list@plt>
  addl   $0x1,(%r15)
  lea    0x104(%rsp),%rcx
  mov    0xb8(%rsp),%rdx
  mov    %r12d,%esi
  mov    %rbx,%rdi
  mov    $0x0,%eax
  call   <stable_points@plt>
  cmpl   $0x0,(%r14)
  jle    L220
  mov    $0x0,%ebx
  mov    %ebp,0xe8(%rsp)
  mov    0xb8(%rsp),%rbp
L36:
  mov    %ebx,0x7c(%rsp)
  mov    0x0(%r13,%rbx,4),%edi
  mov    0x104(%rsp),%edx
  mov    %rbp,%rsi
  mov    $0x0,%eax
  call   <position@plt>
  test   %eax,%eax
  je     L56
  mov    (%r14),%eax
  add    $0x1,%rbx
  cmp    %ebx,%eax
  jg     L36
  mov    0xe8(%rsp),%ebp
  add    $0x1,%eax
  mov    %eax,0x7c(%rsp)
L28:
  test   %r12d,%r12d
  jle    L106
  mov    $0x1,%ebx
  mov    %ebp,0xe8(%rsp)
  mov    0xb8(%rsp),%rbp
  jmp    L226
L198:
  add    $0x1,%ebx
  cmp    %ebx,%r12d
  jl     L195
L226:
  mov    0x104(%rsp),%edx
  mov    %rbp,%rsi
  mov    %ebx,%edi
  mov    $0x0,%eax
  call   <position@plt>
  test   %eax,%eax
  jne    L198
  mov    (%r14),%edx
  mov    %r13,%rsi
  mov    %ebx,%edi
  call   <position@plt>
  test   %eax,%eax
  jne    L198
  mov    0xe8(%rsp),%ebp
  movslq (%r14),%rax
  mov    %ebx,0x0(%r13,%rax,4)
  addl   $0x1,(%r14)
  jmp    L106
L195:
  mov    0xe8(%rsp),%ebp
  jmp    L106
L158:
  addq   $0x1,0x88(%rsp)
  mov    0x88(%rsp),%rax
  cmp    %eax,0xf8(%rsp)
  jle    L291
L296:
  mov    0xa0(%rsp),%rax
  mov    0x88(%rsp),%rcx
  mov    (%rax,%rcx,4),%eax
  mov    %eax,0x20(%rsp)
  mov    0xfc(%rsp),%edx
  mov    0xa8(%rsp),%rsi
  mov    %eax,%edi
  mov    $0x0,%eax
  call   <position@plt>
  test   %eax,%eax
  je     L169
  mov    0xec(%rsp),%edx
  mov    0x98(%rsp),%rsi
  mov    0xe0(%rsp),%rdi
  mov    $0x0,%eax
  call   <copy_list@plt>
  mov    0x158(%rsp),%eax
  mov    %eax,0x60(%rsp)
L68:
  cmpl   $0x0,0x60(%rsp)
  jle    L158
  mov    0x98(%rsp),%rax
  mov    %rax,0x28(%rsp)
  mov    $0x0,%ebp
  lea    0x100(%rsp),%rax
  mov    %rax,0x80(%rsp)
  jmp    L137
L291:
  mov    0x30(%rsp),%rdi
  call   <free@plt>
  mov    0x38(%rsp),%rdi
  call   <free@plt>
  mov    0x40(%rsp),%rdi
  call   <free@plt>
  mov    0x48(%rsp),%rdi
  call   <free@plt>
  mov    0xc0(%rsp),%rdi
  call   <free@plt>
  mov    0xd0(%rsp),%rdi
  call   <free@plt>
  mov    0xa0(%rsp),%rdi
  call   <free@plt>
  mov    0x18(%rsp),%rdi
  call   <free@plt>
  mov    0x10(%rsp),%rdi
  call   <free@plt>
  mov    0xa8(%rsp),%rdi
  call   <free@plt>
  mov    0xd8(%rsp),%rdi
  call   <free@plt>
  mov    0xc8(%rsp),%rdi
  call   <free@plt>
  mov    0x98(%rsp),%rdi
  call   <free@plt>
  mov    0x90(%rsp),%rdi
  call   <free@plt>
  mov    0x50(%rsp),%rdi
  call   <free@plt>
  mov    0x8(%rsp),%rdi
  call   <free@plt>
  mov    0xb8(%rsp),%rdi
  call   <free@plt>
  mov    0x108(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L282
  add    $0x118,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L282:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
void schreier_sims_step(int *base, int bl, int *GS, int m, int n, int i, int *T, int mm, int *newbase, int *nbl, int **newGS, int *nm, int *num) {
  int c, j = 0, jj, level;
  int *p = (int *)malloc(n * sizeof(int));
  int *ip = (int *)malloc(n * sizeof(int));
  int *pp = (int *)malloc(n * sizeof(int));
  int *ppp = (int *)malloc(n * sizeof(int));
  int *Si = (int *)malloc(m * n * sizeof(int)), Sil;
  int *oldSi = (int *)malloc(m * n * sizeof(int)), oldSil;
  int *Deltai = (int *)malloc(n * sizeof(int)), Deltail;
  int *w = (int *)malloc(n * sizeof(int));
  int *nu = (int *)malloc(n * n * sizeof(int));
  int *oldDeltai = (int *)malloc(n * sizeof(int)), oldDeltail;
  int *oldw = (int *)malloc(n * sizeof(int));
  int *oldnu = (int *)malloc(n * n * sizeof(int));
  int *genset = (int *)malloc(m * n * sizeof(int)), gensetl;
  int gamma, gn, sn;
  int *s = (int *)malloc(n * sizeof(int));
  int *g = (int *)malloc(n * sizeof(int));
  int *stab = (int *)malloc(m * n * sizeof(int)), stabl;
  int *stabps = (int *)malloc(n * sizeof(int)), stabpsl;
  copy_list(base, newbase, bl);
  *nbl = bl;
  copy_list(GS, *newGS, m * n);
  *nm = m;
  stabilizer(base, i - 1, GS, m, n, Si, &Sil);
  complement(Si, Sil, T, mm, n, oldSi, &oldSil);
  one_schreier_orbit(base[i - 1], Si, Sil, n, Deltai, &Deltail, nu, w, 1);
  one_schreier_orbit(base[i - 1], oldSi, oldSil, n, oldDeltai, &oldDeltail, oldnu, oldw, 1);
  for (c = 0; c < n; c++) {
    if (w[c] != oldw[c] && oldw[c] != 0) {
      copy_list(oldnu + c * n, nu + c * n, n);
      w[c] = oldw[c];
    }
  }
  for (gn = 0; gn < Deltail; gn++) {
    gamma = Deltai[gn];
    if (position(gamma, oldDeltai, oldDeltail)) {
      copy_list(T, genset, mm * n);
      gensetl = mm;
    } else {
      copy_list(Si, genset, Sil * n);
      gensetl = Sil;
    }
    for (sn = 0; sn < gensetl; sn++) {
      copy_list(genset + sn * n, s, n);
      (*num)++;
      trace_schreier(gamma, nu, w, p, n);
      trace_schreier(onpoints(gamma, s, n), nu, w, pp, n);
      inverse(pp, ip, n);
      product(p, s, ppp, n);
      product(ppp, ip, g, n);
      stab = (int *)realloc(stab, (*nm) * n * sizeof(int));
      stabilizer(newbase, i, *newGS, *nm, n, stab, &stabl);
      if (!isid(g, n)) {
        if ((stabl == 0) || (!perm_member(g, newbase + i, *nbl - i, stab, stabl, n))) {
          *newGS = (int *)realloc(*newGS, ((*nm) + 1) * n * sizeof(int));
          copy_list(g, (*newGS) + (*nm) * n, n);
          (*nm)++;
          stable_points(g, n, stabps, &stabpsl);
          for (jj = 0; jj < *nbl; jj++) {
            if (!position(newbase[jj], stabps, stabpsl)) {
              j = jj + 1;
              break;
            }
            j = *nbl + 1;
          }
          if (j == *nbl + 1) {
            for (jj = 1; jj <= n; jj++) {
              if (!position(jj, stabps, stabpsl) && !position(jj, newbase, *nbl)) {
                newbase[*nbl] = jj;
                (*nbl)++;
                break;
              }
            }
          }
          for (level = j; level > i; level--) {
            schreier_sims_step(newbase, *nbl, *newGS, *nm, n, level, g, 1, newbase, nbl, newGS, nm, num);
          }
        }
      }
    }
  }
  free(p);
  free(ip);
  free(pp);
  free(ppp);
  free(Si);
  free(oldSi);
  free(Deltai);
  free(w);
  free(nu);
  free(oldDeltai);
  free(oldw);
  free(oldnu);
  free(genset);
  free(s);
  free(g);
  free(stab);
  free(stabps);
}
```