// File: /workspace/github_c_makefile_star2_O1/hfiguiere[P]exifprobe/process.c
// Function: process_app1
unsigned long
process_app1(FILE *inptr,unsigned long app1_offset,unsigned short tag,
                struct image_summary *summary_entry,char *parent_name,
                int indent)
{
    unsigned long max_offset = 0UL;
    unsigned long ifd_offset,fileoffset_base;
    unsigned long dumplength = 0UL;
    unsigned short app_length = 0;
    int chpr = 0;
    struct fileheader *header;
    char *app_string,*name;
    char *fulldirname = CNULL;

    if(inptr)
    {
        if(summary_entry)
        {
            summary_entry->filesubformat |= FILESUBFMT_APPN;
            summary_entry->filesubformatAPPN[1] = 1;
        }
        /* display the APP1 header                                    */
        name = tagname(tag);    /* never null                         */
        if(PRINT_SECTION)
        {
            print_tag_address(SECTION,app1_offset,indent,"@");
            chpr += printf("<%s> %#x ",name,tag);
        }

        app_length = read_ushort(inptr,TIFF_MOTOROLA,HERE);
        if(ferror(inptr) || feof(inptr))
        {
            clearerr(inptr);
            goto appdump;
        }
        if(PRINT_SECTION)
            chpr += printf("length %u, ",app_length);
        else if((PRINT_ENTRY))
        {
            /* ###%%% pseudo-tags fpr LIST Mode here */
            print_tag_address(ENTRY,HERE,indent,"*");
            if((PRINT_TAGINFO))
            {
                if((PRINT_LONGNAMES))
                    chpr += printf("%s.",parent_name);
                chpr += printf("%-14.14s","APP1");
            }
            if((PRINT_VALUE))
                chpr += printf(" = @%lu:%-9u",app1_offset,app_length);
            chpr = newline(chpr);
        }

        app_string = read_appstring(inptr,JPEG_APP1,HERE);
        if(ferror(inptr) || feof(inptr))
        {
            clearerr(inptr);
            goto appdump;
        }

        if(app_string)
        {
            if(PRINT_SECTION)
                chpr += printf("\'%s\'",app_string);

            /* The next thing we see should be a TIFF header tag      */
            /* indicating byte order used in the IFD, followed by the */
            /* offset from the start of the header to the start of    */
            /* the IFD (number of entries).                           */

            fileoffset_base = ftell(inptr);
            /* If this is a valid Exif segment, skip the pad byte.    */
            if(strncmp(app_string,"Exif",4) == 0)
            {
                fulldirname = splice(parent_name,".","APP1");
                ++fileoffset_base;
                if(PRINT_SECTION)
                {
                    chpr = newline(chpr);
                    print_tag_address(SECTION,fileoffset_base,indent + SMALLINDENT,"@");
                }
                header = read_imageheader(inptr,fileoffset_base);
                if(header && (print_header(header,SECTION) == 0) &&
                    (header->probe_magic == TIFF_MAGIC))
                {
                    ifd_offset = read_ulong(inptr,header->file_marker,HERE);
                    if(PRINT_SECTION)
                    {
                        chpr += printf(" ifd offset = %lu (+ %lu = %#lx/%lu)",ifd_offset,
                                    fileoffset_base,fileoffset_base + ifd_offset,
                                    fileoffset_base + ifd_offset);
                        chpr = newline(chpr);
                    }
                    /* ###%%% maybe should unlock the summary entry,  */
                    /* so that the tiff processor will use it? not    */
                    /* sure if that's appropriate for APP1 found in   */
                    /* jpeg sub-images.                               */
                    max_offset = process_tiff_ifd(inptr,header->file_marker,ifd_offset,
                                            fileoffset_base,0L,summary_entry,fulldirname,
                                            TIFF_IFD,0,-1,indent + SMALLINDENT);

                    if(max_offset < app1_offset + app_length + 2)
                        max_offset = app1_offset + app_length +2;
                }
                else
                {
                    max_offset = app1_offset + app_length + 2;
                    if(PRINT_SECTION)
                    {
                        extraindent(indent + ADDRWIDTH);
                        if(header)
                        {
                            chpr += printf(" INVALID MAGIC %lu (%s) where TIFF header should be",
                                         header->probe_magic,tagname(header->probe_magic));
                        }
                        else
                        {
                            chpr += printf(" INVALID HEADER for TIFF");
                        }
#define PRINT_A_BIT 48
                        if(app_length > PRINT_A_BIT)
                            dumplength = PRINT_A_BIT;
                        else
                            dumplength = app_length;
                        goto appdump;
                    }
                }
                if(fulldirname)
                    free(fulldirname);
            }
            else
            {
                max_offset = app1_offset + app_length + 2;
                if(PRINT_SECTION)
                {
                    chpr += printf(" - unknown format");
                    goto appdump;
                }
            }
        }
        else if(PRINT_SECTION)
        {
            chpr += printf("  No APP1 header name string found");
            chpr = newline(chpr);
        }
        /* offset of last byte of segment                             */
        if(PRINT_SECTION)
        {
            print_tag_address(SECTION,max_offset - 1,indent,"-");
            chpr += printf("</%s>",name);
            chpr = newline(chpr);
        }
    }
    return(max_offset);

appdump:
    if(app_length > 0L)
    {
        if((PRINT_APPNDUMP) || (dumplength > 0))
        {
            if((Max_appdump == DUMPALL) || (Max_appdump > (app_length + 2)))
                dumplength = app_length + 2;
            else if(Max_appdump > 0L)
                dumplength = Max_appdump;
            else if(dumplength == 0)
                dumplength = Max_undefined;
            if(dumplength)
            {
                chpr = newline(1);
                hexdump(inptr,app1_offset,app_length + 2,dumplength,16,
                            indent + SMALLINDENT,SMALLINDENT);
                chpr = newline(1);
            }
        }
        else
        {
            if(PRINT_SEGMENT)
            {
                chpr += printf(" - (not dumped: use -A)");
                chpr = newline(chpr);
            }
        }
        max_offset = app1_offset + app_length + 2;
        /* close off the segment; a start "tag" was printed           */
        print_tag_address(SECTION,app1_offset + app_length + 1,indent,"-");
        if(PRINT_SECTION)
        {
            chpr += printf("</%s>",name);
            chpr = newline(chpr);
        }
    }
    setcharsprinted(chpr);
    return(max_offset);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x38, %rsp
movq %r9, 0x8(%rsp)
testq %rdi, %rdi
je 0x14bae
movq %r8, %r12
movq %rcx, %r14
movq %rsi, %r15
movq %rdi, %r13
testq %rcx, %rcx
je 0x14a7c
orb $-0x80, 0x19(%r14)
movl $0x1, 0x20(%r14)
movzwl %dx, %ebx
movl %ebx, %edi
callq 0xa958
movq %rax, 0x28(%rsp)
leaq 0x436ee(%rip), %rax     # 0x58180
xorl %ebp, %ebp
testb $0x4, 0x2(%rax)
je 0x14aca
leaq 0x2c63b(%rip), %rcx     # 0x410dc
movl $0x40000, %edi          # imm = 0x40000
movq %r15, %rsi
movq 0x8(%rsp), %rdx
callq 0x5605
leaq 0x307ae(%rip), %rdi     # 0x45268
movq 0x28(%rsp), %rsi
movl %ebx, %edx
xorl %eax, %eax
callq 0x3120
movl %eax, %ebp
movl $0xffffffff, %edx       # imm = 0xFFFFFFFF
movq %r13, %rdi
movl $0x4d4d, %esi           # imm = 0x4D4D
callq 0x4574
movl %eax, %ebx
movq %r13, %rdi
callq 0x30b0
movzwl %bx, %ecx
movq %rcx, 0x10(%rsp)
testl %eax, %eax
jne 0x14bfe
movq %r13, %rdi
callq 0x31a0
testl %eax, %eax
jne 0x14bfe
leaq 0x43673(%rip), %rax     # 0x58180
movq (%rax), %rax
btl $0x12, %eax
jb 0x14bb6
testl $0x4003333, %eax        # imm = 0x4003333
je 0x14bcb
leaq 0x2ce2d(%rip), %rcx     # 0x41959
movl $0x4003333, %edi        # imm = 0x4003333
movl $0xffffffff, %esi       # imm = 0xFFFFFFFF
movq 0x8(%rsp), %rdx
callq 0x5605
leaq 0x43639(%rip), %rax     # 0x58180
movq (%rax), %rax
testl $0x3003, %eax           # imm = 0x3003
je 0x14b7f
testb $0x40, %al
je 0x14b68
leaq 0x3094b(%rip), %rdi     # 0x454a7
movq %r12, %rsi
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
leaq 0x30532(%rip), %rdi     # 0x450a1
leaq 0x2ef1c(%rip), %rsi     # 0x43a92
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
leaq 0x435fa(%rip), %rax     # 0x58180
testb $0x30, (%rax)
je 0x14ba3
leaq 0x30518(%rip), %rdi     # 0x450aa
movq %r15, %rsi
movq 0x10(%rsp), %rdx
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
movl %ebp, %edi
callq 0x16b56
movl %eax, %ebp
jmp 0x14bcb
xorl %r14d, %r14d
jmp 0x14d32
leaq 0x304d8(%rip), %rdi     # 0x45095
movq 0x10(%rsp), %rsi
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
movl $0xffffffff, %edx       # imm = 0xFFFFFFFF
movq %r13, %rdi
movl $0xffe1, %esi           # imm = 0xFFE1
callq 0x50e2
movq %rax, 0x18(%rsp)
movq %r13, %rdi
callq 0x30b0
testl %eax, %eax
jne 0x14bfe
movq %r13, %rdi
callq 0x31a0
testl %eax, %eax
je 0x14d44
movq %r13, %rdi
callq 0x31b0
xorl %r12d, %r12d
xorl %r14d, %r14d
testw %bx, %bx
je 0x14d2b
leaq 0x43564(%rip), %rax     # 0x58180
movq (%rax), %rax
movl %eax, %ecx
andl $0x400000, %ecx         # imm = 0x400000
orq %r12, %rcx
je 0x14c5c
leaq 0x447e5(%rip), %rax     # 0x59418
movq (%rax), %r14
movl $0xffffffff, %eax       # imm = 0xFFFFFFFF
cmpq %rax, %r14
sete %al
movq 0x10(%rsp), %rcx
leaq 0x2(%rcx), %rbx
cmpq %rbx, %r14
seta %cl
orb %al, %cl
cmpb $0x1, %cl
jne 0x14c78
movq %rbx, %r14
jmp 0x14c8f
btl $0x13, %eax
jae 0x14cd8
leaq 0x305e7(%rip), %rdi     # 0x45250
xorl %eax, %eax
callq 0x3120
movl %eax, %r12d
addl %ebp, %r12d
jmp 0x14cce
testq %r14, %r14
jne 0x14c8f
testq %r12, %r12
jne 0x14c8c
leaq 0x4477f(%rip), %rax     # 0x59408
movq (%rax), %r12
movq %r12, %r14
testq %r14, %r14
je 0x14cd8
movl $0x1, %r12d
movl $0x1, %edi
callq 0x16b56
movq 0x8(%rsp), %rax
leal 0x2(%rax), %r9d
subq $0x8, %rsp
movq %r13, %rdi
movq %r15, %rsi
movq %rbx, %rdx
movq %r14, %rcx
movl $0x10, %r8d
pushq $0x2
callq 0x7446
addq $0x10, %rsp
movl %r12d, %edi
callq 0x16b56
movl %eax, %ebp
movq 0x10(%rsp), %rax
leaq (%rax,%r15), %r14
addq $0x2, %r14
leaq 0x1(%rax,%r15), %rsi
leaq 0x2c408(%rip), %rcx     # 0x410f9
movl $0x40000, %edi          # imm = 0x40000
movq 0x8(%rsp), %rdx
callq 0x5605
leaq 0x43479(%rip), %rax     # 0x58180
testb $0x4, 0x2(%rax)
je 0x14d2b
leaq 0x2ce1b(%rip), %rdi     # 0x41b2f
movq 0x28(%rsp), %rsi
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
movl %ebp, %edi
callq 0x16b56
movl %eax, %ebp
movl %ebp, %edi
callq 0x17530
movq %r14, %rax
addq $0x38, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
leaq 0x43435(%rip), %rax     # 0x58180
movq (%rax), %rax
movq 0x18(%rsp), %rcx
testq %rcx, %rcx
je 0x14dce
btl $0x12, %eax
jae 0x14d71
leaq 0x32833(%rip), %rdi     # 0x47598
movq %rcx, %rsi
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
movq %r13, %rdi
callq 0x3190
movq %rax, 0x20(%rsp)
leaq 0x2f592(%rip), %rsi     # 0x44317
movl $0x4, %edx
movq 0x18(%rsp), %rdi
callq 0x3090
testl %eax, %eax
je 0x14de0
movq 0x10(%rsp), %rax
leaq (%r15,%rax), %r14
addq $0x2, %r14
leaq 0x433d4(%rip), %rax     # 0x58180
testb $0x4, 0x2(%rax)
je 0x14fc4
leaq 0x30527(%rip), %rdi     # 0x452e4
xorl %r12d, %r12d
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
jmp 0x14c0c
btl $0x12, %eax
jb 0x14eba
xorl %r14d, %r14d
jmp 0x14fc4
leaq 0x2cbb0(%rip), %rsi     # 0x41997
leaq 0x2eca4(%rip), %rdx     # 0x43a92
movq %r12, %rdi
callq 0x17a47
movq %rax, 0x18(%rsp)
movq 0x20(%rsp), %r12
incq %r12
leaq 0x43376(%rip), %rax     # 0x58180
testb $0x4, 0x2(%rax)
je 0x14e35
movl %ebp, %edi
callq 0x16b56
movl %eax, %ebp
movq 0x8(%rsp), %rax
leal 0x2(%rax), %edx
leaq 0x2c2b4(%rip), %rcx     # 0x410dc
movl $0x40000, %edi          # imm = 0x40000
movq %r12, %rsi
callq 0x5605
movq %r13, %rdi
movq %r12, 0x20(%rsp)
movq %r12, %rsi
callq 0x418c
movq %rax, %r12
testq %rax, %rax
je 0x14e96
movl $0x40000, %esi          # imm = 0x40000
movq %r12, %rdi
callq 0x5198
testl %eax, %eax
jne 0x14e96
cmpq $0x2a, 0x8(%r12)
jne 0x14e96
movzwl (%r12), %esi
movl $0xffffffff, %edx       # imm = 0xFFFFFFFF
movq %r13, %rdi
callq 0x46cc
movq %rax, %rdx
leaq 0x432fe(%rip), %rax     # 0x58180
testb $0x4, 0x2(%rax)
jne 0x14f36
movq 0x20(%rsp), %rbx
jmp 0x14f6d
movq 0x10(%rsp), %rax
leaq (%r15,%rax), %r14
addq $0x2, %r14
leaq 0x432d6(%rip), %rax     # 0x58180
testb $0x4, 0x2(%rax)
jne 0x14edb
movq 0x18(%rsp), %rbx
jmp 0x14fb7
leaq 0x30435(%rip), %rdi     # 0x452f6
xorl %r14d, %r14d
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
movl %ebp, %edi
callq 0x16b56
movl %eax, %ebp
jmp 0x14fc4
movq 0x8(%rsp), %rax
leal 0x8(%rax), %edi
callq 0x95c0
testq %r12, %r12
je 0x14f11
movq 0x8(%r12), %r12
movzwl %r12w, %edi
callq 0xa958
leaq 0x30395(%rip), %rdi     # 0x45297
movq %r12, %rsi
movq %rax, %rdx
xorl %eax, %eax
callq 0x3120
jmp 0x14f1f
leaq 0x303b3(%rip), %rdi     # 0x452cb
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
cmpw $0x30, %bx
movl $0x30, %eax
cmovbl %ebx, %eax
movzwl %ax, %r12d
jmp 0x14c0c
movq %rdx, %rcx
movq 0x20(%rsp), %rbx
addq %rbx, %rcx
leaq 0x3032a(%rip), %rdi     # 0x45272
movq %rdx, %rsi
movq %rdx, 0x30(%rsp)
movq %rbx, %rdx
movq %rcx, %r8
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
movl %ebp, %edi
callq 0x16b56
movq 0x30(%rsp), %rdx
movl %eax, %ebp
movzwl (%r12), %esi
movq 0x8(%rsp), %rax
addl $0x2, %eax
subq $0x8, %rsp
xorl %r10d, %r10d
movq %r13, %rdi
movq %rbx, %rcx
xorl %r8d, %r8d
movq %r14, %r9
pushq %rax
pushq $-0x1
pushq %r10
pushq %r10
movq 0x40(%rsp), %rbx
pushq %rbx
callq 0xc93c
addq $0x30, %rsp
movq 0x10(%rsp), %rcx
leaq (%r15,%rcx), %r14
addq $0x2, %r14
cmpq %r14, %rax
cmovaq %rax, %r14
testq %rbx, %rbx
je 0x14fc4
movq %rbx, %rdi
callq 0x3050
leaq 0x431b5(%rip), %rax     # 0x58180
testb $0x4, 0x2(%rax)
je 0x14d32
leaq -0x1(%r14), %rsi
leaq 0x2c119(%rip), %rcx     # 0x410f9
movl $0x40000, %edi          # imm = 0x40000
movq 0x8(%rsp), %rdx
callq 0x5605
leaq 0x2cb39(%rip), %rdi     # 0x41b2f
movq 0x28(%rsp), %rsi
xorl %eax, %eax
callq 0x3120
addl %eax, %ebp
movl %ebp, %edi
callq 0x16b56
jmp 0x14d32