// File: /workspace/github_cpp_makefile_star2_O1/DoubleString[P]RtConverter/src/Rnxbrd/BroadcastEphUtils.cpp
// Function: bamboo::BroadcastEphUtils::m_gls2xyz(char const*, char const*, int, double, double*, double*, double*, int*)
int BroadcastEphUtils::m_gls2xyz(const char* mode,const char* cprn,int wk,double sow,double* xsat,double* clk,double* dtmin,int* iode){
	double dt = 0.0, dt1 = 0.0, dt2 = 0.0, x[6],sod,intv;
	int i, nsign,lfind,mjd;
	list<GLSEPH>::iterator glsItr;
	GLSEPH* ephr;
	lfind = 0;
	*clk = 0.0;
	*dtmin = 12.0;
	wksow2mjd(wk,sow,&mjd,&sod);
	memset(x, 0, sizeof(double) * 6);
	double tmax = 0.0,ttag;
	intv = 2.0;
	for(glsItr = this->glsEph.begin();glsItr != this->glsEph.end();++glsItr){
		if(strstr((*glsItr).cprn,cprn)){
			dt = (mjd - (*glsItr).mjd) * 24.0
					+ (sod - (*glsItr).sod) / 3600.0;
			if (*iode >= 0) {
				if (*iode == (*glsItr).aode) {
					*dtmin = fabs(dt);
					ephr = &(*glsItr);
					lfind = 1;
					break;
				}
			} else if(*iode == -1){
				if (fabs(dt) <= *dtmin) {
					*dtmin = fabs(dt);
					ephr = &(*glsItr);
					lfind = 1;
				}
			} else if(*iode == -2){
				ttag = (*glsItr).mjd * 86400.0 + (*glsItr).sod;
				if (ttag > tmax && fabs(dt) <= intv) {
					tmax = ttag;
					*dtmin = fabs(dt);
					ephr = &(*glsItr);
					lfind = 1;
				}
			}
		}
	}
	if(!lfind)
		return 0;
	*iode = ephr->aode;
	dt = (mjd - ephr->mjd) * 86400.0 + sod - ephr->sod;
	*clk = ephr->tau + ephr->gamma * dt;
	if (strstr(mode, "ynn") != NULL)
		return 1;

	dt1 = dt - (int) (dt / 60.0) * 60.0;
	dt2 = dt1;
	nsign = 1;
	if (dt < 0.0)
		nsign = -1;

	glsinit(x, *ephr);

	if (dt1 != 0.0)
		glsrkf4(dt1, x, *ephr);

	while (ABS(dt-dt1) >= 60.0) {
		if (dt - dt1 != 0.0) {
			glsrkf4(nsign * 60.0, x,  *ephr);
			dt1 = dt1 + nsign * 60.0;
		}
	}
	pz902wgs84(mjd, sod, x, xsat, "MCC");
	for (i = 0; i < 3; i++)
		xsat[i] = xsat[i] * 1e3;
	for (i = 3; i < 6; i++)
		xsat[i] = x[i] * 1e3;
	return 1;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x98, %rsp
movq %r8, -0x70(%rbp)
movq %rdx, %r13
movq %rsi, -0x78(%rbp)
movq %rdi, %rbx
movq 0x10(%rbp), %rdx
movq %r9, -0x80(%rbp)
movq $0x0, (%r9)
movabsq $0x4028000000000000, %rax # imm = 0x4028000000000000
movq %rax, (%rdx)
leaq -0x2c(%rbp), %rsi
leaq -0x48(%rbp), %rdx
movl %ecx, %edi
callq 0x1d846
xorpd %xmm0, %xmm0
movapd %xmm0, -0xa0(%rbp)
movapd %xmm0, -0xb0(%rbp)
movapd %xmm0, -0xc0(%rbp)
leaq 0xd0(%rbx), %r14
movq %rbx, -0x68(%rbp)
movq 0xd0(%rbx), %r12
cmpq %r14, %r12
je 0x66410
movl -0x2c(%rbp), %ebx
movl $0x0, -0x38(%rbp)
xorpd %xmm0, %xmm0
movsd %xmm0, -0x40(%rbp)
movsd -0x48(%rbp), %xmm0
movsd %xmm0, -0x60(%rbp)
leaq 0x10(%r12), %r15
movq %r15, %rdi
movq %r13, %rsi
callq 0x8160
testq %rax, %rax
je 0x66381
movl 0x14(%r12), %eax
movl %ebx, %ecx
subl %eax, %ecx
xorps %xmm0, %xmm0
cvtsi2sd %ecx, %xmm0
movsd 0x20(%r12), %xmm2
movsd -0x60(%rbp), %xmm1
subsd %xmm2, %xmm1
divsd 0x4560(%rip), %xmm1     # 0x6a8c0
mulsd 0xe9e0(%rip), %xmm0     # 0x74d48
addsd %xmm1, %xmm0
movq 0x18(%rbp), %rcx
movl (%rcx), %ecx
testl %ecx, %ecx
js 0x6638c
cmpl 0x18(%r12), %ecx
je 0x66414
movq (%r12), %r12
cmpq %r14, %r12
jne 0x66323
jmp 0x66400
cmpl $-0x2, %ecx
je 0x663b3
cmpl $-0x1, %ecx
jne 0x66381
andpd 0x3592(%rip), %xmm0     # 0x69930
movq 0x10(%rbp), %rax
movsd (%rax), %xmm1
ucomisd %xmm0, %xmm1
jb 0x66381
movsd -0x40(%rbp), %xmm1
jmp 0x663e3
xorps %xmm1, %xmm1
cvtsi2sd %eax, %xmm1
mulsd 0x450e(%rip), %xmm1     # 0x6a8d0
addsd %xmm2, %xmm1
ucomisd -0x40(%rbp), %xmm1
jbe 0x66381
andpd 0x355b(%rip), %xmm0     # 0x69930
movsd 0x59d3(%rip), %xmm2     # 0x6bdb0
ucomisd %xmm0, %xmm2
jb 0x66381
movq 0x10(%rbp), %rax
movsd %xmm0, (%rax)
movl $0x1, -0x38(%rbp)
movq %r15, -0x88(%rbp)
movsd %xmm1, -0x40(%rbp)
jmp 0x66381
cmpl $0x0, -0x38(%rbp)
sete %al
movq -0x88(%rbp), %r15
jmp 0x66426
movb $0x1, %al
jmp 0x66426
andpd 0x3514(%rip), %xmm0     # 0x69930
movq 0x10(%rbp), %rax
movlpd %xmm0, (%rax)
xorl %eax, %eax
xorl %r13d, %r13d
testb %al, %al
jne 0x6663e
movl 0x8(%r15), %eax
movq 0x18(%rbp), %rcx
movl %eax, (%rcx)
movl -0x2c(%rbp), %eax
subl 0x4(%r15), %eax
xorps %xmm1, %xmm1
cvtsi2sd %eax, %xmm1
mulsd 0x447f(%rip), %xmm1     # 0x6a8d0
addsd -0x48(%rbp), %xmm1
subsd 0x10(%r15), %xmm1
movsd 0x20(%r15), %xmm0
movsd %xmm1, -0x38(%rbp)
mulsd %xmm1, %xmm0
addsd 0x18(%r15), %xmm0
movq -0x80(%rbp), %rax
movsd %xmm0, (%rax)
leaq 0x12ff8(%rip), %rsi     # 0x79478
movq -0x78(%rbp), %rdi
callq 0x8160
movl $0x1, %r13d
testq %rax, %rax
jne 0x6663e
movsd -0x38(%rbp), %xmm3
movapd %xmm3, %xmm0
divsd 0x440f(%rip), %xmm0     # 0x6a8b8
cvttpd2dq %xmm0, %xmm0
cvtdq2pd %xmm0, %xmm4
xorpd 0x4617(%rip), %xmm4     # 0x6aad0
xorl %eax, %eax
movsd 0x30(%r15,%rax,8), %xmm0
movsd %xmm0, -0xc0(%rbp,%rax,8)
incq %rax
cmpq $0x3, %rax
jne 0x664bb
mulsd 0x43dc(%rip), %xmm4     # 0x6a8b8
addsd %xmm3, %xmm4
movl $0x3, %eax
movsd 0x30(%r15,%rax,8), %xmm0
movsd %xmm0, -0xc0(%rbp,%rax,8)
incq %rax
cmpq $0x6, %rax
jne 0x664e5
xorpd %xmm0, %xmm0
xorl %ebx, %ebx
ucomisd %xmm3, %xmm0
seta %r14b
ucomisd %xmm0, %xmm4
jne 0x66514
jnp 0x6653a
leaq -0xc0(%rbp), %rsi
movq -0x68(%rbp), %rdi
movapd %xmm4, %xmm0
movq %r15, %rdx
movapd %xmm4, -0x60(%rbp)
callq 0x66688
movapd -0x60(%rbp), %xmm4
movsd -0x38(%rbp), %xmm3
movapd %xmm3, %xmm0
subsd %xmm4, %xmm0
movapd 0x4586(%rip), %xmm1     # 0x6aad0
xorpd %xmm0, %xmm1
movapd %xmm0, %xmm2
maxsd %xmm1, %xmm2
ucomisd 0x435a(%rip), %xmm2     # 0x6a8b8
jb 0x665dd
movb %r14b, %bl
leaq 0x66e6(%rip), %rax      # 0x6cc50
movsd (%rax,%rbx,8), %xmm1
mulsd 0x4341(%rip), %xmm1     # 0x6a8b8
movsd %xmm1, -0x40(%rbp)
leaq -0xc0(%rbp), %r12
ucomisd 0x437d(%rip), %xmm0     # 0x6a908
jne 0x6658f
jnp 0x665b7
movq -0x68(%rbp), %rdi
movsd -0x40(%rbp), %xmm0
movq %r12, %rsi
movq %r15, %rdx
movapd %xmm4, -0x60(%rbp)
callq 0x66688
movapd -0x60(%rbp), %xmm4
movsd -0x38(%rbp), %xmm3
addsd -0x40(%rbp), %xmm4
movapd %xmm3, %xmm0
subsd %xmm4, %xmm0
movapd %xmm0, %xmm1
xorpd 0x4505(%rip), %xmm1     # 0x6aad0
movapd %xmm0, %xmm2
maxsd %xmm1, %xmm2
ucomisd 0x42dd(%rip), %xmm2     # 0x6a8b8
jae 0x66583
movl -0x2c(%rbp), %esi
movsd -0x48(%rbp), %xmm0
leaq 0x12ea8(%rip), %r8      # 0x79494
leaq -0xc0(%rbp), %rdx
movq -0x70(%rbp), %rbx
movq %rbx, %rcx
callq 0x667d8
xorl %eax, %eax
movsd 0x4e6f(%rip), %xmm0     # 0x6b478
movsd (%rbx,%rax,8), %xmm1
mulsd %xmm0, %xmm1
movsd %xmm1, (%rbx,%rax,8)
incq %rax
cmpq $0x3, %rax
jne 0x66609
xorl %eax, %eax
movsd -0xa8(%rbp,%rax,8), %xmm1
mulsd %xmm0, %xmm1
movsd %xmm1, 0x18(%rbx,%rax,8)
incq %rax
cmpq $0x3, %rax
jne 0x66622
movl %r13d, %eax
addq $0x98, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
nop