// File: arnoldrobbins[P]mcilroy-regex/sed3.cpp
// Function: substitute(regex_t*, Text*, unsigned char*, int)
int
substitute(regex_t *re, Text* data, uchar *rhs, int n)
{
	Text t;
	uchar *where = data->s;
	if(regexec(re, (char*)data->s, NMATCH, matches, 0))
		return 0;
	vacate(&gendata);
	if(n == 0)
		do {
			docopy(where, so);
			if(!dosub(where, rhs))
				return 0;
			where += eo;
			if(eo == so) {
				if(where < data->w)
					docopy(where++, 1);
				else
					goto done;
			}
		} while(regexec(re, (char*)where, NMATCH, matches, REG_NOTBOL) == 0);
	else {
		while(--n > 0) {
			where += eo;
			if(eo == so) {
				if(where < data->w)
					where++;
				else
					return 0;
			}
			if(regexec(re, (char*)where, NMATCH, matches, REG_NOTBOL))
				return 0;
		}
		docopy(data->s, where-data->s+so);
		if(!dosub(where, rhs))
			return 0;
		where += eo;
	}			
	eo = so = data->w - where;
	docopy(where, so);
done:
	exch(gendata, *data, t);
	return 1;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x50, %rsp
movq %rdi, -0x10(%rbp)
movq %rsi, -0x18(%rbp)
movq %rdx, -0x20(%rbp)
movl %ecx, -0x24(%rbp)
movq -0x18(%rbp), %rax
movq 0x10(%rax), %rax
movq %rax, -0x48(%rbp)
movq -0x10(%rbp), %rdi
movq -0x18(%rbp), %rax
movq 0x10(%rax), %rsi
movl $0xa, %edx
leaq 0xf535(%rip), %rcx      # 0x18260
xorl %r8d, %r8d
callq 0xbc00
cmpl $0x0, %eax
je 0x8d44
movl $0x0, -0x4(%rbp)
jmp 0x8f7d
leaq 0xf4f5(%rip), %rdi      # 0x18240
callq 0x7910
cmpl $0x0, -0x24(%rbp)
jne 0x8e09
jmp 0x8d5c
movq -0x48(%rbp), %rdi
movq 0xf4f9(%rip), %rax      # 0x18260
movl %eax, %esi
callq 0x8f90
movq -0x48(%rbp), %rdi
movq -0x20(%rbp), %rsi
callq 0x9030
cmpl $0x0, %eax
jne 0x8d8c
movl $0x0, -0x4(%rbp)
jmp 0x8f7d
movq 0xf4d5(%rip), %rax      # 0x18268
addq -0x48(%rbp), %rax
movq %rax, -0x48(%rbp)
movq 0xf4c6(%rip), %rax      # 0x18268
cmpq 0xf4b7(%rip), %rax      # 0x18260
jne 0x8dda
movq -0x48(%rbp), %rax
movq -0x18(%rbp), %rcx
cmpq (%rcx), %rax
jae 0x8dd3
movq -0x48(%rbp), %rdi
movq %rdi, %rax
addq $0x1, %rax
movq %rax, -0x48(%rbp)
movl $0x1, %esi
callq 0x8f90
jmp 0x8dd8
jmp 0x8f16
jmp 0x8dda
jmp 0x8ddc
movq -0x10(%rbp), %rdi
movq -0x48(%rbp), %rsi
movl $0xa, %edx
leaq 0xf470(%rip), %rcx      # 0x18260
movl $0x10, %r8d
callq 0xbc00
cmpl $0x0, %eax
je 0x8d5c
jmp 0x8ee8
jmp 0x8e0b
movl -0x24(%rbp), %eax
addl $-0x1, %eax
movl %eax, -0x24(%rbp)
cmpl $0x0, %eax
jle 0x8e96
movq 0xf448(%rip), %rax      # 0x18268
addq -0x48(%rbp), %rax
movq %rax, -0x48(%rbp)
movq 0xf439(%rip), %rax      # 0x18268
cmpq 0xf42a(%rip), %rax      # 0x18260
jne 0x8e61
movq -0x48(%rbp), %rax
movq -0x18(%rbp), %rcx
cmpq (%rcx), %rax
jae 0x8e53
movq -0x48(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x48(%rbp)
jmp 0x8e5f
movl $0x0, -0x4(%rbp)
jmp 0x8f7d
jmp 0x8e61
movq -0x10(%rbp), %rdi
movq -0x48(%rbp), %rsi
movl $0xa, %edx
leaq 0xf3eb(%rip), %rcx      # 0x18260
movl $0x10, %r8d
callq 0xbc00
cmpl $0x0, %eax
je 0x8e91
movl $0x0, -0x4(%rbp)
jmp 0x8f7d
jmp 0x8e0b
movq -0x18(%rbp), %rax
movq 0x10(%rax), %rdi
movq -0x48(%rbp), %rax
movq -0x18(%rbp), %rcx
movq 0x10(%rcx), %rcx
subq %rcx, %rax
addq 0xf3ac(%rip), %rax      # 0x18260
movl %eax, %esi
callq 0x8f90
movq -0x48(%rbp), %rdi
movq -0x20(%rbp), %rsi
callq 0x9030
cmpl $0x0, %eax
jne 0x8ed9
movl $0x0, -0x4(%rbp)
jmp 0x8f7d
movq 0xf388(%rip), %rax      # 0x18268
addq -0x48(%rbp), %rax
movq %rax, -0x48(%rbp)
movq -0x18(%rbp), %rax
movq (%rax), %rax
movq -0x48(%rbp), %rcx
subq %rcx, %rax
movq %rax, 0xf363(%rip)      # 0x18260
movq %rax, 0xf364(%rip)      # 0x18268
movq -0x48(%rbp), %rdi
movq 0xf351(%rip), %rax      # 0x18260
movl %eax, %esi
callq 0x8f90
movq 0xf323(%rip), %rax      # 0x18240
movq %rax, -0x40(%rbp)
movq 0xf320(%rip), %rax      # 0x18248
movq %rax, -0x38(%rbp)
movq 0xf31d(%rip), %rax      # 0x18250
movq %rax, -0x30(%rbp)
movq -0x18(%rbp), %rax
movq (%rax), %rcx
movq %rcx, 0xf2fb(%rip)      # 0x18240
movq 0x8(%rax), %rcx
movq %rcx, 0xf2f8(%rip)      # 0x18248
movq 0x10(%rax), %rax
movq %rax, 0xf2f5(%rip)      # 0x18250
movq -0x18(%rbp), %rax
movq -0x40(%rbp), %rcx
movq %rcx, (%rax)
movq -0x38(%rbp), %rcx
movq %rcx, 0x8(%rax)
movq -0x30(%rbp), %rcx
movq %rcx, 0x10(%rax)
movl $0x1, -0x4(%rbp)
movl -0x4(%rbp), %eax
addq $0x50, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)