// File: /workspace/github_cpp_makefile_star2_O3/DoubleString[P]eph_converter/src/Broadcast.cpp
// Function: 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;
	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 %r9, %r15
movq %r8, %r14
movq %rdx, %r13
movq %rsi, -0x88(%rbp)
movq %rdi, %rbx
movq 0x10(%rbp), %rdx
movq $0x0, (%r9)
movabsq $0x4028000000000000, %rax # imm = 0x4028000000000000
movq %rax, (%rdx)
leaq -0x2c(%rbp), %rsi
leaq -0x48(%rbp), %rdx
movl %ecx, %edi
callq 0xab7f
xorpd %xmm0, %xmm0
movapd %xmm0, -0xa0(%rbp)
movapd %xmm0, -0xb0(%rbp)
movapd %xmm0, -0xc0(%rbp)
leaq 0xd0(%rbx), %r12
movq %rbx, -0x68(%rbp)
movq 0xd0(%rbx), %rbx
cmpq %r12, %rbx
je 0x84c7
movq %r15, -0x78(%rbp)
movq %r14, -0x70(%rbp)
movl -0x2c(%rbp), %r14d
movl $0x0, -0x38(%rbp)
xorpd %xmm0, %xmm0
movsd %xmm0, -0x40(%rbp)
movsd -0x48(%rbp), %xmm0
movsd %xmm0, -0x60(%rbp)
leaq 0x10(%rbx), %r15
movq %r15, %rdi
movq %r13, %rsi
callq 0x30b0
testq %rax, %rax
je 0x8437
movl 0x14(%rbx), %eax
movl %r14d, %ecx
subl %eax, %ecx
xorps %xmm0, %xmm0
cvtsi2sd %ecx, %xmm0
movsd 0x20(%rbx), %xmm2
movsd -0x60(%rbp), %xmm1
subsd %xmm2, %xmm1
divsd 0x4bf8(%rip), %xmm1     # 0xd010
mulsd 0x5970(%rip), %xmm0     # 0xdd90
addsd %xmm1, %xmm0
movq 0x18(%rbp), %rcx
movl (%rcx), %ecx
testl %ecx, %ecx
js 0x8441
cmpl 0x18(%rbx), %ecx
je 0x84cf
movq (%rbx), %rbx
cmpq %r12, %rbx
jne 0x83df
jmp 0x84b2
cmpl $-0x2, %ecx
je 0x8468
cmpl $-0x1, %ecx
jne 0x8437
andpd 0x4c2d(%rip), %xmm0     # 0xd080
movq 0x10(%rbp), %rax
movsd (%rax), %xmm1
ucomisd %xmm0, %xmm1
jb 0x8437
movsd -0x40(%rbp), %xmm1
jmp 0x8498
xorps %xmm1, %xmm1
cvtsi2sd %eax, %xmm1
mulsd 0x4bb9(%rip), %xmm1     # 0xd030
addsd %xmm2, %xmm1
ucomisd -0x40(%rbp), %xmm1
jbe 0x8437
andpd 0x4bf6(%rip), %xmm0     # 0xd080
movsd 0x588e(%rip), %xmm2     # 0xdd20
ucomisd %xmm0, %xmm2
jb 0x8437
movq 0x10(%rbp), %rax
movsd %xmm0, (%rax)
movl $0x1, -0x38(%rbp)
movq %r15, -0x80(%rbp)
movsd %xmm1, -0x40(%rbp)
jmp 0x8437
cmpl $0x0, -0x38(%rbp)
je 0x84c7
movl -0x2c(%rbp), %r14d
movsd -0x48(%rbp), %xmm0
movq -0x80(%rbp), %r15
jmp 0x84e4
xorl %r12d, %r12d
jmp 0x86e7
andpd 0x4ba9(%rip), %xmm0     # 0xd080
movq 0x10(%rbp), %rax
movlpd %xmm0, (%rax)
movsd -0x60(%rbp), %xmm0
movl 0x8(%r15), %eax
movq 0x18(%rbp), %rcx
movl %eax, (%rcx)
subl 0x4(%r15), %r14d
xorps %xmm1, %xmm1
cvtsi2sd %r14d, %xmm1
mulsd 0x4b2e(%rip), %xmm1     # 0xd030
addsd %xmm0, %xmm1
subsd 0x10(%r15), %xmm1
movsd %xmm1, -0x38(%rbp)
movsd 0x18(%r15), %xmm0
movq -0x78(%rbp), %rax
movsd %xmm0, (%rax)
leaq 0x5a0a(%rip), %rsi      # 0xdf30
movq -0x88(%rbp), %rdi
callq 0x30b0
movl $0x1, %r12d
testq %rax, %rax
jne 0x86e7
movsd -0x38(%rbp), %xmm3
movapd %xmm3, %xmm0
divsd 0x4ab6(%rip), %xmm0     # 0xd008
cvttpd2dq %xmm0, %xmm0
cvtdq2pd %xmm0, %xmm4
xorpd 0x58ce(%rip), %xmm4     # 0xde30
xorl %eax, %eax
movsd 0x30(%r15,%rax,8), %xmm0
movsd %xmm0, -0xc0(%rbp,%rax,8)
incq %rax
cmpq $0x3, %rax
jne 0x8564
mulsd 0x4a83(%rip), %xmm4     # 0xd008
addsd %xmm3, %xmm4
movl $0x3, %eax
movsd 0x30(%r15,%rax,8), %xmm0
movsd %xmm0, -0xc0(%rbp,%rax,8)
incq %rax
cmpq $0x6, %rax
jne 0x858e
xorpd %xmm0, %xmm0
xorl %ebx, %ebx
ucomisd %xmm3, %xmm0
seta %r14b
ucomisd %xmm0, %xmm4
jne 0x85bd
jnp 0x85e3
leaq -0xc0(%rbp), %rsi
movq -0x68(%rbp), %rdi
movapd %xmm4, %xmm0
movq %r15, %rdx
movapd %xmm4, -0x60(%rbp)
callq 0x8730
movapd -0x60(%rbp), %xmm4
movsd -0x38(%rbp), %xmm3
movapd %xmm3, %xmm0
subsd %xmm4, %xmm0
movapd 0x583d(%rip), %xmm1     # 0xde30
xorpd %xmm0, %xmm1
movapd %xmm0, %xmm2
maxsd %xmm1, %xmm2
ucomisd 0x4a01(%rip), %xmm2     # 0xd008
jb 0x8686
movb %r14b, %bl
leaq 0x582d(%rip), %rax      # 0xde40
movsd (%rax,%rbx,8), %xmm1
mulsd 0x49e8(%rip), %xmm1     # 0xd008
movsd %xmm1, -0x40(%rbp)
leaq -0xc0(%rbp), %r13
ucomisd 0x4a14(%rip), %xmm0     # 0xd048
jne 0x8638
jnp 0x8660
movq -0x68(%rbp), %rdi
movsd -0x40(%rbp), %xmm0
movq %r13, %rsi
movq %r15, %rdx
movapd %xmm4, -0x60(%rbp)
callq 0x8730
movapd -0x60(%rbp), %xmm4
movsd -0x38(%rbp), %xmm3
addsd -0x40(%rbp), %xmm4
movapd %xmm3, %xmm0
subsd %xmm4, %xmm0
movapd %xmm0, %xmm1
xorpd 0x57bc(%rip), %xmm1     # 0xde30
movapd %xmm0, %xmm2
maxsd %xmm1, %xmm2
ucomisd 0x4984(%rip), %xmm2     # 0xd008
jae 0x862c
movl -0x2c(%rbp), %esi
movsd -0x48(%rbp), %xmm0
leaq 0x58bb(%rip), %r8       # 0xdf50
leaq -0xc0(%rbp), %rdx
movq -0x70(%rbp), %rbx
movq %rbx, %rcx
callq 0x8898
xorl %eax, %eax
movsd 0x49ae(%rip), %xmm0     # 0xd060
movsd (%rbx,%rax,8), %xmm1
mulsd %xmm0, %xmm1
movsd %xmm1, (%rbx,%rax,8)
incq %rax
cmpq $0x3, %rax
jne 0x86b2
xorl %eax, %eax
movsd -0xa8(%rbp,%rax,8), %xmm1
mulsd %xmm0, %xmm1
movsd %xmm1, 0x18(%rbx,%rax,8)
incq %rax
cmpq $0x3, %rax
jne 0x86cb
movl %r12d, %eax
addq $0x98, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq