// File: /workspace/github_cpp_makefile_star2_O2/jkingan[P]ladyheather/heathgps.cpp
// Function: get_rcvr_enviro_message(unsigned int)
void get_rcvr_enviro_message(unsigned port)
{
u08 c;
static u08 last_c = 0;
static double last_enviro_time = 0.0;

   // This routine is used when the environmental sensor the main "receiver" device.
   // This routine buffers up an incoming environmental message.  When the 
   // end of the message is seen, the message is parsed and decoded with 
   // decode_enviro_msg().  Messages can end with 0x0D, 0x0A, or both.

   if(enviro_type == HEATHER_ENVIRO) ;
   else if(GetMsecs() < last_enviro_time) return;  // rate limits requests to minimize useless traffic
   last_enviro_time = GetMsecs() + ENVIRO_RATE;    // 100 cps max input rate

   // This routine buffers up an incoming sensor message.  When the end of the
   // message is seen, the message is parsed and decoded with decode_enviro_msg()
   // Messages can end with 0x0D, 0x0A, or both.

   if(SERIAL_DATA_AVAILABLE(port) == 0) {
      check_com_timer(port);
      return;
   }
   else {
      reset_com_timer(port);
   }

   if(port == RCVR_PORT) {  // sensor is main input decice
      c = get_com_char();
      if(com[RCVR_PORT].rcv_error) {      // parity/framing/overrun errors
         com[RCVR_PORT].rcv_error = 0;
         //!!!!!qqqq    goto rst_msg;
      }
   }
   else {  // sensor is auxiliary input device (/et=)
      c = get_enviro_char();  // aaattt
      if(com[port].rcv_error) {      // parity/framing/overrun errors
         com[port].rcv_error = 0;
         //!!!!!qqqq    goto rst_msg;
      }
   }

   last_c = c;

   if(tsip_sync == 0) {    // syncing to start of message, search for a line feed
      if((c == 0x0D) || (c == 0x0A) || (c == 0x00)) {
         tsip_sync = 1;
         get_sync_time();
      }
      tsip_wptr = 0;
      tsip_rptr = 0;
      return;
   }
   else if(tsip_sync == 1) { // 0x0A has been seen, now build the message
      if((c == 0x0D) || (c == 0x0A) || (c == 0x00)) {
         if(tsip_wptr == 0) return; // end-of-line with no data in the message buffer
         goto tsip_end;  // end of message
      }

      if(tsip_wptr < MAX_TSIP) {   // add char to the message buffer
         tsip_buf[tsip_wptr++] = c;
      }
      else {  // buffer overflow, ignore the message
         tsip_error |= OVFL_ERROR;
         goto rst_msg;
      }
   }
   else {  // end of message
      tsip_end:
      if(tsip_wptr) {           // we have a message
         decode_enviro_msg(port); // process the message
         packet_end = 1;
      }

      rst_msg:
      tsip_wptr = 0;     // prepare for next message
      tsip_rptr = 0;
      if((c == 0x0D) || (c == 0x0A) || (c == 0x00)) tsip_sync = 1;
      else tsip_sync = 0;
   }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movl %edi, %ebx
leaq 0x165fd4(%rip), %rax    # 0x202914
cmpl $0x2, (%rax)
je 0x9c95c
callq 0xad3f
movsd 0x2bf8fe(%rip), %xmm1   # 0x35c250
ucomisd %xmm0, %xmm1
ja 0x9cad2
callq 0xad3f
addsd 0x5673f(%rip), %xmm0    # 0xf30a8
movsd %xmm0, 0x2bf8df(%rip)   # 0x35c250
movl %ebx, %edi
callq 0xb771
testl %eax, %eax
je 0x9c9a8
movl %ebx, %edi
callq 0x1d93f
cmpl $0xa, %ebx
jne 0x9c9b9
callq 0x51891
movl %eax, %r14d
leaq 0x25b949(%rip), %rax    # 0x2f82e0
cmpb $0x0, 0x17a12(%rax)
je 0x9c9e7
addq $0x17a12, %rax          # imm = 0x17A12
jmp 0x9c9e4
movl %ebx, %edi
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x1d61b
callq 0x51948
movl %eax, %r14d
movl %ebx, %eax
imulq $0x2260, %rax, %rax     # imm = 0x2260
leaq 0x25b90f(%rip), %rcx    # 0x2f82e0
cmpb $0x0, 0x2252(%rcx,%rax)
je 0x9c9e7
addq %rcx, %rax
addq $0x2252, %rax           # imm = 0x2252
movb $0x0, (%rax)
leaq 0x285868(%rip), %r15    # 0x322256
movzwl (%r15), %eax
cmpl $0x1, %eax
je 0x9ca35
testl %eax, %eax
jne 0x9ca58
cmpb $0xd, %r14b
ja 0x9ca1a
movzbl %r14b, %eax
movl $0x2401, %ecx           # imm = 0x2401
btl %eax, %ecx
jae 0x9ca1a
movw $0x1, (%r15)
callq 0x51a2f
leaq 0x285831(%rip), %rax    # 0x322252
andw $0x0, (%rax)
leaq 0x285828(%rip), %rax    # 0x322254
andw $0x0, (%rax)
jmp 0x9cad2
cmpb $0xd, %r14b
ja 0x9caaf
movzbl %r14b, %eax
movl $0x2401, %ecx           # imm = 0x2401
btl %eax, %ecx
jae 0x9caaf
leaq 0x285802(%rip), %rax    # 0x322252
cmpw $0x0, (%rax)
jne 0x9ca65
jmp 0x9cad2
leaq 0x2857f3(%rip), %rax    # 0x322252
cmpw $0x0, (%rax)
je 0x9ca76
movl %ebx, %edi
callq 0x9c420
movl $0x1, 0x2b921e(%rip)    # 0x355c94
leaq 0x2857d5(%rip), %rax    # 0x322252
andw $0x0, (%rax)
leaq 0x2857cc(%rip), %rax    # 0x322254
andw $0x0, (%rax)
cmpb $0xd, %r14b
ja 0x9caa8
movzbl %r14b, %eax
movl $0x2401, %ecx           # imm = 0x2401
btl %eax, %ecx
jae 0x9caa8
movw $0x1, (%r15)
jmp 0x9cad2
andw $0x0, (%r15)
jmp 0x9cad2
leaq 0x28579c(%rip), %rcx    # 0x322252
movzwl (%rcx), %eax
cmpq $0xfff, %rax            # imm = 0xFFF
ja 0x9cadd
leal 0x1(%rax), %edx
movw %dx, (%rcx)
leaq 0x284782(%rip), %rcx    # 0x321250
movb %r14b, (%rcx,%rax)
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
leaq 0x18c48c(%rip), %rax    # 0x228f70
orb $-0x80, 0x1(%rax)
jmp 0x9ca76